Sample code for 30+ languages & platforms
Visual FoxPro

Akeneo: Create New Product

See more HTTP Misc Examples

Demonstrates how to create a new product.

Chilkat Visual FoxPro Downloads

Download Chilkat for Visual FoxPro
Visual FoxPro 
LOCAL lnSuccess
LOCAL loHttp
LOCAL loJson
LOCAL lcUrl
LOCAL loResp
LOCAL lcLocation

lnSuccess = 0

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

loHttp = CreateObject('Chilkat.Http')

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

*  Build the following JSON to be sent in the request body:
*  Use this online tool to generate the code from sample JSON: 
*  Generate Code to Create JSON

*  {
*    "identifier": "top",
*    "enabled": true,
*    "family": "tshirt",
*    "categories": [
*      "summer_collection"
*    ],
*    "groups": [],
*    "parent": null,
*    "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": "150.5",
*              "currency": "EUR"
*            },
*            {
*              "amount": "150",
*              "currency": "USD"
*            }
*          ]
*        }
*      ],
*      "color": [
*        {
*          "locale": null,
*          "scope": null,
*          "data": "black"
*        }
*      ],
*      "size": [
*        {
*          "locale": null,
*          "scope": null,
*          "data": "m"
*        }
*      ]
*    },
*    "associations": {
*      "PACK": {
*        "products": [
*          "sunglass"
*        ],
*        "groups": []
*      }
*    }
*  }
*  

loJson = CreateObject('Chilkat.JsonObject')
loJson.UpdateString("identifier","top")
loJson.UpdateBool("enabled",1)
loJson.UpdateString("family","tshirt")
loJson.UpdateString("categories[0]","summer_collection")
loJson.UpdateNewArray("groups")
loJson.UpdateNull("parent")
loJson.UpdateString("values.name[0].data","Top")
loJson.UpdateString("values.name[0].locale","en_US")
loJson.UpdateNull("values.name[0].scope")
loJson.UpdateString("values.name[1].data","D�bardeur")
loJson.UpdateString("values.name[1].locale","fr_FR")
loJson.UpdateNull("values.name[1].scope")
loJson.UpdateString("values.description[0].data","Summer top")
loJson.UpdateString("values.description[0].locale","en_US")
loJson.UpdateString("values.description[0].scope","ecommerce")
loJson.UpdateString("values.description[1].data","Top")
loJson.UpdateString("values.description[1].locale","en_US")
loJson.UpdateString("values.description[1].scope","tablet")
loJson.UpdateString("values.description[2].data","D�bardeur pour l'�t�")
loJson.UpdateString("values.description[2].locale","fr_FR")
loJson.UpdateString("values.description[2].scope","ecommerce")
loJson.UpdateString("values.description[3].data","D�bardeur")
loJson.UpdateString("values.description[3].locale","fr_FR")
loJson.UpdateString("values.description[3].scope","tablet")
loJson.UpdateNull("values.price[0].locale")
loJson.UpdateNull("values.price[0].scope")
loJson.UpdateString("values.price[0].data[0].amount","150.5")
loJson.UpdateString("values.price[0].data[0].currency","EUR")
loJson.UpdateString("values.price[0].data[1].amount","150")
loJson.UpdateString("values.price[0].data[1].currency","USD")
loJson.UpdateNull("values.color[0].locale")
loJson.UpdateNull("values.color[0].scope")
loJson.UpdateString("values.color[0].data","black")
loJson.UpdateNull("values.size[0].locale")
loJson.UpdateNull("values.size[0].scope")
loJson.UpdateString("values.size[0].data","m")
loJson.UpdateString("associations.PACK.products[0]","sunglass")
loJson.UpdateNewArray("associations.PACK.groups")

loJson.EmitCompact = 0
*  Show the JSON to be sent..
? loJson.Emit()

lcUrl = "http://pim.my-akeneo-site.com/api/rest/v1/products"
loResp = CreateObject('Chilkat.HttpResponse')
lnSuccess = loHttp.HttpJson("POST",lcUrl,loJson,"application/json",loResp)
IF (lnSuccess = 0) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    RELEASE loJson
    RELEASE loResp
    CANCEL
ENDIF

? "Response Status Code: " + STR(loResp.StatusCode)
? "Response Body: "
? loResp.BodyStr

*  The akeneo response will include a "Location" header, such as the following:
*  HTTP/1.1 201 Created
*  Date: Tue, 22 Jan 2019 10:36:35 GMT
*  Server: Apache/2
*  X-Powered-By: PHP/7.1.25
*  Cache-Control: max-age=0, private, must-revalidate, no-cache, private
*  Set-Cookie: abcdefg; path=/; HttpOnly
*  Location: http://xyz.example.com/api/rest/v1/products/L0000123
*  Vary: User-Agent
*  Content-Length: 0
*  Keep-Alive: timeout=2, max=100
*  Connection: Keep-Alive
*  Content-Type: application/json

*  Get the location header using resp.GetHeaderField
lcLocation = loResp.GetHeaderField("Location")
? "Location: " + lcLocation

RELEASE loHttp
RELEASE loJson
RELEASE loResp