Retrieves the current account balance, based on the authentication that was used to make the request.
curl https://api.stripe.com/v1/balance \
-u STRIPE_SECRET_KEY:
Use ChilkatAx-9.5.0-win32.pkg
Procedure Test
Handle hoRest
Boolean iSuccess
Boolean iBTls
Integer iPort
Boolean iBAutoReconnect
Variant vSbResponseBody
Handle hoSbResponseBody
Handle hoJsonResponse
String sObject
Boolean iLivemode
Integer i
Integer iCount_i
String sCurrency
Integer iAmount
Integer iSource_typesCard
String sTemp1
Integer iTemp1
Get Create (RefClass(cComChilkatRest)) To hoRest
If (Not(IsComObjectCreated(hoRest))) Begin
Send CreateComObject of hoRest
End
// URL: https://api.stripe.com/v1/balance
Move True To iBTls
Move 443 To iPort
Move True To iBAutoReconnect
Get ComConnect Of hoRest "api.stripe.com" iPort iBTls iBAutoReconnect To iSuccess
If (iSuccess <> True) Begin
Get ComConnectFailReason Of hoRest To iTemp1
Showln "ConnectFailReason: " iTemp1
Get ComLastErrorText Of hoRest To sTemp1
Showln sTemp1
Procedure_Return
End
Get ComSetAuthBasic Of hoRest "STRIPE_SECRET_KEY" "" To iSuccess
Get Create (RefClass(cComChilkatStringBuilder)) To hoSbResponseBody
If (Not(IsComObjectCreated(hoSbResponseBody))) Begin
Send CreateComObject of hoSbResponseBody
End
Get pvComObject of hoSbResponseBody to vSbResponseBody
Get ComFullRequestNoBodySb Of hoRest "GET" "/v1/balance" vSbResponseBody To iSuccess
If (iSuccess <> True) Begin
Get ComLastErrorText Of hoRest To sTemp1
Showln sTemp1
Procedure_Return
End
Get Create (RefClass(cComChilkatJsonObject)) To hoJsonResponse
If (Not(IsComObjectCreated(hoJsonResponse))) Begin
Send CreateComObject of hoJsonResponse
End
Get pvComObject of hoSbResponseBody to vSbResponseBody
Get ComLoadSb Of hoJsonResponse vSbResponseBody To iSuccess
Get ComStringOf Of hoJsonResponse "object" To sObject
Get ComBoolOf Of hoJsonResponse "livemode" To iLivemode
Move 0 To i
Get ComSizeOfArray Of hoJsonResponse "available" To iCount_i
While (i < iCount_i)
Set ComI Of hoJsonResponse To i
Get ComStringOf Of hoJsonResponse "available[i].currency" To sCurrency
Get ComIntOf Of hoJsonResponse "available[i].amount" To iAmount
Get ComIntOf Of hoJsonResponse "available[i].source_types.card" To iSource_typesCard
Move i + 1 To i
Loop
Move 0 To i
Get ComSizeOfArray Of hoJsonResponse "pending" To iCount_i
While (i < iCount_i)
Set ComI Of hoJsonResponse To i
Get ComStringOf Of hoJsonResponse "pending[i].currency" To sCurrency
Get ComIntOf Of hoJsonResponse "pending[i].amount" To iAmount
Get ComIntOf Of hoJsonResponse "pending[i].source_types.card" To iSource_typesCard
Move i + 1 To i
Loop
End_Procedure
{
"object": "balance",
"available": [
{
"currency": "usd",
"amount": 0,
"source_types": {
"card": 0
}
}
],
"livemode": false,
"pending": [
{
"currency": "usd",
"amount": 0,
"source_types": {
"card": 0
}
}
]
}