(DataFlex) Walmart v3 Get a Feed Status

This API returns the feed status for a specified Feed ID.

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

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

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoHttp
    Boolean iSuccess
    Variant vSbResponseBody
    Handle hoSbResponseBody
    Handle hoXmlResponse
    String sPartnerFeedResponse_xmlns_ns2
    String sFeedId
    String sFeedStatus
    Integer iItemsReceived
    Integer iItemsSucceeded
    Integer iItemsFailed
    Integer iItemsProcessing
    Integer iOffset
    Integer iLimit
    Integer i
    Integer iCount_i
    Integer iMartId
    String sSku
    Integer iIndex
    String sIngestionStatus
    String sTemp1

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

    Get Create (RefClass(cComChilkatHttp)) To hoHttp
    If (Not(IsComObjectCreated(hoHttp))) Begin
        Send CreateComObject of hoHttp
    End

    // Implements the following CURL command:

    // curl -X GET \
    //   https://marketplace.walmartapis.com/v3/feeds/{feedId} \
    //   -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'

    Send ComSetRequestHeader To hoHttp "WM_QOS.CORRELATION_ID" "b3261d2d-028a-4ef7-8602-633c23200af6"
    Send ComSetRequestHeader To hoHttp "Content-Type" "application/xml"
    Send ComSetRequestHeader To hoHttp "WM_SEC.ACCESS_TOKEN" "eyJraWQiOiIzZjVhYTFmNS1hYWE5LTQzM....."
    Send ComSetRequestHeader To hoHttp "Accept" "application/xml"
    Send ComSetRequestHeader To hoHttp "WM_SVC.NAME" "Walmart Marketplace"

    Get Create (RefClass(cComChilkatStringBuilder)) To hoSbResponseBody
    If (Not(IsComObjectCreated(hoSbResponseBody))) Begin
        Send CreateComObject of hoSbResponseBody
    End
    Get pvComObject of hoSbResponseBody to vSbResponseBody
    Get ComQuickGetSb Of hoHttp "https://marketplace.walmartapis.com/v3/feeds/{feedId}" vSbResponseBody To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoHttp To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Get Create (RefClass(cComChilkatXml)) To hoXmlResponse
    If (Not(IsComObjectCreated(hoXmlResponse))) Begin
        Send CreateComObject of hoXmlResponse
    End
    Get pvComObject of hoSbResponseBody to vSbResponseBody
    Get ComLoadSb Of hoXmlResponse vSbResponseBody True To iSuccess

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

    // <?xml version="1.0" encoding="UTF-8"?>
    // <PartnerFeedResponse xmlns:ns2="http://walmart.com/">
    //     <feedId>1c349f8f-aec0-411f-8454-ead47d12946f</feedId>
    //     <feedStatus>PROCESSED</feedStatus>
    //     <ingestionErrors/>
    //     <itemsReceived>11</itemsReceived>
    //     <itemsSucceeded>11</itemsSucceeded>
    //     <itemsFailed>0</itemsFailed>
    //     <itemsProcessing>0</itemsProcessing>
    //     <offset>0</offset>
    //     <limit>0</limit>
    //     <itemDetails>
    //         <itemIngestionStatus>
    //             <martId>0</martId>
    //             <sku>sku1</sku>
    //             <index>8</index>
    //             <ingestionStatus>SUCCESS</ingestionStatus>
    //             <ingestionErrors/>
    //         </itemIngestionStatus>
    //         <itemIngestionStatus>
    //             <martId>0</martId>
    //             <sku>sku2</sku>
    //             <index>6</index>
    //             <ingestionStatus>SUCCESS</ingestionStatus>
    //             <ingestionErrors/>
    //         </itemIngestionStatus>
    //         <itemIngestionStatus>
    //             <martId>0</martId>
    //             <sku>sku3</sku>
    //             <index>9</index>
    //             <ingestionStatus>SUCCESS</ingestionStatus>
    //             <ingestionErrors/>
    //         </itemIngestionStatus>
    //     </itemDetails>
    // </PartnerFeedResponse>

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

    Get ComGetAttrValue Of hoXmlResponse "xmlns:ns2" To sPartnerFeedResponse_xmlns_ns2
    Get ComGetChildContent Of hoXmlResponse "feedId" To sFeedId
    Get ComGetChildContent Of hoXmlResponse "feedStatus" To sFeedStatus
    Get ComGetChildIntValue Of hoXmlResponse "itemsReceived" To iItemsReceived
    Get ComGetChildIntValue Of hoXmlResponse "itemsSucceeded" To iItemsSucceeded
    Get ComGetChildIntValue Of hoXmlResponse "itemsFailed" To iItemsFailed
    Get ComGetChildIntValue Of hoXmlResponse "itemsProcessing" To iItemsProcessing
    Get ComGetChildIntValue Of hoXmlResponse "offset" To iOffset
    Get ComGetChildIntValue Of hoXmlResponse "limit" To iLimit
    Move 0 To i
    Get ComNumChildrenHavingTag Of hoXmlResponse "itemDetails|itemIngestionStatus" To iCount_i
    While (i < iCount_i)
        Set ComI Of hoXmlResponse To i
        Get ComGetChildIntValue Of hoXmlResponse "itemDetails|itemIngestionStatus[i]|martId" To iMartId
        Get ComGetChildContent Of hoXmlResponse "itemDetails|itemIngestionStatus[i]|sku" To sSku
        Get ComGetChildIntValue Of hoXmlResponse "itemDetails|itemIngestionStatus[i]|index" To iIndex
        Get ComGetChildContent Of hoXmlResponse "itemDetails|itemIngestionStatus[i]|ingestionStatus" To sIngestionStatus
        Move (i + 1) To i
    Loop



End_Procedure