190 !

   191 

   192 test_01d_ReadingTimeStamps

   193     |t|

   194 

   195     self assert:(t := Timestamp readFrom:'2017-11-09 10:18:03.236') printStringIso8601Format = '2017-11-09T10:18:03.236'.

   196     self assert:(t isLocalTimestamp).

   197     self assert:(t isUtcTimestamp not).

   198     self assert:(t isTZTimestamp not).

   199     

   200     self assert:(t := Timestamp readFrom:'2017-11-09 10:18:03.236Z') printStringIso8601Format = '2017-11-09T10:18:03.236Z'.

   201     self assert:(t isLocalTimestamp not).

   202     self assert:(t isUtcTimestamp).

   203     self assert:(t isTZTimestamp not).

   204 

   205     self should:[ Timestamp readFrom:'2017-11-09 10:18:03.236+1'] raise:Error.

   206     self should:[ Timestamp readIso8601FormatFrom:'2017-11-09 10:18:03.236+1'] raise:TimeConversionError.

   207     

   208     self assert:(t := Timestamp readFrom:'2017-11-09 10:18:03.236+01') printStringIso8601Format = '2017-11-09T10:18:03.236+01'.

   209     self assert:(t isLocalTimestamp not).

   210     self assert:(t isUtcTimestamp not).

   211     self assert:(t isTZTimestamp).

   212 

   213     "

   214      self new test_01d_ReadingTimeStamps

   215     "

   216 

   217     "Created: / 24-05-2018 / 17:45:08 / Claus Gittinger"