Sample code for 30+ languages & platforms
B4X

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 B4X Downloads

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

Dim http As ChilkatHttp
http.Initialize("http")

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

Dim jsonResponse As String = http.QuickGetStr("http://pim.my-akeneo-site.com/api/rest/v1/products")
If http.LastMethodSuccess <> True Then
    Log(http.LastHeader)
    Log(http.LastErrorText)
    Return
End If


Log(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": {}
'        }
'      ]
'    }
'  }
'  

Dim json As ChilkatJsonObject
json.Initialize
json.Load(jsonResponse)

Dim v_linksSelfHref As String
Dim v_linksFirstHref As String
Dim current_page As Int
Dim i As Int
Dim count_i As Int
Dim identifier As String
Dim family As String
Dim parent As String
Dim enabled As Boolean
Dim created As String
Dim updated As String
Dim j As Int
Dim count_j As Int
Dim strVal As String
Dim locale As String
Dim scope As String
Dim data As Boolean
Dim data_str As String
Dim v_linksDownloadHref As String
Dim data_int As Int
Dim dataAmount As String
Dim dataUnit As String

v_linksSelfHref = json.StringOf("_links.self.href")
v_linksFirstHref = json.StringOf("_links.first.href")
current_page = json.IntOf("current_page")
i = 0
count_i = json.SizeOfArray("_embedded.items")
Do While i < count_i
    json.I = i
    v_linksSelfHref = json.StringOf("_embedded.items[i]._links.self.href")
    identifier = json.StringOf("_embedded.items[i].identifier")
    family = json.StringOf("_embedded.items[i].family")
    parent = json.StringOf("_embedded.items[i].parent")
    enabled = json.BoolOf("_embedded.items[i].enabled")
    created = json.StringOf("_embedded.items[i].created")
    updated = json.StringOf("_embedded.items[i].updated")
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].groups")
    Do While j < count_j
        json.J = j
        strVal = json.StringOf("_embedded.items[i].groups[j]")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].categories")
    Do While j < count_j
        json.J = j
        strVal = json.StringOf("_embedded.items[i].categories[j]")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.blocked")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.blocked[j].locale")
        scope = json.StringOf("_embedded.items[i].values.blocked[j].scope")
        data = json.BoolOf("_embedded.items[i].values.blocked[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.can_cut")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.can_cut[j].locale")
        scope = json.StringOf("_embedded.items[i].values.can_cut[j].scope")
        data = json.BoolOf("_embedded.items[i].values.can_cut[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.not_used")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.not_used[j].locale")
        scope = json.StringOf("_embedded.items[i].values.not_used[j].scope")
        data = json.BoolOf("_embedded.items[i].values.not_used[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.deny_delivery")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.deny_delivery[j].locale")
        scope = json.StringOf("_embedded.items[i].values.deny_delivery[j].scope")
        data = json.BoolOf("_embedded.items[i].values.deny_delivery[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.can_split_package")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.can_split_package[j].locale")
        scope = json.StringOf("_embedded.items[i].values.can_split_package[j].scope")
        data = json.BoolOf("_embedded.items[i].values.can_split_package[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.transfer_to_warehouse")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.transfer_to_warehouse[j].locale")
        scope = json.StringOf("_embedded.items[i].values.transfer_to_warehouse[j].scope")
        data = json.BoolOf("_embedded.items[i].values.transfer_to_warehouse[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.product_code")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.product_code[j].locale")
        scope = json.StringOf("_embedded.items[i].values.product_code[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.product_code[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.nuotrauka")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.nuotrauka[j].locale")
        scope = json.StringOf("_embedded.items[i].values.nuotrauka[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.nuotrauka[j].data")
        v_linksDownloadHref = json.StringOf("_embedded.items[i].values.nuotrauka[j]._links.download.href")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.minimum_quantity")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.minimum_quantity[j].locale")
        scope = json.StringOf("_embedded.items[i].values.minimum_quantity[j].scope")
        data_int = json.IntOf("_embedded.items[i].values.minimum_quantity[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.code")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.code[j].locale")
        scope = json.StringOf("_embedded.items[i].values.code[j].scope")
        data_int = json.IntOf("_embedded.items[i].values.code[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.name")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.name[j].locale")
        scope = json.StringOf("_embedded.items[i].values.name[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.name[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.fsc_code")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.fsc_code[j].locale")
        scope = json.StringOf("_embedded.items[i].values.fsc_code[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.fsc_code[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.warehouse")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.warehouse[j].locale")
        scope = json.StringOf("_embedded.items[i].values.warehouse[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.warehouse[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.item_volume")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.item_volume[j].locale")
        scope = json.StringOf("_embedded.items[i].values.item_volume[j].scope")
        dataAmount = json.StringOf("_embedded.items[i].values.item_volume[j].data.amount")
        dataUnit = json.StringOf("_embedded.items[i].values.item_volume[j].data.unit")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.customs_code")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.customs_code[j].locale")
        scope = json.StringOf("_embedded.items[i].values.customs_code[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.customs_code[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.product_type")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.product_type[j].locale")
        scope = json.StringOf("_embedded.items[i].values.product_type[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.product_type[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.weight_netto")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.weight_netto[j].locale")
        scope = json.StringOf("_embedded.items[i].values.weight_netto[j].scope")
        dataAmount = json.StringOf("_embedded.items[i].values.weight_netto[j].data.amount")
        dataUnit = json.StringOf("_embedded.items[i].values.weight_netto[j].data.unit")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.supplier_code")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.supplier_code[j].locale")
        scope = json.StringOf("_embedded.items[i].values.supplier_code[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.supplier_code[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.tariff_number")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.tariff_number[j].locale")
        scope = json.StringOf("_embedded.items[i].values.tariff_number[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.tariff_number[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.weight_brutto")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.weight_brutto[j].locale")
        scope = json.StringOf("_embedded.items[i].values.weight_brutto[j].scope")
        dataAmount = json.StringOf("_embedded.items[i].values.weight_brutto[j].data.amount")
        dataUnit = json.StringOf("_embedded.items[i].values.weight_brutto[j].data.unit")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.package_code_1")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.package_code_1[j].locale")
        scope = json.StringOf("_embedded.items[i].values.package_code_1[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.package_code_1[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.package_code_2")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.package_code_2[j].locale")
        scope = json.StringOf("_embedded.items[i].values.package_code_2[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.package_code_2[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.package_code_3")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.package_code_3[j].locale")
        scope = json.StringOf("_embedded.items[i].values.package_code_3[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.package_code_3[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.supplier_number")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.supplier_number[j].locale")
        scope = json.StringOf("_embedded.items[i].values.supplier_number[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.supplier_number[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.package_volume_1")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.package_volume_1[j].locale")
        scope = json.StringOf("_embedded.items[i].values.package_volume_1[j].scope")
        dataAmount = json.StringOf("_embedded.items[i].values.package_volume_1[j].data.amount")
        dataUnit = json.StringOf("_embedded.items[i].values.package_volume_1[j].data.unit")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.package_volume_2")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.package_volume_2[j].locale")
        scope = json.StringOf("_embedded.items[i].values.package_volume_2[j].scope")
        dataAmount = json.StringOf("_embedded.items[i].values.package_volume_2[j].data.amount")
        dataUnit = json.StringOf("_embedded.items[i].values.package_volume_2[j].data.unit")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.package_volume_3")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.package_volume_3[j].locale")
        scope = json.StringOf("_embedded.items[i].values.package_volume_3[j].scope")
        dataAmount = json.StringOf("_embedded.items[i].values.package_volume_3[j].data.amount")
        dataUnit = json.StringOf("_embedded.items[i].values.package_volume_3[j].data.unit")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.package_weight_1")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.package_weight_1[j].locale")
        scope = json.StringOf("_embedded.items[i].values.package_weight_1[j].scope")
        dataAmount = json.StringOf("_embedded.items[i].values.package_weight_1[j].data.amount")
        dataUnit = json.StringOf("_embedded.items[i].values.package_weight_1[j].data.unit")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.package_weight_2")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.package_weight_2[j].locale")
        scope = json.StringOf("_embedded.items[i].values.package_weight_2[j].scope")
        dataAmount = json.StringOf("_embedded.items[i].values.package_weight_2[j].data.amount")
        dataUnit = json.StringOf("_embedded.items[i].values.package_weight_2[j].data.unit")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.package_weight_3")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.package_weight_3[j].locale")
        scope = json.StringOf("_embedded.items[i].values.package_weight_3[j].scope")
        dataAmount = json.StringOf("_embedded.items[i].values.package_weight_3[j].data.amount")
        dataUnit = json.StringOf("_embedded.items[i].values.package_weight_3[j].data.unit")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.country_of_origin")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.country_of_origin[j].locale")
        scope = json.StringOf("_embedded.items[i].values.country_of_origin[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.country_of_origin[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.product_group_code")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.product_group_code[j].locale")
        scope = json.StringOf("_embedded.items[i].values.product_group_code[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.product_group_code[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.base_measurement_unit")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.base_measurement_unit[j].locale")
        scope = json.StringOf("_embedded.items[i].values.base_measurement_unit[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.base_measurement_unit[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.measurement_unit_code")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.measurement_unit_code[j].locale")
        scope = json.StringOf("_embedded.items[i].values.measurement_unit_code[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.measurement_unit_code[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.product_category_code")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.product_category_code[j].locale")
        scope = json.StringOf("_embedded.items[i].values.product_category_code[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.product_category_code[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.sale_measurement_unit")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.sale_measurement_unit[j].locale")
        scope = json.StringOf("_embedded.items[i].values.sale_measurement_unit[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.sale_measurement_unit[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.country_of_origin_code")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.country_of_origin_code[j].locale")
        scope = json.StringOf("_embedded.items[i].values.country_of_origin_code[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.country_of_origin_code[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.vat_registration_group")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.vat_registration_group[j].locale")
        scope = json.StringOf("_embedded.items[i].values.vat_registration_group[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.vat_registration_group[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.critical_amount_of_stock")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.critical_amount_of_stock[j].locale")
        scope = json.StringOf("_embedded.items[i].values.critical_amount_of_stock[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.critical_amount_of_stock[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.stock_registration_group")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.stock_registration_group[j].locale")
        scope = json.StringOf("_embedded.items[i].values.stock_registration_group[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.stock_registration_group[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.purchase_measurement_unit")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.purchase_measurement_unit[j].locale")
        scope = json.StringOf("_embedded.items[i].values.purchase_measurement_unit[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.purchase_measurement_unit[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.product_registration_group")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.product_registration_group[j].locale")
        scope = json.StringOf("_embedded.items[i].values.product_registration_group[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.product_registration_group[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.base_measurement_unit_quantity")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.base_measurement_unit_quantity[j].locale")
        scope = json.StringOf("_embedded.items[i].values.base_measurement_unit_quantity[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.base_measurement_unit_quantity[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.comment")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.comment[j].locale")
        scope = json.StringOf("_embedded.items[i].values.comment[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.comment[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.units_in_pallet")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.units_in_pallet[j].locale")
        scope = json.StringOf("_embedded.items[i].values.units_in_pallet[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.units_in_pallet[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.first_description")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.first_description[j].locale")
        scope = json.StringOf("_embedded.items[i].values.first_description[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.first_description[j].data")
        j = j + 1
    Loop
    j = 0
    count_j = json.SizeOfArray("_embedded.items[i].values.second_description")
    Do While j < count_j
        json.J = j
        locale = json.StringOf("_embedded.items[i].values.second_description[j].locale")
        scope = json.StringOf("_embedded.items[i].values.second_description[j].scope")
        data_str = json.StringOf("_embedded.items[i].values.second_description[j].data")
        j = j + 1
    Loop
    i = i + 1
Loop