IBM主机JCL实验要求及答案.doc

  1. 1、本文档共4页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
IBM主机JCL实验要求及答案

IBM主机JCL实验要求 实验一 建立分区数据集STXXX.JCL.SOURCE,在此分区数据集下建立名为LAB1(之后的实验顺序编号)的MEMBER,此MEMBER实现创建名为STXXX.JCL.CREATPS的顺序数据集。 在STXXX.JCL.SOURCE中建立名为LAB2的MEMBER,此MEMBER实现删除STXXX.JCL.CREATPS。 在STXXX.JCL.SOURCE中建立名为LAB3的MEMBER,此MEMBER实现先检测STXXX.JCL.CREATPS是否存在,如存在则先删除在新建,如不存在则直接新建STXXX.JCL.CREATPS。 实验二 在STXXX.JCL.SOURCE中建立名为LAB4的MEMBER,此MEMBER利用IEBGENER将一段文字插入到新建的顺序数据集CUXXX.JCL.OUTPUT中。 在STXXX.JCL.SOURCE中建立名为LAB5的MEMBER,此MEMBER利用IEBGENER将TE09.JCL.COPYTE拷贝到新建的分区数据集STXXX.JCL.IEBGEN的MEMBER中,并将其命名为OUTPUT。 在STXXX.JCL.SOURCE中建立名为LAB6的MEMBER,此MEMBER利用IEBGENER将TE09.JCL.COPYTE拷贝到已经存在分区数据集STXXX.JCL. IEBGEN的MEMBER中,并将其命名为OUTPUT1。 实验三 在STXXX.JCL.SOURCE中建立名为LAB7的MEMBER,此MEMBER利用IEBCOPY实现将STXXX.JCL.SOURCE下的所有成员拷贝到新建的分区数据集STXXX.JCL.BACKUP中。 在STXXX.JCL.SOURCE中建立名为LAB8的MEMBER,此MEMBER利用IEBCOPY实现将CUXXX.JCL.SOURCE下的LAB1,LAB2拷贝到已有分区数据集STXXX.JCL.BACKUP中并分别重新命名为BAK1,BAK2。 在STXXX.JCL.SOURCE中建立名为LAB9的MEMBER,此MEMBER利用IEBCOMPR实现比较分区数据集STXXX.JCL.SOURCE与分区数据集STXXX.JCL.BACKUP。 在STXXX.JCL.SOURCE中建立名为LAB10的MEMBER,此MEMBER利用IEHLIST实现列出分区数据集STXXX.JCL.SOURCE的所有信息。 实验四 在STXXX.JCL.SOURCE中建立名为LAB11的MEMBER,使用程序IEFBR14,采用写流内过程的方式实现建立顺序数据集STXXX.JCL.PROC1和STXXX.JCL.PROC2。 建立名为STXXX.JCL.PROC的分区数据集,在其中建立编目过程PROC1,实现利用IEFBR14建立顺序数据集的功能。在STXXX.JCL.SOURCE中建立名为LAB12的MEMBER调用编目过程PROC1,最后建立顺序数据集STXXX.JCL.PROC3。 LAB1: //STO31A JOB 1,ST031,CLASS A,MSGCLASS H,MSGLEVEL 1,1 ,NOTIFY ST031 //STEP1 EXEC PGM IEFBR14 //D1 DD DSN ST031.JCL.CREATPS,DISP NEW,CATLG ,UNIT 3390, // VOL SER USER01,SPACE TRK, 3,2 , // DCB RECFM FB,LRECL 80,BLKSIZE 800 LAB2: //ST031B JOB 1,ST031,CLASS A,MSGCLASS H,MSGLEVEL 1,1 ,NOTIFY ST031 //STEP2 EXEC PGM IEFBR14 //D2 DD DSN ST031.JCL.CREATPS,DISP OLD,DELETE LAB3: //STO31C JOB 1,ST031,CLASS A,MSGCLASS H,MSGLEVEL 1,1 ,NOTIFY ST031 //STEP1 EXEC PGM IEFBR14 //D3 DD DSN ST031.JCL.CREATPS,DISP MOD,DELETE,KEEP ,UNIT 3390, // VOL SER USER01,SPACE TRK, 3,2 , // DCB RECFM FB,LRECL 80,BLKSIZE 800 //STEP2 EXEC PGM IEFBR14 //D4 DD DSN ST031.JCL.CREATPS,DISP NEW,CATLG,DELETE ,UNIT 3390, // VOL SER USER01,SPACE TR

文档评论(0)

didala + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档