`

IEBPTPCH

阅读更多

IEBPTPCH

IEBPTPCH 可以用来打印输出部分或整个顺序或分区数据集。打印记录的格式可以采用

标准格式也可以由用户指定。  

标准的格式是:

l      一行只打印一个逻辑记录。   

l      每行的输出格式为:每 8 个字符为一组,每组之间由 2 个空格隔开。   

l      不能打印的字符显示为空格。

l      如果输入是分块的,那么每个逻辑记录以“ * ”号间隔,而每个块之间以“ ** ”分隔。

l      每页打印 16 行。

 

在输出设备的容量范围内,用户可以自定义输出记录的格式。 IEBPTPCH 提供了可选的

编辑功能来处理输入或输出记录。

  IEBPTPCH 可以用来打印:

1 整个顺序数据集或分区数据集(或扩展分区数据集);

2 一个分区数据集(或扩展分区数据集)的部分成员;

3 一个顺序数据集或分区数据集(或扩展分区数据集)的部分记录;

4 一个分区数据集(或扩展分区数据集)的目录;

5 打印一个顺序数据集或或分区数据集(或扩展分区数据集)的修改版( Edited  version )。

下面是 IEBPTPCH 的作业控制语句列表:

 

       

JOB

作业初始

EXEC 

定义程序名 PGM=IEBPTPCH

SYSUT1     DD

定义输入的数据集

SYSUT2     DD

定义输出的数据集,如果定义为 SYSOUT=A ,则为打印输出

 

控制语句说明:

PRINT :表示输入数据集将被打印。如果要进行打印操作,它必须是第一条操作语句。

MEMBER :说明一个分区数据集中需要打印的成员。

RECORD :说明用户设定的打印格式。

TITLE :指定一个标题。该标题将被打印在所有数据之前。每个打印作业可以包含两个

TITLE 语句,第一个 TITLE 语句指定标题,而第二个 TITLE 语句指定子标题。

 

     实例:

     一个一般的调用 IEBPTPCH 的作业格式如下:

      //EXAMPLE      JOB …

     // EXEC PGM=IEBPTPCH

     //SYSPRINT DD SYSOUT=A

     //SYSUT1 DD …

     //SYSUT2 DD …

     //SYSIN DD *

        在此处放置 IEBPTPCH 的实用程序控制语句

     /*

 

1 :要打印一个顺序数据集或分区数据集,那么 //SYSUT1 DD 语句应该定义为:

l          磁带上的数据集:

//SYSUT1 DD DSN=tape.dataset.name,UNIT=TAPE,

//  VOL=SER=tape#,LABEL=#,DISP=OLD  

l          顺序的 DASD 上的数据集:

//SYSUT1 DD DSN=seq.dataset.name,DISP=SHR   

l          分区数据集:

//SYSUT1 DD DSN=pds.name,DISP=SHR

 

2 .要打印分区数据集中的部分成员,那么 //SYSUT1 DD 语句应该定义为:

//SYSUT1 DD DSN=pds.name,DISP=SHR

并且,   实用程序控制语句应为:

PRINT MAXNAME=n

        MEMBER NAME=member1

       MEMBER NAME=member2

        .

         .

        .

       MEMBER NAME=membern

其中, n  是所要打印的成员总数,而 member1,member2,...,membern  是所要打印的成员名字。

 

3 .要打印顺序数据集或分区数据集的部分记录,那么 //SYSUT1 DD 语句应该定义为:

         //SYSUT1 DD DSN=data.set.name,DISP=SHR

并且, 实用程序控制语句应为:

         PRINT MAXFLDS=f,MAXGPS=g,MAXLITS=l,STOPAFT=nnnnn 

         RECORD IDENT=(length,'name',inloc),FIELD=(length,inloc,,outloc) 

其中:  

         f :表示 RECORD 语句中, FIELD 参数的个数

         g :表示 RECORD 语句中, IDENT 参数的个数

         l :表示 RECORD 语句中, IDENT 标示符中包含的字符数(最多 32,767 个)

         nnnnn :表示要打印的逻辑记录的个数

         length :输入记录中包含 identifying name 的区域长度(以字节为单位),该长度不能超过 8 个字节

         name ’:该标识符用来精确标示记录组的最后一个记录

         inloc :表示输入记录中包含 identifying name 的区域的开始位置

         outloc :表示输出记录中该区域的开始位置

 

4 .要打印一个分区数据集的目录,那么 //SYSUT1 DD 语句应该定义为:

         //SYSUT1 DD DSN=pds.name,DISP=SHR

并且, 实用程序控制语句应为:

 

          PRINT    TYPORG=PS

          TITLE     ITEM=('PRINT PARTITIONED DIRECTORY OF A PDS',outloc)

其中:

         TYPORG=PS :表示分区数据集的目录是一个顺序的结构

         outloc :在输出结构 ITEM 参数的内容的起始位置

5 .要打印分区数据集或顺序数据集的修改版本,那么 //SYSUT1 DD 语句应该定义为:

          //SYSUT1 DD DSN=data.set.name,DISP=SHR

并且, 实用程序控制语句应为:

         PRINT     MAXFLDS=f,CDSEQ=seqno1,CDINCR=incr

         RECORD      FIELD=(72)

其中:

         f :表示 RECORD 语句中, FIELD 参数的个数

         seqno1 :第一行的序号

         incr :增加序号的数量

                        FIELD=(72) :表示输入记录的 1-72 列将被打印, 73-80 行将被新增的序号替代。

6 .使用标准格式打印一个分区数据集的成员,但其中的数字将转换为 16 进制的格式打印,那么 //SYSUT1 DD 语句应该定义为:

         //SYSUT1 DD DSN=data.set.name,DISP=SHR

并且, 实用程序控制语句应为:

         PRINT     TYPORG=PO,TOTCONV=XE,MAXNAME=n

          MEMBER NAME=member1

          MEMBER NAME=member2

                  

                  

                  

MEMBER NAME=membern

其中, XE 表示将数字由十进制转换为十六进制输出。

 

     需要注意的是, IEBPTPCH 的控制语句还有许多参数在本节中并没有办法一一介绍,读

者需要参考有关手册进行使用。

分享到:
评论

相关推荐

Global site tag (gtag.js) - Google Analytics