Sample JCLs
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 1Link copied to clipboard
JOB1 Link copied to clipboard
CopyCopied to clipboard
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 ****************************JOB2Link copied to clipboard
CopyCopied to clipboard
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 2Link copied to clipboard
JOB3Link copied to clipboard
CopyCopied to clipboard
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 ****************************JOB4Link copied to clipboard
CopyCopied to clipboard
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 3Link copied to clipboard
JOB5Link copied to clipboard
CopyCopied to clipboard
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 4Link copied to clipboard
JOB1Link copied to clipboard
CopyCopied to clipboard
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 ****************************JOB2Link copied to clipboard
CopyCopied to clipboard
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 ****************************JOB3Link copied to clipboard
CopyCopied to clipboard
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 ****************************JOB4Link copied to clipboard
CopyCopied to clipboard
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 ****************************JOB5Link copied to clipboard
CopyCopied to clipboard
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 6Link copied to clipboard
JOB3Link copied to clipboard
CopyCopied to clipboard
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 ****************************JOB5Link copied to clipboard
CopyCopied to clipboard
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 7Link copied to clipboard
No special preparations required.
Chapter 8Link copied to clipboard
JOB10Link copied to clipboard
CopyCopied to clipboard
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 ****************************EXT1Link copied to clipboard
CopyCopied to clipboard
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