List events, going back up to 30 days.
curl https://api.stripe.com/v1/events?limit=3 \
-u STRIPE_SECRET_KEY: \
-G
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
String sUrl
Boolean iHas_more
Integer i
Integer iCount_i
String sId
Boolean iApi_version
Integer iCreated
String sDataObjectId
String sDataObjectObject
Integer iDataObjectAmount
Integer iDataObjectCreated
String sDataObjectCurrency
String sDataObjectInterval
Integer iDataObjectInterval_count
Boolean iDataObjectLivemode
String sDataObjectName
Boolean iDataObjectStatement_descriptor
Boolean iDataObjectTrial_period_days
Boolean iLivemode
Integer iPending_webhooks
Boolean iRequestId
Boolean iRequestIdempotency_key
String sType
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/events?limit=3
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/events?limit=3" 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 ComStringOf Of hoJsonResponse "url" To sUrl
Get ComBoolOf Of hoJsonResponse "has_more" To iHas_more
Move 0 To i
Get ComSizeOfArray Of hoJsonResponse "data" To iCount_i
While (i < iCount_i)
Set ComI Of hoJsonResponse To i
Get ComStringOf Of hoJsonResponse "data[i].id" To sId
Get ComStringOf Of hoJsonResponse "data[i].object" To sObject
Get ComIsNullOf Of hoJsonResponse "data[i].api_version" To iApi_version
Get ComIntOf Of hoJsonResponse "data[i].created" To iCreated
Get ComStringOf Of hoJsonResponse "data[i].data.object.id" To sDataObjectId
Get ComStringOf Of hoJsonResponse "data[i].data.object.object" To sDataObjectObject
Get ComIntOf Of hoJsonResponse "data[i].data.object.amount" To iDataObjectAmount
Get ComIntOf Of hoJsonResponse "data[i].data.object.created" To iDataObjectCreated
Get ComStringOf Of hoJsonResponse "data[i].data.object.currency" To sDataObjectCurrency
Get ComStringOf Of hoJsonResponse "data[i].data.object.interval" To sDataObjectInterval
Get ComIntOf Of hoJsonResponse "data[i].data.object.interval_count" To iDataObjectInterval_count
Get ComBoolOf Of hoJsonResponse "data[i].data.object.livemode" To iDataObjectLivemode
Get ComStringOf Of hoJsonResponse "data[i].data.object.name" To sDataObjectName
Get ComIsNullOf Of hoJsonResponse "data[i].data.object.statement_descriptor" To iDataObjectStatement_descriptor
Get ComIsNullOf Of hoJsonResponse "data[i].data.object.trial_period_days" To iDataObjectTrial_period_days
Get ComBoolOf Of hoJsonResponse "data[i].livemode" To iLivemode
Get ComIntOf Of hoJsonResponse "data[i].pending_webhooks" To iPending_webhooks
Get ComIsNullOf Of hoJsonResponse "data[i].request.id" To iRequestId
Get ComIsNullOf Of hoJsonResponse "data[i].request.idempotency_key" To iRequestIdempotency_key
Get ComStringOf Of hoJsonResponse "data[i].type" To sType
Move i + 1 To i
Loop
End_Procedure
{
"object": "list",
"url": "/v1/events",
"has_more": false,
"data": [
{
"id": "evt_1BnETJGswQrCoh0XAl7jSmFB",
"object": "event",
"api_version": null,
"created": 1516662781,
"data": {
"object": {
"id": "gold",
"object": "plan",
"amount": 2000,
"created": 1516662781,
"currency": "usd",
"interval": "month",
"interval_count": 1,
"livemode": false,
"metadata": {},
"name": "T-shirt",
"statement_descriptor": null,
"trial_period_days": null
}
},
"livemode": false,
"pending_webhooks": 0,
"request": {
"id": null,
"idempotency_key": null
},
"type": "plan.created"
}
]
}