如何执行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遵循数据库中的此访问路径来提取程序中所需的数据。
广告