Tcl

How to Parse a TimeStamp (such as 2016-11-11T14:32:17.0908971Z)

Timestamps are frequently used in REST API responses. This example demonstrates how to parse a timestamp string to get at the date/time components in the local timezone or in the GMT/UTC timezone. Tcl

load ./chilkat.dll

# Let's say we have a timestamp string such as 2016-11-11T14:32:17.0908971Z
set strTimestamp "2016-11-11T14:32:17.0908971Z"

set dateTime [new_CkDateTime]

CkDateTime_SetFromTimestamp $dateTime $strTimestamp

# Get a DtObj in the local timezone.
set bLocalTimezone 1
set dt [new_CkDtObj]

CkDateTime_ToDtObj $dateTime $bLocalTimezone $dt

# Get the individual date/time components
puts "-- Local Time --"
puts "Year: [CkDtObj_get_Year $dt]"
puts "Month: [CkDtObj_get_Month $dt]"
puts "Day: [CkDtObj_get_Day $dt]"
puts "Hour: [CkDtObj_get_Hour $dt]"
puts "Minutes: [CkDtObj_get_Minute $dt]"
puts "Seconds: [CkDtObj_get_Second $dt]"

# Get a DtObj in the GMT/UTC timezone.
set bLocalTimezone 0
CkDateTime_ToDtObj $dateTime $bLocalTimezone $dt

# Get the individual date/time components
puts "-- UTC Time --"
puts "Year: [CkDtObj_get_Year $dt]"
puts "Month: [CkDtObj_get_Month $dt]"
puts "Day: [CkDtObj_get_Day $dt]"
puts "Hour: [CkDtObj_get_Hour $dt]"
puts "Minutes: [CkDtObj_get_Minute $dt]"
puts "Seconds: [CkDtObj_get_Second $dt]"

delete_CkDateTime $dateTime
delete_CkDtObj $dt