ODATE, RDATE and DATE Usage

//PDPA0001 JOB (......),BILL,CLASS=A
//STEP01 EXEC PDUPDATE
//SYSIN DD *
010606

The original JCL:

//PDPA0001 JOB (......),BILL,CLASS=A

....

//STEP02 EXEC PDPRINT,BUSDATE=%%ODATE

//SYSIN DD *

EXAMPLE-RDATE=%%RDATE

EXAMPLE-DATE=%%DATE

On July 24th, we need to run the 22nd, 23rd, and 24th (of the same job) because of delays. On the Active Jobs file we can find three job orders:

PDPA0001 of 010722
PDPA0001 of 010723

PDPA0001 of 010724

The job of the 22nd is submitted on July 24th at 2300. The result is:

//PDPA0001 JOB (......),BILL,CLASS=A
....
//STEP02 EXEC PDPRINT,BUSDATE=010722
//SYSIN DD *
EXAMPLE-RDATE=010724
EXAMPLE-DATE=010724

The job of the 23rd is submitted on July 25th at 0025. The result is:

//PDPA0001 JOB (......),BILL,CLASS=A
....
//STEP02 EXEC PDPRINT,BUSDATE=000723
//SYSIN DD *
EXAMPLE-RDATE=010724
EXAMPLE-DATE=010725

The job of the 24th is submitted on July 25th, 2001 at 0300. The result is:

//PDPA0001 JOB (......),BILL,CLASS=A
....
//STEP02 EXEC PDPRINT,BUSDATE=000724
//SYSIN DD *
EXAMPLE-RDATE=010724
EXAMPLE-DATE=010725