Re: ChgJob

Hi Tim,

>       RtvJobA  Date(&Date)
>       ChgJob   Date(&Date)

You're correct, this does absolutely nothing except waste CPU cycles.

> He insisted it was absolutely necessary if I wanted 'UDATE' to reflect
> the job date, rather than the system date. I ran a couple of tests and
> got the same expected results with or without the ChgJob statement.
> (UDATE reflected the job date)

Your co-worker is mistaken.  UDATE is always the job date. It's never the
system date.  (The same is true for *DATE. as well as INZ(*JOB))

If you want the system date instead, you have to use the TIME op-code, or
the %date() BIF, the %timestamp() BIF or INZ(*SYS).

What RPG really needs is another 13 or 14 ways to retrieve the date. :)