JCL作业模板.docVIP

IBM南昌实训上机报告 二00七 年 十二月 十四日 课程名称： 大型机 实验名称： 实践三：JCL 班 组： 大型机一班A组 姓 名： 吴以林（A2） 主 机： 192.168.13.2：3271 用 户： 192.168.13.4 CN0002 索引 一、作业过程中产生的主要问题 1 二、作业正常过程及详细步骤 2 任务一：生成PDS或SDS 2 1.1：生成SDS： 2 1.2：建立PDS 6 任务二：流内PROC和CATLOG PROC 10 2.1、流内过程（Instream procedure）调用： 10 2.2、编目过程（cataloged procedures）调用 12 任务三：使用COND，至少给出3种MAXCC情况的输出结果 17 3.1：SET MAXCC=8，COND=(4,LT,STEP1)结果MAXCC=8: 17 3.2 SET MAXCC=0， COND=(4,GT,STEP1),最终MAXCC=0. 18 3.3 SET MAXCC=4,COND=(4,NE,STEP1)使得MAXCC=4 19 任务四、生成GDG 21 任务五：使用SORT 24 任务六：使用COND 26 任务七：使用IEBCOPY 28 三、个人总结与心得 30 一、作业过程中产生的主要问题 ．MAXCC的理解．现理解为maximum　cond code表最大返回码．系统默认为０（正常）＼４（警告）＼８（错误）＼１６（严重错误）； ．在任务四ＧＤＧ生成过程中，SYSOUT和SYSPRINT的使用错误很隐蔽，在此问题上花费了大量时间，后在老师指导和查看IDCAMS相关ＤＤ语句使用后解决； ．在任务七使用IEBCOPY过程中，将目标设为了SDS,导致ＳＤＳ被破坏，返回码虽为0,但结果却没成功，将DSN=CN0002.WYL.COPYOUT设为PDS,操作成功。 二、作业正常过程及详细步骤 任务一：生成PDS或SDS 1.1：生成SDS： 1.1.1编辑好JCL语句，建立起JOB，并进行提交： //CN0002A JOB CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1), // NOTIFY=CN0002 //*CREATE A SDS //ALLOC EXEC PGM=IEFBR14 //CRSDS01 DD DSN=CN0002.WYL.JCL.SDS, // DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120) // 1.1.2。在命令行中输入TSO　ＳＤＳＦ　ＳＴ查看信息，用？对作业进行选择，键入Ｓ查看详细信息： 返回码为００００，说明成功执行。 其他信息： 1.1.3。对SDS进行编辑，验证结果： 1.2：建立PDS 1.2.1。编辑ＪＣＬ语句，并提交ＪＯＢ： //CN0002B JOB CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1), // NOTIFY=CN0002 //*CREATE A PDS //DELETE EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=A //SYSIN DD * DELETE CN0002.WYL.JCL.PDS /*