Re: Numeric to Date Field

[sjones@xxxxxxxxxxxxxx]

Perfect!! 

Thanks to everyone who has replied!!

Steve Jones



From:
James Perkins <jrperkinsjr@xxxxxxxxx>
To:
"RPG programming on the IBM i / System i" <rpg400-l@xxxxxxxxxxxx>
Date:
06/25/2009 01:38 PM
Subject:
Re: Numeric to Date Field
Sent by:
rpg400-l-bounces@xxxxxxxxxxxx



Assuming MRPDate is CYYMMDD and new date is the same format.

newDate = %dec(%date(MRPDate : *cymd) + %days(60) : *cymd);

--
James R. Perkins


On Thu, Jun 25, 2009 at 10:26, <sjones@xxxxxxxxxxxxxx> wrote:

> Our MRP database stores dates in CYYMMDD as numeric.  In the past we did
> this:
>
>     C                   Eval      Date8 = MRPDate
>     C                   Move      Date8         Hthdte
>     C                   Adddur    60:*Days      Hthdte
>     C                   Move      Hthdte        Date8
>     C                   Eval      Newdte = Date8
>
> I have recently been using Free format and can not find a solution using
> free.
>
> I searched the archives & could only find taking a date field to 
numeric,
> not numeric to a date field.
>
> Thanks
>
> Steve Jones
> --
> 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.