如何执行计划 PLANA 的 COBOL-DB2 程序 PROGA?

db2databasebig data analytics更新于 2026/2/12 3:07:17

COBOL-DB2 程序可以借助 IKJEFT01 执行。IKJEFT01 是一个内置的大型机实用程序,允许我们通过作业控制语言 (JCL) 运行 z/OS TSO 命令。如果我们要执行计划 PLANA 的 COBOL-DB2 程序 PROGA,则必须提供如下所示的 JCL 步骤。

//STEP010 EXEC PGM=IKJEFT01
//STEPLIB DD DSN=DIS.TEST.LOADLIB,DISP=SHR
//SYSOUT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(TB3)
RUN PROGRAM (PROGA) PLAN(PLANA)
END
/*

在上述 JCL 步骤中,我们首先使用 IKJEFT01 实用程序调用 COBOL-DB2 程序。程序 PROGA 的加载库路径在 STEPLIB 中指定,即 DIS.TEST.LOADLIB,而打印程序日志的位置在 SYSOUT 中指定,在本例中为 spool (SYSOUT=*)。然后,我们使用 SYSTIN 提供运行时参数,例如由 DSN SYSTEM 提供的 DB2 数据库标识符 (TB3) 以及程序/计划名称。

有必要为程序指定一个计划,因为它为 DB2 提供了程序中使用的查询的访问路径信息。然后,DB2 会沿着数据库中的访问路径提取程序所需的数据。


相关文章