RE: 3 Months Ago?

RTFM....

"When subtracting a duration in months from a date, the general rule is that the
month portion is decreased by the number of months in the duration, and the day
portion is unchanged. The exception to this is when the resulting day portion
would exceed the actual number of days in the resulting month. In this case, the
resulting day portion is adjusted to the actual month end date."

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Brian Piotrowski
Sent: Thursday, May 17, 2007 8:46 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: 3 Months Ago?

Isn't RPG intuitive enough to figure out that if the current
month ends in 31 and the previous month (whatever that
happens to be) is <> 31 to just go the previous day closest to it?

I certainly would hope so. God forbid I have to program some
ridiculous function to do that when practically every other
language can handle it.

Oy vey...

/b;

-----Original Message-----
From: Scott Klement [mailto:rpg400-l@xxxxxxxxxxxxxxxx]
Sent: Thursday, May 17, 2007 2:29 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: 3 Months Ago?

Simple? Yes and no... just wait until it's May 29th and you
try to find

out what the date was 3 months ago.

Captain Jerry wrote:

So simple. Thanks Bob & Scott

--
This is the RPG programming on the AS400 / 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.



--
This is the RPG programming on the AS400 / 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.

This e-mail transmission contains information that is intended to be
confidential and privileged. If you receive this e-mail and you are not a
named addressee you are hereby notified that you are not authorized to read,
print, retain, copy or disseminate this communication without the consent of
the sender and that doing so is prohibited and may be unlawful. Please reply
to the message immediately by informing the sender that the message was
misdirected. After replying, please delete and otherwise erase it and any
attachments from your computer system. Your assistance in correcting this
error is appreciated.