Back to Collection Items
IncludeFile "CkJsonObject.pb"
IncludeFile "CkStringBuilder.pb"
IncludeFile "CkHttp.pb"
IncludeFile "CkHttpResponse.pb"
Procedure ChilkatExample()
; This example assumes the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
http.i = CkHttp::ckCreate()
If http.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
success.i
; Use this online tool to generate code from sample JSON: Generate Code to Create JSON
; The following JSON is sent in the request body.
; {
; "enrollmentDate": "2021-01-01T05:05:05",
; "membershipNumber": "Member123",
; "associatedAccountDetails": {
; "name": "Name1",
; "phone": "908989898",
; "website": "www.ab.com",
; "allowDuplicateRecords": "false"
; },
; "memberStatus": "Active",
; "createTransactionJournals": "true"
; }
json.i = CkJsonObject::ckCreate()
If json.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkJsonObject::ckUpdateString(json,"enrollmentDate","2021-01-01T05:05:05")
CkJsonObject::ckUpdateString(json,"membershipNumber","Member123")
CkJsonObject::ckUpdateString(json,"associatedAccountDetails.name","Name1")
CkJsonObject::ckUpdateString(json,"associatedAccountDetails.phone","908989898")
CkJsonObject::ckUpdateString(json,"associatedAccountDetails.website","www.ab.com")
CkJsonObject::ckUpdateString(json,"associatedAccountDetails.allowDuplicateRecords","false")
CkJsonObject::ckUpdateString(json,"memberStatus","Active")
CkJsonObject::ckUpdateString(json,"createTransactionJournals","true")
; Adds the "Authorization: Bearer <access_token>" header.
CkHttp::setCkAuthToken(http, "<access_token>")
resp.i = CkHttp::ckPostJson3(http,"https://domain.com/services/data/v{{version}}/loyalty-programs/:loyaltyProgramName/corporate-member-enrollments","application/json",json)
If CkHttp::ckLastMethodSuccess(http) = 0
Debug CkHttp::ckLastErrorText(http)
CkHttp::ckDispose(http)
CkJsonObject::ckDispose(json)
ProcedureReturn
EndIf
sbResponseBody.i = CkStringBuilder::ckCreate()
If sbResponseBody.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkHttpResponse::ckGetBodySb(resp,sbResponseBody)
jResp.i = CkJsonObject::ckCreate()
If jResp.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkJsonObject::ckLoadSb(jResp,sbResponseBody)
CkJsonObject::setCkEmitCompact(jResp, 0)
Debug "Response Body:"
Debug CkJsonObject::ckEmit(jResp)
respStatusCode.i = CkHttpResponse::ckStatusCode(resp)
Debug "Response Status Code = " + Str(respStatusCode)
If respStatusCode >= 400
Debug "Response Header:"
Debug CkHttpResponse::ckHeader(resp)
Debug "Failed."
CkHttpResponse::ckDispose(resp)
CkHttp::ckDispose(http)
CkJsonObject::ckDispose(json)
CkStringBuilder::ckDispose(sbResponseBody)
CkJsonObject::ckDispose(jResp)
ProcedureReturn
EndIf
CkHttpResponse::ckDispose(resp)
; Sample JSON response:
; (Sample code for parsing the JSON response is shown below)
; {
; "accountId": "001J8000003MaJL",
; "loyaltyProgramMemberId": "0lMJ8000000CaRH",
; "loyaltyProgramName": "NTO Insider",
; "membershipNumber": "Member123",
; "transactionJournals": [
; {
; "activityDate": "2021-01-01T04:05:05.000Z",
; "journalSubType": "Member Enrollment",
; "journalType": "Accrual",
; "loyaltyProgram": "NTO Insider",
; "loyaltyProgramMember": "Member123",
; "referredMember": null,
; "status": "Processed",
; "transactionJournalId": "0lVJ8000000GmaE"
; }
; ]
; }
; Sample code for parsing the JSON response...
; Use this online tool to generate parsing code from sample JSON: Generate JSON Parsing Code
activityDate.s
journalSubType.s
journalType.s
loyaltyProgram.s
loyaltyProgramMember.s
referredMember.s
status.s
transactionJournalId.s
accountId.s = CkJsonObject::ckStringOf(jResp,"accountId")
loyaltyProgramMemberId.s = CkJsonObject::ckStringOf(jResp,"loyaltyProgramMemberId")
loyaltyProgramName.s = CkJsonObject::ckStringOf(jResp,"loyaltyProgramName")
membershipNumber.s = CkJsonObject::ckStringOf(jResp,"membershipNumber")
i.i = 0
count_i.i = CkJsonObject::ckSizeOfArray(jResp,"transactionJournals")
While i < count_i
CkJsonObject::setCkI(jResp, i)
activityDate = CkJsonObject::ckStringOf(jResp,"transactionJournals[i].activityDate")
journalSubType = CkJsonObject::ckStringOf(jResp,"transactionJournals[i].journalSubType")
journalType = CkJsonObject::ckStringOf(jResp,"transactionJournals[i].journalType")
loyaltyProgram = CkJsonObject::ckStringOf(jResp,"transactionJournals[i].loyaltyProgram")
loyaltyProgramMember = CkJsonObject::ckStringOf(jResp,"transactionJournals[i].loyaltyProgramMember")
referredMember = CkJsonObject::ckStringOf(jResp,"transactionJournals[i].referredMember")
status = CkJsonObject::ckStringOf(jResp,"transactionJournals[i].status")
transactionJournalId = CkJsonObject::ckStringOf(jResp,"transactionJournals[i].transactionJournalId")
i = i + 1
Wend
CkHttp::ckDispose(http)
CkJsonObject::ckDispose(json)
CkStringBuilder::ckDispose(sbResponseBody)
CkJsonObject::ckDispose(jResp)
ProcedureReturn
EndProcedure
Curl Command
curl -X POST
-H "Authorization: Bearer <access_token>"
-d '{
"enrollmentDate" : "2021-01-01T05:05:05",
"membershipNumber" : "Member123",
"associatedAccountDetails" : {
"name" : "Name1",
"phone" : "908989898",
"website" : "www.ab.com",
"allowDuplicateRecords" : "false"
},
"memberStatus" : "Active",
"createTransactionJournals" : "true"
}'
https://domain.com/services/data/v{{version}}/loyalty-programs/:loyaltyProgramName/corporate-member-enrollments
Postman Collection Item JSON
{
"name": "Corporate Member Enrollments",
"request": {
"method": "POST",
"header": [
],
"body": {
"mode": "raw",
"raw": "{\n \"enrollmentDate\" : \"2021-01-01T05:05:05\",\n \"membershipNumber\" : \"Member123\",\n \"associatedAccountDetails\" : {\n \"name\" : \"Name1\",\n \"phone\" : \"908989898\",\n \"website\" : \"www.ab.com\",\n \"allowDuplicateRecords\" : \"false\"\n },\n \"memberStatus\" : \"Active\",\n \"createTransactionJournals\" : \"true\"\n}",
"options": {
"raw": {
"language": "json"
}
}
},
"url": {
"raw": "{{_endpoint}}/services/data/v{{version}}/loyalty-programs/:loyaltyProgramName/corporate-member-enrollments",
"host": [
"{{_endpoint}}"
],
"path": [
"services",
"data",
"v{{version}}",
"loyalty-programs",
":loyaltyProgramName",
"corporate-member-enrollments"
],
"variable": [
{
"key": "loyaltyProgramName",
"value": ""
}
]
},
"description": "Standard Documentation:\n\n[https://developer.salesforce.com/docs/atlas.en-us.loyalty.meta/loyalty/connect_resources_enroll_corporate_member.htm](https://developer.salesforce.com/docs/atlas.en-us.loyalty.meta/loyalty/connect_resources_enroll_corporate_member.htm)"
},
"response": [
{
"name": "Corporate Member Enrollments",
"originalRequest": {
"method": "POST",
"header": [
{
"key": "Authorization",
"value": "Bearer {{accessToken}}"
}
],
"body": {
"mode": "raw",
"raw": "{\n \"enrollmentDate\" : \"2021-01-01T05:05:05\",\n \"membershipNumber\" : \"Member123\",\n \"associatedAccountDetails\" : {\n \"name\" : \"Name1\",\n \"phone\" : \"908989898\",\n \"website\" : \"www.ab.com\",\n \"allowDuplicateRecords\" : \"false\"\n },\n \"memberStatus\" : \"Active\",\n \"createTransactionJournals\" : \"true\"\n}",
"options": {
"raw": {
"language": "json"
}
}
},
"url": {
"raw": "{{_endpoint}}/services/data/v{{version}}/loyalty-programs/:loyaltyProgramName/corporate-member-enrollments",
"host": [
"{{_endpoint}}"
],
"path": [
"services",
"data",
"v{{version}}",
"loyalty-programs",
":loyaltyProgramName",
"corporate-member-enrollments"
],
"variable": [
{
"key": "loyaltyProgramName",
"value": "NTO Insider"
}
]
}
},
"status": "Created",
"code": 201,
"_postman_previewlanguage": "json",
"header": [
{
"key": "Date",
"value": "Wed, 22 May 2024 15:35:25 GMT"
},
{
"key": "Strict-Transport-Security",
"value": "max-age=63072000; includeSubDomains"
},
{
"key": "X-Content-Type-Options",
"value": "nosniff"
},
{
"key": "X-Robots-Tag",
"value": "none"
},
{
"key": "Cache-Control",
"value": "no-cache,must-revalidate,max-age=0,no-store,private"
},
{
"key": "Content-Type",
"value": "application/json;charset=UTF-8"
},
{
"key": "Vary",
"value": "Accept-Encoding"
},
{
"key": "Content-Encoding",
"value": "gzip"
},
{
"key": "Transfer-Encoding",
"value": "chunked"
}
],
"cookie": [
],
"body": "{\n \"accountId\": \"001J8000003MaJL\",\n \"loyaltyProgramMemberId\": \"0lMJ8000000CaRH\",\n \"loyaltyProgramName\": \"NTO Insider\",\n \"membershipNumber\": \"Member123\",\n \"transactionJournals\": [\n {\n \"activityDate\": \"2021-01-01T04:05:05.000Z\",\n \"journalSubType\": \"Member Enrollment\",\n \"journalType\": \"Accrual\",\n \"loyaltyProgram\": \"NTO Insider\",\n \"loyaltyProgramMember\": \"Member123\",\n \"referredMember\": null,\n \"status\": \"Processed\",\n \"transactionJournalId\": \"0lVJ8000000GmaE\"\n }\n ]\n}"
}
]
}
