|
|
|
|
|
The original JCL:
//PDPA0001 JOB (......),BILL,CLASS=A |
//* %%LIBSYM CTM.LIB.SYMBOLS %%MEMSYM LBUSMON |
//STEP02 EXEC PDPRT3 |
//* + + + + |
//SYSIN DD * |
%%LAST_BUSINESS_DATE_IN_%%OMONTH REPORT1 |
// |
The constant REPORT must be in column 40.
The submitted JCL:
//PDPA0001 JOB (......),BILL,CLASS=A |
//* %%LIBSYM CTM.LIB.SYMBOLS %%MEMSYM LBUSMON |
//STEP02 EXEC PDPRT3 |
//* + + + + |
//SYSIN DD * |
030400 REPORT1 |
// |
The correct solution:
//PDPA0001 JOB (......),BILL,CLASS=A |
//* %%LIBSYM CTM.LIB.SYMBOLS %%MEMSYM LBUSMON |
//STEP02 EXEC PDPRT3 |
//* + + + + |
//* %%RANGE 1 39 |
//SYSIN DD * |
%%LAST_BUSINESS_DATE_IN_%%OMONTH REPORT1 |
// |
Parent Topic |