Date manipulation: Difference between revisions

no edit summary
(Added FreeBASIC)
No edit summary
Line 2,346:
<pre>March 8 2009 8:30AM EST
2009-03-08T13:30:00+00:00</pre>
 
=={{header|SQL}}==
{{works with|Oracle}}
<lang sql>
-- March 7 2009 7:30pm EST
 
select
TO_TIMESTAMP_TZ(
'March 7 2009 7:30pm EST',
'MONTH DD YYYY HH:MIAM TZR'
)
at time zone 'US/Eastern' orig_dt_time
from dual;
 
-- 12 hours later DST change
 
select
(TO_TIMESTAMP_TZ(
'March 7 2009 7:30pm EST',
'MONTH DD YYYY HH:MIAM TZR'
)+
INTERVAL '12' HOUR)
at time zone 'US/Eastern' plus_12_dst
from dual;
 
-- 12 hours later no DST change
-- Arizona time, always MST
 
select
(TO_TIMESTAMP_TZ(
'March 7 2009 7:30pm EST',
'MONTH DD YYYY HH:MIAM TZR'
)+
INTERVAL '12' HOUR)
at time zone 'US/Arizona' plus_12_nodst
from dual;
</lang>
 
<pre>
SQL> SQL> SQL> SQL> SQL> 2 3 4 5 6 7
ORIG_DT_TIME
---------------------------------------------------------------------------
07-MAR-09 07.30.00.000000000 PM US/EASTERN
 
SQL> SQL> SQL> SQL> 2 3 4 5 6 7 8
PLUS_12_DST
---------------------------------------------------------------------------
08-MAR-09 08.30.00.000000000 AM US/EASTERN
 
SQL> SQL> SQL> SQL> SQL> 2 3 4 5 6 7 8
PLUS_12_NODST
---------------------------------------------------------------------------
08-MAR-09 05.30.00.000000000 AM US/ARIZONA
</pre>
 
=={{header|Tcl}}==