<>TD3 /3GET3PLC - MAKE GET CALL TO 3PLC RETURN RESULTSNl3IF TCB(13)=0 THEN BEGIN ; LET URI$="/customers?pgsiz=99",BODY$="",METHOD$="GET",OUT1$="FILENAME"; GOTO 0110Pл ╗"сф ШАфЩЙЎС$е"Пя┴/reportdefs/ssrs/StockStatus/runner?parameters=CustomerIDs:56~StartDate:2021-11-01~EndDate:2021-11-30T23:59:59~FacilityIDs:1~utcOffset:-6Ре#ПяРе$ПяGETРеПяXLSFILENAMEСЖnRм ╗"сф ШАфЩЙ©С$е"Пя█/reportdefs/ssrs/InvoicesConsolidated/Customer/InvoiceConsolDave/runner?customerid=17¶meters=wtIds:39154,39156~utcOffset:6~ShowDetails:NoРе#ПяРе$ПяGETРеПяFILENAMEСЖndе"Ре#Ре$РеРе%i@Ж@n7$е/ПяSTRINGС ╗сяFILENAMEАеШЩЙ$е/ПяFILENAMEХ31000Р ╗се$Ая POST/PUT/ШЩЙЖпВ3 add "-v" to see the headersЫu ╗ся reportdefsАе"ШЩЙ[$е5ПяS -H 'Accept: text/csv;header=present;separator=tab;encoding="utf-8";excelmode=true'ЗY ╗сяPDFАеШЩЙF$е5Пя> -H 'Accept: application/pdf;header=present;encoding="utf-8";'ШA ╗сяXLSАеШЩЙ.$е5Пя& -H 'Accept: application/vnd.ms-excel'Э} е$АяGETЩЙn$е&Пя=curl -g -D - -X GET -sS -k -H 'Authorization: Bearer {token}'ше5шя 'https://secure-wms.comше"шя'$еПе&x31400┌U─ ф"Ж#(С3********* diable google cszп3-------- HANDLE POST ---------4≥$е&Пяcurl -k -s -D - -X ше$шя -d 'ше#шя`' -H 'Content-type: application/json' -H 'Authorization: Bearer {token}' 'https://secure-wms.comше"шя'H$еПе&≤U─ TЖ#(@3error^6$е3ПяERR ш╘(с╗Шшя AT ш╘(с╗"сфШШшя IN ш╘#сзфШcEС2є$еПяРеПяERROR#(3#2$е6П╘'сяMYSCALL1Ре.Ш#▄&╛С3done'310000 "functions'3string$, token$, delimiter$'$╚─сеРеРеШ'.$еПя'8 $дП╗сеАеШС дАфЩЙЖ'V'B&$еПесдэ╗сеШШС$дП╗сеАеШ'L дЩЙ$еПесфРдщфШ'V8╘сеРфШ'`]'j ╚─сеШ't>$дП╗ся АеШРдП╗ся-АеШС дДфКдЦдЩЙ$дПд'~ дЩЙ$еПесфРдщфШ'┬a$еП╘сеРфШС3IF LEN(Y1$) THEN IF Y1$(LEN(Y1$))="." THEN LET Y1$=Y1$(1,LEN(Y1$)-1); GOTO 10122'▓8╘сеРфШ'°]'ь╚─сеРдРеШ'Б;$дП╗ся"шешя":АеРфРдШС дАфЩЙ $еПяСЖ(═'Л $еПесдШ'Я$еПес╗сеШэфШ'Ж$дП╗ся},АеШ( дЩЙ$еПесфРдщфШ($еП╘с╘сеРфШРфШ(═8е(Є])`3---- this function loads a template with fields names that macth the xml fragment that is sent) ╚─се Ре Ш) еВе )!$е П╘се РфШС3SET TO UPPERCASE)$дП╙─с╘ сеШРя,Шэф)/ е ВяN[ш╘(сдШшя]:c(32*)С$е П╘ сеРяШ)"дПфЧд),$еП╘ сеРе@МдНШРдПд@)6"VеРе@МдНП╚─се@МдНРфРе Ш)^*д)б8е)г]2х5U─ 313000 "make request and get results into variable2р $д8Пс╗#чгХШ3я3PLTOKENРяGETРе,3,3^10031$е.П╚─сеРя{token}Ре,Ш36$еПя38-$е4П╘(с╗с╘сфРфШШШш╘с╘сеШШш╘(с╗#чг'Ш3@1$е'П╘'сяWFDIRШшяtmp/get3plcout_ше4шя.json3B5$е1П╘'сяWFDIRШшяtmp/get3plcout_ше4шя .head.txt3E&$е.П╚─се.Ря-D - Ря-D ше1шя Ш3J $д(П╗се.шя > ше'шя 2>&1Ш3T!$д(П╗сяecho -e "\n\n" >>ше'Ш3^$д)П╗$С,сд)Ше'3h7$е0П╘сд)ШС$д7П╗се0сфРфШШС д7Цф ЩЙсд)ШСЖ3Ч3░3^1003 1сд)╠Ж3╦Ше*С$еПеше*ше+3єH ╗сяTotalResultsАеШКе/АяFILENAMEЩЙсд)ШС$е%ПеРеПе'СЖ6L3╘H ╗сяResourceListАеШКе/АяFILENAMEЩЙсд)ШС$е%ПеРеПе'СЖ6L3ўЖ3 3╦33Ґ$е2ПяСсд)ШС,сд)╠Ж3лШе13б1Зсд)╦х├÷Ше23лсд)Ш3жD ╗сяHTTP/1.1 200 OKАе2ШКе/АяFILENAMEЩЙ$е%ПеРеПе'СЖ6L3Т3^10045 еАяЩЙ)Ж4bС3 http headers is off now 10/26/20184X( ╗сяToken has expiredАе2ШАфЩЙЖ4╪4b) д-ДфЩЙЖ4╪С3maybe send warning email4lя3PLTOKENРяNEWРе,4v$д-Пд-эф4─Ж3,6L3139006P$д9Пс╗#чгХШщд86Q"я3PLCLOGРд9Рд7Ре"Р╘се.РфШ6V8°@NяSSVER1Ря321 INDIAN POINT RDРя TWIN LAKESРяWIРя53181РяРеРеРе°Jе╚─сеРеРеШе $дП╗сеАеШС дАфЩЙЖее($еПесфРдщфШшешесдэ╗сеШШеЖее8ее]хd ╙─сеШхi4$дПзфС ╗с╘сеРфШШБфЩЙЖхЄТ$дП╗се╠ЖхЄШхn>$дПзфС$дП╗с╗сесфРфШШР╗сесфРфШШР╗сесфРфШШШхЄ8дхЎ]к ╚─сеРеРеШк* $дП╗сеАеШС дАфЩЙЖкzк4$дП╗ся($еПесфРдэ╗сеШщфШшешесдШкz8ек]о╚─сеРеРеРеШо$е Пяо $дП╗сеАеШС дАфЩЙЖоbо&$д!П╗сеАесфРдШРзфШо0$е Песд!ШРдП╗сеАе Шо: дЩЙ$е Пе сфРдШоb8е оg]ЪЪY1Y2Y3Y0PY1Y2YYYYYZ1TPLZ2Z1FCOUNTFLISTFLOOPFINFO FLIST.NTLEN FINFO.LLYYY1YYY2YYYYYTAGYYVALYY1RESULT1RESULT2OUT1MYSCALLR1R2HASHYYY0YYY1URIBODYMETHODOUT2UOUTFILEACOUTLTOKEN TOKENTRY MYSCALL1 RETURNASFFOUTFILEHEADHEADERSERRMESSAGEUNIQACCEPTDUMMYOUTSIZESCALLT1 SCALLELAP┌GETX┌SUB┌F┌I1┌FILLX│COUNTELEMENTS│D8TOJ┌SETX┌GETG─DOSCALL∙EADHEADERSERRMESSAGEUNIQACCEPTDUMMYOUTSIZELOGMEQSCALLT1 SCALLELAP┌GETX┌SUB┌F┌I1┌FILLX│COUNTELEMENTS│D8TOJ┌SETX┌GETG─DOSCALLх ШС д АфЩЙЖкzк4$дП╗ся($е Пе сфРд э╗сеШщфШшеше сдШкz8е к]о╚─се РеРеРеШо$е=Пяо $дП╗сеАе ШС дАфЩЙЖоbо&$д>П╗сеАе сфРдШРзфШо0$е=Пе сд>ШРдП╗сеАе=Шо: дЩЙ$е=Пе=сфРдШоb8е=оg]ЪЪCAY1Y2Y3Y0PY1Y2YYYYYZ1TPLZ2Z1FCOUNTFLISTFLOOPFINFO FLIST.NTLEN FINFO.LLYYY1YYY2YYYYYTAGYYVALYY1RESULT1RESULT2UAUTHID AUTHTOKENXSTATE XCOUNTRYXSTREETXCITYXZIPYSTREETYCITYYSTATEYZIP YCOUNTRYOUT1OUTFILEMYSCALLOUTLYHASHR1R2HASHYLATYLONYCOUNTYYRDICITYOUTZIPOUTPPGAPIGAPIRESULTGAPIPLACEIDYYY0YYY1GZIPGSTATEGCITY┌GETX┌SUB┌F┌I1┌FILLX│COUNTELEMENTS│D8TOJ┌SETX┌GETGmL enter partial item code. Only items with ON HAND balance will be included. ше╘┬&$еpП╚─сяATPLШС еpАяЩЙ$еpПеo╘▓\$е#Пе#шешя5API Template:
ше╚jE$е#Пе#шя/╚kT ╚─сяNOAUTШАя1ЩЙ=$е#Пе#шя,шр ╚l─$е#Пе#шя'шр ╚nI$е#Пе#шя1╚r!$е#Пе#шешя╚|⌡$е#Пе#шя шешяK
Results are displayed below. This page should be used for testing only.╚├X$е#Пе#шяL ╚ T$е#Пе#шешя-ше╚л!$е#Пе#шешя

Results

╚ж8е╚─сеРеrРеsШе $д7П╗сеrАеШС д7АфЩЙЖее($еПесфРд7щфШшеsшесд7э╗сеrШШеЖее8ее]е╗ ╙─сеШе╡ ╗с╘сеРфШШБфЩЙЖеЬе╪A$д8П╗с╗сесфРфШ╠ЖеЬШР╗сесфРфШ╠ЖеЬШР╗сесфРфШ╠ЖеЬШШеНЖфеЬ$д8Пзфф8д8ф]г8 ╚─ се┐ШгB0$д└П╗ся"Ае┐ШС д└ЩЙ$е┐сд└РфШПя СЖгBг┬8е┐г▓]Ж3FAILED DURING WRITEВ:8ЗB3---- CREATE NEW PLAN - send prtst, prel, doterr$, dosource$, qty$З $еGПяAЗ еВ╘ сеШЗ )$е@HПе@HРе@XПе@IРе@YПе@JРе@ZПяAРе@[ПеGЗ ╘се@YРфШАяЩЙ$е@YПяZZZЗ$е@\ПеKЗ ;$е@]Пя5С ╘се@\РфШБяЩЙ$е@]Пя1С3#1639 rcc 11/3/2010З$д@^П╗сеLШЗ@1Зсд╣еW╞ЖЗШС$еMПеMшяECODE: шеWшя ALREADY EXISTS/СЖЖЗ'$е@HПеWРе@_ПяBРд@`ПфdРе@aП╘сеNРфШЗ33ORDERBY could be set to env.remote_user$ if wantedЗ)$е@bП╘ сфВя%Y%Mz%DzШРе@cПя webserviceЗ#$$е@dПяHС3IDENTIFIES AS ADHOC ORDERЗ(1Зсд╣е@O╞ЖЗ*ШеСЖЗ,З*1$еMПеMшяECODE: шеWшя INVALID PROGRAM/СЖЖЗ,$е@eПе@PРе@OПе@OЗ.$д@QПд@QРе@RПе@RЗ: LЗсдШеЗ<3 еSВ╘ сеШСяLOGIT1РяPRELРе@HРеРеSР╘ сеШЗF еGБяAЩЙЖЗdЗK еTАяЩЙЖЗZЗP еgВ╘ сеgШС$е@iПе@HРе@jПе@XЗQ яuttplcp.wbbРеРеgС$е@kПеTЗT LЗсдfШеgЗх3Ш,3doneШ├8ШТ3CREATE OVERRIDE SHIP-T0ШЧ[ еВ╘ сеШС$е@IПяOVERRIDEРе@UПяPlease Enter Over-RideРе@VПя Address belowСLЗсдШеЭNЖN┼ЪЪFFTPLPRELPRELPRPROGRAMSPRPROGRAMSPRSTPRSTCCNVZDUMMYSEARCHWARNINGCRTRESTSERVICE TDELEMENTTDPLAIN TDNOWRAPTRTDDTDDHTROTDDRBRYYYYYYVCGIPGETURLALOGFAPOSTRESULTSLOGFRTEXTVIEWURLWFCGIRKEY VIEWURL1 VIEWURLGWFURL VIEWURL2 FINDURLGFURL FINDURL1 FINDURL2ERRMESSAGEMESSAGEY1Y2Y3Y0Y1Y2YYYYYZ1TPLZ2Z1FCOUNTFLISTFLOOPFINFO FLIST.NTLEN FINFO.LL FORMNAMEXMLDATAWFWFPGM DOSOURCE PREL.ECODE PRST.SCODE PRST.TERRRADQTYWARNSMETHOD PREL.PYEARCODE PRPROGRAMS.BUYCYCLEPREL.ACTUALCOST PREL.BCODEROLDONOTES PRST.ADD1 PRST.ADD2ECODE PREL.SCODE PREL.TERR PREL.STATUS PREL.SOURCE PREL.RAD PREL.PRIORITY PREL.QTY PREL.PAYTYPEPREL.BUDGETPCT PREL.SMETHOD PREL.ODATE PREL.ORDERBY PREL.SOURCESUB PREL.BUYCYCLEJBLHDJBLHDJBLHH JBLHD.ECODE JBLHD.SCODE JBLHD.ADDRNOTESJITEMJITEM API_TEMPLATEATPLXTPLTOKENYYY1YYY2 CGI.CUST3PLJSONBTPL JITEM.ITEM_NO JITEM.DESCRIPTIONPBLKJITEM.PALLET_BLKJITEM.PALLET_HIGHJITEM.CURR_WEIGHTTSSCUSTWFCUSTJITEM.ON_HAND TOKENTRYALLRESULTSJSONALLZZZZZ┌CGIVAL┌F┌I1┌SKU┌GETX┌FILLX│COUNTELEMENTS│YMD2J┌SUB┌CLEAN▌Ї