Back to Collection Items
Use ChilkatAx-win32.pkg
Procedure Test
Handle hoHttp
Boolean iSuccess
Variant vJson
Handle hoJson
Variant vResp
Handle hoResp
String sTemp1
Integer iTemp1
Boolean bTemp1
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
Get Create (RefClass(cComChilkatHttp)) To hoHttp
If (Not(IsComObjectCreated(hoHttp))) Begin
Send CreateComObject of hoHttp
End
// Use this online tool to generate code from sample JSON: Generate Code to Create JSON
// The following JSON is sent in the request body.
// {
// "items": [
// {
// "codeType": "EGS",
// "parentCode": "10000051",
// "itemCode": "EG-113317713-5598542",
// "codeName": "Test Code",
// "codeNameAr": "كود تجريبي",
// "activeFrom": "2021-02-20T00:00:00.000",
// "activeTo": "2021-04-22T00:00:00.000",
// "description": "Description of code",
// "descriptionAr": "وصف الكود بالعربي",
// "requestReason": "Request reason text"
// },
// {
// "codeType": "EGS",
// "parentCode": "10000051",
// "itemCode": "EG-113317713-5598543",
// "codeName": "Test Code 1",
// "codeNameAr": "1 كود تجريبي",
// "activeFrom": "2021-02-20T00:00:00.000",
// "activeTo": "2021-04-22T00:00:00.000",
// "description": "Description of code 1",
// "descriptionAr": " 1 وصف الكود بالعربي",
// "requestReason": "Request reason text"
// }
// ]
// }
Get Create (RefClass(cComChilkatJsonObject)) To hoJson
If (Not(IsComObjectCreated(hoJson))) Begin
Send CreateComObject of hoJson
End
Get ComUpdateString Of hoJson "items[0].codeType" "EGS" To iSuccess
Get ComUpdateString Of hoJson "items[0].parentCode" "10000051" To iSuccess
Get ComUpdateString Of hoJson "items[0].itemCode" "EG-113317713-5598542" To iSuccess
Get ComUpdateString Of hoJson "items[0].codeName" "Test Code" To iSuccess
Get ComUpdateString Of hoJson "items[0].codeNameAr" "كود تجريبي" To iSuccess
Get ComUpdateString Of hoJson "items[0].activeFrom" "2021-02-20T00:00:00.000" To iSuccess
Get ComUpdateString Of hoJson "items[0].activeTo" "2021-04-22T00:00:00.000" To iSuccess
Get ComUpdateString Of hoJson "items[0].description" "Description of code" To iSuccess
Get ComUpdateString Of hoJson "items[0].descriptionAr" "وصف الكود بالعربي" To iSuccess
Get ComUpdateString Of hoJson "items[0].requestReason" "Request reason text" To iSuccess
Get ComUpdateString Of hoJson "items[1].codeType" "EGS" To iSuccess
Get ComUpdateString Of hoJson "items[1].parentCode" "10000051" To iSuccess
Get ComUpdateString Of hoJson "items[1].itemCode" "EG-113317713-5598543" To iSuccess
Get ComUpdateString Of hoJson "items[1].codeName" "Test Code 1" To iSuccess
Get ComUpdateString Of hoJson "items[1].codeNameAr" "1 كود تجريبي" To iSuccess
Get ComUpdateString Of hoJson "items[1].activeFrom" "2021-02-20T00:00:00.000" To iSuccess
Get ComUpdateString Of hoJson "items[1].activeTo" "2021-04-22T00:00:00.000" To iSuccess
Get ComUpdateString Of hoJson "items[1].description" "Description of code 1" To iSuccess
Get ComUpdateString Of hoJson "items[1].descriptionAr" " 1 وصف الكود بالعربي" To iSuccess
Get ComUpdateString Of hoJson "items[1].requestReason" "Request reason text" To iSuccess
// Adds the "Authorization: Bearer <access_token>" header.
Set ComAuthToken Of hoHttp To "<access_token>"
Get pvComObject of hoJson to vJson
Get ComPostJson3 Of hoHttp "https://domain.com/api/v1.0/codetypes/requests/codes" "application/json" vJson To vResp
If (IsComObject(vResp)) Begin
Get Create (RefClass(cComChilkatHttpResponse)) To hoResp
Set pvComObject Of hoResp To vResp
End
Get ComLastMethodSuccess Of hoHttp To bTemp1
If (bTemp1 = False) Begin
Get ComLastErrorText Of hoHttp To sTemp1
Showln sTemp1
Procedure_Return
End
Get ComStatusCode Of hoResp To iTemp1
Showln iTemp1
Get ComBodyStr Of hoResp To sTemp1
Showln sTemp1
Send Destroy of hoResp
End_Procedure
Curl Command
curl -X POST
-H "Authorization: Bearer <access_token>"
-d '{
"items": [
{
"codeType": "EGS",
"parentCode": "10000051",
"itemCode": "EG-113317713-5598542",
"codeName": "Test Code",
"codeNameAr": "كود تجريبي",
"activeFrom": "2021-02-20T00:00:00.000",
"activeTo": "2021-04-22T00:00:00.000",
"description": "Description of code",
"descriptionAr": "وصف الكود بالعربي",
"requestReason": "Request reason text"
},
{
"codeType": "EGS",
"parentCode": "10000051",
"itemCode": "EG-113317713-5598543",
"codeName": "Test Code 1",
"codeNameAr": "1 كود تجريبي",
"activeFrom": "2021-02-20T00:00:00.000",
"activeTo": "2021-04-22T00:00:00.000",
"description": "Description of code 1",
"descriptionAr": " 1 وصف الكود بالعربي",
"requestReason": "Request reason text"
}
]
}'
https://domain.com/api/v1.0/codetypes/requests/codes
Postman Collection Item JSON
{
"name": "6. Create EGS Code Usage",
"request": {
"auth": {
"type": "bearer",
"bearer": [
{
"key": "token",
"value": "{{generatedAccessToken}}",
"type": "string"
}
]
},
"method": "POST",
"header": [
],
"body": {
"mode": "raw",
"raw": "{\r\n \"items\": [\r\n {\r\n \"codeType\": \"EGS\",\r\n \"parentCode\": \"10000051\",\r\n \"itemCode\": \"EG-113317713-5598542\",\r\n \"codeName\": \"Test Code\",\r\n \"codeNameAr\": \"كود تجريبي\",\r\n \"activeFrom\": \"2021-02-20T00:00:00.000\",\r\n \"activeTo\": \"2021-04-22T00:00:00.000\",\r\n \"description\": \"Description of code\",\r\n \"descriptionAr\": \"وصف الكود بالعربي\",\r\n \"requestReason\": \"Request reason text\"\r\n },\r\n {\r\n \"codeType\": \"EGS\",\r\n \"parentCode\": \"10000051\",\r\n \"itemCode\": \"EG-113317713-5598543\",\r\n \"codeName\": \"Test Code 1\",\r\n \"codeNameAr\": \"1 كود تجريبي\",\r\n \"activeFrom\": \"2021-02-20T00:00:00.000\",\r\n \"activeTo\": \"2021-04-22T00:00:00.000\",\r\n \"description\": \"Description of code 1\",\r\n \"descriptionAr\": \" 1 وصف الكود بالعربي\",\r\n \"requestReason\": \"Request reason text\"\r\n }\r\n ]\r\n}",
"options": {
"raw": {
"language": "json"
}
}
},
"url": {
"raw": "{{apiBaseUrl}}/api/v1.0/codetypes/requests/codes",
"host": [
"{{apiBaseUrl}}"
],
"path": [
"api",
"v1.0",
"codetypes",
"requests",
"codes"
]
}
},
"response": [
]
}
