JCL用于运行COBOL程序调用子程序

Question

我有一个COBOL pgm A正在调用另一个COBOL pgm B.在pgm BI中需要一个文件.如何编写JCL以便能够在pgm B中访问此文件？我在B中为此文件编写了select子句和FD条目.

Answer 1

您必须在JCL中包含执行程序A的步骤的DD语句.

如果文件存在,那很容易.

//ABCDEFGH DD DISP=SHR,DSN=your.file.name.here

其中ABCDEFGH是您在程序B的SELECT语句中使用的名称.

如果要创建新文件,则必须考虑文件将使用的估计空间以及放置文件的位置.

//ABCDEFGH DD DISP=(NEW,CATLG,DELETE),
//            DSN=your.file.name.here,
//            AVGREC=K,
//            RECFM=FB,
//            LRECL=your-lrecl-here,
//            MGMTCLAS=your-management-class-here,
//            SPACE=(your-lrecl-here,(primary-number-of-records,secondary),RLSE)

这只是徒手,你真的应该看看JCL参考和JCL用户指南.