Re: Problem calculating differences

[Luis Rodriguez <luis.rodriguez2@xxxxxxxxx>]

Joe,

As per the V5R3 RPG Reference Manual:

"If you ask for the difference in microseconds between two
timestamps that are more than 32 years 9 months apart, you
will exceed the 15-digit limit for duration values. This
will result in an error or truncation."

Regards,

Luis Rodriguez
--- rpg400-l-request@xxxxxxxxxxxx wrote:
> message: 5
> date: Tue, 29 Apr 2008 11:05:46 -0500
> from: Joe Pluta <>
> subject: Problem calculating differences
>
> Anybody run into this?  I can't get the difference in
> milliseconds or 
> microseconds between today and 01/01/1970:
>
>
>      D TEST            PR                  EXTPGM('TEST')
>
>      D TEST            PI
>
>      D ts              S               z
>      D ts2             S               z
>      D ms              S             30  0
>      D mseconds        S             30  0
>
>       /free
>        ts = %timestamp();
>        ts2 = z'1970-01-01-00.00.00';
>        ms = %diff(ts: ts2: *ms);
>        mseconds = %diff(ts: ts2: *mseconds);
>
>        *inlr = *on;
>        return;
>       /end-free
>                 
> This blows up with RNQ0103 (The target for a numeric
> operation is too 
> small to hold the result) on the first %diff.  Am I
> missing something 
> fundamental?  V5R4, a bit out of date on PTFs.
>
> Joe


Luis Rodriguez

IBM Certified Systems Expert
eServer i5 iSeries Technical Solutions


      ____________________________________________________________________________________
Be a better friend, newshound, and 
know-it-all with Yahoo! Mobile.  Try it now.  http://mobile.yahoo.com/;_ylt=Ahu06i62sR8HDtDypao8Wcj9tAcJ