Hi Colin, Here is a working example: //STEP001 EXEC ASMACL //C.SYSIN DD * TEST CSECT END //GO EXEC PGM=IEFBR14 //STEPLIB DD DISP=SHR,DSN=*.STEP001.L.SYSLMOD
Here is SYS1.PROCLB(ASMACL) //ASMACL PROC //C EXEC PGM=ASMA90 //* //SYSLIB DD DSN=SYS1.MACLIB,DISP=SHR //SYSUT1 DD DSN=&&SYSUT1,SPACE=(16384,(120,120),,,ROUND), // UNIT=SYSALLDA,BUFNO=1 //SYSPRINT DD SYSOUT=* //SYSLIN DD DSN=&&OBJ,SPACE=(3040,(40,40),,,ROUND), // UNIT=SYSALLDA,DISP=(MOD,PASS), // BLKSIZE=3040,LRECL=80,RECFM=FB,BUFNO=1 //* //L EXEC PGM=HEWL,PARM='MAP,LET,LIST,NCAL',COND=(8,LT,C) //* //SYSLIN DD DSN=&&OBJ,DISP=(OLD,DELETE) // DD DDNAME=SYSIN //SYSLMOD DD DISP=(,PASS),UNIT=SYSALLDA,SPACE=(CYL,(1,1,1)), // DSN=&&GOSET(GO) //SYSUT1 DD DSN=&&SYSUT1,SPACE=(1024,(120,120),,,ROUND), // UNIT=SYSALLDA,BUFNO=1 //SYSPRINT DD SYSOUT=* //* Regards, David On 2021-09-09 04:56, Colin Paice wrote:
I have a JCL procedure CCPROC which invokes PROC=EDCCB. PROC=EDCCB has two steps compile and bind. Bind puts the output in SYSLMOD. I would now like to refer the the SYSLMOD data set elsewhere, for example //LIST EXEC PROC=CCPROC //EXEC PGM=MYPROG //STEPLIB DD DSN=*.??.SYSLMOD The doc says **.stepname.procstepname.ddname* *Stepname is the name of this job step or an earlier job step that calls the procedure, procstepname is the name of the procedure step that contains the DD statement, and ddname is the name of the DD statement.* DSN=*.LIST.EDCCB.SYSLMOD, DSN=*.LIST.CCPROC.SYSLMOD and DSN=*.LIST.BIND.SYSLMOD all give a JCL error. Is this possible? I can do it using symbols, so I don't need a solution - I was just curious. Colin ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN .
---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
