Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Delphi DLL) Walmart - Acknowledge OrderSee Acknowledge Orders for more information about this call. Acknowledges an entire order, including all of its order lines. Walmart requires a seller to acknowledge orders within four hours of receipt of the order, except in extenuating circumstances. The response to a successful call contains the acknowledged order. In general, only orders that are in a “Created” state should be acknowledged. As a good practice, acknowledge your orders to avoid underselling. Orders that are in an “Acknowledged” state can be re-acknowledged, possibly in response to an error response from an earlier call to acknowledge order. Orders with line items that are shipped or canceled should not be re-acknowledged.
uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Http, StringBuilder, HttpResponse, AuthUtil, JsonObject; ... procedure TForm1.Button1Click(Sender: TObject); var sbUrl: HCkStringBuilder; success: Boolean; numReplaced: Integer; requestMethod: PWideChar; authUtil: HCkAuthUtil; wmConsumerId: PWideChar; wmPrivateKey: PWideChar; jsonStr: PWideChar; json: HCkJsonObject; http: HCkHttp; resp: HCkHttpResponse; sbBody: HCkStringBuilder; orderPurchaseOrderId: PWideChar; orderCustomerOrderId: PWideChar; orderCustomerEmailId: PWideChar; orderOrderDate: Integer; orderShippingInfoPhone: PWideChar; orderShippingInfoEstimatedDeliveryDate: Integer; orderShippingInfoEstimatedShipDate: Integer; orderShippingInfoMethodCode: PWideChar; orderShippingInfoPostalAddressName: PWideChar; orderShippingInfoPostalAddressAddress1: PWideChar; orderShippingInfoPostalAddressAddress2: PWideChar; orderShippingInfoPostalAddressCity: PWideChar; orderShippingInfoPostalAddressState: PWideChar; orderShippingInfoPostalAddressPostalCode: PWideChar; orderShippingInfoPostalAddressCountry: PWideChar; orderShippingInfoPostalAddressAddressType: PWideChar; i: Integer; count_i: Integer; lineNumber: PWideChar; itemProductName: PWideChar; itemSku: PWideChar; orderLineQuantityUnitOfMeasurement: PWideChar; orderLineQuantityAmount: PWideChar; statusDate: Integer; refundRefundId: Boolean; refundRefundComments: Boolean; j: Integer; count_j: Integer; chargeType: PWideChar; chargeName: PWideChar; chargeAmountCurrency: PWideChar; chargeAmountAmount: Integer; taxTaxName: PWideChar; taxTaxAmountCurrency: PWideChar; taxTaxAmountAmount: Integer; status: PWideChar; statusQuantityUnitOfMeasurement: PWideChar; statusQuantityAmount: PWideChar; cancellationReason: Boolean; trackingInfoShipDateTime: Integer; trackingInfoCarrierNameOtherCarrier: Boolean; trackingInfoCarrierNameCarrier: PWideChar; trackingInfoMethodCode: PWideChar; trackingInfoTrackingNumber: PWideChar; trackingInfoTrackingURL: PWideChar; refundReason: PWideChar; chargeChargeType: PWideChar; chargeChargeName: PWideChar; chargeChargeAmountCurrency: PWideChar; chargeChargeAmountAmount: Integer; chargeTax: Boolean; begin // --------------------------------------------------------------------------------------------------------- // Note: This example is deprecated. The Walmart API no longer uses the Signature method of authenticating. // Walmart now uses OAuth2. // --------------------------------------------------------------------------------------------------------- // This example requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. // Sends the following POST request: // POST https://marketplace.walmartapis.com/v3/orders/{purchaseOrderId}/acknowledge sbUrl := CkStringBuilder_Create(); success := CkStringBuilder_Append(sbUrl,'https://marketplace.walmartapis.com/v3/orders/{purchaseOrderId}/acknowledge'); numReplaced := CkStringBuilder_Replace(sbUrl,'{purchaseOrderId}','1111691995111'); requestMethod := 'POST'; // First we need to generate a signature for our request. // The signature needs to be re-generated for each new Walmart HTTP request. authUtil := CkAuthUtil_Create(); wmConsumerId := 'WALMART_CONSUMER_ID'; wmPrivateKey := 'WALMART_PRIVATE_KEY'; jsonStr := CkAuthUtil__walmartSignature(authUtil,CkStringBuilder__getAsString(sbUrl),wmConsumerId,wmPrivateKey,requestMethod); if (CkAuthUtil_getLastMethodSuccess(authUtil) <> True) then begin Memo1.Lines.Add(CkAuthUtil__lastErrorText(authUtil)); Exit; end; // 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 json := CkJsonObject_Create(); CkJsonObject_Load(json,jsonStr); http := CkHttp_Create(); CkHttp_SetRequestHeader(http,'WM_SVC.NAME','Walmart Marketplace'); CkHttp_SetRequestHeader(http,'WM_QOS.CORRELATION_ID',CkJsonObject__stringOf(json,'correlation_id')); CkHttp_SetRequestHeader(http,'WM_SEC.TIMESTAMP',CkJsonObject__stringOf(json,'timestamp')); CkHttp_SetRequestHeader(http,'WM_SEC.AUTH_SIGNATURE',CkJsonObject__stringOf(json,'signature')); CkHttp_SetRequestHeader(http,'WM_CONSUMER.ID',wmConsumerId); // Note: Make sure to replace "WALMART_CHANNEL_TYPE" with the actual value for your seller account... CkHttp_SetRequestHeader(http,'WM_CONSUMER.CHANNEL.TYPE','WALMART_CHANNEL_TYPE'); CkHttp_putAccept(http,'application/xml'); // Note: Do not explicitly set the "Host" header. Chilkat will set it automatically. // Walmart provides the option to send/receive JSON or XML. This example will use JSON. // Note: Please see the online JSON/XML code generation tools at https://tools.chilkat.io/ // The online tools generate code to create/parse XML or JSON. (You copy sample JSON/XML into the online format, // and generate code in your selected programming language. It's a big time saver.) CkHttp_SetRequestHeader(http,'Accept','application/json'); // The body of this particular POST request contains just "{}". (The order ID is already in the URL path.) resp := CkHttp_PostJson2(http,CkStringBuilder__getAsString(sbUrl),'application/json','{}'); if (CkHttp_getLastMethodSuccess(http) <> True) then begin Memo1.Lines.Add(CkHttp__lastErrorText(http)); Exit; end; // Get the JSON response body, which could contain an error, or if successful contains // the acknowledged order. sbBody := CkStringBuilder_Create(); CkHttpResponse_GetBodySb(resp,sbBody); // A successful response should have a 200 response status if (CkHttpResponse_getStatusCode(resp) <> 200) then begin Memo1.Lines.Add(CkStringBuilder__getAsString(sbBody)); Memo1.Lines.Add('Response Status Code: ' + IntToStr(CkHttpResponse_getStatusCode(resp))); Memo1.Lines.Add('Failed.'); CkHttpResponse_Dispose(resp); Exit; end; CkHttpResponse_Dispose(resp); // Parse the JSON response. // A sample response is shown below this code. (The online tools at https://tools.chilkat.io were used to generate the // fragment of code below using the sample response data at // https://developer.walmart.com/#/apicenter/marketPlace/latest?country=us#acknowledgingOrders CkJsonObject_LoadSb(json,sbBody); orderPurchaseOrderId := CkJsonObject__stringOf(json,'order.purchaseOrderId'); orderCustomerOrderId := CkJsonObject__stringOf(json,'order.customerOrderId'); orderCustomerEmailId := CkJsonObject__stringOf(json,'order.customerEmailId'); orderOrderDate := CkJsonObject_IntOf(json,'order.orderDate'); orderShippingInfoPhone := CkJsonObject__stringOf(json,'order.shippingInfo.phone'); orderShippingInfoEstimatedDeliveryDate := CkJsonObject_IntOf(json,'order.shippingInfo.estimatedDeliveryDate'); orderShippingInfoEstimatedShipDate := CkJsonObject_IntOf(json,'order.shippingInfo.estimatedShipDate'); orderShippingInfoMethodCode := CkJsonObject__stringOf(json,'order.shippingInfo.methodCode'); orderShippingInfoPostalAddressName := CkJsonObject__stringOf(json,'order.shippingInfo.postalAddress.name'); orderShippingInfoPostalAddressAddress1 := CkJsonObject__stringOf(json,'order.shippingInfo.postalAddress.address1'); orderShippingInfoPostalAddressAddress2 := CkJsonObject__stringOf(json,'order.shippingInfo.postalAddress.address2'); orderShippingInfoPostalAddressCity := CkJsonObject__stringOf(json,'order.shippingInfo.postalAddress.city'); orderShippingInfoPostalAddressState := CkJsonObject__stringOf(json,'order.shippingInfo.postalAddress.state'); orderShippingInfoPostalAddressPostalCode := CkJsonObject__stringOf(json,'order.shippingInfo.postalAddress.postalCode'); orderShippingInfoPostalAddressCountry := CkJsonObject__stringOf(json,'order.shippingInfo.postalAddress.country'); orderShippingInfoPostalAddressAddressType := CkJsonObject__stringOf(json,'order.shippingInfo.postalAddress.addressType'); i := 0; count_i := CkJsonObject_SizeOfArray(json,'order.orderLines.orderLine'); while i < count_i do begin CkJsonObject_putI(json,i); lineNumber := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].lineNumber'); itemProductName := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].item.productName'); itemSku := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].item.sku'); orderLineQuantityUnitOfMeasurement := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].orderLineQuantity.unitOfMeasurement'); orderLineQuantityAmount := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].orderLineQuantity.amount'); statusDate := CkJsonObject_IntOf(json,'order.orderLines.orderLine[i].statusDate'); refundRefundId := CkJsonObject_IsNullOf(json,'order.orderLines.orderLine[i].refund.refundId'); refundRefundComments := CkJsonObject_IsNullOf(json,'order.orderLines.orderLine[i].refund.refundComments'); j := 0; count_j := CkJsonObject_SizeOfArray(json,'order.orderLines.orderLine[i].charges.charge'); while j < count_j do begin CkJsonObject_putJ(json,j); chargeType := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].charges.charge[j].chargeType'); chargeName := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].charges.charge[j].chargeName'); chargeAmountCurrency := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].charges.charge[j].chargeAmount.currency'); chargeAmountAmount := CkJsonObject_IntOf(json,'order.orderLines.orderLine[i].charges.charge[j].chargeAmount.amount'); taxTaxName := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].charges.charge[j].tax.taxName'); taxTaxAmountCurrency := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].charges.charge[j].tax.taxAmount.currency'); taxTaxAmountAmount := CkJsonObject_IntOf(json,'order.orderLines.orderLine[i].charges.charge[j].tax.taxAmount.amount'); j := j + 1; end; j := 0; count_j := CkJsonObject_SizeOfArray(json,'order.orderLines.orderLine[i].orderLineStatuses.orderLineStatus'); while j < count_j do begin CkJsonObject_putJ(json,j); status := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].orderLineStatuses.orderLineStatus[j].status'); statusQuantityUnitOfMeasurement := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].orderLineStatuses.orderLineStatus[j].statusQuantity.unitOfMeasurement'); statusQuantityAmount := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].orderLineStatuses.orderLineStatus[j].statusQuantity.amount'); cancellationReason := CkJsonObject_IsNullOf(json,'order.orderLines.orderLine[i].orderLineStatuses.orderLineStatus[j].cancellationReason'); trackingInfoShipDateTime := CkJsonObject_IntOf(json,'order.orderLines.orderLine[i].orderLineStatuses.orderLineStatus[j].trackingInfo.shipDateTime'); trackingInfoCarrierNameOtherCarrier := CkJsonObject_IsNullOf(json,'order.orderLines.orderLine[i].orderLineStatuses.orderLineStatus[j].trackingInfo.carrierName.otherCarrier'); trackingInfoCarrierNameCarrier := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].orderLineStatuses.orderLineStatus[j].trackingInfo.carrierName.carrier'); trackingInfoMethodCode := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].orderLineStatuses.orderLineStatus[j].trackingInfo.methodCode'); trackingInfoTrackingNumber := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].orderLineStatuses.orderLineStatus[j].trackingInfo.trackingNumber'); trackingInfoTrackingURL := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].orderLineStatuses.orderLineStatus[j].trackingInfo.trackingURL'); j := j + 1; end; j := 0; count_j := CkJsonObject_SizeOfArray(json,'order.orderLines.orderLine[i].refund.refundCharges.refundCharge'); while j < count_j do begin CkJsonObject_putJ(json,j); refundReason := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].refund.refundCharges.refundCharge[j].refundReason'); chargeChargeType := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].refund.refundCharges.refundCharge[j].charge.chargeType'); chargeChargeName := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].refund.refundCharges.refundCharge[j].charge.chargeName'); chargeChargeAmountCurrency := CkJsonObject__stringOf(json,'order.orderLines.orderLine[i].refund.refundCharges.refundCharge[j].charge.chargeAmount.currency'); chargeChargeAmountAmount := CkJsonObject_IntOf(json,'order.orderLines.orderLine[i].refund.refundCharges.refundCharge[j].charge.chargeAmount.amount'); chargeTax := CkJsonObject_IsNullOf(json,'order.orderLines.orderLine[i].refund.refundCharges.refundCharge[j].charge.tax'); j := j + 1; end; i := i + 1; end; Memo1.Lines.Add('Success!'); // Sample Walmart Order Acknowledge Response: // { // "order": { // "purchaseOrderId": "1577684050862", // "customerOrderId": "2861700797280", // "customerEmailId": "jsanthanam@walmartlabs.com", // "orderDate": 1484458949000, // "shippingInfo": { // "phone": "4151234567", // "estimatedDeliveryDate": 1485586800000, // "estimatedShipDate": 1484636400000, // "methodCode": "Value", // "postalAddress": { // "name": "Asha Chakre", // "address1": "860 W California ave", // "address2": null, // "city": "Sunnyvale", // "state": "CA", // "postalCode": "94086", // "country": "USA", // "addressType": "RESIDENTIAL" // } // }, // "orderLines": { // "orderLine": [ // { // "lineNumber": "1", // "item": { // "productName": "Kellogg's Rice Krispies Cereal, 24 oz", // "sku": "MGR_07_21_00100123" // }, // "charges": { // "charge": [ // { // "chargeType": "PRODUCT", // "chargeName": "ItemPrice", // "chargeAmount": { // "currency": "USD", // "amount": 19.99 // }, // "tax": { // "taxName": "Tax1", // "taxAmount": { // "currency": "USD", // "amount": 1.7 // } // } // } // ] // }, // "orderLineQuantity": { // "unitOfMeasurement": "EACH", // "amount": "1" // }, // "statusDate": 1487888747000, // "orderLineStatuses": { // "orderLineStatus": [ // { // "status": "Shipped", // "statusQuantity": { // "unitOfMeasurement": "EACH", // "amount": "1" // }, // "cancellationReason": null, // "trackingInfo": { // "shipDateTime": 1485549015000, // "carrierName": { // "otherCarrier": null, // "carrier": "FedEx" // }, // "methodCode": "Value", // "trackingNumber": "3445435443441221", // "trackingURL": "http://walmart.narvar.com/walmart/tracking/Fedex?&type=MP&seller_id=801&promise_date=01/28/2017&dzip=94086&tracking_numbers=3445435443441221" // } // } // ] // }, // "refund": { // "refundId": null, // "refundComments": null, // "refundCharges": { // "refundCharge": [ // { // "refundReason": "ItemNotReceivedByCustomer", // "charge": { // "chargeType": "PRODUCT", // "chargeName": "Lost in Transit", // "chargeAmount": { // "currency": "USD", // "amount": -0.01 // }, // "tax": null // } // } // ] // } // } // } // ] // } // } // } CkStringBuilder_Dispose(sbUrl); CkAuthUtil_Dispose(authUtil); CkJsonObject_Dispose(json); CkHttp_Dispose(http); CkStringBuilder_Dispose(sbBody); end; |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.