Comments on: What date is returned after midnight rollover on AS/400 job queue?

By: canuhp

canuhp — Thu, 21 Oct 2010 11:55:25 +0000

Great Tom, thanks!

By: tomliotta

tomliotta — Wed, 20 Oct 2010 23:28:11 +0000

Just to test results, I submitted a trivial CL program that did DLYJOB until 1:15 AM, retrieved all three dates, and ran DMPCLPGM.

&CYMDDATE                *CHAR            7       '1101019'             
&DATE                    *CHAR            6       '101910'              
&DATETIME                *CHAR           20       '20101020011500007984'

The first two values show the "job date" of Oct 19, 2010. The timestamp shows "current" date/time with Oct 20, 2010, for the date. So, you get a choice. Tom

By: canuhp

canuhp — Wed, 20 Oct 2010 14:24:04 +0000

Thanks so much for the help!!

By: tomliotta

tomliotta — Wed, 20 Oct 2010 01:23:30 +0000

IIRC, the DATE() and CYMDDATE() parameters will return the job date, while DATETIME() returns current date. That is, the date from either of the first two parameters can be different from the date from the third parameter.

Job date is set at the moment that the job starts; it doesn’t change while the job runs even past midnight.

Current date changes at midnight.

If your job starts to run at 10:30 PM on Oct 19, 2010, and continues running for five hours, the job date will still be 10/19/2010 while the job is ending. But the current date will have changed to 10/20/2010.

RTVJOBA DATE(&date) will return the date from before midnight if the job started before midnight.

If the job simply was stuck on a job queue until after midnight and then it started, it will get the date after midnight.

Tom

By: canuhp

canuhp — Tue, 19 Oct 2010 17:26:12 +0000

Don’t need to get the time it entered the system, just need to know which it will return. If returns the date prior to midnight that is good. If it returns the date after midnight then I need to move it back a day. At month end this becomes a critical question.