136 self assert:(t := Timestamp readFrom:'March 7 2009 2:30pm ' format:'%monthName %day %year %u:%m%a' language:#en onError:[self error] |
136 self assert:(t := Timestamp readFrom:'March 7 2009 2:30pm ' format:'%monthName %day %year %u:%m%a' language:#en onError:[self error] |
137 ) = (Timestamp year:2009 month:3 day:7 hour:14 minute:30 second:0 millisecond:0). "/ EST is 5hrs behind |
137 ) = (Timestamp year:2009 month:3 day:7 hour:14 minute:30 second:0 millisecond:0). "/ EST is 5hrs behind |
138 self assert:(t := Timestamp readFrom:'March 7 2009 2:30am ' format:'%monthName %day %year %u:%m%a' language:#en onError:[self error] |
138 self assert:(t := Timestamp readFrom:'March 7 2009 2:30am ' format:'%monthName %day %year %u:%m%a' language:#en onError:[self error] |
139 ) = (Timestamp year:2009 month:3 day:7 hour:2 minute:30 second:0 millisecond:0). "/ EST is 5hrs behind |
139 ) = (Timestamp year:2009 month:3 day:7 hour:2 minute:30 second:0 millisecond:0). "/ EST is 5hrs behind |
140 |
140 |
141 self assert:(t := Timestamp readFrom:'March 7 2009 2:30pm EST' format:'%monthName %day %year %u:%m%a %tz' language:#en onError:[self error] |
141 "/ Timestamp readIso8601FormatFrom:'20090307T183000-05' |
142 ) = (UtcTimestamp year:2009 month:3 day:7 hour:19 minute:30 second:0 millisecond:0). "/ EST is 5hrs behind |
142 "/ Timestamp readIso8601FormatFrom:'20090307T233000Z' |
|
143 self assert:(t := Timestamp readFrom:'March 7 2009 6:30pm EST' format:'%monthName %day %year %u:%m%a %tz' language:#en onError:[self error] |
|
144 ) = (UtcTimestamp year:2009 month:3 day:7 hour:23 minute:30 second:0 millisecond:0). "/ EST is 5hrs behind |
143 |
145 |
144 self assert:(t := Timestamp readFrom:'March 7 2009 7:30pm UTC' format:'%monthName %day %year %u:%m%a %tz' language:#en onError:[self error] |
146 self assert:(t := Timestamp readFrom:'March 7 2009 7:30pm UTC' format:'%monthName %day %year %u:%m%a %tz' language:#en onError:[self error] |
145 ) = (Timestamp year:2009 month:3 day:7 hour:19 minute:30 second:0 millisecond:0). |
147 ) = (UtcTimestamp year:2009 month:3 day:7 hour:19 minute:30 second:0 millisecond:0). |
146 |
148 |
147 self assert:(t := Timestamp readFrom:'2015103' format:'%4y%3dayOfYear' onError:[self error] |
149 self assert:(t := Timestamp readFrom:'2015103' format:'%4y%3dayOfYear' onError:[self error] |
148 ) = (Timestamp year:2015 month:3 day:10 hour:0 minute:0 second:0 millisecond:0). |
150 ) = (Timestamp year:2015 month:4 day:13 hour:0 minute:0 second:0 millisecond:0). |
|
151 self assert:t asDate dayOfYear == 103. |
149 |
152 |
150 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.999' format:'%day-%month-%year %h:%m:%s.%i' language:nil onError:[self error] |
153 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.999' format:'%day-%month-%year %h:%m:%s.%i' language:nil onError:[self error] |
151 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:999). |
154 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:999). |
152 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.100' format:'%day-%month-%year %h:%m:%s.%i' language:nil onError:[self error] |
155 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.100' format:'%day-%month-%year %h:%m:%s.%i' language:nil onError:[self error] |
153 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:100). |
156 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:100). |
154 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.010' format:'%day-%month-%year %h:%m:%s.%i' language:nil onError:[self error] |
157 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.010' format:'%day-%month-%year %h:%m:%s.%i' language:nil onError:[self error] |
155 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:100). |
158 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:10). |
156 |
159 |
157 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.1' format:'%day-%month-%year %h:%m:%s.%f' language:nil onError:[self error] |
160 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.1' format:'%day-%month-%year %h:%m:%s.%f' language:nil onError:[self error] |
158 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:100). |
161 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:100). |
159 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.01' format:'%day-%month-%year %h:%m:%s.%f' language:nil onError:[self error] |
162 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.01' format:'%day-%month-%year %h:%m:%s.%f' language:nil onError:[self error] |
160 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:10). |
163 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:10). |
161 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.001' format:'%day-%month-%year %h:%m:%s.%f' language:nil onError:[self error] |
164 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.001' format:'%day-%month-%year %h:%m:%s.%f' language:nil onError:[self error] |
162 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:1). |
165 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 millisecond:1). |
|
166 |
163 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.12345' format:'%day-%month-%year %h:%m:%s.%f' language:nil onError:[self error] |
167 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.12345' format:'%day-%month-%year %h:%m:%s.%f' language:nil onError:[self error] |
|
168 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 microsecond:123000). |
|
169 |
|
170 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.12345' format:'%day-%month-%year %h:%m:%s.%F' language:nil onError:[self error] |
164 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 microsecond:123450). |
171 ) = (Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6 microsecond:123450). |
|
172 |
|
173 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.12345678' format:'%day-%month-%year %h:%m:%s.%F' language:nil onError:[self error] |
|
174 ) = ((Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6)+123456780 nanoseconds). |
|
175 |
|
176 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.123456' format:'%day-%month-%year %h:%m:%s.%F' language:nil onError:[self error] |
|
177 ) = ((Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6)+123456 microseconds). |
|
178 |
|
179 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.123456789' format:'%day-%month-%year %h:%m:%s.%F' language:nil onError:[self error] |
|
180 ) = ((Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6)+123456789 nanoseconds). |
|
181 |
|
182 self assert:(t := Timestamp readFrom:'20-2-1995 13:11:06.123456789012' format:'%day-%month-%year %h:%m:%s.%F' language:nil onError:[self error] |
|
183 ) = ((Timestamp year:1995 month:2 day:20 hour:13 minute:11 second:6)+123456789012 picoseconds). |
165 |
184 |
166 " |
185 " |
167 self new test_01c_ReadingTimeStamps |
186 self new test_01c_ReadingTimeStamps |
168 " |
187 " |
169 |
188 |