Chilkat Examples

ChilkatHOMEAndroid™Classic ASPCC++C#Mono C#.NET Core C#C# UWP/WinRTDataFlexDelphi ActiveXDelphi DLLVisual FoxProJavaLianjaMFCObjective-CPerlPHP ActiveXPHP ExtensionPowerBuilderPowerShellPureBasicCkPythonChilkat2-PythonRubySQL ServerSwift 2Swift 3/4TclUnicode CUnicode C++Visual Basic 6.0VB.NETVB.NET UWP/WinRTVBScriptXojo PluginNode.jsExcelGo

Classic ASP Examples

Web API Categories

ASN.1
Amazon Glacier
Amazon S3
Amazon S3 (new)
Amazon SES
Amazon SNS
Amazon SQS
Async
Azure Cloud Storage
Azure Service Bus
Base64
Bounced Email
Box
CAdES
CSR
CSV
Certificates
Compression
DKIM / DomainKey
DSA
Diffie-Hellman
Digital Signatures
Dropbox
Dynamics CRM
ECC
Email Object
Encryption
FTP
FileAccess
Firebase
GMail REST API
Geolocation
Google APIs
Google Calendar
Google Cloud Storage
Google Drive
Google Photos
Google Sheets
Google Tasks
Gzip
HTML-to-XML/Text

HTTP
HTTP Misc
IMAP
JSON
JSON Web Encryption (JWE)
JSON Web Signatures (JWS)
JSON Web Token (JWT)
Java KeyStore (JKS)
MHT / HTML Email
MIME
Microsoft Graph
NTLM
OAuth1
OAuth2
OneDrive
OpenSSL
Outlook
PEM
PFX/P12
POP3
PRNG
REST
REST Misc
RSA
SCP
SFTP
SMTP
SSH
SSH Key
SSH Tunnel
SharePoint
Socket/SSL/TLS
Spider
Stream
Tar Archive
Upload
WebSocket
XAdES
XML
XML Digital Signatures
XMP
Zip
curl

 

 

 

(Classic ASP) Akeneo: Get List of Products

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

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

set http = Server.CreateObject("Chilkat_9_5_0.Http")

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

jsonResponse = http.QuickGetStr("http://pim.my-akeneo-site.com/api/rest/v1/products")
If (http.LastMethodSuccess <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( http.LastHeader) & "</pre>"
    Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>"
    Response.End
End If

Response.Write "<pre>" & Server.HTMLEncode( jsonResponse) & "</pre>"

' 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": "Dbardeur",
'               "locale": "fr_FR",
'               "scope": null
'             }
'           ],
'           "description": [
'             {
'               "data": "Summer top",
'               "locale": "en_US",
'               "scope": "ecommerce"
'             },
'             {
'               "data": "Top",
'               "locale": "en_US",
'               "scope": "tablet"
'             },
'             {
'               "data": "Dbardeur pour l't",
'               "locale": "fr_FR",
'               "scope": "ecommerce"
'             },
'             {
'               "data": "Dbardeur",
'               "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": {}
'       }
'     ]
'   }
' }
' 

set json = Server.CreateObject("Chilkat_9_5_0.JsonObject")
success = json.Load(jsonResponse)

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

%>
</body>
</html>

 

© 2000-2019 Chilkat Software, Inc. All Rights Reserved.