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


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的LOADLIB路径在STEPLIB中给出,即DIS.TEST.LOADLIB,程序日志的打印位置在SYSOUT中提到,在本例中为SPOOL (SYSOUT=*)。然后,我们使用SYSTIN提供运行时参数,例如DB2数据库标识符(TB3),由DSN SYSTEM和程序/计划名称给出。

程序必须指定计划,因为它为DB2提供程序中使用的查询的访问路径信息。然后,DB2遵循数据库中的此访问路径来提取程序中所需的数据。

更新于:2020年9月11日

3K+浏览量

开启你的职业生涯

完成课程获得认证

开始学习
广告