VBScript / GP-API Collection / TKA_2.8 Single to Multi Use Token
Back to Collection Items
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http")
set http = CreateObject("Chilkat.Http")
' Use this online tool to generate code from sample JSON: Generate Code to Create JSON
' The following JSON is sent in the request body.
' {
' "account_name": "{{acc_name}}",
' "channel": "CNP",
' "capture_mode": "AUTO",
' "type": "SALE",
' "amount": "100",
' "currency": "USD",
' "reference": "45467761",
' "country": "US",
' "payment_method": {
' "name": "Jane",
' "entry_mode": "ECOM",
' "id": "PMT_96959619-5ef6-41b1-bfeb-fc13c4b2b359",
' "storage_model": "ALWAYS"
' }
' }
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject")
set json = CreateObject("Chilkat.JsonObject")
success = json.UpdateString("account_name","{{acc_name}}")
success = json.UpdateString("channel","CNP")
success = json.UpdateString("capture_mode","AUTO")
success = json.UpdateString("type","SALE")
success = json.UpdateString("amount","100")
success = json.UpdateString("currency","USD")
success = json.UpdateString("reference","45467761")
success = json.UpdateString("country","US")
success = json.UpdateString("payment_method.name","Jane")
success = json.UpdateString("payment_method.entry_mode","ECOM")
success = json.UpdateString("payment_method.id","PMT_96959619-5ef6-41b1-bfeb-fc13c4b2b359")
success = json.UpdateString("payment_method.storage_model","ALWAYS")
http.SetRequestHeader "Content-Type","application/json"
http.SetRequestHeader "X-GP-Version","2020-12-22"
' Adds the "Authorization: Bearer {{token}}" header.
http.AuthToken = "{{token}}"
http.SetRequestHeader "Accept","application/json"
' resp is a Chilkat.HttpResponse
Set resp = http.PostJson3("https://apis.sandbox.globalpay.com/ucp/transactions","application/json",json)
If (http.LastMethodSuccess = 0) Then
outFile.WriteLine(http.LastErrorText)
WScript.Quit
End If
outFile.WriteLine(resp.StatusCode)
outFile.WriteLine(resp.BodyStr)
outFile.Close
Curl Command
curl -X POST
-H "Content-Type: application/json"
-H "Authorization: Bearer {{token}}"
-H "Accept: application/json"
-H "X-GP-Version: 2020-12-22"
-d '{
"account_name": "{{acc_name}}",
"channel": "CNP",
"capture_mode":"AUTO",
"type": "SALE",
"amount": "100",
"currency": "USD",
"reference": "45467761",
"country": "US",
"payment_method": {
"name": "Jane",
"entry_mode": "ECOM",
"id": "PMT_96959619-5ef6-41b1-bfeb-fc13c4b2b359",
"storage_model": "ALWAYS"
}
}'
https://apis.sandbox.globalpay.com/ucp/transactions
Postman Collection Item JSON
{
"name": "TKA_2.8 Single to Multi Use Token",
"request": {
"method": "POST",
"header": [
{
"key": "Content-Type",
"value": "application/json"
},
{
"key": "Authorization",
"value": "Bearer {{token}}"
},
{
"key": "Accept",
"value": "application/json"
},
{
"key": "X-GP-Version",
"value": "2020-12-22"
}
],
"body": {
"mode": "raw",
"raw": "{\n \"account_name\": \"{{acc_name}}\",\n \"channel\": \"CNP\",\n \"capture_mode\":\"AUTO\",\n \"type\": \"SALE\",\n \"amount\": \"100\",\n \"currency\": \"USD\",\n \"reference\": \"45467761\",\n \"country\": \"US\",\n \"payment_method\": {\n \"name\": \"Jane\",\n \"entry_mode\": \"ECOM\",\n \"id\": \"PMT_96959619-5ef6-41b1-bfeb-fc13c4b2b359\",\n \"storage_model\": \"ALWAYS\"\n }\n}"
},
"url": {
"raw": "https://apis.sandbox.globalpay.com/ucp/transactions",
"protocol": "https",
"host": [
"apis",
"sandbox",
"globalpay",
"com"
],
"path": [
"ucp",
"transactions"
]
}
},
"response": [
]
}