<>K`C ;3WHREP22 - Inventory Inquiry -- Report - W/ITEM FILTER - JL %3--- CLEANUPS 3/2016 RCC (WAS WHREP2)$SOL007 SOL001 SOL008 S$6$$7JCUSTJ6,67.tpl16(6,67 K($S$6$$7JITEML6,67.tpl16(6,67 M(%W$6$$7 JITEMSUPPx6,67.tpl16(6,67 y(&S$6$$7JILOTd6,67.tpl16(6,67 e('W$6$$7 PSDISPLAYn6,67.tpl16(6,67 o((S$6$$7JIACT6,67.tpl16(6,67 (,S$6$$7JSLOT6,67.tpl16(6,67 (.R$6$$7TRUB6,67.tpl16(6,67 (<@@A.$Rl R$R%CUST1BZ1JJ1RK\N$| SOL0R2$|}##/CtnTotal Eachesb" RSAMPLE/GOC001/.nJ$ 100 100100100   sA$td class="td" <>< nowrap>z$  {n$4
$4
Inventory Inquiry: R - @[

 $'TRHILITE$=
&$cN$>TItem Descripton SH
TableLotcBookc On
Handc Committedc AvailablecDamagecHoldcDamage
Committed}cExpected
ReceiptscSKU Rw$> >Expected
Receiptsc)Average Usage
per Month
Last 12 MoncExpected
ReceiptscQ$> >cBookc0
Book*
`$> >c On
Handc9
On
Hand*
$?%
48
 YG>:$@
 G> !$  $+$< width="۩(">8] ! $ 8]  M$8
 8)$8 88] ,$ $
8]   1$//20 8 ] $"",8]" !"#( !$!, ۩!$5$ ۩! ۩" %8&]'  (F$8  8,$8
8()8*], 6$$'$'ө%@@8'E]J  IK" I$I NL$$II۩I20IM/$II/I/IN8IO]TO^3IF FIELD(CGI$,"CUSTCODE",ERR=0350)<>"" THEN GOTO 0400; REM test if existsY#(3on step1^I %FILTER+$%FILTER3test if existsh#(*$Ton 0OFF@ $ToffD %show0off $Toff @on $Ton? %WFDIR"$'WFDIR%WFDIR? %WFURL"$'WFURL%WFURL? %WFCGI"$'WFCGI%WFCGIY$$$ tmp/item_list۩(Өө.xls,O_CREATE,O_TRUNC$Ө/clg$?  L@ L$$$& RZZ3PLC$FUpdate ZZ3PLC inventory with location info from 3PLC API - Last Update: ۩'LOCSPULLUPDATE>i$:;<)*+,-@$Add New Item A# champlog@$D$ | H$|||J$ | z$OJ1R1LO 3LOOP HEREL1LlMQ5 ) ө@P@QV MOljf PDT001' WEBSECUREl< *۩M *' WEBSECUREt@$ $@&$ (۩(@ $###,###.00) 3DO SELECTIONG3IF SHOW0$="off" AND JITEM.ON_HAND=0 AND JITEM.DAMAGED=0 THEN GOTO 10002$m@P utencode.wbb@Pmd$\ @P  QTRUB01AM$ $\\   *$g @fY$g   =$p o o1nA@P o$p@q.$@r@P$@s@Q@tA@uCLno$w@s$w@Q3 PER RANTER 9/25/08/$zoSKU SKU@H0$A@P0p$( ###,###,##0$g  $ggTggG  ccalamaridcamp$w ۩@Q" @{$z@{@$~ |/$~۩(@۩(@U@ ###,###,##0 RU> Toff@U@V@@X  ccalamari$$M> @U@V@@W@X$R
   Item Loc bal problem ۩(/۩(/۩(/۩(/۩($\w'@ ۩(@U@V@g۩(@Ug۩(@Wg۩(@U@Wg۩(@Vg۩(@g۩(Ө@Xg~gz  R$\wp ۩(@U@Vg۩(@Ug۩(@Wg۩(@U@Wg۩(@Vg۩(@۩(Ө@Xg~۩( ####.00##z  $v$v.$``@U@V@aa@Ubb@W,$]]@U@W^^@V__ܨ@X($@ܨ-$ l.3IF POS("ccalamari"=SESSION$) THEN OPEN (888,ERR=1327,MODE="O_CREATE,O_TRUNC")"/u/whp/webnew/clg/wf/tmp/traceme1.txt"; SETTRACE (888)2 @fYxnLx&3^100 "------ handle the JILOT display}$g1dM-1de eMA @.$@(@####.000Ldee0$e 0p$( ###,###,###* Toff @h@i@@$e  utencode.wbbe z$ e  %$~ |$~gg%$ R $g$۩(@h@i@g۩(@hg۩(@jg۩(@h@jg۩(@ig۩(@g۩(Ө@kg~  $Y\wpe  ۩(@h@ig۩(@hg۩(@jg۩(@h@jg۩(@ig۩(@g۩(Ө@kg  8%3^100 "----------- DUMP LINE TO FILES$$FF Y$Y v@fY L=۫Y$Y8 U 3------ 12A@0 36$
4N
@1 $&8l3DONE $
$$FF  L $5
E Zon #(UC$  Total۩( $*8 $3------ handle the display of orders ($AReport Totals ۩(`۩(a۩(b۩(]۩(^۩(۩(_۩(  $$FF *3F CSVCHAN THEN WRITE (CSVCHAN)FNNOBR$(L$)  DLD$CC  CBLDA$C 8 H3^1000 "---------- dump the htm version for display with horizontal menu $ Ton $Toff$Ton 3LET TEXT$=""+HMENU$+"
Toggle Zeroes "+SHOW0$+"
"+$0A$ 3$ l XXX_CNA001$


/$z
 = Toff.$ on">Showon" selected>Show $/ * - O3TEXT$=TEXT$+""+$0A$ V3TEXT$=TEXT$+""+$0A$ V3TEXT$=TEXT$+""+$0A$ V3TEXT$=TEXT$+""+$0A$ ^$M 3LET TEXT$=TEXT$+"
Item Filter     Toggle Zeroes "+SHOW0$+"   Excel Export
"+$0A$ {$(   Excel Export  0$ : $ 3DONE #($H"8H$/     z8@3T=$ ERROR ۩(Ө AT LINE ۩(Ө" IN ۩#^E2#( 3OUTTA HERE&'U'$'/ DOLOT$AӫDOLOT '!$J1R@P'$1'%'.1*'8 *'B @SA'.'L3$@$ 'VA$ %Yz%Mz%Dz$(Ө00'W3 DUMP ; RELEASE '` '.'j $@'t'.*U8.)3---- GET TENTATIVE RECEIPT ITEM/LOT TOTS.S$6$$7JTRDE6,67.tpl16(6,67 (.$/D10 /N @K/D/$A@ ۩A@ /<$ $۩ //.$ @/!$ Aө( /1 @$@/3GATHERITEM TOTS0/D0 3DONE0 0f80p3GET TENTATIVE VALUE0z($$ 00$0$ 083@$ggPgg>.3--------- GET JSLOT BALANCES COMPARE TO JITEM>!3IF NOT IN BALANCE SET CELL COLOR>#$>1>>+1? ?>$@@? $@@? $@?>>?3--- CHECK BALS@8N N*E ө/$//N48N>]y y"*$8 8 $88 y,)$083SET TO "9" OR ":"y68yr]y| y0$8lܨ Ө0y8(8y]y y $y/$//y8z]$9 reportparamD$
 p$d
D3CALL "POPUPINPUT",FORMNAME$,"fromdate",JUL(0,0,0)-14,"",RESULTFROM$ B3 CALL "POPUPINPUT",FORMNAME$,"thrudate",JUL(0,0,0),"",RESULTTHRU$*i3LET TEXT$=TEXT$+TRPLAIN$+"Ship Dates
If Shipped Selected:"+TDD$+RESULTFROM$+" Thru "+RESULTTHRU$+TRO$/K3CALL "JBSELECTOPTIONS","JBPLAN_STATUS","JBPLAN_STATUS","","","",0,RESULT1$4#$=Status:. >p$= Customer:3 ] %hmenuon>$- F$' Q$=1$ 
Select Report Parameters
~83 STEP 2 SELECT BRANDSO$Brand Family: @/ 
 #$&3CALL "JBSELECTOPTIONS","JBBRANDS","BRANDS","CAT","DESC","*FILTERMASK(R.FAMILY$,"""+CGI.BRANDFAMILY$+""")*MULTIPLE*NOTOPVALUE*SELECTALL*AUTH",0,RESULT1$ $.N$ /F$' I$1
$ f8  $8 8($88ܨ8]8 B$ L$ V$  ǜ^$8888ǜǰn$8
SHOWING  8B$Excel888ǰ`$8888f$8ONCLICK 8?$)"888U3LET YYY=POS(STBL("thcolor")=YYY$); IF YYY THEN LET YYY$(YYY,7)="#FFFFFF"; GOTO 51160}$8#003300 8]$8#FFFFFF3" Hardedcoded because 51160 was getting ERR 49 - J.L. 5/23/2011c$8