<>!Ÿú 93JBPLANC CALLED INTERFACE TO JIM BEAM PLANNED ORDER FILE*3consolidation view (for a date range), (3"updated to sort by zip/dealer/override83added support for print version (no forms/images/links)53******* SUPPRESSSING AB ITEMS AT 3150 and 128$ÄgðÆS3IF POS("ccalamari"=STBL("$sesrec")) THEN PREFIX "/u/tmp/restore/u/webjbb/wf/ "+PFX<$Äð¨$ó,ÓÄûÑ JBPLAN.tpló1ÓÄûÅ(óÓÄûó,ÓÄûÑJBPLAN Å÷Å("K$Ä*ð¨$ó,ÓÄ*ûÑ JBDEALERS.tpló1ÓÄ*ûÅ+óÓÄ*ûó Å,÷Å+ó,ÓÄ*ûÑ JBDEALERS2M$ÄHð¨$òÄFðÄHó,ÓÄHûÑ JBITEM.tpló1ÓÄHûÅ(óÓÄHûó Å÷Å(ó,ÓÄHûÑJBITEM3V$ÄHð¨$òÅ_ðÑ JBADDRESSòÄ\ðÄHó,ÓÄHûÅ_ÛÑ.tpló1ÓÄHûÅ(óÓÄHûó Å]÷Å(ó,ÓÄHûÅ_4W$ÄHð¨$òÄMðÄHó,ÓÄHûÑJBSTATENUMS.tpló1ÓÄHûÅ(óÓÄHûó ÅN÷Å(ó,ÓÄHûÑJBSTATENUMS<@ö@FE ¨"ÓÆ ûáÆýê7$Äð¨ÓÇÓòÆ òÆûòÅðÑó$Äð¨$ó,ÓÄûÑJBPLANóöndÄòÅTòÅWòÅnJ$ÅðÑ òÅðÑ100òÅðÑ100òÅðÑ100òÅðÑ100òÅ$ðÑ sA$ÅðÑtd class="td" òÅ ðÑ<ÛÅÛÑ>òÅ!ðÑ<ÛÅÛÑ nowrap>tÔ$ÅwðÑ>òÅxðÑ?òÅyðÑ?zj$ÅðÑÛÅ òÅðÑÛÅ!òÅðÑ ÛÒ òÅ"ðÑ<ÛÅÛÑ align="right">€> Ägýê6$ÅhðÑ&
TEMPORARY SUPRESS OF ABSOLUT ITEMSÛÑ
‚"$ÅmðÅhÛÑCÌ+$ÅðÅÛÑ<ÛÅÛÑ width="Û©(ÓÄûÛÑ">Î8ÅÐ]Ò «€ÓÅûÜ! ©ÓÅòÆûáÑýê$ÅðÑ æ8Åè]ð «€ÓÅûú,$Åð©ÓÅòÆûó ÅâÑýê$ÅðÅÛÑ
ü8Å] «€ÓÅû ©ÓÅòÆûáÑýêö+ ÅÓÆûáÑ111111ýê$ÅðÑNext Kitóö1$ÅðÅÓÆòÆûÛÑ/ÛÅÓÆòÆûÛÑ/20ÛÅÓÆòÆû8Å ], ª€ÓÅsòÅû65$Ätð¨Ó¨ÓÅsÓÆòÆûûò¨ÓÅsÓÆòÆûûò¨ÓÅsÓÆòÆûûû85$Äuð¨Ó¨ÓÅÓÆòÆûûò¨ÓÅÓÆòÆûûò¨ÓÅÓÆòÆûûû@$ÄvðÄtÝÄuJ8ÄvT]¼;$Åbð©'ÓÑWFDIRûÛÑtmp/repsortÛ©(Ó¨Ó©ÓÆòÆûûûóÅb±öÆÆ RÅbòÆ,òÆòÆÐ$Äað¨$ó,ÓÄaûÅb B$ÅðÑòÅðÑZZó$Åð©'ÓÑ DEALERONLY±ö*ûó ÅâÑýê$ÅðÅ4$ÄðÆ>.$ÅðÑòÅ ðÑòÅ ðÑòÅðÑòÄðÆòÄ ðÆ„1ÓÄµÅ¼Ä¯ö…ûè 3LOOP HEREL$Åð©ÓÄ°ölûó1úÓÄ°ölûÅV ÅÓÆò¨ÓÅûûäÅýêölX$ÅðÅY- Å@-ÓÆòÆûáÑZZë©ÓÅ@-òÆûâÑZZ99SýêöLZ6 Å,÷© ÓÅ,ûóúÓÄ*µÅ@-¯öLûÅ,ó ¨ÓÅ@káÑDHûýêöL[9 ¨ÓÒáÅWûýê( ¨Ó©ÓÅ@5òÆûÛÒáÅWûáÆýêöLôöb_( ÅWâÑýê ©AÓÅWòÆûâÅ@5ýêöLôöba+ ÅTáÑ INPROCESSýê Å@EáÑIýêöcôöèb ¨ÓÅ@EáÑISRûýêöèc$ÄJð¨ÓÅ@6ûó ÄJãÆýêöèd Å÷© ÓÅûó1úÓÄFµÅ@5¯öeûÅe: ¨Ó©ÓÅ@-òÆûá©'ÓÑ noholddealers±ögûÛÑ/ûýê $Å@GðÑAf: ¨Ó©ÓÅ@-òÆûá©'ÓÑ noholddealers±ögûÛÑ/ûýê $Å@iðÑCg! Å@iáÑQëÅTâÑPLANNINGýêöèh Å@GáÑHýêöèi? Å@)ÓÆûáÑ111111ýê) ©'ÓÑNEXTKIT±ötûáÑALLOWýêötôöèjN$ÅðÅ@)Û©ÓÆûòÄð¨Ó¨ÓÑ20ÛÅÓÆòÆûûò¨ÓÅÓÆòÆûûò¨ÓÅÓÆòÆûû±öèûl ÄäÄÜÆýêöèt3" CHECK WE HAVE INVENTORYv43 rcc 01/12/05 if SHOWONLY$<>"ONHAND" THEN GOTO 1500~#$Ä7ð¨ÓÅ@5áÅ8òÆûó Ä7äÆýêö°ˆBÑJBBAL4òÅ@5òÅ9òÅ:òÅ;òÄ<òÄjòÄ=òÄ>òÄ?òÅ@òÅAòÅBòÅCòÅD;$Å8ðÅ8ÛÅ@5òÅIðÅIÛ©(ÓÄ<÷©ÓÆòÑ#ûûòÅpðÅpÛ©AÓÅAòÆûö~’ Ä<ãÆýêöè°3CHECK CURRENT AVAILÄ$Ä<ð¨ÓÅIÓÄ7òÆûûÆ ÅTâÑONHANDýê $Ä<ðÈB?É$Åqð©AÓ©ÓÅpÓÄ7òÆûòÆûòÆûÎ! Ä<ãÄJýêöèó3DONT SHIP SHORTØ$$ÅIÓÄ7òÆûð©(ÓÄ<ÝÄJ÷©ÓÆòÑ#ûûxöÜÒöèÜ)3------ handle the sort/display of ordersá Å,÷© ÓÅ,ûóúÓÄ*µÅ@-¯öâûÅ,ã7$ÅKðÅ@2ó ©ÓÅ@LòÆûâÑýêúÓÄMµÅ@L¯öäûÅNó$ÅKðÅ@OäL Å]÷© ÓÅ]ûóúÓÄ\µÅ@4¯öåûÅ]ó$Å,ÓÆûðÅ]ÓÆûòÅ`ð©Ó©ÓÅ]ÓÆûûûòÅKðÅ@^@$$ÅcðÅ@3ÛÅ@dÛ©Ó©ÓÅ]ÓÆûûûÛÅ@4ÛÅqT LÓÄaµÅcûböèl3DONEqö¸ó3display the reportt* ÅâÑýêU€ó$ÅmðÑ

DealerÛÅÛÑName/AddressÛÑ

NotesÛÅÛÑ)Û«€ÓÆòÆdûÛÑOrder IdÛ«€ÓÆòÆdûÛÑ Req. DateÛ«€ÓÆòÆŒûÛÑItem IDÛ«€ÓÆòÆFûÛÑShip QtyÛÅÛÑ

ÛÅŒS$Änð¨$ó,ÓÄn·ÑO_CREATE,O_TRUNCûÑ/u/webjbb/tmp/repoutÛ©(Ó¨Ó©ÓÆòÆûûûÛÑ.htm–U€È «€ÓÄòÄûÊ!$ÅðÑó ÄäÆýê $ÅðÑ

ÛÅóU€v»$ÅmðÑ
ÛÅÛÑReport SummaryÛÅÛÅÛÅÛÑDealer CountÛÅÛ©(ÓÄ&ûÛÅÛÅÛÑOrder CountÛÅÛ©(ÓÄ%ûÛÅÛÅÛÑTotal Ship QtyÛÅÛ©(ÓÄ'ûÛÅÛÑ

€U€ŠÓÄnûó$ÅðÅÛÑclick here for easy to print version
Æö#(ÐU€ÚD$ÅmðÅÛÅÛÅ"ÛÑTotalÛÅ"ÛÑÛ©(ÓÄ#ûÛÑÛÅóU€Ü?$ÅSðÑó ©ÓÅUòÆûâÑýê#$ÅSðÑAssigned to Whse Ref#: ÛÅU>Û ¨ÓÑCLGá©'ÓÑ$sesrecûûýê½ ¨ÓÅ[áÑISûáÆýê¨$ÅSðÑ8set as SFM:H/3IF POS("ccalamari"=STBL("$sesrec")) THEN IF POS(H.STATUS$="IS")=0 THEN LET LINKSFR$="shiprapid",FOLINK$=FOLINK$+"|"+LINKSFR$M ¨ÓÑCLGá©'ÓÑ$sesrecûûýêò ¨ÓÅ@EáÑISûáÆýêÝ$ÅlðÑŽdrop ship CLG:òÅSðÅSÛÑ|ÛÅl\Þ ¨ÓÅ[áÑISûáÆýêÉ$ÅSðÅSÛÑ9 | make F/O:¨Q ¨Ó©'ÓÑULEVELûá©'ÓÑsecurityûûãÆýê($ÅðÅÛÑÛÅSÛÅ¬$Ä'ðÄ'ÜÄ#òÄ#ðÆòÄ&ðÄ&ÜÆ±$ÅRðÑò8TU€3handle output of a liner$ÅðÅÛÅm| LÓÄnûÅm®8¸3^1000 "print the sort file out¼1ÓÄaµÑ¯ö½û$Åcð©ÓÄa°ö<ûó1ÓÄaû&$ÅqðÅcÓÆ û0!1úÓÄµÅcÓÆòÆû¼ÆûÅó$ÅðÅD1úÓÄFµÅ@5ûÅNd3F POS(CVS(JBITEM.RICBRAND$,3)="AB*LV*LVL*") AND CVS(JBITEM.RIC$,3)<>"AB04A2Q0018239" THEN GOTO 3100X3^100 ± Å,÷© ÓÅ,ûóúÓÄ*µÅ@-¯ö ²ûÅ, ²ÑJBDEALERSNOTESòÅ,òÅPòÅQ ³7$ÅKðÅ@2ó ©ÓÅ@LòÆûâÑýêúÓÄMµÅ@L¯ö ´ûÅNó$ÅKðÅ@O ´f Å]÷© ÓÅ]ûó$Å`ðÑóúÓÄ\µÅ@4¯ö µûÅ]ó$Å,ÓÆûðÅ]ÓÆûó$Å`ðÑ

òÅKðÅ@^ µ ©ÓÅ@eòÆûáÑUSAýê$Å@eðÑ ¶M$ÅðÅ`Û«€ÓÅ@.ûÛ«€ÓÅ@/ûÛ«€ÓÅ@0ûÛ«€ÓÅ@fûÛÅ@1ÛÑ, ÛÅKÛÑ ÛÅ@3ÛÑ ÛÅ@e ¸t$ÅrðÅòÄoðÆòÄoðª€Ó© ÓÆ÷Ñ%Y%Mz%DzûòÅqûó$ÅqðÑó ÄoäÆýê0$ÅrðÅwó ÄoäÆ ýê$ÅrðÅxó ÄoäÆýê$ÅrðÅy »c Å@-Û©Ó©ÓÅ]ÓÆûûûáÅýêG$ÅmðÅrÛÅ@4ÛÅÛ«€ÓÅ@)ûÛÅÛÅ@5ÛÅqÛÅ"Û©(Ó¨ÓÅ@6ûûÛÅ$ÛÅóU€óö ü ¾* ÅâÑýêU€ó$ÅmðÑÛÅóU€ ¿7$ÅXðÑó ¨ÓÅ@EáÑISûäÆýê$ÅXðÑ
ÛÅ@EÛÑ/ÛÅ@Y ÀÅ$ÅmðÅÛÅ@-ÛÅÛÅÛÑ Û«€ÓÅPûÛÅÛÑ%ÛÅrÛÅ@4Û«€ÓÆòÆdûÛ«€ÓÅ@)ûÛ«€ÓÆòÆŒûÛÅ@5ÛÅqÛÑ"

Û©(Ó¨ÓÅ@6ûûÛÅ$ÛÅóU€;$ÅðÅ@-Û©Ó©ÓÅ]ÓÆûûûòÅZðÅòÄ#ðÄ#Ü¨ÓÅ@6ûòÄ%ðÄ%ÜÆ$ÅRðÅRÛÅ@4ÛÑ| $ÅUðÅ@VÓÆòÆûòÅ[ðÅ@E2ö<3^100 "end of sort file–8@3T=$ÅðÑERROR Û©(Ó¨ûÛÑ AT LINE Û©(Ó¨"ÓÆûûÛÑ IN Û©#ÓÚÆû^Eó2#(3OUTTA HERE#2ÓÄû&¬ÿÿHRECJBPLANSTARTATENDATUSEKNUMKJBITEMTTTQCCCQIQCOUNTTRTDDTROCDATETEXT1ADATEADATEERRMESSAGE DADDRESSDLASTCW1CW2CW3CW4YYY1YYY2YYY TDELEMENTTDPLAIN TDNOWRAPTDDRDQTYIDENT1OCOUNTDCOUNTRQTYTPL H.REQUESTED_DATE JBDEALERS JBDEALERSTPL JBDEALERS H.DEALER JBDEALERS.DEALER_ADD1 JBDEALERS.DEALER_ADD2 JBDEALERS.DEALER_ADD3 JBDEALERS.DEALER_CITY JBDEALERS.DEALER_STATE JBDEALERS.DEALER_ZIP H.ORDERID H.RIC H.QTYPPAVAILD1D2 ORDERLISTOHDRCVSHIADJRDATE1 LSHIPDATESHIDIVSHITER SHIORDER H.STATUSJBITEM JBITEM.STATUSCAVAIL1QTYDEALERSTATECODE JBDEALERS.STATENUMJBSTATENUMSJBSTATENUMS JBSTATENUMS.STATE SHIPNOTESOTHER1FOLISTFOLINK SHOWONLYBOLKEY H.BOLKEY DROPITEMPLANSTATUS H.DROP_CARRHHPLANSTATUS1 JBADDRESS JBADDRESS JBADDRESS.DEALER_STATEC OVERRIDECWRKCWRKCWRK1 JBDEALERS.DEALER JBDEALERS.DEALER_COUNTRY JBDEALERS.DEALER_ADD4 SUPRESSABNOAB JBITEM.QCSTATUSCMT JBDEALERS.STATUS LINKDROPLPOUT CRITICAL RECVDATERDATE2 CRITICALYYYYYYYYYDIFF TDYELLOW TDORANGETDRED‚CW1‚BR‚EMPTY‚D1 €DEALERTOTALS€DLINEDDIFFpsTDORANGETDRED‚CW1‚BR‚EMPTY‚D1 €DEALERTOTALS€DLINEDDIFFµk