z/OS Job Control Language › Assembling and Link Editing ETOTTBL

Assembling and Link Editing ETOTTBL

Use the JCL below to assemble and link edit ETOTTBL.

ETOTTBL z/OS

//ASM      EXEC PGM=IEUASM,PARM='NOLOAD,DECK'
//SYSPRINT DD  SYSOUT=A
//SYSLIB   DD  DSN=yourHLQ.CAGJMAC,DISP=SHR
//         DD  DSN=zOS.maclib,DISP=SHR
//         DD  DSN=cics.maclib,DISP=SHR
//SYSUT1   DD  UNIT=disk,SPACE=(CYL,(2,2))
//SYSUT2   DD  UNIT=disk,SPACE=(CYL,(2,2))
//SYSUT3   DD  UNIT=disk,SPACE=(CYL,(2,2))
//SYSPUNCH DD  DSN=&.&ETOTTBL.,UNIT=disk,SPACE=(80,(200,50)),
//             DISP=(NEW,PASS)
//SYSIN    DD  DSN=user.etottbl,DISP=SHR
/*
//LINKEDIT EXEC PGM=HEWL,PARM=(XREF,LET,LIST),REGION=256K
//SYSPRINT DD  SYSOUT=A
//SYSUT1   DD  UNIT=disk,SPACE=(CYL,(2,2))
//SYSLMOD  DD  DSN=idms.loadlib,DISP=SHR
//SYSLIN   DD  DSN=&.&ETOTTBL.,DISP=(OLD,DELETE)
//         DD  DDname=SYSIN
//SYSIN    DD  *
 NAME etottbl(R)
/*