Chilkat Online Tools

PureBasic / PaymentsOS Testing with Mock Provider / 1. Create Token

Back to Collection Items

IncludeFile "CkJsonObject.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.

    ; {
    ;   "token_type": "credit_card",
    ;   "credit_card_cvv": "123",
    ;   "card_number": "4000000000000077",
    ;   "holder_name": "John Doe",
    ;   "expiration_date": "10/29"
    ; }

    json.i = CkJsonObject::ckCreate()
    If json.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkJsonObject::ckUpdateString(json,"token_type","credit_card")
    CkJsonObject::ckUpdateString(json,"credit_card_cvv","123")
    CkJsonObject::ckUpdateString(json,"card_number","4000000000000077")
    CkJsonObject::ckUpdateString(json,"holder_name","John Doe")
    CkJsonObject::ckUpdateString(json,"expiration_date","10/29")

    CkHttp::ckSetRequestHeader(http,"Content-Type","application/json")
    CkHttp::ckSetRequestHeader(http,"x-payments-os-env","{{x-payments-os-env}}")
    CkHttp::ckSetRequestHeader(http,"app_id","{{app_id}}")
    CkHttp::ckSetRequestHeader(http,"api-version","1.3.0")
    CkHttp::ckSetRequestHeader(http,"public_key","{{public_key}}")

    resp.i = CkHttp::ckPostJson3(http,"https://api.paymentsos.com/tokens","application/json",json)
    If CkHttp::ckLastMethodSuccess(http) = 0
        Debug CkHttp::ckLastErrorText(http)
        CkHttp::ckDispose(http)
        CkJsonObject::ckDispose(json)
        ProcedureReturn
    EndIf

    Debug Str(CkHttpResponse::ckStatusCode(resp))
    Debug CkHttpResponse::ckBodyStr(resp)
    CkHttpResponse::ckDispose(resp)



    CkHttp::ckDispose(http)
    CkJsonObject::ckDispose(json)


    ProcedureReturn
EndProcedure

Curl Command

curl -X POST
	-H "app_id: {{app_id}}"
	-H "public_key: {{public_key}}"
	-H "Content-Type: application/json"
	-H "api-version: 1.3.0"
	-H "x-payments-os-env: {{x-payments-os-env}}"
	-d '{
  "token_type": "credit_card",
  "credit_card_cvv": "123",
  "card_number": "4000000000000077",
  "holder_name": "John Doe",
  "expiration_date": "10/29"
}'
https://api.paymentsos.com/tokens

Postman Collection Item JSON

{
  "name": "1. Create Token",
  "event": [
    {
      "listen": "test",
      "script": {
        "type": "text/javascript",
        "exec": [
          "var jsonData = JSON.parse(responseBody);",
          "postman.setEnvironmentVariable(\"token\", jsonData.token);"
        ]
      }
    }
  ],
  "request": {
    "method": "POST",
    "header": [
      {
        "key": "app_id",
        "value": "{{app_id}}"
      },
      {
        "key": "public_key",
        "value": "{{public_key}}"
      },
      {
        "key": "Content-Type",
        "value": "application/json"
      },
      {
        "key": "api-version",
        "value": "1.3.0"
      },
      {
        "key": "x-payments-os-env",
        "value": "{{x-payments-os-env}}"
      }
    ],
    "body": {
      "mode": "raw",
      "raw": "{\n  \"token_type\": \"credit_card\",\n  \"credit_card_cvv\": \"123\",\n  \"card_number\": \"4000000000000077\",\n  \"holder_name\": \"John Doe\",\n  \"expiration_date\": \"10/29\"\n}"
    },
    "url": {
      "raw": "https://api.paymentsos.com/tokens",
      "protocol": "https",
      "host": [
        "api",
        "paymentsos",
        "com"
      ],
      "path": [
        "tokens"
      ]
    },
    "description": "Create a new payment token"
  },
  "response": [
  ]
}