Chilkat Online Tools

VB6 / CardPointe API Integration / Auth (Capture = Y w/ Soft Descriptors)

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

http.BasicAuth = 1
http.Login = "username"
http.Password = "password"

' Use this online tool to generate code from sample JSON: Generate Code to Create JSON

' The following JSON is sent in the request body.

' {
'   "merchid": "{{merchid}}",
'   "account": "{{account}}",
'   "expiry": "{{expiry}}",
'   "amount": ".05",
'   "currency": "{{currency}}",
'   "name": "CC TEST",
'   "capture": "y",
'   "userfields": [
'     {
'       "custommerchant": "12 CHAR"
'     },
'     {
'       "customproduct": "12 CHAR"
'     },
'     {
'       "customphone": "8005551313"
'     },
'     {
'       "customstate": "PA"
'     },
'     {
'       "custompostal": "12345"
'     }
'   ]
' }

Dim json As New ChilkatJsonObject
success = json.UpdateString("merchid","{{merchid}}")
success = json.UpdateString("account","{{account}}")
success = json.UpdateString("expiry","{{expiry}}")
success = json.UpdateString("amount",".05")
success = json.UpdateString("currency","{{currency}}")
success = json.UpdateString("name","CC TEST")
success = json.UpdateString("capture","y")
success = json.UpdateString("userfields[0].custommerchant","12 CHAR")
success = json.UpdateString("userfields[1].customproduct","12 CHAR")
success = json.UpdateString("userfields[2].customphone","8005551313")
success = json.UpdateString("userfields[3].customstate","PA")
success = json.UpdateString("userfields[4].custompostal","12345")

http.SetRequestHeader "Authorization","{{Authorization}}"
http.SetRequestHeader "Content-Type","application/json"

Dim sbRequestBody As New ChilkatStringBuilder
success = json.EmitSb(sbRequestBody)

Dim resp As ChilkatHttpResponse
Set resp = http.PTextSb("PUT","https://domain.com/auth",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 PUT
	-u 'username:password'
	-H "Authorization: {{Authorization}}"
	-H "Content-Type: application/json"
	-d '{
    "merchid": "{{merchid}}",
    "account": "{{account}}",
    "expiry": "{{expiry}}",
    "amount": ".05",
    "currency": "{{currency}}",
    "name": "CC TEST",
    "capture": "y",
    "userfields": [
        {
            "custommerchant": "12 CHAR"
        },
        {
            "customproduct": "12 CHAR"
        },
        {
            "customphone": "8005551313"
        },
        {
            "customstate": "PA"
        },
        {
            "custompostal": "12345"
        }
    ]
}'
https://domain.com/auth

Postman Collection Item JSON

{
  "name": "Auth  (Capture = Y w/ Soft Descriptors)",
  "event": [
    {
      "listen": "test",
      "script": {
        "exec": [
          "var jsonData = JSON.parse(responseBody);",
          "postman.setEnvironmentVariable(\"profileid\", jsonData.profileid);",
          "var jsonData = JSON.parse(responseBody);",
          "postman.setEnvironmentVariable(\"acctid\", jsonData.acctid);",
          "var jsonData = JSON.parse(responseBody);",
          "postman.setEnvironmentVariable(\"retref\", jsonData.retref);",
          "var jsonData = JSON.parse(responseBody);",
          "postman.setEnvironmentVariable(\"token\", jsonData.token);",
          "var jsonData = JSON.parse(responseBody);",
          "postman.setEnvironmentVariable(\"batchid\", jsonData.batchid);"
        ],
        "type": "text/javascript"
      }
    }
  ],
  "request": {
    "auth": {
      "type": "basic",
      "basic": [
        {
          "key": "password",
          "value": "testing123",
          "type": "string"
        },
        {
          "key": "username",
          "value": "testing",
          "type": "string"
        },
        {
          "key": "showPassword",
          "value": false,
          "type": "boolean"
        }
      ]
    },
    "method": "PUT",
    "header": [
      {
        "key": "Authorization",
        "value": "{{Authorization}}",
        "warning": "This is a duplicate header and will be overridden by the Authorization header generated by Postman."
      },
      {
        "key": "Content-Type",
        "value": "application/json"
      }
    ],
    "body": {
      "mode": "raw",
      "raw": "{\n    \"merchid\": \"{{merchid}}\",\n    \"account\": \"{{account}}\",\n    \"expiry\": \"{{expiry}}\",\n    \"amount\": \".05\",\n    \"currency\": \"{{currency}}\",\n    \"name\": \"CC TEST\",\n    \"capture\": \"y\",\n    \"userfields\": [\n        {\n            \"custommerchant\": \"12 CHAR\"\n        },\n        {\n            \"customproduct\": \"12 CHAR\"\n        },\n        {\n            \"customphone\": \"8005551313\"\n        },\n        {\n            \"customstate\": \"PA\"\n        },\n        {\n            \"custompostal\": \"12345\"\n        }\n    ]\n}"
    },
    "url": {
      "raw": "{{url}}/auth",
      "host": [
        "{{url}}"
      ],
      "path": [
        "auth"
      ]
    },
    "description": "[Authorization Documentation](https://developer.cardconnect.com/cardconnect-api#authorization)"
  },
  "response": [
  ]
}