Tcl
Tcl
Update a Task's Status to "completed"
See more Google Tasks Examples
Demonstrates how to update a Google task's status to "completed".Chilkat Tcl Downloads
load ./chilkat.dll
set success 0
# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.
# Get the previously obtained access token.
# See Get Google Tasks Access Token.
set fac [new_CkFileAccess]
set accessToken [CkFileAccess_readEntireTextFile $fac "qa_data/tokens/googleTasks.txt" "utf-8"]
if {[CkFileAccess_get_LastMethodSuccess $fac] == 0} then {
puts [CkFileAccess_lastErrorText $fac]
delete_CkFileAccess $fac
exit
}
set http [new_CkHttp]
CkHttp_put_AuthToken $http $accessToken
set taskId "MDM4MzQ4NTA3NDQwMDUxMzQ2OTQ6NzAwOTA4MDA1NzU2ODYwMzoyMDg3OTcyMDA1MTQ5NTA0"
# Create the JSON to update the task status to completed.
set json [new_CkJsonObject]
CkJsonObject_UpdateString $json "id" $taskId
CkJsonObject_UpdateString $json "status" "completed"
# Specify the ID's for both the task list and the task.
CkHttp_SetUrlVar $http "tasklist" "MDM4MzQ4NTA3NDQwMDUxMzQ2OTQ6NzAwOTA4MDA1NzU2ODYwMzow"
CkHttp_SetUrlVar $http "task" $taskId
set url "https://www.googleapis.com/tasks/v1/lists/{$tasklist}/tasks/{$task}"
set resp [new_CkHttpResponse]
set success [CkHttp_HttpJson $http "PUT" $url $json "application/json" $resp]
if {$success == 0} then {
puts [CkHttp_lastErrorText $http]
delete_CkFileAccess $fac
delete_CkHttp $http
delete_CkJsonObject $json
delete_CkHttpResponse $resp
exit
}
# Show the response body.
puts [CkHttpResponse_bodyStr $resp]
# Examine the response status code.
puts "response status code: [CkHttpResponse_get_StatusCode $resp]"
# Sample response:
# Use this online tool to generate parsing code from sample JSON:
# Generate Parsing Code from JSON
#
# {
# "kind": "tasks#task",
# "id": "MDM4MzQ4NTA3NDQwMDUxMzQ2OTQ6NzAwOTA4MDA1NzU2ODYwMzoyMDg3OTcyMDA1MTQ5NTA0",
# "etag": "\"84_7Cubo3y98GMV9bE3zQclHxhc/MTQyMDUzMzQ4MA\"",
# "title": "Get haircut",
# "updated": "2019-04-04T18:07:58.000Z",
# "selfLink": "https://www.googleapis.com/tasks/v1/lists/MDM4MzQ4NTA3NDQwMDUxMzQ2OTQ6NzAwOTA4MDA1NzU2ODYwMzow/tasks/MDM4MzQ4NTA3NDQwMDUxMzQ2OTQ6NzAwOTA4MDA1NzU2ODYwMzoyMDg3OTcyMDA1MTQ5NTA0",
# "position": "00000000001610612734",
# "notes": "Check in online first.",
# "status": "completed",
# "completed": "2019-04-04T18:38:56.000Z"
# }
#
# response status code: 200
delete_CkFileAccess $fac
delete_CkHttp $http
delete_CkJsonObject $json
delete_CkHttpResponse $resp