Re: 00:00:00 or 24:00:00

Joep,

If I run 12:00a through a test program, I get 24:00.

Here's the code:

d tijd s 10a inz('12:00a')
d c_p c 'P'
d c_pm c ' PM'
d c_am c ' AM'
d timupd s 6p 0 inz

/copy qrpglecpy,prattribs
/copy qrpglecpy,prqc2le
/free

Reset tijd;
If %subst(tijd:6:1) = c_p;
%subst(tijd:6) = c_pm;
Else;
%subst(tijd:6) = c_am;
EndIf;
timupd = atoi(%char(%time(tijd:*usa):*iso0));

*inlr = *on;
Return;

/end-free

When debugging, the field timupd is set to 240000.

So if I combine this with the date of 20000101, it seems to point to midnight between 1 and 2 January 2000.

When initializing the tijd field to '12:01a', I get (as expected) a value of 000100 in the timupd field.

Very strange to understand, though.

Peter Colpaert
Application Developer
PLI - IT - Kontich, Belgium
-----
Yoda of Borg are we. Futile is resistance, assimilated will you be.
-----