(Visual FoxPro) Walmart v3 Bulk Item Setup

Updates items in bulk.

For more information, see https://developer.walmart.com/#/apicenter/marketPlace/latest#bulkCreateUpdateItems

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

LOCAL loHttp
LOCAL lnSuccess
LOCAL loReq
LOCAL loResp
LOCAL loSbResponseBody
LOCAL loXmlResponse
LOCAL lcFeedAcknowledgement_xmlns_ns2
LOCAL lcFeedId

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

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Http')
loHttp = CreateObject('Chilkat.Http')

* Implements the following CURL command:

* curl -X POST \
*   https://marketplace.walmartapis.com/v3/feeds?feedType=item \
*   -H 'WM_SVC.NAME: Walmart Marketplace'
*   -H 'WM_SEC.ACCESS_TOKEN: eyJraWQiOiIzZjVhYTFmNS1hYWE5LTQzM.....'
*   -H 'WM_QOS.CORRELATION_ID: b3261d2d-028a-4ef7-8602-633c23200af6'
*   -H 'Content-Type: multipart/form-data'
*   -H 'Accept: application/xml'
*   -F feed=@qa_data/walmart/itemFeed.xml

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.HttpRequest')
loReq = CreateObject('Chilkat.HttpRequest')
loReq.HttpVerb = "POST"
loReq.Path = "/v3/feeds?feedType=item"
loReq.ContentType = "multipart/form-data"
lnSuccess = loReq.AddFileForUpload2("feed","qa_data/walmart/itemFeed.xml","application/xml")

loReq.AddHeader("WM_QOS.CORRELATION_ID","b3261d2d-028a-4ef7-8602-633c23200af6")
loReq.AddHeader("Expect","100-continue")
loReq.AddHeader("Content-Type","multipart/form-data")
loReq.AddHeader("WM_SEC.ACCESS_TOKEN","eyJraWQiOiIzZjVhYTFmNS1hYWE5LTQzM.....")
loReq.AddHeader("Accept","application/xml")
loReq.AddHeader("WM_SVC.NAME","Walmart Marketplace")

loResp = loHttp.SynchronousRequest("marketplace.walmartapis.com",443,1,loReq)
IF (loHttp.LastMethodSuccess = 0) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    RELEASE loReq
    CANCEL
ENDIF

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.StringBuilder')
loSbResponseBody = CreateObject('Chilkat.StringBuilder')
loResp.GetBodySb(loSbResponseBody)
RELEASE loResp

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Xml')
loXmlResponse = CreateObject('Chilkat.Xml')
loXmlResponse.LoadSb(loSbResponseBody,1)
? loXmlResponse.GetXml()

* Sample XML response:
* (Sample code for parsing the XML response is shown below)

* <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
* <FeedAcknowledgement xmlns:ns2="http://walmart.com/">
*     <feedId>E9C04D1FFD99479FBC1341D56DD5F930@AQMB_wA</feedId>
* </FeedAcknowledgement>

* Sample code for parsing the XML response...
* Use the following online tool to generate parsing code from sample XML:
* Generate Parsing Code from XML

lcFeedAcknowledgement_xmlns_ns2 = loXmlResponse.GetAttrValue("xmlns:ns2")
lcFeedId = loXmlResponse.GetChildContent("feedId")

RELEASE loHttp
RELEASE loReq
RELEASE loSbResponseBody
RELEASE loXmlResponse