VB6 / Razorpay APIs / Transfer Reversals
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.
' {
' "amount": 100
' }
Dim json As New ChilkatJsonObject
success = json.UpdateInt("amount",100)
http.SetRequestHeader "content-type","application/json"
Dim resp As ChilkatHttpResponse
Set resp = http.PostJson3("https://api.razorpay.com/v1/transfers/{trf_id}/reversals","application/json",json)
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 POST
-u 'username:password'
-H "content-type: application/json"
-d '{
"amount": 100
}'
https://api.razorpay.com/v1/transfers/{trf_id}/reversals
Postman Collection Item JSON
{
"name": "Transfer Reversals",
"request": {
"method": "POST",
"header": [
{
"key": "content-type",
"value": "application/json"
}
],
"body": {
"mode": "raw",
"raw": "{\n\t\"amount\": 100\n}"
},
"url": {
"raw": "https://api.razorpay.com/v1/transfers/{trf_id}/reversals",
"protocol": "https",
"host": [
"api",
"razorpay",
"com"
],
"path": [
"v1",
"transfers",
"{trf_id}",
"reversals"
]
}
},
"response": [
]
}