How to Obtain Date Formats

How to Obtain Date Formats – 3

Format ddmmmyy (where mmm is the month in character format):

According to the preceding example, we might try the following original JCL:

//PDPA0001  JOB  (......),BILL,CLASS=A
//* %%GLOBAL CHARMON
//STEP02   EXEC PDPRT3
//SYSIN    DD   *
%%ODAY.%%MONTH_IN_CHAR_%%OMONTH.%%OYEAR

Variable substitution by stages would proceed as follows:

%%ODAY %%MONTH_IN_CHAR_%%OMONTH.00
%%ODAY %%MONTH_IN_CHAR_06.00

%%ODAY %%MONTH_IN_CHAR_0600

However, this results in the following error: Symbol %%MONTH_IN_CHAR_0600 is not resolved.

This error would not have occurred had we tried the following original JCL:

//PDPA0001  JOB  (......),BILL,CLASS=A
//* %%GLOBAL CHARMON
//* %%SET %%A=%%MONTH_IN_CHAR_%%OMONTH
//STEP02   EXEC PDPRT3
//SYSIN    DD   *
%%ODAY.%%A.%%OYEAR

Parent Topic

Examples for JCL Setup and AutoEdit