1) JCL語句全部由大寫字母構成,每行80列
2) JCL語句由5個區域構成,分別是標誌區,命名區,操作區,參數區,註釋區
3) 標誌區就是//,標誌區後緊跟命名區
4) 命名區,操作區,參數區,註釋區間隔至少一個空格
5) 參數區無內容,不能出現註釋區
以下總結的7大常用JCL模板,小寫部分代表可以客戶化的部分。
1,刪除1個數據集
//jobname JOB NOTIFY=&SYSUID
//stepname EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//ddname DD DSN=dsname,DISP=(OLD,DELETE,DELETE)
//
刪除數據集名爲dsname的數據集
2,刪除VSAM數據集
//jobname JOB NOTIFY=&SYSUID
//stepname EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE ‘entryname1’
DELETE ‘entryname2,entryname3,entryname4’
//
刪除VSAM數據集entryname1,entryname2,entryname3,entryname4。
刪除多個VSAM數據集,請用逗號隔開
3,創建一個數據集
//jobname JOB NOTIFY=&SYSUID
//stepname EXEC PGM=IERBR14
//ddname DD DSN=dsname,DISP=(NEW,CATLG),
// UNIT=SYSALLDA,SPACE=(TRK,1)
//
UNIT=SYSALLDA 指定系統選擇一個最合適的設備存放數據集
4,數據集上帶庫
//jobname JOB
//stepname EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD DSN=dsname,DISP=SHR
//SYSUT2 DD DSN=dsname,DISP=(NEW,CATLG),
// UNIT=tapedevice,VOL=SER=volser
//
5,拷貝一個順序數據集
//jobname JOB NOTIFY=&SYSUID
//stepname EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD DSN=dsname,DISP=SHR
//SYSUT2 DD DSN=dsname,DISP=OLD
//
6,拷貝一個分區數據集
//jobname JOB
//stepname EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//sysut1 DD DSN=dsname,DISP=SHR
//sysut2 DD DSN=dsname,DISP=(NEW,CATLG),
// SPACE=(CYL,(1,1,45)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=800),
// UNIT=unit,VOL=SER=volser
//SYSIN DD *
COPY INDD= sysut1,OUTDD= sysut2
/*
7,拷貝分區數據集成員到另一個分區數據集
//jobname JOB NOTIFY=&SYSUID
//stepname EXEC PGM=IEBCOPY
/*JOBPARM SYSAFF=*,LINES=99
//SYSPRINT DD SYSOUT=*
//sysut1 DD DSN=dsname,DISP=SHR
//sysut2 DD DSN=dsname,DISP=SHR
// UNIT=uint,VOL=SER=vol
//SYSIN DD *
COPYMOD INDD=sysut1,OUTDD=sysut2,
SELECTM=(membername)
/*