|
Chilkat • HOME • Android™ • Classic ASP • C • C++ • C# • Mono C# • .NET Core C# • C# UWP/WinRT • DataFlex • Delphi ActiveX • Delphi DLL • Visual FoxPro • Java • Lianja • MFC • Objective-C • Perl • PHP ActiveX • PHP Extension • PowerBuilder • PowerShell • PureBasic • CkPython • Chilkat2-Python • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • Visual Basic 6.0 • VB.NET • VB.NET UWP/WinRT • VBScript • Xojo Plugin • Node.js • Excel • Go
(VB.NET UWP/WinRT) Walmart - Get List of OrdersDemonstrates how to get a list of all orders. Note: This example requires Chilkat v9.5.0.67 or greater.
' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' Demonstrates how to get a list of Walmart orders and parse the XML result. ' --- ' Note: The Walmart documentation indicates that the createdStartDate/createdEndDate query parameters are optional, ' however, this may not actually be the case. It may be that at least one is required for getting a list of orders. ' --- ' The general format to get orders is as follows: ' GET https://marketplace.walmartapis.com/v3/orders?sku={sku}&customerOrderId={customerOrderId}&purchaseOrderId={purchaseOrderId}&status={status}&createdStartDate={createdStartDate}&createdEndDate={createdEndDate}&fromExpectedShipDate={fromExpectedShipDate}&toExpectedShipDate={toExpectedShipDate}&limit={limit} ' Let's build a request to get all the orders in the last 7 days. Dim sbUrl As New Chilkat.StringBuilder Dim success As Boolean = sbUrl.Append("https://marketplace.walmartapis.com/v3/orders?createdStartDate={createdStartDate}&limit={limit}") ' We'll just get 2 results so we can demonstrate iterating over the XML.. Dim numReplaced As Integer = sbUrl.ReplaceI("{limit}",2) ' Get the current system date/time and add -7 days to get 1 week ago. Dim dtStartDate As New Chilkat.CkDateTime dtStartDate.SetFromCurrentSystemTime() dtStartDate.AddDays(-7) Debug.WriteLine("One week ago (GMT): " & dtStartDate.GetAsTimestamp(False)) numReplaced = sbUrl.Replace("{createdStartDate}",dtStartDate.GetAsTimestamp(False)) Dim requestMethod As String = "GET" ' First we need to generate a signature for our request. ' The signature needs to be re-generated for each new Walmart HTTP request. Dim authUtil As New Chilkat.AuthUtil Dim wmConsumerId As String = "WALMART_CONSUMER_ID" Dim wmPrivateKey As String = "WALMART_PRIVATE_KEY" Dim jsonStr As String = authUtil.WalmartSignature(sbUrl.GetAsString(),wmConsumerId,wmPrivateKey,requestMethod) If (authUtil.LastMethodSuccess <> True) Then Debug.WriteLine(authUtil.LastErrorText) Exit Sub End If ' 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 Dim json As New Chilkat.JsonObject json.Load(jsonStr) Dim http As New Chilkat.Http http.SetRequestHeader("WM_SVC.NAME","Walmart Marketplace") http.SetRequestHeader("WM_QOS.CORRELATION_ID",json.StringOf("correlation_id")) http.SetRequestHeader("WM_SEC.TIMESTAMP",json.StringOf("timestamp")) http.SetRequestHeader("WM_SEC.AUTH_SIGNATURE",json.StringOf("signature")) http.SetRequestHeader("WM_CONSUMER.ID",wmConsumerId) ' Note: check to see what keyword you should use for your situation. ' The keyword "WALMART_CHANNEL_TYPE" is one option. Another is "SWAGGER_CHANNEL_TYPE". http.SetRequestHeader("WM_CONSUMER.CHANNEL.TYPE","WALMART_CHANNEL_TYPE") http.Accept = "application/xml" ' Note: Do not explicitly set the "Host" header. Chilkat will set it automatically. Dim xmlStr As String = Await http.QuickGetStrAsync(sbUrl.GetAsString()) If (http.LastMethodSuccess <> True) Then Debug.WriteLine(http.LastErrorText) Exit Sub End If Dim xml As New Chilkat.Xml xml.LoadXml(xmlStr) ' A successful response should have a 200 response status If (http.LastStatus <> 200) Then Debug.WriteLine(xml.GetXml()) Debug.WriteLine("Response Status Code: " & http.LastStatus) Debug.WriteLine("Failed.") Exit Sub End If ' A sample XML response is shown below.. ' Let's grab some information, and iterate over the XML.. Debug.WriteLine("Total number of orders in last 7 days: " & xml.GetChildIntValue("ns3:meta|ns3:totalCount")) ' The outermost loop loops over the orders. ' The next inner loop loops over the order lines. ' The innermost loop loops over the order line statuses. Dim i As Integer = 0 Dim numOrders As Integer = xml.NumChildrenAt("ns3:elements") While i < numOrders xml.I = i Debug.WriteLine("---- order " & (i + 1) & " ----") Dim order As Chilkat.Xml = xml.GetChildWithTag("ns3:elements|ns3:order[i]") Debug.WriteLine("purchaseOrderId: " & order.GetChildContent("ns3:purchaseOrderId")) Debug.WriteLine("name: " & order.GetChildContent("ns3:shippingInfo|ns3:postalAddress|ns3:name")) Dim j As Integer = 0 Dim numOrderLines As Integer = order.NumChildrenAt("ns3:orderLines") While j < numOrderLines order.J = j Dim orderLine As Chilkat.Xml = order.GetChildWithTag("ns3:orderLines|ns3:orderLine[j]") Debug.WriteLine(" productName: " & orderLine.GetChildContent("ns3:item|ns3:productName")) Dim k As Integer = 0 Dim numOrderLineStatuses As Integer = orderLine.NumChildrenAt("ns3:orderLineStatuses") While k < numOrderLineStatuses orderLine.K = k Debug.WriteLine(" order line status: " & orderLine.GetChildContent("ns3:orderLineStatuses|ns3:orderLineStatus[k]|ns3:status")) Debug.WriteLine(" order line carrier: " & orderLine.GetChildContent("ns3:orderLineStatuses|ns3:orderLineStatus[k]|ns3:trackingInfo|ns3:carrierName|ns3:carrier")) k = k + 1 End While j = j + 1 End While i = i + 1 End While Debug.WriteLine("Success.") ' --------------------------------------- ' Sample XML response ' (The confidential information has been redacted or modified with fake data. ' --------------------------------------- ' <?xml version="1.0" encoding="UTF-8" standalone="yes" ?> ' <ns3:list xmlns:ns2="http://walmart.com/mp/orders" xmlns:ns3="http://walmart.com/mp/v3/orders" xmlns:ns4="http://walmart.com/"> ' <ns3:meta> ' <ns3:totalCount>239</ns3:totalCount> ' <ns3:limit>2</ns3:limit> ' <ns3:nextCursor>?limit=2&hasMoreElements=true&soIndex=239&poIndex=1578652999055&partnerId=10000999999&sellerId=9999&createdStartDate=2017-04-21T19:08:55Z&createdEndDate=2017-04-28T19:08:58.464Z</ns3:nextCursor> ' </ns3:meta> ' <ns3:elements> ' <ns3:order> ' <ns3:purchaseOrderId>1111641944111</ns3:purchaseOrderId> ' <ns3:customerOrderId>1111777852111</ns3:customerOrderId> ' <ns3:customerEmailId>somebody@somewhere.com</ns3:customerEmailId> ' <ns3:orderDate>2017-04-21T01:25:52.000Z</ns3:orderDate> ' <ns3:shippingInfo> ' <ns3:phone>3175555555</ns3:phone> ' <ns3:estimatedDeliveryDate>2017-05-10T06:00:00.000Z</ns3:estimatedDeliveryDate> ' <ns3:estimatedShipDate>2017-04-29T06:00:00.000Z</ns3:estimatedShipDate> ' <ns3:methodCode>Value</ns3:methodCode> ' <ns3:postalAddress> ' <ns3:name>barry redacted</ns3:name> ' <ns3:address1>9999 redacted dr</ns3:address1> ' <ns3:city>Indianapolis</ns3:city> ' <ns3:state>IN</ns3:state> ' <ns3:postalCode>46227</ns3:postalCode> ' <ns3:country>USA</ns3:country> ' <ns3:addressType>RESIDENTIAL</ns3:addressType> ' </ns3:postalAddress> ' </ns3:shippingInfo> ' <ns3:orderLines> ' <ns3:orderLine> ' <ns3:lineNumber>1</ns3:lineNumber> ' <ns3:item> ' <ns3:productName>DPX DPx HEST 2.0 Mil-Spec Fixed Blade G10 Multi-Colored</ns3:productName> ' <ns3:sku>DPXG~DPHSX008~00317</ns3:sku> ' </ns3:item> ' <ns3:charges> ' <ns3:charge> ' <ns3:chargeType>PRODUCT</ns3:chargeType> ' <ns3:chargeName>ItemPrice</ns3:chargeName> ' <ns3:chargeAmount> ' <ns3:currency>USD</ns3:currency> ' <ns3:amount>125.00</ns3:amount> ' </ns3:chargeAmount> ' </ns3:charge> ' </ns3:charges> ' <ns3:orderLineQuantity> ' <ns3:unitOfMeasurement>EACH</ns3:unitOfMeasurement> ' <ns3:amount>1</ns3:amount> ' </ns3:orderLineQuantity> ' <ns3:statusDate>2017-04-28T18:09:26.000Z</ns3:statusDate> ' <ns3:orderLineStatuses> ' <ns3:orderLineStatus> ' <ns3:status>Shipped</ns3:status> ' <ns3:statusQuantity> ' <ns3:unitOfMeasurement>EACH</ns3:unitOfMeasurement> ' <ns3:amount>1</ns3:amount> ' </ns3:statusQuantity> ' <ns3:trackingInfo> ' <ns3:shipDateTime>2017-04-24T20:57:52.000Z</ns3:shipDateTime> ' <ns3:carrierName> ' <ns3:carrier>USPS</ns3:carrier> ' </ns3:carrierName> ' <ns3:methodCode>Value</ns3:methodCode> ' <ns3:trackingNumber>redacted</ns3:trackingNumber> ' <ns3:trackingURL>http://walmart.narvar.com/walmart/tracking/usps?redacted</ns3:trackingURL> ' </ns3:trackingInfo> ' </ns3:orderLineStatus> ' </ns3:orderLineStatuses> ' </ns3:orderLine> ' </ns3:orderLines> ' </ns3:order> ' <ns3:order> ' <ns3:purchaseOrderId>1111652066111</ns3:purchaseOrderId> ' <ns3:customerOrderId>1111778837111</ns3:customerOrderId> ' <ns3:customerEmailId>somebody2@somewhere.com</ns3:customerEmailId> ' <ns3:orderDate>2017-04-22T13:37:12.000Z</ns3:orderDate> ' <ns3:shippingInfo> ' <ns3:phone>8435555555</ns3:phone> ' <ns3:estimatedDeliveryDate>2017-05-11T06:00:00.000Z</ns3:estimatedDeliveryDate> ' <ns3:estimatedShipDate>2017-05-02T06:00:00.000Z</ns3:estimatedShipDate> ' <ns3:methodCode>Value</ns3:methodCode> ' <ns3:postalAddress> ' <ns3:name>Doug Redacted</ns3:name> ' <ns3:address1>1111 redacted dr</ns3:address1> ' <ns3:city>Columbia</ns3:city> ' <ns3:state>SC</ns3:state> ' <ns3:postalCode>29527</ns3:postalCode> ' <ns3:country>USA</ns3:country> ' <ns3:addressType>RESIDENTIAL</ns3:addressType> ' </ns3:postalAddress> ' </ns3:shippingInfo> ' <ns3:orderLines> ' <ns3:orderLine> ' <ns3:lineNumber>1</ns3:lineNumber> ' <ns3:item> ' <ns3:productName>Rayovac Specialty Battery 123A 2PK, RL123A-2D</ns3:productName> ' <ns3:sku>RAYO~RL123A-2A~46270</ns3:sku> ' </ns3:item> ' <ns3:charges> ' <ns3:charge> ' <ns3:chargeType>PRODUCT</ns3:chargeType> ' <ns3:chargeName>ItemPrice</ns3:chargeName> ' <ns3:chargeAmount> ' <ns3:currency>USD</ns3:currency> ' <ns3:amount>12.92</ns3:amount> ' </ns3:chargeAmount> ' </ns3:charge> ' </ns3:charges> ' <ns3:orderLineQuantity> ' <ns3:unitOfMeasurement>EACH</ns3:unitOfMeasurement> ' <ns3:amount>1</ns3:amount> ' </ns3:orderLineQuantity> ' <ns3:statusDate>2017-04-28T17:18:51.000Z</ns3:statusDate> ' <ns3:orderLineStatuses> ' <ns3:orderLineStatus> ' <ns3:status>Shipped</ns3:status> ' <ns3:statusQuantity> ' <ns3:unitOfMeasurement>EACH</ns3:unitOfMeasurement> ' <ns3:amount>1</ns3:amount> ' </ns3:statusQuantity> ' <ns3:trackingInfo> ' <ns3:shipDateTime>2017-04-28T16:50:53.000Z</ns3:shipDateTime> ' <ns3:carrierName> ' <ns3:carrier>USPS</ns3:carrier> ' </ns3:carrierName> ' <ns3:methodCode>Value</ns3:methodCode> ' <ns3:trackingNumber>redacted</ns3:trackingNumber> ' <ns3:trackingURL>http://walmart.narvar.com/walmart/tracking/usps?redacted</ns3:trackingURL> ' </ns3:trackingInfo> ' </ns3:orderLineStatus> ' </ns3:orderLineStatuses> ' </ns3:orderLine> ' <ns3:orderLine> ' <ns3:lineNumber>2</ns3:lineNumber> ' <ns3:item> ' <ns3:productName>Rayovac Specialty Battery 123A 2PK, RL123A-2D</ns3:productName> ' <ns3:sku>RAYO~RL123A-2A~46270</ns3:sku> ' </ns3:item> ' <ns3:charges> ' <ns3:charge> ' <ns3:chargeType>PRODUCT</ns3:chargeType> ' <ns3:chargeName>ItemPrice</ns3:chargeName> ' <ns3:chargeAmount> ' <ns3:currency>USD</ns3:currency> ' <ns3:amount>12.92</ns3:amount> ' </ns3:chargeAmount> ' </ns3:charge> ' </ns3:charges> ' <ns3:orderLineQuantity> ' <ns3:unitOfMeasurement>EACH</ns3:unitOfMeasurement> ' <ns3:amount>1</ns3:amount> ' </ns3:orderLineQuantity> ' <ns3:statusDate>2017-04-28T17:18:51.000Z</ns3:statusDate> ' <ns3:orderLineStatuses> ' <ns3:orderLineStatus> ' <ns3:status>Shipped</ns3:status> ' <ns3:statusQuantity> ' <ns3:unitOfMeasurement>EACH</ns3:unitOfMeasurement> ' <ns3:amount>1</ns3:amount> ' </ns3:statusQuantity> ' <ns3:trackingInfo> ' <ns3:shipDateTime>2017-04-28T16:50:53.000Z</ns3:shipDateTime> ' <ns3:carrierName> ' <ns3:carrier>USPS</ns3:carrier> ' </ns3:carrierName> ' <ns3:methodCode>Value</ns3:methodCode> ' <ns3:trackingNumber>redacted</ns3:trackingNumber> ' <ns3:trackingURL>http://walmart.narvar.com/walmart/tracking/usps?redacted</ns3:trackingURL> ' </ns3:trackingInfo> ' </ns3:orderLineStatus> ' </ns3:orderLineStatuses> ' </ns3:orderLine> ' </ns3:orderLines> ' </ns3:order> ' </ns3:elements> ' </ns3:list> |
||||
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.