<>m| /3"WARIQW -02/08/90- ACTUAL RECEIPTS WEB INQUIRYJ3"FILES 1.JCUST, 2.JITEM, 3.JARHE/JTRHE/JARHH, 4.JARDE/JTRDE/JARDH,7.CCNVZ 3"IOLISTS p#  X# !"#$%&'()*+,-./01!8#23456789:;<=>?"0#@ABCDEFGHIJK#R$vWwJIOCTrv,vw.tpl1vxv,vw sx& #LMNOPQRS' #LMNSTUVO(2l)@@* 3LET A3$="J1RPEN001 SMLU790234 "+ $d*.<$k,k PFILE=/u/tmp/۩ө.prnPWEB/ /
2$W######07$X** RECEIPTS INQUIRY **<YPݨYd4
Z($ZZZWARIQ13"START REPORT$[\B]-$^2L
3"PROCESS DTLt~ _E#(X	3"DETAILS
`4+aATHT	`	3"ACT DTL,JARDE12.$bT b2T) bE1@AD 1b@"P$``D``H``I``J
3"TENT DTL	,JTRDE	12		.$bT b2T	 bET	$1b@'	.D$@LAMBc
CNDSHIJ	8	=P$``D``H``I``J	B		`
3"HIST DTL	j,JARDH	tT3" END OF DTLS^#(3"GET RECORD(+d*ATHhh0h3"ACTUALr,JARHE|1^@!'$eIN ACTUAL RECEIPT FILEaA$ d*
3"TENATIVE,JTRHE1^@&d$2L4Q5R3M:O> NONE6c789;)$eON TENATIVE RECEIPT FILEaT$ d*003"HIST:,JARHHD1^@!X($eIN RECEIPT HISTORY FILEaHb$	3"NOT FND	$_E$83"EOJ#(h"

CL!REPORT PRINTED CORRECTLY (Y/N)? :YY#(NEND#(+#(#(X
3"PAGE HEADER]@^*$[[\ [XTIMf_/ON: 
ATIME:ff	LF(g)ӪXXAPAGE:[####LFAPROGRAM WARIQ1b/	COMPANY: h - iLFLF
CUSTOMER: 2
BUILDING: #INBOUND/REF #: 2
<INVOICE #: >d/#
RECEIPT DATE 6/6/6<TALLY # 7LF#CARRIER 9<VEHICLE :LF#WAYBILL 8LF#ESTIMATED TIME #0.00f/SEALS: ;LFLF*** e ***LFLFITEM #LOT #DESCRIPTION1SCHEDULE ACTUAL   O/S  DAMAGEPLOCLF$m22!@@83"PRINT DETAILS@ \]Xd/A
BC3DW:HWAIWHJWPK"$n@@AB) D$mmn~۩(D!@@8 3" PRINT THE CHARGES LINES*b yW$y/LFLFApplied Charges:LFQtyRate#Charge41rA>sRY/
DW@u####.000@uD$###,###.00   A @tz
3"DTL TTLSj/LFLFTOTALS----->3`W:`WA`WH`W8@3"ERRE$jFb/j ERROR () LINE ("
) IN PGM (#) HAS OCCURRED. 'CR' TO RETRY.h#(
3"ERR MESG"$j*** PRINTER ERROR ***J"	3"NO DATA""/*** NO DATA ON FILE ***   "#(#(3"END#)@#*/
#0BBDUMPPFl#$o labels#$o"Print Lot Labels to Zebra#$lzo#r&&&%'A1B1C1D1E1F1G1H1I1J1A1B1K1L1M1N1O1P1Q1R1S1T1C1D1U1V1W1E1A2B2C2D2A2B2C2D2E2F2E2F2G2H2G2I2J2K2L2M2H2N2A3B3C3D3E3F3G3H3I3J3L3A3O3P3A4B4C4D4A4B4C4D4E4F4G4E4A8B8C8D8E8F8G8A8B8C8D8MB7ZXPLXK3X7TF0K4Z8O0Z3TD0CC0ENTEXTLABSLAB1 LABELLINKWFCGI CGISKUCODEJIOCTJIOCT JIOCT.CHGNAME JIOCT.RATEFFTPL CHARGEROWTURNED_OFF_TEXTAXEXTAeetry pN pRrSsNN/POPN pRr9N pSso$qө#Ө"/WINDOWPStatement displayBRDEFAULTCSq"/POPNN@ pVv+/WINDOWP/CSE/POPNO$r3User NameO$s$O<3---------------Write to ERRORLOG---------------------------O$,s SYD/ERRORLOGO.,1st$tt t$tO8,Lst # "#rOBLstsOL UOV/RBWINDOW FProgram Execution ErrorBRDEFAULTCSERRED An Error  occurred at statement" in program #O` oOOj>"REDConsole, Retry, or Exit pWHITEOt& pCcRrEeFfSsDdVv?OjO~/POPO? pFf*/WINDOWP_fids/POP9O pEe ;CUTSA0O pDd$u udump/۩(t000uuuHu$s$,suEss/RBWINDOW (BRDEFAULTCSERRED  Dump CompleteWHITEK/POPOVO@ pVv+/WINDOWP/CSE/POPOVO pRr9O pSso$qө#Ө"/WINDOWPStatement displayBRDEFAULTCSq"/POPOVO$v O>3IF POS(STRVAR$="?")<>0 THEN CALL "_err",ERRNUMBER; GOTO 20300O93Correct the error, then type RUN to resume the programO9OB3-----------------CRITICAL UPDATE NO EXIT-------------------------O7"REDConsole or Retry pWHITEP! p CcRrFfSsDdOP /POPP pRr9PB pFf-/WINDOWP_fids/POPOVP(@ pVv+/WINDOWP/CSE/POPOVP2 pSso$qө#Ө"/WINDOWPStatement displayBRDEFAULTCSq"/POPOVP< pDd$u udump/۩(t000uuuHu$s$,suEss/RBWINDOW (BRDEFAULTCS  Dump CompleteK/POPOVPF93Correct the error, then type RUN to resume the programPP9PZB3------------------ ERROR 2 (FULL FILE) HANDLING -----------------PdUPn$w.xPx.3OPINCHNLS$=$000000010002000300040005$,FOUND=0PywP$zwyP zPP${z|zP( {{PP& {|MPP {N RP pRrPP$xQ/RBWINDOW ( Full FileBRDEFAULTCS EXPANDING { ...%If Error 0 occurs during this processLog off all other terminals _expand.pubz/POPPR&P*yP xOP9QC3--------------------INTERRUPT (ESCAPE) HANDLING ------------------QUQAQQ"?/RBWINDOW Escape DetectedBRDEFAULTCSQ, oQQ6."Do you wish to quit? pQ@ pNnYyCcQ6QJ/POPQTAUQ^ pYy ;CUTSA0Qh pNn8QrQ|8Q,"No interrupt allowedpQ! pCcpQQAUQ/POP pCc8QQ8QB3---------Close off other occurances of file to be expanded-------Q }Q ywRQ~ywQM$w~  R { RQ$QQ$}}۩(RR*~R8R&C3-------Open up other occurances for file to be expanded-----------R0 }RlR:F$}}}}Ө}3GET CHANNELRD>$}}}}Ө}3GET KEYRN ,{ RX  1RbR0Rl }Rv8RC3----------------File that have alot of records--------------------R/RBWINDOW < Full FileBRDEFAULTCS{ ܨ/{  is full and now has { records3This file may need to be PURGED instead of expanded7Check FULL FILE REMARKS in (1.13.1.5) for purge optionsR)"Expand or Retry pR pEeRrRR/POPR8RA1B1C1D1E1F1G1H1I1J1A1B1K1L1M1N1O1P1Q1R1S1T1C1D1U1V1W1E1A2B2C2D2A2B2C2D2E2F2E2F2G2H2G2I2J2K2L2M2H2N2A3B3C3D3E3F3G3H3I3J3L3A3O3P3A4B4C4D4A4B4C4D4E4F4G4E4A8B8C8D8E8F8G8A8B8C8D8MB7ZXPLXK3X7TF0F4K4Z8O0FZ3L7TD0CC0EV1 CRITICALSTRVAR STATEMENTWHOAMINEXT NEXTINDEX DUMP_FILE ERRNUMBER OPINCHNLSFOUNDCOUNTERCHANELFID1FID2SAVEKEY COUNTER2OCHNLOFIDLASTKEYOKEYAERRTRAP INTERRUPTERR2D2SAVEKEY COUNTER2OCHNLOFIDLASTKEYOKEYAERRTRAP INTERRUPTERR2