Using Auxiliary Disposition › Real-time Auxiliary Disposition › Job Control Statements

Job Control Statements

In the following example, in-stream TMSDISP control statements are used:

//STEP1    EXEC PGM=CUTATAPE
//INPUT    DD  DSN=INPUT.DATA.SET.NAME,
//             DISP=SHR
//OUTPUT   DD  DSN=OUTPUT.DATA.SET.NAME,
//             DISP=(NEW,KEEP),UNIT=TAPE
//REPORT   DD  SYSOUT=A
//TMSDISP  DD  *
Auxiliary Disposition control statements here
/*
//

The following JCL references a fixed block, 80-byte, sequential data set:

//STEP1    EXEC PGM=CUTATAPE
//INPUT    DD  DSN=INPUT.DATA.SET.NAME,
//             DISP=SHR
//OUTPUT   DD  DSN=OUTPUT.DATA.SET.NAME,
//             DISP=(NEW,KEEP),UNIT=TAPE
//REPORT   DD  SYSOUT=A
//TMSDISP  DD  DSN=CAI.CA1.AUXDISP,
//             DISP=SHR
//

The JCL can also reference Auxiliary Disposition control statements in a PDS member:

//STEP1    EXEC PGM=CUTATAPE
//INPUT    DD  DSN=INPUT.DATA.SET.NAME,
//             DISP=SHR
//OUTPUT   DD  DSN=OUTPUT.DATA.SET.NAME,
//             DISP=(NEW,KEEP),UNIT=TAPE
//REPORT   DD  SYSOUT=A
//TMSDISP  DD  DSN=CAI.CA1.AUXDISP(PAYMASTR),
//             DISP=SHR
//