Author: jacobdng
Posted: Fri Dec 23, 2016 10:09 am (GMT 5.5)
It's my bad.
As Abid addressed, I have to add an identifier in addition to add "80:X" so that the JCL can be successfully submitted.
The modified JCL symbol:
Thanks for your attention.
Jacob
Posted: Fri Dec 23, 2016 10:09 am (GMT 5.5)
It's my bad.
As Abid addressed, I have to add an identifier in addition to add "80:X" so that the JCL can be successfully submitted.
The modified JCL symbol:
| Code: |
| //STEP1 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //SYMNAMES DD * NEXT-BUSINESS-DATE,C'20161221' //X0 DD DSN=&&X0,DISP=(,PASS),SPACE=(TRK,(200,60)),UNIT=SYSDA //SYM DD DSN=&&CNST,DISP=(,PASS),SPACE=(TRK,(5,5)),UNIT=SYSDA //IN DD * AAAA //TOOLIN DD * COPY FROM(IN) TO(SYM) USING(CTR1) //CTR1CNTL DD * * OUTFIL BUILD=(NEXT-BUSINESS-DATE,80:X) OUTFIL BUILD=(C'TEST-YYMM,',NEXT-BUSINESS-DATE,80:X) /* //STEP2 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //SYMNAMES DD DSN=&&CNST,DISP=SHR //T0 DD DSN=&&T0,DISP=(,PASS),SPACE=(TRK,(200,60)),UNIT=SYSDA //VSAMF DD * AAA /* //TOOLIN DD * COPY FROM(VSAMF) TO(T0) // |
Thanks for your attention.
Jacob