RE: Year 300 bug in ILE RPG or ...? (Again)

["Jon Erickson" <jonerickson@xxxxxxxxxxxxxxxxxxxx>]

True, but those examples deal with adding/subtracting months.  I tried
Vanya's test except I initialized my first *ISO date to '0001-03-01' added
X:*Y (X =  1 to 9998) to a TempDate (*USA) subtracted one day.  Then
Extracted (extrct) the day, (LastFebDay) from TempDate, If LastFebDay = 29,
then print TempDate as a LeapYear.  Mine also failed...  when I dumped it,
the variables showed the following values:

TempDate = '02/29/0300'
LastFebDay = 28

I don't think Vanya or I have made any mistakes,.. something funny is going
on here!!

Regards,
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Jon A. Erickson
Viking Industries, Inc.
http://www.vikingindustries.com
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
[[ JONERI~1.VCF : 4147 in winmail.dat ]]

> -----Original Message-----
> From: owner-rpg400-l@midrange.com [mailto:carolg@tbsa.co.za] On
> Behalf Of Carol Godfrey
> Sent: Monday, May 25, 1998 12:18 AM
> To:   'RPG400-L@midrange.com'
> Subject:      RE: Year 300 bug in ILE RPG or ...?  (Again)
>
> ADDDUR & SUBDUR can cause unexpected results - they even give
> examples in the reference manual


* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *