(Visual FoxPro) Walmart v3 Item Setup by Match

Provides a quick and convenient way to set up items by matching your items to existing item content on Walmart.com.

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

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

LOCAL loHttp
LOCAL lnSuccess
LOCAL loJson
LOCAL loResp
LOCAL loSbResponseBody
LOCAL loJResp
LOCAL lnRespStatusCode
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: application/json'
*   -H 'Accept: application/json'
*   -d '{
*     "MPItemFeedHeader": {
*         "version": "3.2.1"
*     },
*     "MPItem": [
*         {
*             "sku": "setup_by_ref",
*             "productIdentifiers": [
*                 {
*                     "productIdType": "GTIN",
*                     "productId": "05518319011365"
*                 }
*             ],
*             "MPProduct": {
*                 "category": "Electronics",
*                 "subCategory": "ElectronicsAccessories"
*             },
*             "MPOffer": {
*                 "price": 12.00,
*                 "shippingWeight": {
*                     "measure": 0.5,
*                     "unit": "lb"
*                 },
*                 "productTaxCode": 2038710
*             }
*         }
*     ]
* }'

* Use this online tool to generate code from sample JSON:
* Generate Code to Create JSON

* The following JSON is sent in the request body.

* {
*   "MPItemFeedHeader": {
*     "version": "3.2.1"
*   },
*   "MPItem": [
*     {
*       "sku": "setup_by_ref",
*       "productIdentifiers": [
*         {
*           "productIdType": "GTIN",
*           "productId": "05518319011365"
*         }
*       ],
*       "MPProduct": {
*         "category": "Electronics",
*         "subCategory": "ElectronicsAccessories"
*       },
*       "MPOffer": {
*         "price": 12.00,
*         "shippingWeight": {
*           "measure": 0.5,
*           "unit": "lb"
*         },
*         "productTaxCode": 2038710
*       }
*     }
*   ]
* }

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.JsonObject')
loJson = CreateObject('Chilkat.JsonObject')
loJson.UpdateString("MPItemFeedHeader.version","3.2.1")
loJson.UpdateString("MPItem[0].sku","setup_by_ref")
loJson.UpdateString("MPItem[0].productIdentifiers[0].productIdType","GTIN")
loJson.UpdateString("MPItem[0].productIdentifiers[0].productId","05518319011365")
loJson.UpdateString("MPItem[0].MPProduct.category","Electronics")
loJson.UpdateString("MPItem[0].MPProduct.subCategory","ElectronicsAccessories")
loJson.UpdateNumber("MPItem[0].MPOffer.price","12.00")
loJson.UpdateNumber("MPItem[0].MPOffer.shippingWeight.measure","0.5")
loJson.UpdateString("MPItem[0].MPOffer.shippingWeight.unit","lb")
loJson.UpdateInt("MPItem[0].MPOffer.productTaxCode",2038710)

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

loResp = loHttp.PostJson3("https://marketplace.walmartapis.com/v3/feeds?feedType=item","application/json",loJson)
IF (loHttp.LastMethodSuccess = 0) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    RELEASE loJson
    CANCEL
ENDIF

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.StringBuilder')
loSbResponseBody = CreateObject('Chilkat.StringBuilder')
loResp.GetBodySb(loSbResponseBody)
* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.JsonObject')
loJResp = CreateObject('Chilkat.JsonObject')
loJResp.LoadSb(loSbResponseBody)
loJResp.EmitCompact = 0

? "Response Body:"
? loJResp.Emit()

lnRespStatusCode = loResp.StatusCode
? "Response Status Code = " + STR(lnRespStatusCode)
IF (lnRespStatusCode >= 400) THEN
    ? "Response Header:"
    ? loResp.Header
    ? "Failed."
    RELEASE loResp
    RELEASE loHttp
    RELEASE loJson
    RELEASE loSbResponseBody
    RELEASE loJResp
    CANCEL
ENDIF

RELEASE loResp

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

* {
*   "feedId": "BC141881F6BB4B5891F084B225581BF2@AUUBAQA"
* }

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

lcFeedId = loJResp.StringOf("feedId")

RELEASE loHttp
RELEASE loJson
RELEASE loSbResponseBody
RELEASE loJResp