Shown below are sample JCLs used for the exercises in this guide, according to chapter and job. The samples indicate how the JCL appears at the time of preparation. They do not indicate changes made during the course of the exercises. It may be necessary to customize some of these JCLs, particularly when names, such as a site-defined library name, must be specified.
Chapter 1
JOB1
Copy
EDIT CTMP.JCL(M21JOB1) - 01.05 Columns 00001 00072
****** ***************************** Top of Data ******************************
000001 //M21 JOB APERLMAN,CLASS=A,
000002 // MSGCLASS=X,NOTIFY=M21
000003 //S1 EXEC PGM=IEFBR14
****** **************************** Bottom of Data ****************************JOB2
Copy
EDIT CTMP.JCL(M21JOB2) - 01.00 Columns 00001 00072
****** ***************************** Top of Data ******************************
000001 //M21 JOB APERLMAN,CLASS=A,
000002 // MSGCLASS=X,NOTIFY=M21
000003 //S1 EXEC PGM=IEFBR14
****** **************************** Bottom of Data ****************************Chapter 2
JOB3
Copy
EDIT CTMP.JCL(M21JOB3) - 01.03 Columns 00001 00072
****** ***************************** Top of Data ******************************
000100 //M21 JOB ,'A.PERLMAN',CLASS=A,MSGCLASS=X,NOTIFY=M21
001400 //S1 EXEC PGM=IOATEST,PARM='TERM=C0008'
001500 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
001600 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
001700 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
001800 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
001900 //DALOG DD DISP=SHR,DSN=IOAP.LOG
002000 //SYSPRINT DD SYSOUT=*
****** **************************** Bottom of Data ****************************JOB4
Copy
EDIT CTMP.JCL(M21JOB4) - 01.00 Columns 00001 00072
****** ***************************** Top of Data ******************************
000001 //M21 JOB APERLMAN,CLASS=A,
000002 // MSGCLASS=X,NOTIFY=M21
000003 //S1 EXEC PGM=IEFBR14
****** **************************** Bottom of Data ****************************Chapter 3
JOB5
Copy
EDIT CTMP.JCL(M21JOB5) - 01.09 Columns 00001 00072
****** ***************************** Top of Data ******************************
000001 //M21 JOB ,'A.PERLMAN',CLASS=A,MSGCLASS=X,NOTIFY=M21
000002 //S1 EXEC PGM=IOATEST,PARM='TERM=C0000'
000003 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000004 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000005 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000006 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000007 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000008 //SYSPRINT DD SYSOUT=*
000009 //S2 EXEC PGM=IOATEST,PARM='TERM=C0000'
000010 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000011 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000012 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000013 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000014 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000015 //SYSPRINT DD SYSOUT=*
000016 //S3 EXEC PGM=IOATEST,PARM='TERM=C0008'
000017 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000018 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000019 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000020 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000021 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000022 //SYSPRINT DD SYSOUT=*
000023 //S4 EXEC PGM=IOATEST,PARM='TERM=C0000'
000024 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000025 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000026 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000027 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000028 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000029 //SYSPRINT DD SYSOUT=*
000030 //S5 EXEC PGM=IOATEST,PARM='TERM=C0000'
000031 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000032 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000033 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000034 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000035 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000036 //SYSPRINT DD SYSOUT=*
****** **************************** Bottom of Data ****************************Chapter 4
JOB1
Copy
EDIT CTMP.JCL(M21JOB1) - 01.05 Columns 00001 00072
****** ***************************** Top of Data ******************************
000001 //M21 JOB APERLMAN,CLASS=A,
000002 // MSGCLASS=X,NOTIFY=M21
000003 //S1 EXEC PGM=IEFBR14
****** **************************** Bottom of Data ****************************JOB2
Copy
EDIT CTMP.JCL(M21JOB2) - 01.00 Columns 00001 00072
****** ***************************** Top of Data ******************************
000001 //M21 JOB APERLMAN,CLASS=A,
000002 // MSGCLASS=X,NOTIFY=M21
000003 //S1 EXEC PGM=IEFBR14
****** **************************** Bottom of Data ****************************JOB3
Copy
EDIT CTMP.JCL(M21JOB3) - 01.03 Columns 00001 00072
****** ***************************** Top of Data ******************************
000100 //M21 JOB ,'A.PERLMAN',CLASS=A,MSGCLASS=X,NOTIFY=M21
001400 //S1 EXEC PGM=IOATEST,PARM='TERM=C0000'
001500 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
001600 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
001700 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
001800 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
001900 //DALOG DD DISP=SHR,DSN=IOAP.LOG
002000 //SYSPRINT DD SYSOUT=*
****** **************************** Bottom of Data ****************************JOB4
Copy
EDIT CTMP.JCL(M21JOB4) - 01.00 Columns 00001 00072
****** ***************************** Top of Data ******************************
000001 //M21 JOB APERLMAN,CLASS=A,
000002 // MSGCLASS=X,NOTIFY=M21
000003 //S1 EXEC PGM=IEFBR14
****** **************************** Bottom of Data ****************************JOB5
Copy
EDIT CTMP.JCL(M21JOB5) - 01.09 Columns 00001 00072
****** ***************************** Top of Data ******************************
000001 //M21 JOB ,'A.PERLMAN',CLASS=A,MSGCLASS=X,NOTIFY=M21
000002 //S1 EXEC PGM=IOATEST,PARM='TERM=C0000'
000003 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000004 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000005 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000006 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000007 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000008 //SYSPRINT DD SYSOUT=*
000009 //S2 EXEC PGM=IOATEST,PARM='TERM=C0000'
000010 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000011 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000012 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000013 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000014 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000015 //SYSPRINT DD SYSOUT=*
000016 //S3 EXEC PGM=IOATEST,PARM='TERM=C0008'
000017 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000018 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000019 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000020 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000021 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000022 //SYSPRINT DD SYSOUT=*
000023 //S4 EXEC PGM=IOATEST,PARM='TERM=C0000'
000024 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000025 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000026 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000027 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000028 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000029 //SYSPRINT DD SYSOUT=*
000030 //S5 EXEC PGM=IOATEST,PARM='TERM=C0000'
000031 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000032 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000033 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000034 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000035 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000036 //SYSPRINT DD SYSOUT=*
****** **************************** Bottom of Data ****************************Chapter 6
JOB3
Copy
DIT CTMP.JCL(M21JOB3) - 01.03 Columns 00001 00072
****** ***************************** Top of Data ******************************
000100 //M21 JOB ,'A.PERLMAN',CLASS=A,MSGCLASS=X,NOTIFY=M21
001400 //S1 EXEC PGM=IOATEST,PARM='TERM=C0008'
001500 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
001600 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
001700 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
001800 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
001900 //DALOG DD DISP=SHR,DSN=IOAP.LOG
002000 //SYSPRINT DD SYSOUT=*
****** **************************** Bottom of Data ****************************JOB5
Copy
EDIT CTMP.JCL(M21JOB5) - 01.09 Columns 00001 00072
****** ***************************** Top of Data ******************************
000001 //M21 JOB ,'A.PERLMAN',CLASS=A,MSGCLASS=X,NOTIFY=M21
000002 //S1 EXEC PGM=IOATEST,PARM='TERM=C0000'
000003 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000004 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000005 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000006 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000007 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000008 //SYSPRINT DD SYSOUT=*
000009 //S2 EXEC PGM=IOATEST,PARM='TERM=C0000'
000010 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000011 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000012 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000013 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000014 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000015 //SYSPRINT DD SYSOUT=*
000016 //S3 EXEC PGM=IOATEST,PARM='TERM=C0000'
000017 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000018 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000019 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000020 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000021 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000022 //SYSPRINT DD SYSOUT=*
000023 //S4 EXEC PGM=IOATEST,PARM='TERM=C0000'
000024 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000025 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000026 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000027 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000028 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000029 //SYSPRINT DD SYSOUT=*
000030 //S5 EXEC PGM=IOATEST,PARM='TERM=C0000'
000031 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000032 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000033 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000034 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000035 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000036 //SYSPRINT DD SYSOUT=*
****** **************************** Bottom of Data ****************************Chapter 7
No special preparations required.
Chapter 8
JOB10
Copy
EDIT CTMP.JCL(M21JOB10) - 01.00 Columns 00001 00072
****** ***************************** Top of Data ******************************
000001 //M21 JOB APERLMAN,CLASS=A,
000002 // MSGCLASS=X,NOTIFY=M21
000003 //S1 EXEC PGM=IEFBR14
****** **************************** Bottom of Data ****************************EXT1
Copy
EDIT CTMP.JCL(M21EXT1) - 01.09 Columns 00001 00072
****** ***************************** Top of Data ******************************
000001 //M21 JOB ,'A.PERLMAN',CLASS=A,MSGCLASS=X,NOTIFY=M21
000002 //S1 EXEC PGM=IOATEST,PARM='TERM=C0000'
000003 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000004 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000005 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000006 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000007 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000008 //SYSPRINT DD SYSOUT=*
000009 //S2 EXEC PGM=IOATEST,PARM='TERM=C0000'
000010 //STEPLIB DD DSN=IOAP.LOAD,DISP=SHR
000011 // DD DISP=SHR,DSN=SCM.DEV.I600.LOAD
000012 //DAPARM DD DISP=SHR,DSN=IOAP.PARM
000013 // DD DISP=SHR,DSN=SCM.DEV.I600.IOA.IOAENV
000014 //DALOG DD DISP=SHR,DSN=IOAP.LOG
000015 //SYSPRINT DD SYSOUT=*
****** **************************** Bottom of Data ****************************
Communities
Support Center
YouTube
Twitter
Facebook
LinkedIn