Sample code for 30+ languages & platforms
PowerBuilder

Akeneo: Get List of Products

See more HTTP Misc Examples

Using a previously obtained request token, demonstrates how to get a list of products.

Chilkat PowerBuilder Downloads

PowerBuilder
integer li_rc
oleobject loo_Http
string ls_JsonResponse
oleobject loo_Json
string ls_V_linksSelfHref
string ls_V_linksFirstHref
long li_Current_page
long i
long li_Count_i
string ls_Identifier
string ls_Family
string ls_Parent
long li_Enabled
string ls_Created
string ls_Updated
long j
long li_Count_j
string ls_StrVal
string ls_Locale
string ls_Scope
long li_Data
string ls_Data_str
string ls_V_linksDownloadHref
long li_Data_int
string ls_DataAmount
string ls_DataUnit

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

loo_Http = create oleobject
li_rc = loo_Http.ConnectToNewObject("Chilkat.Http")
if li_rc < 0 then
    destroy loo_Http
    MessageBox("Error","Connecting to COM object failed")
    return
end if

//  Use your previously obtained access token.
//  See Get Akeneo Access Token
loo_Http.AuthToken = "access_token"

ls_JsonResponse = loo_Http.QuickGetStr("http://pim.my-akeneo-site.com/api/rest/v1/products")
if loo_Http.LastMethodSuccess <> 1 then
    Write-Debug loo_Http.LastHeader
    Write-Debug loo_Http.LastErrorText
    destroy loo_Http
    return
end if

Write-Debug ls_JsonResponse

//  A sample response looks like this.
//  See below for sample code to parse the JSON response..

//  {
//    "_links": {
//      "self": {
//        "href": "https://demo.akeneo.com/api/rest/v1/products?page=3&limit=3"
//      },
//      "first": {
//        "href": "https://demo.akeneo.com/api/rest/v1/products?page=1&limit=3"
//      },
//      "previous": {
//        "href": "https://demo.akeneo.com/api/rest/v1/products?page=2&limit=3"
//      },
//      "next": {
//        "href": "https://demo.akeneo.com/api/rest/v1/products?page=4&limit=3"
//      }
//    },
//    "current_page": 3,
//    "_embedded": {
//      "_items": [
//        {
//          "_links": {
//            "self": {
//              "href": "https://demo.akeneo.com/api/rest/v1/product/top"
//            }
//          },
//          "identifier": "top",
//          "family": "tshirt",
//          "groups": [],
//          "parent": null,
//          "categories": [
//            "summer_collection"
//          ],
//          "enabled": true,
//          "values": {
//            "name": [
//              {
//                "data": "Top",
//                "locale": "en_US",
//                "scope": null
//              },
//              {
//                "data": "D�bardeur",
//                "locale": "fr_FR",
//                "scope": null
//              }
//            ],
//            "description": [
//              {
//                "data": "Summer top",
//                "locale": "en_US",
//                "scope": "ecommerce"
//              },
//              {
//                "data": "Top",
//                "locale": "en_US",
//                "scope": "tablet"
//              },
//              {
//                "data": "D�bardeur pour l'�t�",
//                "locale": "fr_FR",
//                "scope": "ecommerce"
//              },
//              {
//                "data": "D�bardeur",
//                "locale": "fr_FR",
//                "scope": "tablet"
//              }
//            ],
//            "price": [
//              {
//                "locale": null,
//                "scope": null,
//                "data": [
//                  {
//                    "amount": "15.5",
//                    "currency": "EUR"
//                  },
//                  {
//                    "amount": "15",
//                    "currency": "USD"
//                  }
//                ]
//              }
//            ],
//            "color": [
//              {
//                "locale": null,
//                "scope": null,
//                "data": "black"
//              }
//            ],
//            "size": [
//              {
//                "locale": null,
//                "scope": null,
//                "data": "m"
//              }
//            ]
//          },
//          "created": "2016-06-23T18:24:44+02:00",
//          "updated": "2016-06-25T17:56:12+02:00",
//          "associations": {
//            "PACK": {
//              "products": [
//                "sunglasses"
//              ],
//              "groups": []
//            }
//          }
//        },
//        {
//          "_links": {
//            "self": {
//              "href": "https://demo.akeneo.com/api/rest/v1/product/cap"
//            }
//          },
//          "identifier": "cap",
//          "family": "caps",
//          "groups": [],
//          "parent": null,
//          "categories": [
//            "summer_collection"
//          ],
//          "enabled": true,
//          "values": {
//            "name": [
//              {
//                "data": "Cap",
//                "locale": "en_US",
//                "scope": null
//              },
//              {
//                "data": "Casquette",
//                "locale": "fr_FR",
//                "scope": null
//              }
//            ],
//            "description": [
//              {
//                "data": "Cap unisex",
//                "locale": "en_US",
//                "scope": "ecommerce"
//              },
//              {
//                "data": "Cap unisex",
//                "locale": "en_US",
//                "scope": "tablet"
//              },
//              {
//                "data": "Casquette unisexe",
//                "locale": "fr_FR",
//                "scope": "ecommerce"
//              },
//              {
//                "data": "Casquette unisexe",
//                "locale": "fr_FR",
//                "scope": "tablet"
//              }
//            ],
//            "price": [
//              {
//                "locale": null,
//                "scope": null,
//                "data": [
//                  {
//                    "amount": "20",
//                    "currency": "EUR"
//                  },
//                  {
//                    "amount": "20",
//                    "currency": "USD"
//                  }
//                ]
//              }
//            ],
//            "color": [
//              {
//                "locale": null,
//                "scope": null,
//                "data": "black"
//              }
//            ]
//          },
//          "created": "2016-06-23T18:24:44+02:00",
//          "updated": "2016-06-25T17:56:12+02:00",
//          "associations": {
//            "PACK": {
//              "products": [
//                "sunglasses"
//              ],
//              "groups": []
//            }
//          }
//        },
//        {
//          "_links": {
//            "self": {
//              "href": "https://demo.akeneo.com/api/rest/v1/product/sweat"
//            }
//          },
//          "identifier": "sweat",
//          "family": null,
//          "groups": [],
//          "parent": null,
//          "categories": [
//            "winter_collection"
//          ],
//          "enabled": true,
//          "values": {},
//          "created": "2016-06-23T11:24:44+02:00",
//          "updated": "2016-06-23T11:24:44+02:00",
//          "associations": {}
//        }
//      ]
//    }
//  }
//  

loo_Json = create oleobject
li_rc = loo_Json.ConnectToNewObject("Chilkat.JsonObject")

loo_Json.Load(ls_JsonResponse)

ls_V_linksSelfHref = loo_Json.StringOf("_links.self.href")
ls_V_linksFirstHref = loo_Json.StringOf("_links.first.href")
li_Current_page = loo_Json.IntOf("current_page")
i = 0
li_Count_i = loo_Json.SizeOfArray("_embedded.items")
do while i < li_Count_i
    loo_Json.I = i
    ls_V_linksSelfHref = loo_Json.StringOf("_embedded.items[i]._links.self.href")
    ls_Identifier = loo_Json.StringOf("_embedded.items[i].identifier")
    ls_Family = loo_Json.StringOf("_embedded.items[i].family")
    ls_Parent = loo_Json.StringOf("_embedded.items[i].parent")
    li_Enabled = loo_Json.BoolOf("_embedded.items[i].enabled")
    ls_Created = loo_Json.StringOf("_embedded.items[i].created")
    ls_Updated = loo_Json.StringOf("_embedded.items[i].updated")
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].groups")
    do while j < li_Count_j
        loo_Json.J = j
        ls_StrVal = loo_Json.StringOf("_embedded.items[i].groups[j]")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].categories")
    do while j < li_Count_j
        loo_Json.J = j
        ls_StrVal = loo_Json.StringOf("_embedded.items[i].categories[j]")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.blocked")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.blocked[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.blocked[j].scope")
        li_Data = loo_Json.BoolOf("_embedded.items[i].values.blocked[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.can_cut")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.can_cut[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.can_cut[j].scope")
        li_Data = loo_Json.BoolOf("_embedded.items[i].values.can_cut[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.not_used")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.not_used[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.not_used[j].scope")
        li_Data = loo_Json.BoolOf("_embedded.items[i].values.not_used[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.deny_delivery")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.deny_delivery[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.deny_delivery[j].scope")
        li_Data = loo_Json.BoolOf("_embedded.items[i].values.deny_delivery[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.can_split_package")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.can_split_package[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.can_split_package[j].scope")
        li_Data = loo_Json.BoolOf("_embedded.items[i].values.can_split_package[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.transfer_to_warehouse")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.transfer_to_warehouse[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.transfer_to_warehouse[j].scope")
        li_Data = loo_Json.BoolOf("_embedded.items[i].values.transfer_to_warehouse[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.product_code")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.product_code[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.product_code[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.product_code[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.nuotrauka")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.nuotrauka[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.nuotrauka[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.nuotrauka[j].data")
        ls_V_linksDownloadHref = loo_Json.StringOf("_embedded.items[i].values.nuotrauka[j]._links.download.href")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.minimum_quantity")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.minimum_quantity[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.minimum_quantity[j].scope")
        li_Data_int = loo_Json.IntOf("_embedded.items[i].values.minimum_quantity[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.code")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.code[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.code[j].scope")
        li_Data_int = loo_Json.IntOf("_embedded.items[i].values.code[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.name")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.name[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.name[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.name[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.fsc_code")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.fsc_code[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.fsc_code[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.fsc_code[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.warehouse")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.warehouse[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.warehouse[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.warehouse[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.item_volume")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.item_volume[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.item_volume[j].scope")
        ls_DataAmount = loo_Json.StringOf("_embedded.items[i].values.item_volume[j].data.amount")
        ls_DataUnit = loo_Json.StringOf("_embedded.items[i].values.item_volume[j].data.unit")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.customs_code")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.customs_code[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.customs_code[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.customs_code[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.product_type")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.product_type[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.product_type[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.product_type[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.weight_netto")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.weight_netto[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.weight_netto[j].scope")
        ls_DataAmount = loo_Json.StringOf("_embedded.items[i].values.weight_netto[j].data.amount")
        ls_DataUnit = loo_Json.StringOf("_embedded.items[i].values.weight_netto[j].data.unit")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.supplier_code")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.supplier_code[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.supplier_code[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.supplier_code[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.tariff_number")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.tariff_number[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.tariff_number[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.tariff_number[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.weight_brutto")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.weight_brutto[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.weight_brutto[j].scope")
        ls_DataAmount = loo_Json.StringOf("_embedded.items[i].values.weight_brutto[j].data.amount")
        ls_DataUnit = loo_Json.StringOf("_embedded.items[i].values.weight_brutto[j].data.unit")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.package_code_1")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.package_code_1[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.package_code_1[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.package_code_1[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.package_code_2")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.package_code_2[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.package_code_2[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.package_code_2[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.package_code_3")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.package_code_3[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.package_code_3[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.package_code_3[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.supplier_number")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.supplier_number[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.supplier_number[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.supplier_number[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.package_volume_1")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.package_volume_1[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.package_volume_1[j].scope")
        ls_DataAmount = loo_Json.StringOf("_embedded.items[i].values.package_volume_1[j].data.amount")
        ls_DataUnit = loo_Json.StringOf("_embedded.items[i].values.package_volume_1[j].data.unit")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.package_volume_2")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.package_volume_2[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.package_volume_2[j].scope")
        ls_DataAmount = loo_Json.StringOf("_embedded.items[i].values.package_volume_2[j].data.amount")
        ls_DataUnit = loo_Json.StringOf("_embedded.items[i].values.package_volume_2[j].data.unit")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.package_volume_3")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.package_volume_3[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.package_volume_3[j].scope")
        ls_DataAmount = loo_Json.StringOf("_embedded.items[i].values.package_volume_3[j].data.amount")
        ls_DataUnit = loo_Json.StringOf("_embedded.items[i].values.package_volume_3[j].data.unit")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.package_weight_1")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.package_weight_1[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.package_weight_1[j].scope")
        ls_DataAmount = loo_Json.StringOf("_embedded.items[i].values.package_weight_1[j].data.amount")
        ls_DataUnit = loo_Json.StringOf("_embedded.items[i].values.package_weight_1[j].data.unit")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.package_weight_2")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.package_weight_2[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.package_weight_2[j].scope")
        ls_DataAmount = loo_Json.StringOf("_embedded.items[i].values.package_weight_2[j].data.amount")
        ls_DataUnit = loo_Json.StringOf("_embedded.items[i].values.package_weight_2[j].data.unit")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.package_weight_3")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.package_weight_3[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.package_weight_3[j].scope")
        ls_DataAmount = loo_Json.StringOf("_embedded.items[i].values.package_weight_3[j].data.amount")
        ls_DataUnit = loo_Json.StringOf("_embedded.items[i].values.package_weight_3[j].data.unit")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.country_of_origin")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.country_of_origin[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.country_of_origin[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.country_of_origin[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.product_group_code")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.product_group_code[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.product_group_code[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.product_group_code[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.base_measurement_unit")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.base_measurement_unit[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.base_measurement_unit[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.base_measurement_unit[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.measurement_unit_code")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.measurement_unit_code[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.measurement_unit_code[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.measurement_unit_code[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.product_category_code")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.product_category_code[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.product_category_code[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.product_category_code[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.sale_measurement_unit")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.sale_measurement_unit[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.sale_measurement_unit[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.sale_measurement_unit[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.country_of_origin_code")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.country_of_origin_code[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.country_of_origin_code[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.country_of_origin_code[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.vat_registration_group")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.vat_registration_group[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.vat_registration_group[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.vat_registration_group[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.critical_amount_of_stock")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.critical_amount_of_stock[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.critical_amount_of_stock[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.critical_amount_of_stock[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.stock_registration_group")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.stock_registration_group[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.stock_registration_group[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.stock_registration_group[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.purchase_measurement_unit")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.purchase_measurement_unit[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.purchase_measurement_unit[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.purchase_measurement_unit[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.product_registration_group")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.product_registration_group[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.product_registration_group[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.product_registration_group[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.base_measurement_unit_quantity")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.base_measurement_unit_quantity[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.base_measurement_unit_quantity[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.base_measurement_unit_quantity[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.comment")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.comment[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.comment[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.comment[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.units_in_pallet")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.units_in_pallet[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.units_in_pallet[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.units_in_pallet[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.first_description")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.first_description[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.first_description[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.first_description[j].data")
        j = j + 1
    loop
    j = 0
    li_Count_j = loo_Json.SizeOfArray("_embedded.items[i].values.second_description")
    do while j < li_Count_j
        loo_Json.J = j
        ls_Locale = loo_Json.StringOf("_embedded.items[i].values.second_description[j].locale")
        ls_Scope = loo_Json.StringOf("_embedded.items[i].values.second_description[j].scope")
        ls_Data_str = loo_Json.StringOf("_embedded.items[i].values.second_description[j].data")
        j = j + 1
    loop
    i = i + 1
loop


destroy loo_Http
destroy loo_Json