Re: Eliminating MOVE (was Milliseconds)

["Michael Naughton" <mnaughton@xxxxxxxxxxxx>]

I had tried that, but I keep getting a compile error:

*RNF0325 30      1 The parameter for %INT or %INTH is not valid.

Is this because I'm on V5R1?

RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> writes:
>> Out of curiosity, is there a way to eliminate the MOVE in the following
>> code:
>[SNIP]
>> C                   move      IsoDate       Date8
>
>Sure...  this works without the MOVE op-code and without /free.   I
>also replaced the ADDDUR, since I prefer the "extended factor 2" type
>operations:
>
>    D Date8           s              8  0 inz(20031231)
>    D IsoDate         s               D
>
>    c                   eval      IsoDate = %date(Date8:*iso)
>    c                   eval      IsoDate = IsoDate + %days(1)
>    c                   eval      Date8 = %int(%char(IsoDate:*iso0))


Mike Naughton
Senior Programmer/Analyst
Judd Wire, Inc.
124 Turnpike Road
Turners Falls, MA  01376
413-863-4357 x444
mnaughton@xxxxxxxxxxxx