(Lianja) Walmart - Update Inventory for an Item

Demonstrates how to update inventory for an item.

Chilkat Lianja Extension Download Chilkat Lianja Extension

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

// Sends the following PUT request:
// PUT https://marketplace.walmartapis.com/v2/inventory?sku={SKU}

loSbUrl = createobject("CkStringBuilder")
llSuccess = loSbUrl.Append("https://marketplace.walmartapis.com/v2/inventory?sku={SKU}")
lnNumReplaced = loSbUrl.Replace("{SKU}","HOPP~904~51041")

lcRequestMethod = "PUT"

// First we need to generate a signature for our request.
// The signature needs to be re-generated for each new Walmart HTTP request.
loAuthUtil = createobject("CkAuthUtil")

lcWmConsumerId = "WALMART_CONSUMER_ID"
lcWmPrivateKey = "WALMART_PRIVATE_KEY"
lcJsonStr = loAuthUtil.WalmartSignature(loSbUrl.GetAsString(),lcWmConsumerId,lcWmPrivateKey,lcRequestMethod)
if (loAuthUtil.LastMethodSuccess <> .T.) then
    ? loAuthUtil.LastErrorText
    release loSbUrl
    release loAuthUtil
    return
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
loJson = createobject("CkJsonObject")
loJson.Load(lcJsonStr)

loHttp = createobject("CkHttp")
loHttp.SetRequestHeader("WM_SVC.NAME","Walmart Marketplace")
loHttp.SetRequestHeader("WM_QOS.CORRELATION_ID",loJson.StringOf("correlation_id"))
loHttp.SetRequestHeader("WM_SEC.TIMESTAMP",loJson.StringOf("timestamp"))
loHttp.SetRequestHeader("WM_SEC.AUTH_SIGNATURE",loJson.StringOf("signature"))
loHttp.SetRequestHeader("WM_CONSUMER.ID",lcWmConsumerId)
loHttp.Accept = "application/xml"

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

// The body of the PUT request will be XML that looks like this:

// 	<?xml version="1.0" encoding="utf-8" ?>
// 	<wm:inventory xmlns:wm="http://walmart.com/">
// 	    <wm:sku>HOPP~904~51041</wm:sku>
// 	    <wm:quantity>
// 	        <wm:unit>EACH</wm:unit>
// 	        <wm:amount>235</wm:amount>
// 	    </wm:quantity>
// 	    <wm:fulfillmentLagTime>5</wm:fulfillmentLagTime>
// 	</wm:inventory>

// Build the XML request body:
lnOriginalAmount = 234

loXmlBody = createobject("CkXml")
loXmlBody.Tag = "wm:inventory"
loXmlBody.AddAttribute("xmlns:wm","http://walmart.com/")
loXmlBody.UpdateChildContent("wm:sku","HOPP~904~51041")
loXmlBody.UpdateChildContent("wm:quantity|wm:unit","EACH")
loXmlBody.UpdateChildContentInt("wm:quantity|wm:amount",lnOriginalAmount + 1)
loXmlBody.UpdateChildContent("wm:fulfillmentLagTime","5")

? "PUT request body:"
? loXmlBody.GetXml()
? "--"

// This is a simple PUT that can be sent w/ the PutText method.
lcXmlStr = loHttp.PutText(loSbUrl.GetAsString(),loXmlBody.GetXml(),"utf-8","application/xml",.F.,.F.)
if (loHttp.LastMethodSuccess <> .T.) then
    ? loHttp.LastErrorText
    release loSbUrl
    release loAuthUtil
    release loJson
    release loHttp
    release loXmlBody
    return
endif

loXml = createobject("CkXml")
loXml.LoadXml(lcXmlStr)

// A successful response should have a 200 response status
if (loHttp.LastStatus <> 200) then
    ? loXml.GetXml()
    ? "Response Status Code: " + str(loHttp.LastStatus)
    ? "Failed."
    release loSbUrl
    release loAuthUtil
    release loJson
    release loHttp
    release loXmlBody
    release loXml
    return
endif

// A sample XML response is shown below..
? loXml.GetXml()
? "--"
? "Success!"

// ---------------------------------------
// Sample XML response
// ---------------------------------------

// <?xml version="1.0" encoding="UTF-8" standalone="yes" ?>
// <inventory xmlns="http://walmart.com/">
//     <sku>HOPP~904~51041</sku>
//     <quantity>
//         <unit>EACH</unit>
//         <amount>235</amount>
//     </quantity>
//     <fulfillmentLagTime>5</fulfillmentLagTime>
// </inventory>


release loSbUrl
release loAuthUtil
release loJson
release loHttp
release loXmlBody
release loXml