Get Job Date in RPGLE
The %date() built-in function, by itself, will return the System date. The following will return the Job date:
*CALLER and System i Stored Procedures
Activation groups may be the most important concept to understand when creating *PGM and *SRVPGM objects on the System i (AS/400). Get this wrong and you will be chasing your tail for hours trying to figure out why data being returned to you is not what you were expecting.