包含 CICS 提供的接口模块

如果要在应用程序中使用 "CPI 通信" 或 "SAA ® 资源恢复" ,那么必须使相应的接口模块可供程序使用。

CICS ® 提供的用于在 CICS 库中安装联机应用程序的过程指定包含相应语言 EXEC 接口模块的 INCLUDE 语句的 CICS 库成员。 例如, DFHYITVL 过程使用以下语句:
//COPYLINK EXEC PGM=IEBGENER,COND=(7,LT,COB)
//SYSUT1 DD DSN=&INDEX..SDFHSAMP(&STUB),DISP=SHR
//SYSUT2 DD DSN=&&COPYLINK,DISP=(NEW,PASS),
// DCB=(LRECL=80,BLKSIZE=400,RECFM=FB),
// UNIT=&WORK,SPACE=(400,(20,20))
//SYSPRINT DD SYSOUT=&OUTC
//SYSIN DD DUMMY

//SYSLIN DD DSN=&&COPYLINK,DISP=(OLD,DELETE)
// DD DSN=&&LOADSET,DISP=(OLD,DELETE)
// DD DDNAME=SYSIN
在此 COBOL 示例中,符号参数 STUB 缺省为 DFHEILID。 DFHEILID 成员包含语句 INCLUDE SYSLIB (DFHELII)。

为 PL/I 和 C 提供的过程也引用 DFHEILID ,这意味着将使用 DFHELII 存根。

如果应用程序要使用 "CPI 通信" 或 "SAA 资源恢复" 设施,请执行下列其中一项操作:
  • 将相应的 INCLUDE 语句添加到用于调用 CICS 提供的过程以安装应用程序的作业中的 LKED.SYSIN 覆盖。 添加以下 INCLUDE 语句:
    • INCLUDE SYSLIB (DFHCPLC) (如果程序使用 CPI Communications)
    • INCLUDE SYSLIB (DFHCPLRR) (如果程序使用 SAA 资源恢复)

在链接编辑步骤期间可能会出现警告消息,指示 DFHEI1 条目的 DUPLICATE 定义。 可以忽略这些消息。

有关链接编辑需求的更多信息,请参阅 使用您自己的作业流