VB6 / Commercetools / Create ProductDiscount
Back to Collection Items
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
Dim http As New ChilkatHttp
Dim success As Long
' Use this online tool to generate code from sample JSON: Generate Code to Create JSON
' The following JSON is sent in the request body.
' {
' "value": {
' "type": "absolute",
' "money": [
' {
' "currencyCode": "EUR",
' "centAmount": 100
' }
' ]
' },
' "predicate": "1=1",
' "name": {
' "en": "test-discount1"
' },
' "description": {
' "en": "test-discount1"
' },
' "isActive": false,
' "sortOrder": "0.9534"
' }
Dim json As New ChilkatJsonObject
success = json.UpdateString("value.type","absolute")
success = json.UpdateString("value.money[0].currencyCode","EUR")
success = json.UpdateInt("value.money[0].centAmount",100)
success = json.UpdateString("predicate","1=1")
success = json.UpdateString("name.en","test-discount1")
success = json.UpdateString("description.en","test-discount1")
success = json.UpdateBool("isActive",0)
success = json.UpdateString("sortOrder","0.9534")
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
http.SetRequestHeader "Content-Type","application/json"
Dim sbRequestBody As New ChilkatStringBuilder
success = json.EmitSb(sbRequestBody)
Dim resp As ChilkatHttpResponse
Set resp = http.PTextSb("post","https://domain.com/{{project-key}}/product-discounts",sbRequestBody,"utf-8","application/json",0,0)
If (http.LastMethodSuccess = 0) Then
Debug.Print http.LastErrorText
Exit Sub
End If
Debug.Print resp.StatusCode
Debug.Print resp.BodyStr
Curl Command
curl -X post
-H "Authorization: Bearer <access_token>"
-H "Content-Type: application/json"
-d '{
"value" : {
"type" : "absolute",
"money" : [ {
"currencyCode" : "EUR",
"centAmount" : 100
} ]
},
"predicate" : "1=1",
"name" : {
"en" : "test-discount1"
},
"description" : {
"en" : "test-discount1"
},
"isActive" : false,
"sortOrder" : "0.9534"
}'
https://domain.com/{{project-key}}/product-discounts
Postman Collection Item JSON
{
"name": "Create ProductDiscount",
"event": [
{
"listen": "test",
"script": {
"type": "text/javascript",
"exec": [
"tests[\"Status code \" + responseCode.code] = responseCode.code === 200 || responseCode.code === 201;",
"var data = JSON.parse(responseBody);",
"if(data.results && data.results[0] && data.results[0].id && data.results[0].version){",
" pm.environment.set(\"product-discount-id\", data.results[0].id); ",
" pm.environment.set(\"product-discount-version\", data.results[0].version);",
"}",
"if(data.results && data.results[0] && data.results[0].key){",
" pm.environment.set(\"product-discount-key\", data.results[0].key); ",
"}",
"if(data.version){",
" pm.environment.set(\"product-discount-version\", data.version);",
"}",
"if(data.id){",
" pm.environment.set(\"product-discount-id\", data.id); ",
"}",
"if(data.key){",
" pm.environment.set(\"product-discount-key\", data.key);",
"}",
""
]
}
}
],
"request": {
"auth": {
"type": "oauth2",
"oauth2": {
"accessToken": "{{ctp_access_token}}",
"addTokenTo": "header",
"tokenType": "Bearer"
}
},
"method": "post",
"header": [
{
"key": "Content-Type",
"value": "application/json"
}
],
"url": {
"raw": "{{host}}/{{project-key}}/product-discounts",
"host": [
"{{host}}"
],
"path": [
"{{project-key}}",
"product-discounts"
],
"query": [
{
"key": "expand",
"value": "",
"equals": true,
"disabled": true
}
]
},
"description": "null",
"body": {
"mode": "raw",
"raw": "{\n \"value\" : {\n \"type\" : \"absolute\",\n \"money\" : [ {\n \"currencyCode\" : \"EUR\",\n \"centAmount\" : 100\n } ]\n },\n \"predicate\" : \"1=1\",\n \"name\" : {\n \"en\" : \"test-discount1\"\n },\n \"description\" : {\n \"en\" : \"test-discount1\"\n },\n \"isActive\" : false,\n \"sortOrder\" : \"0.9534\"\n}"
}
},
"response": [
]
}