Just confirmed it - in Excel 02/29/1900 is valid - which it isnt
Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill
-----Original Message-----
From: Alan Shore
Sent: Thursday, September 17, 2015 1:01 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: RPG date functions vs. Excel date functions
I believe it was because 1900 was NOT a leap year
Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill
-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Englander, Douglas
Sent: Thursday, September 17, 2015 12:57 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: RPG date functions vs. Excel date functions
I am reading an excel spreadsheet via RPG (using Scott Klements routines). There is one cell containing the number 40999, which excel interprets as March 31, 2012. The 40999 representing the number of days from January 1, 1900 (January 1, 1900 would be represented as 1).
If I initialize a base date in RPG (a *ISO date field) to December 31, 1899, and add the excel number to it (converted to days), I am expecting to get the date that excel is converting 40999 to (i.e. I would expect RPG to calculate December 31, 1899 + %days(40999) to be March 31, 2012 also). However, no matter how I do it, RPG calculates December 31, 1899 + %days(40999) to be April 1, 2012.
Does anyone have any idea as to why the calculations differ by one day? I trust IBM over Microsoft, and would take the April 1, 2012 date, but I would like to know why the two dates are calculated differently.
Thank you,
Doug
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
midrange.com
