<>(;$ 033PLORDER1 - POST ORDERS FROM FILE TO 3PLCENTRAL 03 *** SEE 3400 FOR UPDATE/DELETE BATCH OF ITEMS 3CUSTID$ IS SETP3IF TCB(13)=0 THEN DIM CGI$:"BOLNO:c(1*=00)"; LET CGI.BOLNO$="848613"; GOTO 0022 'site_url*R$$/JITEM,.tpl1, 0,$.$,.JBLHH:$$,CCNVZ<@@A0$' pagetitle3PLC POST ORDERS TO APIB$F$  P%$https://secure-wms.com/ordersd&$1/u/whp/tss/docs/3plc_order.txtn'$$,11'2sA$ td class="td" < > <  nowrap>z$     $
, 6$$$ө@@8E]J) RESTGET#" T= өCUST3PL^뫀ORDERSph!#(3DISPLAY INQUIRY SCREENp 3---------------- DO THE UPDATESza$8ORDERS $A8 AA  AA $AA"  gWH|CUSTNO|CUSTNAME|SO|PO|REF|ITEM|CFG|SIZE|DESC|UOMQTY|UOM|INVQTY|DNAME|DFULL|DADDR1|DCITY|DSTATE|DZIP|DCOUNTRY|SHIPDATE|MODE|TERMS|PHONE|CREATEDBY|NOTES|INSTRUCTIONS|PICKDATE|09 m gC$h A h$gAhAAh h # Sales @i 3headers# l$l@iHo @ilJ8$l@img$HH!|.orderItems += [] | .orderItems[۩(o].itemIdentifier.sku|=۫@j |.orderItems[۩(o].qty|=@k8?$@i - @j - @k - line:۩(o
 $oo3--------- done J8&$
8
0$
d
N#(C$'?PGM=JBB&WF=JBDEALERS&PGMFUNC=VIEW&SEQ=&POPUP=1#$ ViewV$ '$ 8$"8*U$ I?PGM=JBB&WF=JBITEM&PGMFUNC=LOOKUP&DOSEARCHNUM=_JBITEM1&RETURNTO=MATCHRIC|4#$! Find6V$ >'$" H8L$"8@3T=$#ERROR ۩(Ө AT LINE ۩(Ө" IN ۩#UE2V$$#3exit^%,{O_CREATE,O_TRUNC error.msgaE{h{,{ error.msgm1{ @o$o{r#( 3OUTTA HERE&J83REPORT COMPLETEJ`G$ CREATE ORDER @n!
-------------------------
 Jj/$HH|.customerIdentifier.id |=۫@JV$HH|.referenceNum |=۫@n | .Notes |=۫@p |.poNum |=۫@yJ$HH|.routingInfo.carrier |=۫@q|.shippingNotes |=۫Req. Ship Date: @r|.billingCode |=۫BillThirdPartyJ,$HH|.shipTo.companyName |=۫@sJ)$HH|.shipTo.address1 |=۫@tJ)$HH|.shipTo.address2 |=۫@uJ%$HH|.shipTo.city |=۫@vJ&$HH|.shipTo.state |=۫@wJ$$HH|.shipTo.zip |=۫@xJ($HH|.shipTo.country |=۫@zL,.$
N 3--------- create new chargesN,${2 {{ N%$HH'3FIX 9/7/2023 N0$Eecho '{ ' | jq -c '.H' 2>&1OUO$$~POST|/ordersOL! 3PLPUTREC|}F~O`f ModelValidationException}>$}'}Ot$HoO~$ddH } P 8P!3-------- update existing chargesP($Iܨ1FP2.$J.Billing.BillingCharges[۩(I].Px$GGJChargeType=1 |Pz'$GGJ Subtotal=۩(K |P|X$LJ Details[0].MCNPick Charge First PickOMPCartonRPX$LJ Details[1].MDNPick Charge SubsequentOL PCartonRPL$LJ Details[2].MBN Pallet OutOM#PPalletRP&$GGGGGQ8R3add detail chargeR($GGL NumUnits=۩(M | R&($GGL ChargeLabel="N" |R0-$GGLUnitDescription="P" | R:-$GGLChargePerUnit=۩(O | RD#$GGLGlAcctNum="4131" | Rb8{p3--- add next detail segmentUV$F`=$Q'WFDIR tmp/3plPICKS_۩(Өө.jsonj $E > Q 2>&1t(3A=SCALL("echo -e ""\n\n"" >>"+OUTFILE$)~$R$,RQ3^1001RB?F3^100Rn8 U3--------$SA3LET J=UNT; OPEN (J)"&1"*3READ RECORD(J,SIZ=99999)JQOUT$; CLOSE (J)($Ecat T | jq -c 'U' U$SF*8@/340000 " TURN TEMPLATED VAR INTO COLUMNS VALUESJ&$ V',T/ (N[۩(']:c(32*)$( V^$WXh 'r$Y V@)|O$Z' Y/$ZVV@)(ӨөV@)A$WW@),XXZ۫өV@)Z,* [CH3PLq$\ DELETE FROM [ WHERE TRANSID = '۩@]' AND WHSETRANSPRICECALCID = '۩@^'; V [SKUINFOC$\ DELETE FROM [ WHERE ITEMID = '۩@_'; X$` INSERT INTO [ (WW ) VALUES (XX);>$a\`MYSQL1 10.1.1.28 wmsreportsbac#$dda e c $\`8 3input screen$*transitinquiry$
Documentation Link

P$
 b$V8$ $Complete the fields with valid data.$+BOLNO$67  GET3CUST1; K TPLCUSTID1$> TPLCUSTID$@3PLC Cust Id: > >$;;value=">"VALUE="> " selected;; select nameSELECT DISABLED NAME;;'@0$ 3pl Central CustomerId: ;$<2=LOnly items with ON HAND balance will be included. 'ANY' will push all items.D MATCHONLYANY'$=<<NONZEROANY$$ ;Paste ORDERS:
<A
ALL or enter partial item code. = &$3ATPL 3$32[$ 4API Template:
jE$/
Push ORDERS to 3PL Central
kT POPUP1=$, l$' nI$1r!$
|&$REST Service: 
X$L
T$ -!$
Results
8P 9?Z&$9|:C(1*=?),n8x]Â9"9"ô  9þ$f$f98(f]45 $%4 %($%5%ܨ48]Ũ Ų өżA$&Ө$&8&] 9W$99$99 WAREHOUSEWHSE99 TRANSACTIONTRANSP$?9.,$??,|??|:C(1*),8??]8 9B0$:"9 :$9: BL0$:'9 :$9: LLj89ǒ]FFTPLCCNVZDUMMYSEARCHWARNINGCRT RESTSERVICE TDELEMENTTDPLAIN TDNOWRAPTRTDDTDDHTROTDDRBRYYYYYYVCGIA POSTRESULTSTEXTVIEWURLWFCGIRKEY VIEWURL1 VIEWURLGWFURL VIEWURL2 FINDURLGFURL FINDURL1 FINDURL2 ERRMESSAGEMESSAGEYYYYYFCOUNTFLIST FLIST.N FORMNAMEXMLDATAWFWFPGMJBLHHJITEMJITEM API_TEMPLATEATPLXTPLYYY1YYY2TSSCUSTWFCUSTJSONALLZZZZZSEL1 MATCHONLY MATCHTEXT TPLCUSTIDZZZ1 CUSTSHOWRPPPFPS MYSCALL1OUT3BC1JSETCTBC SUBTOTALBCD NUMUNITS CHARGELABEL CHARGERATE UNITDESCOUTFILECJQOUTOUT1 DOFILTERVICOLSVALSFTYPEQTSTABLEDSQL VI.TRANSID VI.WHSETRANSPRICECALCID VI.ITEMIDSQLDOSQLFUNCSQLOUT2DEBUGSQLOUT1ZZZR1R R1.SO R1.ITEM R1.INVQTYLASTSOR2 R2.SOILINE R2.NOTES R2.MODE R2.SHIPDATE R2.DNAME R2.DADDR1 R2.PHONE R2.DCITY R2.DSTATE R2.DZIP R2.PO R2.DCOUNTRYATPLXURIRESULTHEADERSETAG CGI.CUST3PLDOCLINKCGIVALYMD2JSUBCLEANTPLMAKETPLDOSCALLQGETJSONINT) R2.NOTESCGIVALYMD2JSUBCLEANTPLMAKETPLDOSCALLQGETJSONINTbH$GH BL0$H'G H$GH LLj8Gǒ]FFTPLCCNVZDUMMYSEARCHWARNINGCRT RESTSERVICE TDELEMENTTDPLAIN TDNOWRAPTRTDDTDDHTROTDDRBRYYYYYYVCGIPA POSTRESULTSTEXTVIEWURLWFCGIRKEY VIEWURL1 VIEWURLGWFURL VIEWURL2 FINDURLGFURL FINDURL1 FINDURL2 ERRMESSAGEMESSAGEY1Y2Y3Y0Y1Y2YYYYYZ1TPLZ2Z1FCOUNTFLISTFLOOPFINFO FLIST.NTLEN FINFO.LL FORMNAMEXMLDATAWFWFPGMJBLHHJITEMJITEM API_TEMPLATEATPLXTPLYYY1YYY2TSSCUSTWFCUSTJSONALLZZZZZSEL1 MATCHONLY MATCHTEXT TPLCUSTIDURIZZZ1RESULTBODYHEADERSETAG CUSTSHOWRPPPFPSORDERID MYSCALL1OUT3BC1JSETCTBC SUBTOTALBCD NUMUNITS CHARGELABEL CHARGERATE UNITDESC RROW.REFERENCENUM RROW.NOTESBBDUNITSLABELUNITCHARGEGLBB1OUTFILECJQOUTOUT1 DOFILTERVICOLSVALSFTYPEQTSTABLEDSQL VI.TRANSID VI.WHSETRANSPRICECALCID VI.ITEMIDSQLDOSQLFUNCSQLOUT2DEBUGSQLOUT1ZZZR1R R1.SO R1.ITEM R1.INVQTYLASTSOR2 R2.SOILINECGIVALFI1SKUGETXFILLXCOUNTELEMENTSYMD2JSUBCLEANTPLMAKETPLDOSCALLQGETJSONINTDOSQLFUNCSQLOUT2DEBUGSQLOUT1ZZZR1R R1.SO R1.ITEM R1.INVQTYLASTSOR2 R2.SOCGIVALFI1SKUGETXFILLXCOUNTELEMENTSYMD2JSUBCLEANTPLMAKETPLDOSCALLQGETJSONINT