PureBasic
PureBasic
Shopify Query a variant for its inventory item ID
See more Shopify Examples
Query a product variant to find the ID of its inventory item.Chilkat PureBasic Downloads
IncludeFile "CkHttpResponse.pb"
IncludeFile "CkHttp.pb"
IncludeFile "CkJsonObject.pb"
Procedure ChilkatExample()
success.i = 0
; This example requires the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
http.i = CkHttp::ckCreate()
If http.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkHttp::setCkLogin(http, "SHOPIFY_PRIVATE_API_KEY")
CkHttp::setCkPassword(http, "SHOPIFY_PRIVATE_API_KEY")
CkHttp::setCkAccept(http, "application/json")
resp.i = CkHttpResponse::ckCreate()
If resp.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
success = CkHttp::ckHttpNoBody(http,"GET","https://{shop}.myshopify.com/admin/api/2020-04/products/{product_id}/variants/{variant_id}.json",resp)
If success = 0
Debug CkHttp::ckLastErrorText(http)
CkHttp::ckDispose(http)
CkHttpResponse::ckDispose(resp)
ProcedureReturn
EndIf
Debug "Response Status Code: " + Str(CkHttpResponse::ckStatusCode(resp))
jsonResponse.i = CkJsonObject::ckCreate()
If jsonResponse.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkJsonObject::ckLoad(jsonResponse,CkHttpResponse::ckBodyStr(resp))
CkJsonObject::setCkEmitCompact(jsonResponse, 0)
Debug CkJsonObject::ckEmit(jsonResponse)
If CkHttpResponse::ckStatusCode(resp) <> 200
Debug "Failed."
CkHttp::ckDispose(http)
CkHttpResponse::ckDispose(resp)
CkJsonObject::ckDispose(jsonResponse)
ProcedureReturn
EndIf
; Sample output...
; (See the parsing code below..)
;
; Use the this online tool to generate parsing code from sample JSON:
; Generate Parsing Code from JSON
; {
; "id": 12195009364024,
; "product_id": 1321541042232,
; "title": "xs",
; ...
; "inventory_item_id": 12250274365496,
; ...
; "admin_graphql_api_id": "gid://shopify/ProductVariant/12195009364024"
; }
;
id.i = CkJsonObject::ckIntOf(jsonResponse,"id")
product_id.i = CkJsonObject::ckIntOf(jsonResponse,"product_id")
title.s = CkJsonObject::ckStringOf(jsonResponse,"title")
inventory_item_id.i = CkJsonObject::ckIntOf(jsonResponse,"inventory_item_id")
admin_graphql_api_id.s = CkJsonObject::ckStringOf(jsonResponse,"admin_graphql_api_id")
CkHttp::ckDispose(http)
CkHttpResponse::ckDispose(resp)
CkJsonObject::ckDispose(jsonResponse)
ProcedureReturn
EndProcedure