cobol - 如何使用 IEBGENER？

Question

我在弄清楚如何让 IEBGENER 按照我想要的方式工作时遇到了一些困难。我应该先说我正在一台学术大型机的 z/OS 环境中运行 IEBGENER。

我有三个 JCL 过程 (PROC) 内联到我正在使用的一些 COBOL 代码，并且我需要 IEBGENER 作为将我的 PROC 放入“我的 MVS ID 下的永久过程库”以及将我的 COBOL 源“放入我的 MVS ID 下的永久顺序数据集中”。

讲师提到“记住为这些数据集编写正确的 LRECL 和 BLKSIZE 信息。”

我对 IEBGENER 不是很熟悉，也没有找到任何可以真正解释我如何做我想做的事情的东西。

有“大铁”人可以帮忙吗？

Answer 1

如上所述，IEBGENER 是一个复制程序。它接受 SYSUT1 上的输入并“生成”它以输出数据集 SYSUT2。在您的实例中，由于您要复制 2 个文件，因此最简单的方法是执行 2 个 GENER 步骤，每个步骤生成一个输出数据集。

这里唯一棘手的部分是以正确的格式获取输出数据集。因此，要生成 proclib，假设当前尚未编目，您的 SYSUT2 将如下所示:

//SYSUT2  DD  DSN=&SYSUID.PROCLIB,
//            DISP=(NEW,CATLG,DELETE),
//            DCB=(RECFM=FB,LRECL=80,DSORG=PO)

源输出的顺序数据集看起来类似，但 DCB 选项上没有 DSORG 子参数。 PO 的选项表示创建 PDS，而不是 QSAM 文件。在现代 z/OS 安装中，无需编码 BLKSIZE，因为如果您不指定，系统将计算最佳大小。