(AutoIt) Walmart - Send Shipping Notification

Note: This example uses classes, properties, or methods discontinued in Chilkat v11.0.0 or greater.

See Shipping notifications/updates for more information about this call.

Note: This example requires Chilkat v9.5.0.67 or greater.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

; ---------------------------------------------------------------------------------------------------------
; Note: This example is deprecated.  The Walmart API no longer uses the Signature method of authenticating.
; Walmart now uses OAuth2.  
; ---------------------------------------------------------------------------------------------------------

; This example requires the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.

; Sends the following POST request:
; POST https://marketplace.walmartapis.com/v3/orders/{purchaseOrderId}/shipping

$oSbUrl = ObjCreate("Chilkat.StringBuilder")
Local $bSuccess = $oSbUrl.Append("https://marketplace.walmartapis.com/v3/orders/{purchaseOrderId}/shipping")
Local $iNumReplaced = $oSbUrl.Replace("{purchaseOrderId}","1111691995111")

Local $sRequestMethod = "POST"

; First we need to generate a signature for our request.
; The signature needs to be re-generated for each new Walmart HTTP request.
$oAuthUtil = ObjCreate("Chilkat.AuthUtil")

Local $sWmConsumerId = "WALMART_CONSUMER_ID"
Local $sWmPrivateKey = "WALMART_PRIVATE_KEY"
Local $sJsonStr = $oAuthUtil.WalmartSignature($oSbUrl.GetAsString(),$sWmConsumerId,$sWmPrivateKey,$sRequestMethod)
If ($oAuthUtil.LastMethodSuccess <> True) Then
    ConsoleWrite($oAuthUtil.LastErrorText & @CRLF)
    Exit
EndIf

; The JSON returned by WalmartSignature contains the values to be used in the following
; header fields: WM_SEC.AUTH_SIGNATURE, WM_SEC.TIMESTAMP, and WM_QOS.CORRELATION_ID
$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.Load($sJsonStr)

$oHttp = ObjCreate("Chilkat.Http")
$oHttp.SetRequestHeader "WM_SVC.NAME","Walmart Marketplace"
$oHttp.SetRequestHeader "WM_QOS.CORRELATION_ID",$oJson.StringOf("correlation_id")
$oHttp.SetRequestHeader "WM_SEC.TIMESTAMP",$oJson.StringOf("timestamp")
$oHttp.SetRequestHeader "WM_SEC.AUTH_SIGNATURE",$oJson.StringOf("signature")
$oHttp.SetRequestHeader "WM_CONSUMER.ID",$sWmConsumerId
$oHttp.SetRequestHeader "WM_CONSUMER.CHANNEL.TYPE","WALMART_CHANNEL_TYPE"
$oHttp.Accept = "application/xml"

; Note: Do not explicitly set the "Host" header.  Chilkat will set it automatically.

; The body of the POST request will be XML that looks something like this:

; 	<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
; 	<ns2:orderShipment
; 	    xmlns:ns2="http://walmart.com/mp/v3/orders"
; 	    xmlns:ns3="http://walmart.com/">
; 	    <ns2:orderLines>
; 	        <ns2:orderLine>
; 	            <ns2:lineNumber>2</ns2:lineNumber>
; 	            <ns2:orderLineStatuses>
; 	                <ns2:orderLineStatus>
; 	                    <ns2:status>Shipped</ns2:status>
; 	                    <ns2:statusQuantity>
; 	                        <ns2:unitOfMeasurement>Each</ns2:unitOfMeasurement>
; 	                        <ns2:amount>1</ns2:amount>
; 	                    </ns2:statusQuantity>
; 	                    <ns2:trackingInfo>
; 	                        <ns2:shipDateTime>2016-06-27T05:30:15.000Z</ns2:shipDateTime>
; 	                        <ns2:carrierName>
; 	                            <ns2:carrier>FedEx</ns2:carrier>
; 	                        </ns2:carrierName>
; 	                        <ns2:methodCode>Standard</ns2:methodCode>
; 	                        <ns2:trackingNumber>12333634122</ns2:trackingNumber>
; 	                    </ns2:trackingInfo>
; 	                </ns2:orderLineStatus>
; 	            </ns2:orderLineStatuses>
; 	        </ns2:orderLine>
; 	    </ns2:orderLines>
; 	</ns2:orderShipment>

; Build the XML request body:
Local $iLineNumber = 1
Local $shippingStatus = "Shipped"
Local $iQuantity = 1
Local $sCarrier = "USPS"
Local $shippingMethod = "Standard"
Local $sTrackingNumber = "9999869903501929298999"

$oDtNow = ObjCreate("Chilkat.CkDateTime")
$oDtNow.SetFromCurrentSystemTime()
Local $shipDateTime = $oDtNow.GetAsTimestamp(False)

$oXmlBody = ObjCreate("Chilkat.Xml")
$oXmlBody.Tag = "ns2:orderShipment"
$oXmlBody.AddAttribute("xmlns:ns2","http://walmart.com/mp/v3/orders")
$oXmlBody.AddAttribute("xmlns:ns3","http://walmart.com/")
$oXmlBody.UpdateChildContentInt "ns2:orderLines|ns2:orderLine|ns2:lineNumber",$iLineNumber

Local $oOrderLine = $oXmlBody.GetChildWithTag("ns2:orderLines|ns2:orderLine")
$oOrderLine.UpdateChildContent "ns2:orderLineStatuses|ns2:orderLineStatus|ns2:status",$shippingStatus

Local $oOrderLineStatus = $oOrderLine.GetChildWithTag("ns2:orderLineStatuses|ns2:orderLineStatus")
$oOrderLineStatus.UpdateChildContent "ns2:statusQuantity|ns2:unitOfMeasurement","Each"
$oOrderLineStatus.UpdateChildContentInt "ns2:statusQuantity|ns2:amount",$iQuantity
$oOrderLineStatus.UpdateChildContent "ns2:trackingInfo|ns2:shipDateTime",$shipDateTime
$oOrderLineStatus.UpdateChildContent "ns2:trackingInfo|ns2:carrierName|ns2:carrier",$sCarrier
$oOrderLineStatus.UpdateChildContent "ns2:trackingInfo|ns2:methodCode",$shippingMethod
$oOrderLineStatus.UpdateChildContent "ns2:trackingInfo|ns2:trackingNumber",$sTrackingNumber

ConsoleWrite("POST request body:" & @CRLF)
ConsoleWrite($oXmlBody.GetXml() & @CRLF)
ConsoleWrite("--" & @CRLF)

; This is a simple POST that can be sent w/ the PostXml method.
; Explicitly set the Content-Type header, otherwise "text/xml" will be used.
$oHttp.SetRequestHeader "Content-Type","application/xml"
Local $oResp = $oHttp.PostXml($oSbUrl.GetAsString(),$oXmlBody.GetXml(),"utf-8")
If ($oHttp.LastMethodSuccess <> True) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

$oXml = ObjCreate("Chilkat.Xml")
$oXml.LoadXml($oResp.BodyStr)

; A successful response should have a 200 response status
If ($oResp.StatusCode <> 200) Then
    ConsoleWrite($oXml.GetXml() & @CRLF)
    ConsoleWrite("Response Status Code: " & $oResp.StatusCode & @CRLF)
    ConsoleWrite("Failed." & @CRLF)

    Exit
EndIf

; Show the XML response..
ConsoleWrite($oXml.GetXml() & @CRLF)
ConsoleWrite("--" & @CRLF)
ConsoleWrite("Success!" & @CRLF)