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
Dim queryParams As New ChilkatJsonObject
success = queryParams.UpdateString("status","approved_for_payment")
success = queryParams.UpdateString("updated-at[gt_or_eq]","2021-06-22")
success = queryParams.UpdateString("filter","default_expense_reports_filter")
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
Dim resp As ChilkatHttpResponse
Set resp = http.QuickRequestParams("GET","https://domain.com/expense_reports",queryParams)
If (http.LastMethodSuccess = 0) Then
Debug.Print http.LastErrorText
Exit Sub
End If
Debug.Print resp.StatusCode
Debug.Print resp.BodyStr
Curl Command
curl -G -d "status=approved_for_payment"
-d "updated-at[gt_or_eq]=2021-06-22"
-d "filter=default_expense_reports_filter"
-H "Authorization: Bearer <access_token>"
https://domain.com/expense_reports
Postman Collection Item JSON
{
"name": "Get Expense Reports - Updated-at gt_or_eq specific date",
"request": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{URL}}/expense_reports?status=approved_for_payment&updated-at[gt_or_eq]=2021-06-22&filter=default_expense_reports_filter",
"host": [
"{{URL}}"
],
"path": [
"expense_reports"
],
"query": [
{
"key": "status",
"value": "approved_for_payment"
},
{
"key": "updated-at[gt_or_eq]",
"value": "2021-06-22"
},
{
"key": "filter",
"value": "default_expense_reports_filter"
}
]
}
},
"response": [
]
}