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

可以在IKJEFT01的帮助下执行COBOL-DB2程序。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程序。在STEPLIB中给出了程序PROGA的loadlib路径,即DIS.TEST.LOADLIB,在SYSOUT中提到了打印程序日志的位置,在这种情况下,该地址为假脱机(SYSOUT = *)。然后,我们使用SYSTIN给出了运行时参数,例如DB2数据库标识符(TB3),由DSN SYSTEM和程序/计划名称给出。

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