Anyone with UTC Conversion routine (OpenInsight 32-Bit)
At 19 SEP 2003 04:26:21AM dsig@sigafoos.org wrote:
As title says .. i am looking for a I/O conversion to format date/time into 'std' UTC (i know .. whose standard
dsig@sigafoos.org
At 23 SEP 2003 03:17AM Steve Smith wrote:
Isn't the format simply 19951231T235959 to express the current GMT?
So something like (for zonehrs=+10 in Melbourne)
REVUTCDATETIME=REVDATE * 86400 + REVTIME - (60 * ZONEHRS)
REVUTCDATE=INT(REVUTCDATETIME/86400)
REVUTCTIME=MOD(REVUTCDATETIME,86400)
ANS=OCONV(REVUTCDATE,'D J'): 'T' : OCONV(REVUTCTIME,'MTS ')
SWAP SPACE(1) WITH "" IN ANS
At 23 SEP 2003 07:20PM Steve Smith wrote:
DSig - Correction (must remember not to post here when half asleep)
Isn't the format simply 19951231T235959 to express the current GMT?
So something like (for zonehrs=+10 in Melbourne)
* calculate the seconds past midnight 1/1/68, allowing for GMT
* difference from your current timezone
REVUTCDATETIME=(REVDATE * 86400) + REVTIME - (3600 * ZONEHRS)
* now split it back into REV format time and date GMT
REVUTCDATE=INT(REVUTCDATETIME/86400)
REVUTCTIME=MOD(REVUTCDATETIME,86400)
* date & time using native REV functions - note spaces as delimiters
ANS=OCONV(REVUTCDATE,'D J'): 'T' : OCONV(REVUTCTIME,'MTS ')
* remove spaces
SWAP SPACE(1) WITH "" IN ANS
At 24 SEP 2003 02:52AM dsig@sigafoos.org wrote:
yeah .. writing it isn't the bit .. if there was one already done then I would use it.
it's called reusable ..
I have worked in places that NIH was the main theme of all the programming staff of course 'It Dont Work' could have also been their main theme
dsig@sigafoos.org