(Visual FoxPro) Walmart v3 Get All Feed Statuses

Returns the feed statuses for all the specified Feed IDs.

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

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

LOCAL loHttp
LOCAL lnSuccess
LOCAL loSbResponseBody
LOCAL loXmlResponse
LOCAL lcNs2_list_xmlns_ns2
LOCAL lnNs2_totalResults
LOCAL lnNs2_offset
LOCAL lnNs2_limit
LOCAL i
LOCAL lnCount_i
LOCAL lcNs2_feedId
LOCAL lcNs2_feedSource
LOCAL lcNs2_feedType
LOCAL lnNs2_partnerId
LOCAL lnNs2_itemsReceived
LOCAL lnNs2_itemsSucceeded
LOCAL lnNs2_itemsFailed
LOCAL lnNs2_itemsProcessing
LOCAL lcNs2_feedStatus
LOCAL lcNs2_feedDate
LOCAL lcNs2_batchId
LOCAL lcNs2_modifiedDtm
LOCAL lcNs2_fileName
LOCAL lnNs2_itemDataErrorCount
LOCAL lnNs2_itemSystemErrorCount
LOCAL lnNs2_itemTimeoutErrorCount
LOCAL lcNs2_channelType

* 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 GET \
*   https://marketplace.walmartapis.com/v3/feeds?feedId={feedId}&limit={limit}&offset={offset} \
*   -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: application/xml'
*   -H 'Accept: application/xml'

loHttp.SetRequestHeader("WM_QOS.CORRELATION_ID","b3261d2d-028a-4ef7-8602-633c23200af6")
loHttp.SetRequestHeader("Content-Type","application/xml")
loHttp.SetRequestHeader("WM_SEC.ACCESS_TOKEN","eyJraWQiOiIzZjVhYTFmNS1hYWE5LTQzM.....")
loHttp.SetRequestHeader("Accept","application/xml")
loHttp.SetRequestHeader("WM_SVC.NAME","Walmart Marketplace")

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.StringBuilder')
loSbResponseBody = CreateObject('Chilkat.StringBuilder')
lnSuccess = loHttp.QuickGetSb("https://marketplace.walmartapis.com/v3/feeds?feedId={feedId}&limit={limit}&offset={offset}",loSbResponseBody)
IF (lnSuccess = 0) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    RELEASE loSbResponseBody
    CANCEL
ENDIF

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

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

* <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
* <ns2:list xmlns:ns2="http://walmart.com/">
*     <ns2:totalResults>2</ns2:totalResults>
*     <ns2:offset>0</ns2:offset>
*     <ns2:limit>50</ns2:limit>
*     <ns2:results>
*         <ns2:feed>
*             <ns2:feedId>12234EGGT564YTEGFA@AQMBAQA</ns2:feedId>
*             <ns2:feedSource>MARKETPLACE_PARTNER</ns2:feedSource>
*             <ns2:feedType>item</ns2:feedType>
*             <ns2:partnerId>1413254255</ns2:partnerId>
*             <ns2:itemsReceived>1</ns2:itemsReceived>
*             <ns2:itemsSucceeded>1</ns2:itemsSucceeded>
*             <ns2:itemsFailed>0</ns2:itemsFailed>
*             <ns2:itemsProcessing>0</ns2:itemsProcessing>
*             <ns2:feedStatus>PROCESSED</ns2:feedStatus>
*             <ns2:feedDate>2018-07-20T21:56:12.605Z</ns2:feedDate>
*             <ns2:batchId>HP_REQUEST_BATCH</ns2:batchId>
*             <ns2:modifiedDtm>2018-07-20T21:56:17.948Z</ns2:modifiedDtm>
*             <ns2:fileName>ItemFeed99_ParadiseCounty_paperback.xml</ns2:fileName>
*             <ns2:itemDataErrorCount>0</ns2:itemDataErrorCount>
*             <ns2:itemSystemErrorCount>0</ns2:itemSystemErrorCount>
*             <ns2:itemTimeoutErrorCount>0</ns2:itemTimeoutErrorCount>
*             <ns2:channelType>WM_TEST</ns2:channelType>
*         </ns2:feed>
*         <ns2:feed>
*             <ns2:feedId>12234EGGT564YTEGFA@AQMBAQA</ns2:feedId>
*             <ns2:feedSource>MARKETPLACE_PARTNER</ns2:feedSource>
*             <ns2:feedType>item</ns2:feedType>
*             <ns2:partnerId>1413254255</ns2:partnerId>
*             <ns2:itemsReceived>1</ns2:itemsReceived>
*             <ns2:itemsSucceeded>1</ns2:itemsSucceeded>
*             <ns2:itemsFailed>0</ns2:itemsFailed>
*             <ns2:itemsProcessing>0</ns2:itemsProcessing>
*             <ns2:feedStatus>PROCESSED</ns2:feedStatus>
*             <ns2:feedDate>2018-07-20T21:56:12.605Z</ns2:feedDate>
*             <ns2:batchId>HP_REQUEST_BATCH</ns2:batchId>
*             <ns2:modifiedDtm>2018-07-20T21:56:17.948Z</ns2:modifiedDtm>
*             <ns2:fileName>ItemFeed99_ParadiseCounty_paperback.xml</ns2:fileName>
*             <ns2:itemDataErrorCount>0</ns2:itemDataErrorCount>
*             <ns2:itemSystemErrorCount>0</ns2:itemSystemErrorCount>
*             <ns2:itemTimeoutErrorCount>0</ns2:itemTimeoutErrorCount>
*             <ns2:channelType>WM_TEST</ns2:channelType>
*         </ns2:feed>
*     </ns2:results>
* </ns2:list>

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

lcNs2_list_xmlns_ns2 = loXmlResponse.GetAttrValue("xmlns:ns2")
lnNs2_totalResults = loXmlResponse.GetChildIntValue("ns2:totalResults")
lnNs2_offset = loXmlResponse.GetChildIntValue("ns2:offset")
lnNs2_limit = loXmlResponse.GetChildIntValue("ns2:limit")
i = 0
lnCount_i = loXmlResponse.NumChildrenHavingTag("ns2:results|ns2:feed")
DO WHILE i < lnCount_i
    loXmlResponse.I = i
    lcNs2_feedId = loXmlResponse.GetChildContent("ns2:results|ns2:feed[i]|ns2:feedId")
    lcNs2_feedSource = loXmlResponse.GetChildContent("ns2:results|ns2:feed[i]|ns2:feedSource")
    lcNs2_feedType = loXmlResponse.GetChildContent("ns2:results|ns2:feed[i]|ns2:feedType")
    lnNs2_partnerId = loXmlResponse.GetChildIntValue("ns2:results|ns2:feed[i]|ns2:partnerId")
    lnNs2_itemsReceived = loXmlResponse.GetChildIntValue("ns2:results|ns2:feed[i]|ns2:itemsReceived")
    lnNs2_itemsSucceeded = loXmlResponse.GetChildIntValue("ns2:results|ns2:feed[i]|ns2:itemsSucceeded")
    lnNs2_itemsFailed = loXmlResponse.GetChildIntValue("ns2:results|ns2:feed[i]|ns2:itemsFailed")
    lnNs2_itemsProcessing = loXmlResponse.GetChildIntValue("ns2:results|ns2:feed[i]|ns2:itemsProcessing")
    lcNs2_feedStatus = loXmlResponse.GetChildContent("ns2:results|ns2:feed[i]|ns2:feedStatus")
    lcNs2_feedDate = loXmlResponse.GetChildContent("ns2:results|ns2:feed[i]|ns2:feedDate")
    lcNs2_batchId = loXmlResponse.GetChildContent("ns2:results|ns2:feed[i]|ns2:batchId")
    lcNs2_modifiedDtm = loXmlResponse.GetChildContent("ns2:results|ns2:feed[i]|ns2:modifiedDtm")
    lcNs2_fileName = loXmlResponse.GetChildContent("ns2:results|ns2:feed[i]|ns2:fileName")
    lnNs2_itemDataErrorCount = loXmlResponse.GetChildIntValue("ns2:results|ns2:feed[i]|ns2:itemDataErrorCount")
    lnNs2_itemSystemErrorCount = loXmlResponse.GetChildIntValue("ns2:results|ns2:feed[i]|ns2:itemSystemErrorCount")
    lnNs2_itemTimeoutErrorCount = loXmlResponse.GetChildIntValue("ns2:results|ns2:feed[i]|ns2:itemTimeoutErrorCount")
    lcNs2_channelType = loXmlResponse.GetChildContent("ns2:results|ns2:feed[i]|ns2:channelType")
    i = i + 1
ENDDO

RELEASE loHttp
RELEASE loSbResponseBody
RELEASE loXmlResponse