<>@U8 "33PLCHGSR - ORDER CHANRGES REPORT @3******* SEE 63000 IF CHARGES MISSING/WRONG IN AX SCREEN VS 3PLC 3open(99)pgm(-2);call "_fids" R3SKUS https://secure-wms.com/customers/106/items?rql=Sku=in=(290-10200,290-10209)13.ResourceList[].OrderItems[].ItemIdentifier.Sku3@@*$\$,\ ]4m$$OR3PLI,.tpl1, $$,5$jORDERID|ISCLOSED|CUSTID|SKU|DESC|PALLETQTY|LOT|EXPIRATION|LOCATION|MU|QTY|PALLETPICKS|FIRSTPICKS|SUBPICKS| t097S$$OR3PLP,.tpl1, 9R$TMETA$a,.tpl1, b:[3CALL "GETTMETA","RPDATE"+A1$,RPDATE$; IF LEN(RPDATE$) THEN LET RPDATE$=FNMDYSAVE$(RPDATE$)<$'' $otherhead>> CONFLINKXA)$P' pagetitle3PL PICKS SCREENFw$>5 P@@R"$%400&8003for popupsZ$SUBFUNC[\5$-]A$.9_`3set formstart and formenda!$ &PGMFUNC=CALL۩#i:$" -###,###,##0$ -$#####0.00* -######0.00j-$/-$###,###.0000<-###,###,##0.00k'$G-###,###,###.00H-######0A$td class="td" <>< nowrap>v$n$  '$|B($ (3*3+\1J8+z -CANCEL@*.3CALC THE PICKS2 $"@;`$r @ @ @ @ ۫@ ۫@ ۫ө(Ө@ܨ@ ۩(Ө@ ####,###.0 @ @ @ @X 3LET SULINK$=""+STR(SHIPUNITS)+""@$F r @ $FBh 3TOTALLINGFF*J83REPORT COMPLETEL,$

0= G$I?V$(
2/
D$)<
$
=$5D tmp/SHIPREP_۩ %Yz%Mz%Dz%Hz%mz%sz.xls%$J$,JO_CREATE,O_TRUNC5H$^|||J$^^| 3-------- FULL RESET ---------$$OR3PLPY,33^1000 "------------ main logicQ$ө Ө%Dz $$ %Y%Mz01,LASTDAYOFMONTH/$--Q$ T00:00:00-- T23:59:59 PDATE1B $PDATE1 T00:00:00$ $PDATE2 T23:59:59B@$DOCUST $15,102,109,113,110,97,56(3display/get the input params table$K $v#u03x'0$KL

H3TEXT$=TEXT$+""$w#$xwv%$ Elapsed: ۩(x
H  ccalamaric/$
۫E



 $^#( U3" create PROGRAM boxes D$WProgALL T$X $YYvar W = new CheckBoxGroup(); W.setControlBox("W Master"); W.setMasterBehavior("all"); L3LET STEXT$=STEXT$+BRANDGROUP$+".addToGroup("""+PROGGROUP$+"Master"");"+$0A$ 8@3T=$3ERROR ۩(Ө AT LINE ۩(Ө" IN ۩#V$Z"[ YE2^ ERRORPAGE3-------- EMAIL ERROR MESSAGE+$4'WFDIRtmp/000_last_error.txt,O_CREATE,O_TRUNC4=$3ERROR ۩(Ө AT LINE ۩(Ө" IN ۩# L3E$54$6' error_email73(JBMAILTO6879:5;@ }$q
Order is not valid. Click and fix the problem(s).#(U 39000 OUTTA HERE#<$3TEXT$=TEXT$+"
"+DEBUG$+"
"#F $s&')U 3^1000 "------------ MAIN REPORT LOGIC'$'$$'B 3GOSUB 22000'j1'l't $' 3HEADINGS'$$ө ,FUTURE'$H
 Trans ID|Customer|Reference# |PO Num|Ship To Company|Handling|Materials|Total Charges|Total Weight|Date Shipped|Tracking/BOL#|Carrier/Forwarder|Notes
LJLJJL-  SENDEMAILYESN 3SEND EMAILLh$L Order Details - Excel Version

LLE$
Raw JSON
LB$
LD$M:$N8N 3---------- SEND THE EMAMILN*!$6confirmations@pokemon.comN/`$8Accalamari@champlog.com,dmcguire@champlog.com,sasarce@champlog.com88, N4J$7$Daily Shipment Summary - Champion -   to  N>$9NH$5N,WHMAILTO6879:;N8R#3^1000 --- javascript date handlingRV$M # R$MM R&$O' $otherheadR0R0$P' $otherheadOMR:8u0.3--------- GET ORDERs DETAIL FOR A TRANSACTIONuD$u[$ F$;readonly.processDate=gt=;readonly.processDate=lt=u$d/orders?pgsiz=100&pgnum=۩((&rql=readonly.CustomerIdentifier.id=in=()&detail=BillingDetails,Contactsu3$eFILENAMEGET3PLCdGETefu $eu$du$gu $ggv#$n.ResourceList[۩(g]v $onU$fpv f xvRH$i@.ReadOnly.OrderId,.ReadOnly.FullyAllocated,.ReadOnly.IsClosed,.ReadOnly.ProcessDate,.ReadOnly.PickTicketPrintDate,.ReferenceNum,.PoNum,.EarliestShipDate,.Notes,.RoutingInfo.TrackingNumber,.RoutingInfo.Carrier,.ShipTo.Name,.ShipTo.CompanyName,.ReadOnly.CustomerIdentifier.Id,.ReadOnly.CustomerIdentifier.Name,.TotalWeightvW ~iv\>$n| ioU$~p" vp$v$yv1$zn.Billing.BillingCharges[۩(y]v$ozU${pv { ww$i.ChargeType,.Subtotalw$ |iw.>$}z| io}U$|p" wV2$||null~~nullw @1$@w @6$@w y $yvw3UPDATE OR3PLPx$@@x$@@x $@@@@@@x $@@@@x$@@x$@@x$@@x $@@x#$@@x<$LxP3----- end of cloopx$ggvx3----x $uy8{p3--- add next detail segment|.8UV$j`=$k'WFDIR tmp/3plPICKS_۩(Өө.jsonj $lh > k 2>&1t(3A=SCALL("echo -e ""\n\n"" >>"+OUTFILE$)~$m$,mk3^1001mB?j3^100mn8 U3--------$pA3LET J=UNT; OPEN (J)"&1"*3READ RECORD(J,SIZ=99999)JQOUT$; CLOSE (J)($hcat e | jq -c 'o' U$pj*89U3^1000 "----- PARAMETERS TO START AUTO ORDER PROCESS$C: 8pt;$ reportparamK$1?
 K$@C $@m$ RO3LET DOCUST$="17"; LET CUSTNOTE$="3PLC Account forced to '17' until production"WP$&\P$&@$&
From DateB Thru DateB Customer IdBSend Only TransId 


		B$(E$ &$' 9 :$) $A$
8P `qZ&$`|:C(1*=q),n8x]Â`"`"Ì `Í!$q(Ө` $ ###,###.00-Î `$qÏ8qÐ]ô `þ$u$u`8(u] !$  $+$< width="۩(">8"], 6! $ @8J]T ^,$ $
h8r]| Ć ĚĐ/$//Ě8Ĥ]Į ĸ$"",8]( $, ۩5$۩ ۩ 8] $ ($ܨ8] $$$ө8&]D N# $QŞS$./X( R M:N(1*=47),D:N(1*=47),Y:N(1*=47)b($R/// @S $@S@Sg$T@S@U@VŔl$Q T %Y-%Mz-%DzŔŀŞŔ $QŞ8Qţ]Ũ< // Ų `ż$``' 8`] `$`$q@8q] ? #pH `W$``$`` WAREHOUSEWHSE`` TRANSACTIONTRANSv$``DETAIL`` ITEMTRAITS``NAMEKEY`` ROUTINGINFO>$`` IDENTIFIERID``READONLYP$q`.,$qq,|qq|:C(1*),8qq]8  B3$?L3$?V$ ǜ^$ǜǰn$
SHOWING  B$Excelǰ`$f$ONCLICK ?$)"@$ө'thcolor $#FFFFFFc$