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("currentDate","")
success = queryParams.UpdateInt("daysBefore",4)
success = queryParams.UpdateInt("daysAfter",5)
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
Dim resp As ChilkatHttpResponse
Set resp = http.QuickRequestParams("GET","https://api.squadcast.com/v3/schedules/:schedulesID/events",queryParams)
If (http.LastMethodSuccess = 0) Then
Debug.Print http.LastErrorText
Exit Sub
End If
Dim sbResponseBody As New ChilkatStringBuilder
success = resp.GetBodySb(sbResponseBody)
Dim jResp As New ChilkatJsonObject
success = jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = 0
Debug.Print "Response Body:"
Debug.Print jResp.Emit()
Dim respStatusCode As Long
respStatusCode = resp.StatusCode
Debug.Print "Response Status Code = " & respStatusCode
If (respStatusCode >= 400) Then
Debug.Print "Response Header:"
Debug.Print resp.Header
Debug.Print "Failed."
Exit Sub
End If
' Sample JSON response:
' (Sample code for parsing the JSON response is shown below)
' {
' "data": [
' {
' "id": "5ecf89b4ebddeae2907cd44b",
' "start_time": "2020-05-29T18:30:00Z",
' "end_time": "2020-05-29T18:30:00Z",
' "name": "SRE shift 1",
' "user_ids": [
' "5d90cc3a4d031497494f07e6"
' ],
' "series_id": "5ecf89b4ebddeae2907cd423",
' "squad_ids": [
' ],
' "is_override": false,
' "schedule_id": "5ecf7176f92f2e731262b852",
' "calendar": {
' "id": "5ecf7176f92f2e731262b852",
' "name": "Weekly schedule",
' "slug": "weekly-schedule"
' }
' },
' {
' "id": "5ecf89b4ebddeae2907cd44c",
' "start_time": "2020-05-30T18:30:00Z",
' "end_time": "2020-05-30T18:30:00Z",
' "name": "SRE shift 1",
' "user_ids": [
' "5d81d9187000fb6b9def7e31"
' ],
' "series_id": "5ecf89b4ebddeae2907cd423",
' "squad_ids": [
' ],
' "is_override": false,
' "schedule_id": "5ecf7176f92f2e731262b852",
' "calendar": {
' "id": "5ecf7176f92f2e731262b852",
' "name": "Weekly schedule",
' "slug": "weekly-schedule"
' }
' }
' ]
' }
' Sample code for parsing the JSON response...
' Use this online tool to generate parsing code from sample JSON: Generate JSON Parsing Code
Dim id As String
Dim start_time As String
Dim end_time As String
Dim name As String
Dim series_id As String
Dim is_override As Long
Dim schedule_id As String
Dim Id As String
Dim Name As String
Dim Slug As String
Dim j As Long
Dim count_j As Long
Dim strVal As String
Dim i As Long
i = 0
Dim count_i As Long
count_i = jResp.SizeOfArray("data")
Do While i < count_i
jResp.I = i
id = jResp.StringOf("data[i].id")
start_time = jResp.StringOf("data[i].start_time")
end_time = jResp.StringOf("data[i].end_time")
name = jResp.StringOf("data[i].name")
series_id = jResp.StringOf("data[i].series_id")
is_override = jResp.BoolOf("data[i].is_override")
schedule_id = jResp.StringOf("data[i].schedule_id")
Id = jResp.StringOf("data[i].calendar.id")
Name = jResp.StringOf("data[i].calendar.name")
Slug = jResp.StringOf("data[i].calendar.slug")
j = 0
count_j = jResp.SizeOfArray("data[i].user_ids")
Do While j < count_j
jResp.J = j
strVal = jResp.StringOf("data[i].user_ids[j]")
j = j + 1
Loop
j = 0
count_j = jResp.SizeOfArray("data[i].squad_ids")
Do While j < count_j
jResp.J = j
j = j + 1
Loop
i = i + 1
Loop
Curl Command
curl -G -d "currentDate=%22%22"
-d "daysBefore=4"
-d "daysAfter=5"
-H "Authorization: Bearer <access_token>"
https://api.squadcast.com/v3/schedules/:schedulesID/events
Postman Collection Item JSON
{
"name": "Get All On-call Events",
"request": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/schedules/:schedulesID/events?currentDate=\"\"&daysBefore=4&daysAfter=5",
"host": [
"{{baseUrl}}"
],
"path": [
"schedules",
":schedulesID",
"events"
],
"query": [
{
"key": "currentDate",
"value": "\"\""
},
{
"key": "daysBefore",
"value": "4"
},
{
"key": "daysAfter",
"value": "5"
}
],
"variable": [
{
"key": "schedulesID",
"value": "5ecf7176f92f2e731262b852",
"type": "string"
}
]
},
"description": "This endpoint is used to get all the on-call rotations(event) for the schedule.\nRequires `access_token` as a `Bearer {{token}}` in the `Authorization` header with `schedule-read` scope.\n\n\nQuery Params:\n```\ncurrentDate (optional, default time.now) - from which time to fetch all the events\ndaysBefore (optional, default 15, max 42 days) - from how many days before the currentDate \ndaysAfter (optional, default 30, max 42 days) - from how many days after the currentDate events to be fetched\n\n```"
},
"response": [
{
"name": "200 OK",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/schedules/:schedulesID/events?currentDate=\"\"&daysBefore=4&daysAfter=5",
"host": [
"{{baseUrl}}"
],
"path": [
"schedules",
":schedulesID",
"events"
],
"query": [
{
"key": "currentDate",
"value": "\"\""
},
{
"key": "daysBefore",
"value": "4"
},
{
"key": "daysAfter",
"value": "5"
}
],
"variable": [
{
"key": "schedulesID",
"value": "5ecf7176f92f2e731262b852"
}
]
}
},
"status": "OK",
"code": 200,
"_postman_previewlanguage": "json",
"header": [
{
"key": "Content-Type",
"value": "application/json"
},
{
"key": "Vary",
"value": "Origin"
},
{
"key": "Date",
"value": "Thu, 28 May 2020 10:13:53 GMT"
},
{
"key": "Content-Length",
"value": "801"
}
],
"cookie": [
],
"body": "{\n \"data\": [\n {\n \"id\": \"5ecf89b4ebddeae2907cd44b\",\n \"start_time\": \"2020-05-29T18:30:00Z\",\n \"end_time\": \"2020-05-29T18:30:00Z\",\n \"name\": \"SRE shift 1\",\n \"user_ids\": [\n \"5d90cc3a4d031497494f07e6\"\n ],\n \"series_id\": \"5ecf89b4ebddeae2907cd423\",\n \"squad_ids\": [],\n \"is_override\": false,\n \"schedule_id\": \"5ecf7176f92f2e731262b852\",\n \"calendar\": {\n \"id\": \"5ecf7176f92f2e731262b852\",\n \"name\": \"Weekly schedule\",\n \"slug\": \"weekly-schedule\"\n }\n },\n {\n \"id\": \"5ecf89b4ebddeae2907cd44c\",\n \"start_time\": \"2020-05-30T18:30:00Z\",\n \"end_time\": \"2020-05-30T18:30:00Z\",\n \"name\": \"SRE shift 1\",\n \"user_ids\": [\n \"5d81d9187000fb6b9def7e31\"\n ],\n \"series_id\": \"5ecf89b4ebddeae2907cd423\",\n \"squad_ids\": [],\n \"is_override\": false,\n \"schedule_id\": \"5ecf7176f92f2e731262b852\",\n \"calendar\": {\n \"id\": \"5ecf7176f92f2e731262b852\",\n \"name\": \"Weekly schedule\",\n \"slug\": \"weekly-schedule\"\n }\n }\n ]\n}"
}
]
}
