<>Q~ <3JBITEMD - Allocations By Division / SHOW ITEM DETAIL SCREEN*3"w/ multi-box-item updates 9/14/2004 rcc@Ж@(M$дEП╗$РдПдEС,сдEШя JBPLAN.tplС1сдEШеFСсдEШС еВеFС,сдEШяJBPLAN2M$дEП╗$Рд ПдEС,сдEШя JBITEM.tplС1сдEШеFСсдEШС еВеFС,сдEШяJBITEM<M$дEП╗$РдПдEС,сдEШя JBDIVS.tplС1сдEШеFСсдEШС е ВеFС,сдEШяJBDIVS>M$дEП╗$РдQПдEС,сдEШя JBTERR.tplС1сдEШеFСсдEШС еRВеFС,сдEШяJBTERRFS$дEП╗$Рд!ПдEС,сдEШя JBDEALERS.tplС1сдEШеFСсдEШС е"ВеFС,сдEШя JBDEALERSP ╚─сеШZ$еПеdH3IF POS(YYY$(1,2)=STBL("showprogram"))=0 THEN LET YYY$=YYY$(1,4)+YYY$(8)n8еx]╙$еCПя&DIV=Ре$ПяDivisionЄP$еHПяРе1ПяРе%Пя Ў$е0П╘'сяTRHILITEШХ3^1000Р"$еП╘сеРя pagetitle╠ЖЭШСЖЭ0$еП╘'ся pagetitleРяAllocations By DivisionШU$еП╘с╘сеРяItemNoШРфШш╘сфШРдPПфС ╘'сяSUBFUNC╠ЖШАяSHOWALLЩЙ$дPПфK$дSПфС ╘сеРяPLANS╠Ж ШАяTЩЙ%$дSПфРеCПя&TER=Ре$Пя Territory0$еПесфРфШРеП╘'сяCO_CODEШРеПяJIM001$$еПешеше.1Зсд ╣еҐф╞Ж8ШеСЖ=81 еВяSEARCHFOR:C(1*=0)С$е@\ПеСяWJBPLAN0С9:$еПя-Invalid Item. Click BACK and fix the problem.СЖ#(=г$еПя

View ALL Activity for ItemB$еП╘сд ╠ЖLШL$еП╘сд ╠ЖVШV▓$еПешр шяpJump To:
шр шя-шр шя1шр `⌠$еПяш╚─се@ Шшяdк$е[ПяС ╗ся ccalamariА╘'ся$sesrecШШЩЙ·$е[Пя

h$еkПяС е@lАяQЩЙ $еkПяQjо$еIПяA

шешя - (ш╘(с╗се@ШШшя) ш╘се@ РфШше[шя
Status: ше@jшеkшя

шешя

╟#3^100 "rem get the item recv totals╨BяJBBAL4Ре@ Ре7Ре8Ре9Рд:Рд]Рд;Рд<Рд=Ре>Ре?Ре@РеAРеB╩>$д^ПфСя JBBALALLOCРе@ Рд^Ре_РдcРдiРдdРдeРдfРдgРеbЎ $д;Пд;эд=эдfэдgС34/7/04 rcc©?3IF JBITEM.QTYRAPID>0 THEN LET RCV=JBITEM.QTYRAPID,USINGRAPID=1дф$е#Пя8шр н$еПяРеПяп.3^1000 "scan thru divs, show plans for a divзD дSЩЙ<1ЗсдQ╟Ж≤ШеRС$е&Пе@TРе(Пе&Ре)П╘се@UРфШшя ше&СЖИД71Зсд╟Ж≤Ше С$е&Пе@GРе(Пе&Ре)П╘се@DРфШшя ше&И*$д*ПфРд+ПфРд,ПфРд2ПфРд.ПфРдVПфКf3if dOTERR=0 AND SHOWALL=0 THEN IF POS(CVS(JBDIVS.DIV$,3)+","=STBL("JBUSERDIVISION"))=0 THEN GOTO 2000ЛC дSАфЩЙ8$е_Пя0POS(CVS(H.DIVISION$,3)=STBL("JBUSERDIVISION"))>0С$д^ПфэдSЬ:я JBBALALLOCРеше&Рд^Ре_Рд*РдhРд.Рд2Рд`РдaРеb $д+Пд*щд2щд.Рд,Пф43>z$е'Пя ше)шяH дPЩЙ$е'Пе)RA$д,ПфС д;ЦдcЛд;АфЩЙ&$д,Пд+Рд+ПфС3 DEPENDS ON RECEIPTSS* д+АфЩЙ дhДфЩЙ$д+ПдhРд,Пд,щдhT дSКд*АфЩЙЖz\y$е/Пе0шяшр ^0$дwПдwэд*РдxПдxэд+РдyПдyэд,РдzПдzэд2ar дSАфКдPАфЩЙ` ╗с╘се@GРфШшя,А╘'сяJBUSERDIVISIONШШАфЩЙ/ЖпС3should count in qg totals, but no detail?f$еПеше/p0$д4Пд4эд*Рд-Пд-эд+Рд5Пд5эд,Рд6Пд6эд2u$дWПдWэдVzЖп≤3^100 "done with divs╒%3^100 "create top summary totals box╛▒$еJПя%

ше$шя	Allocatedше%шяCom'dше%шяBack Orderedше%шяShippedше%шяAvailшя
ше'ше1ш╘(сдШшя ше1ш╘(сд+Шше1ш╘(сд,Шше1ш╘(сд2Шше1ш╘(сдщд+щд,щд2Шшя

╠$дXПд;С3 GTTLPREV╡$дYПдXщдzщдxщд{І▓$еJПеJше0шя

ш╚─сяOrderedШше%ш╚─сяReceivedШше%ш╚─сяTotal StockШшя
ше@Kше1ш╘(сдXШше1ш╘(сдYШшеLС3+" rcv="+STR(RCV)+" gttlavail="+STR(GTTLALLOC-GTTLCOMD-GTTLSHIPPED)+TRO$ю"$еJПеJшя

шр Э)3---------- HANDLE MULTI-BOX-ITEM DISPLAY ╘се@mРфШАяЩЙЖ╦ Ь$еJПеJшя% ▓$еnПе@ д1я JBITEMMBIРеnРеoРеpРеqРеrРдsРеtРеuРеv ($еJПеJшеqJ"$еJПеJшя

Multi-Box Item Info
ш╚─ся Item CodeШше%ш╚─сяOrderedШше%ш╚─сяReceivedШше%ш╚─сяTotal StockШшя

шр ╦3^1000б1 ╗с╘'сяULEVELША╘'сяsecurityШШДфЩЙ$еПял▐$еПя ═3^1000 "BOTTOM OF PAGE╙|$е3ПяшяTotalше1ш╘(сд4Шше1ш╘(сд-Шше1ш╘(сд5Шше1ш╘(сд6Шше1ш╘(сд4щд-щд5щд6Шшяшр ЄG$еПеIшеJше#шеше3шеrРе#Пе#ше3СяWFPASS0Ре#РяРяРяSET╧6$еПешешя
шешяView All Divisions
Ў∙ дSАфЩЙ┼$еПешя
View Territory Detailюq дSЩЙi$еПешя
Allocations By Divisionх$еПешя ЗЖ#( Ж#(@ 38000 "errorJE$еПя An error ш╘(с╗Шшя at line ш╘(с╗"сфШШшя in prog ш╘#сзфШTEС2#(39000 "OUTTA HERE#2'310000 "' ╚─сеMШ'$B ╗сеMШЦф ЩЙ3$еNПеMСдOПфЧф щ╗сеNШС$еMПя шеMС*дO'.8еMЪЪERRORATITEMCGIITEM1CC9ITEXTTEXTALINK JBITEM.RICJBITEMJBITEMJITEMK JBITEM.RICDESCCUST1AALINKYYYYY ITEMDLINKWFCGI1 JBITEM.RICPACK ITEMPREV ITEMNEXT ITEMNEXT1 PAGETITLEDUMMY FORMSTARTWFWFPGMJBPLANJBPLANJBDIVSJBDIVS JBDEALERS JBDEALERSTOTSUMMARYLISTOFTDDHDIVTTLTTTTTTSHOW TTLALLOCTTLCOMDTTLBO GTTLCOMD TTLAVAILSS2TRTDDRTTLSHIPPEDBOTTOM GTTLALLOCGTTLBOGTTLSHIPPEDD1D2 ORDERLISTOHDRCVSHIADJRDATE1 LSHIPDATESHIDIVSHITER SHIORDERTERDIV JBDIVS.RNAMECTPL JBDIVS.DIVTDDTEXT0TEXT1 JBITEM.QTYORDTROZZZZSHOWALLJBTERRJBTERRDOTERR JBTERR.TERR JBTERR.TERRNAMETTLPREV GTTLPREVRCVSHOWTOTALSTOCK JBITEM.ITEM_NOEDITRICLINK CGI.SEARCHFORCMTUSEKNUMFILTER TTLRAPIDTTLDROPRESULT1ALLOCZZTOTSHTOTSHRAPIDSHDROPTTLIP INPROCESSTOT JBITEM.STATUSQCHOLD JBITEM.QCSTATUS JBITEM.MBIRIC MASTERRICSUBRICSSUMMBOX ACTLINKSLOWTOTSTOCKOTHER1OTHER2OTHER3QGTTLALLOC QGTTLCOMDQGTTLBO QGTTLSHIPPEDQGTTLSHOULDBECOMD┌RICS┌SIХ