Xojo Plugin
Xojo Plugin
Ecwid - Create Order
See more Ecwid Examples
Create a new order in an Ecwid store. This can be useful for storefronts with a custom checkout process or manually creating orders for sales made earlier.Chilkat Xojo Plugin Downloads
Dim success As Boolean
success = False
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
// Create and send the following HTTP request:
// Load the access token previously obtained in Ecwid Get Access Token
Dim jsonToken As New Chilkat.JsonObject
success = jsonToken.LoadFile("qa_data/tokens/ecwid.json")
Dim sbUrl As New Chilkat.StringBuilder
success = sbUrl.Append("https://app.ecwid.com/api/v3/4870020/orders?token=")
success = sbUrl.Append(jsonToken.StringOf("access_token"))
// POST /api/v3/4870020/orders?token=1234567890qwqeertt HTTP/1.1
// Host: app.ecwid.com
// Content-Type: application/json;charset=utf-8
// Cache-Control: no-cache
//
// {
// "subtotal": 30,
// "total": 40,
// "email": "example@example.com",
// "paymentMethod": "Phone order",
// "tax": 0,
// "paymentStatus": "PAID",
// "customerTaxExempt": false,
// "customerTaxId": "",
// "customerTaxIdValid": false,
// "reversedTaxApplied": false,
// "fulfillmentStatus": "AWAITING_PROCESSING",
// "createDate": "2015-09-20 19:59:43 +0000",
// "items": [
// {
// "price": 15,
// "weight": 0.32,
// "sku": "00004",
// "quantity": 2,
// "name": "Cherry"
// }
// ],
// "billingPerson": {
// "name": "Eugene K",
// "companyName": "Hedgehog and Bucket",
// "street": "My Street",
// "city": "San Diego",
// "countryCode": "US",
// "postalCode": "90002",
// "stateOrProvinceCode": "CA",
// "phone": "123141321"
// },
// "shippingPerson": {
// "name": "Eugene K",
// "companyName": "Hedgehog and Bucket",
// "street": "My Street",
// "city": "San Diego",
// "countryCode": "US",
// "postalCode": "90002",
// "stateOrProvinceCode": "CA",
// "phone": "123141321"
// },
// "shippingOption": {
// "shippingMethodName": "Fast Delivery",
// "shippingRate": 10,
// "isPickup": false,
// "fulfilmentType": "DELIVERY"
// },
// "hidden": false,
// "privateAdminNotes": "Must be delivered till Sunday.",
// "acceptMarketing": false,
// "disableAllCustomerNotifications": true,
// "externalFulfillment": true,
// "externalOrderId": "2",
// "pricesIncludeTax": false
// }
Dim http As New Chilkat.Http
http.SetRequestHeader "Cache-Control","no-cache"
Dim json As New Chilkat.JsonObject
success = json.UpdateInt("subtotal",30)
success = json.UpdateInt("total",40)
success = json.UpdateString("email","example@example.com")
success = json.UpdateString("paymentMethod","Phone order")
success = json.UpdateInt("tax",0)
success = json.UpdateString("paymentStatus","PAID")
success = json.UpdateBool("customerTaxExempt",False)
success = json.UpdateString("customerTaxId","")
success = json.UpdateBool("customerTaxIdValid",False)
success = json.UpdateBool("reversedTaxApplied",False)
success = json.UpdateString("fulfillmentStatus","AWAITING_PROCESSING")
success = json.UpdateString("createDate","2015-09-20 19:59:43 +0000")
success = json.UpdateInt("items[0].price",15)
success = json.UpdateNumber("items[0].weight","0.32")
success = json.UpdateString("items[0].sku","00004")
success = json.UpdateInt("items[0].quantity",2)
success = json.UpdateString("items[0].name","Cherry")
success = json.UpdateString("billingPerson.name","Eugene K")
success = json.UpdateString("billingPerson.companyName","Hedgehog and Bucket")
success = json.UpdateString("billingPerson.street","My Street")
success = json.UpdateString("billingPerson.city","San Diego")
success = json.UpdateString("billingPerson.countryCode","US")
success = json.UpdateString("billingPerson.postalCode","90002")
success = json.UpdateString("billingPerson.stateOrProvinceCode","CA")
success = json.UpdateString("billingPerson.phone","123141321")
success = json.UpdateString("shippingPerson.name","Eugene K")
success = json.UpdateString("shippingPerson.companyName","Hedgehog and Bucket")
success = json.UpdateString("shippingPerson.street","My Street")
success = json.UpdateString("shippingPerson.city","San Diego")
success = json.UpdateString("shippingPerson.countryCode","US")
success = json.UpdateString("shippingPerson.postalCode","90002")
success = json.UpdateString("shippingPerson.stateOrProvinceCode","CA")
success = json.UpdateString("shippingPerson.phone","123141321")
success = json.UpdateString("shippingOption.shippingMethodName","Fast Delivery")
success = json.UpdateInt("shippingOption.shippingRate",10)
success = json.UpdateBool("shippingOption.isPickup",False)
success = json.UpdateString("shippingOption.fulfilmentType","DELIVERY")
success = json.UpdateBool("hidden",False)
success = json.UpdateString("privateAdminNotes","Must be delivered till Sunday.")
success = json.UpdateBool("acceptMarketing",False)
success = json.UpdateBool("disableAllCustomerNotifications",True)
success = json.UpdateBool("externalFulfillment",True)
success = json.UpdateString("externalOrderId","2")
success = json.UpdateBool("pricesIncludeTax",False)
Dim url As String
url = sbUrl.GetAsString()
Dim resp As New Chilkat.HttpResponse
success = http.HttpJson("POST",url,json,"application/json",resp)
If (success = False) Then
System.DebugLog(http.LastErrorText)
Return
End If
System.DebugLog("Response status code = " + Str(resp.StatusCode))
Dim sbResponseBody As New Chilkat.StringBuilder
success = resp.GetBodySb(sbResponseBody)
Dim jResp As New Chilkat.JsonObject
success = jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = False
System.DebugLog("Response Body:")
System.DebugLog(jResp.Emit())
// Sample JSON response:
// (Sample code for parsing the JSON response is shown below)
// {
// "id": 20,
// "orderid": "XJ12H"
// }
// Sample code for parsing the JSON response...
// Use the following online tool to generate parsing code from sample JSON:
// Generate Parsing Code from JSON
Dim id As Int32
id = jResp.IntOf("id")
Dim orderid As String
orderid = jResp.StringOf("orderid")