Re: Re: Calculate the 20th of next month

It should work the way the current BIF works, He is just asking about a
different version of it.



From:
Jeff Crosby <jlcrosby@xxxxxxxxxxxxxxxx>
To:
"RPG programming on the IBM i / System i" <rpg400-l@xxxxxxxxxxxx>
Date:
10/06/2009 08:50 AM
Subject:
Re: Re: Calculate the 20th of next month
Sent by:
<rpg400-l-bounces@xxxxxxxxxxxx>



Or this scenario:

mydatefield = %date(20091031:*ISO)
%month(mydatefield) +=1;

Now what's in mydatefield? 2009-12-01?



On Tue, Oct 6, 2009 at 9:00 AM, Anwendungsentwicklung <
Anwendungsentwicklung@xxxxxxxxxxxxxxxxxxxx> wrote:

And how does it work in december?
%month(mydatefield) = 12 --> += 1 ??? --> 13 ???
Or will it work correctly?

Susanne Finger




-----Ursprüngliche Nachricht-----
Von: rob@xxxxxxxxx [mailto:rob@xxxxxxxxx]
Gesendet: Dienstag, 6. Oktober 2009 14:43
An: RPG programming on the IBM i / System i
Betreff: Re: Calculate the 20th of next month

Anyone thought of submitting a DCR to be able to assign a date portion
from the left side of the equation? Like,
%month(mydatefield) +=1;
%day(mydatefield) = 20;

Does anything else think that
SomeDays = subdt(mydatefield:*days);
is more cryptic than
SomeDays = %day(mydatefield);

Or are they afraid that you'll get confused between %day and the
existing
%days as in
dueDate = SellDate + %days(TermDays);



Rob Berendt
--
Group Dekko Services, LLC
Dept 01.073
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com

--
This is the RPG programming on the IBM i / System i (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 IBM i / System i (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.