(Xojo Plugin) Shopify Retrieve the item's inventory levels

After you have the inventory item ID, you can use it with the InventoryLevel resource to find the levels and locations for the inventory item:

For more information, see https://shopify.dev/tutorials/manage-product-inventory-with-admin-api#retrieve-the-inventory-levels-for-a-product-variant

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

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

Dim http As New Chilkat.Http

http.Login = "SHOPIFY_PRIVATE_API_KEY"
http.Password = "SHOPIFY_PRIVATE_API_KEY"

http.Accept = "application/json"

// How to get the inventory item ID

Dim resp As Chilkat.HttpResponse
resp = http.QuickRequest("GET","https://{shop}.myshopify.com/admin/api/2020-04/inventory_levels.json?inventory_item_ids={inventory_item_id}")
If (http.LastMethodSuccess <> True) Then
    System.DebugLog(http.LastErrorText)
    Return
End If

System.DebugLog("Response Status Code: " + Str(resp.StatusCode))

Dim jsonResponse As New Chilkat.JsonObject
Dim success As Boolean
success = jsonResponse.Load(resp.BodyStr)
jsonResponse.EmitCompact = False
System.DebugLog(jsonResponse.Emit())

If (resp.StatusCode <> 200) Then
    System.DebugLog("Failed.")

    Return
End If

// Sample output...
// (See the parsing code below..)
// 
// Use the this online tool to generate parsing code from sample JSON: 
// Generate Parsing Code from JSON

// {
//   "inventory_levels": [
//     {
//       "inventory_item_id": 12250274365496,
//       "location_id": 6884556842,
//       "available": 8,
//       "updated_at": "2018-06-18T11:49:50-04:00",
//       "admin_graphql_api_id": "gid://shopify/InventoryLevel/6485147690?inventory_item_id=12250274365496"
//     },
//     {
//       "inventory_item_id": 12250274365496,
//       "location_id": 13968834616,
//       "available": 50,
//       "updated_at": "2018-06-26T14:44:30-04:00",
//       "admin_graphql_api_id": "gid://shopify/InventoryLevel/13570506808?inventory_item_id=12250274365496"
//     },
//     {
//       "inventory_item_id": 12250274365496,
//       "location_id": 13968867384,
//       "available": 100,
//       "updated_at": "2018-06-26T14:44:30-04:00",
//       "admin_graphql_api_id": "gid://shopify/InventoryLevel/13570539576?inventory_item_id=12250274365496"
//     }
//   ]
// }
// 

Dim inventory_item_id As Int32
Dim location_id As Int32
Dim available As Int32
Dim updated_at As String
Dim admin_graphql_api_id As String

Dim i As Int32
i = 0
Dim count_i As Int32
count_i = jsonResponse.SizeOfArray("inventory_levels")
While i < count_i
    jsonResponse.I = i
    inventory_item_id = jsonResponse.IntOf("inventory_levels[i].inventory_item_id")
    location_id = jsonResponse.IntOf("inventory_levels[i].location_id")
    available = jsonResponse.IntOf("inventory_levels[i].available")
    updated_at = jsonResponse.StringOf("inventory_levels[i].updated_at")
    admin_graphql_api_id = jsonResponse.StringOf("inventory_levels[i].admin_graphql_api_id")
    i = i + 1
Wend