Chilkat Online Tools

TCL / Salesforce Platform APIs / Corporate Member Enrollments

Back to Collection Items

load ./chilkat.dll

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

set http [new_CkHttp]

# 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"
# }

set json [new_CkJsonObject]

CkJsonObject_UpdateString $json "enrollmentDate" "2021-01-01T05:05:05"
CkJsonObject_UpdateString $json "membershipNumber" "Member123"
CkJsonObject_UpdateString $json "associatedAccountDetails.name" "Name1"
CkJsonObject_UpdateString $json "associatedAccountDetails.phone" "908989898"
CkJsonObject_UpdateString $json "associatedAccountDetails.website" "www.ab.com"
CkJsonObject_UpdateString $json "associatedAccountDetails.allowDuplicateRecords" "false"
CkJsonObject_UpdateString $json "memberStatus" "Active"
CkJsonObject_UpdateString $json "createTransactionJournals" "true"

# Adds the "Authorization: Bearer <access_token>" header.
CkHttp_put_AuthToken $http "<access_token>"

set resp [new_CkHttpResponse]

set success [CkHttp_HttpJson $http "POST" "https://domain.com/services/data/v{{version}}/loyalty-programs/:loyaltyProgramName/corporate-member-enrollments" $json "application/json" $resp]
if {$success == 0} then {
    puts [CkHttp_lastErrorText $http]
    delete_CkHttp $http
    delete_CkJsonObject $json
    delete_CkHttpResponse $resp
    exit
}

set sbResponseBody [new_CkStringBuilder]

CkHttpResponse_GetBodySb $resp $sbResponseBody

set jResp [new_CkJsonObject]

CkJsonObject_LoadSb $jResp $sbResponseBody
CkJsonObject_put_EmitCompact $jResp 0

puts "Response Body:"
puts [CkJsonObject_emit $jResp]

set respStatusCode [CkHttpResponse_get_StatusCode $resp]
puts "Response Status Code = $respStatusCode"
if {$respStatusCode >= 400} then {
    puts "Response Header:"
    puts [CkHttpResponse_header $resp]
    puts "Failed."
    delete_CkHttp $http
    delete_CkJsonObject $json
    delete_CkHttpResponse $resp
    delete_CkStringBuilder $sbResponseBody
    delete_CkJsonObject $jResp
    exit
}

# 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

set accountId [CkJsonObject_stringOf $jResp "accountId"]
set loyaltyProgramMemberId [CkJsonObject_stringOf $jResp "loyaltyProgramMemberId"]
set loyaltyProgramName [CkJsonObject_stringOf $jResp "loyaltyProgramName"]
set membershipNumber [CkJsonObject_stringOf $jResp "membershipNumber"]
set i 0
set count_i [CkJsonObject_SizeOfArray $jResp "transactionJournals"]
while {$i < $count_i} {
    CkJsonObject_put_I $jResp $i
    set activityDate [CkJsonObject_stringOf $jResp "transactionJournals[i].activityDate"]
    set journalSubType [CkJsonObject_stringOf $jResp "transactionJournals[i].journalSubType"]
    set journalType [CkJsonObject_stringOf $jResp "transactionJournals[i].journalType"]
    set loyaltyProgram [CkJsonObject_stringOf $jResp "transactionJournals[i].loyaltyProgram"]
    set loyaltyProgramMember [CkJsonObject_stringOf $jResp "transactionJournals[i].loyaltyProgramMember"]
    set referredMember [CkJsonObject_stringOf $jResp "transactionJournals[i].referredMember"]
    set status [CkJsonObject_stringOf $jResp "transactionJournals[i].status"]
    set transactionJournalId [CkJsonObject_stringOf $jResp "transactionJournals[i].transactionJournalId"]
    set i [expr $i + 1]
}

delete_CkHttp $http
delete_CkJsonObject $json
delete_CkHttpResponse $resp
delete_CkStringBuilder $sbResponseBody
delete_CkJsonObject $jResp

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}"
    }
  ]
}