Re: Bug in IBM Date Routies %month

["Raul A. Jager W." <raul@xxxxxxxxxx>]

Add 1 day, add 1 month, substrct 1 day  ---> last day each month.

nextlastday = ((lastday + %days(1)) + %months(1)) - %days(1);

Bob Cozzi wrote:

> Exactly, if you want the end of the month, you should use the
> GetEndOfMonth() procedure in RPG xTools, or simply right a short 2 or 3 line
> routine to do the same kind of thing.
> -Bob
>
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of Douglas Handy
> Sent: Monday, March 27, 2006 3:27 PM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: Bug in IBM Date Routies %month
>
> Praveen,
>
> Shouldn't it be 2006-03-31 both the times.
>
>
> No, it is working as designed.  Refer to the manual for %Months(), which
> says in part:
>
> "In most cases, the result of adding or subtracting a given number of
> months is
> obvious. For example, 2000-03-15 + %MONTHS(1) is 2000-04-15. If the addition
> or
> subtraction would produce a nonexistent date (for example, February 30), the
> last
> day of the month is used instead.
>
> Adding or subtracting a number of months to the 29th, 30th, or 31st day of a
> month may not be reversible. For example, 2000-03-31 + %MONTHS(1) -
> %MONTHS(1) is 2000-03-30"
>
> So when you add one month to 1/31, you get 2/28, then add another month and
> get 3/28.
>
> Working as designed.
>
> Doug
>