存根程序

存根程序使应用程序员免受非CICS® 资源管理器机制的保护。 它以汇编语言编写。 组装后,存根将链接编辑到要使用存根的每个应用程序。

图 1。 存根概念
该图显示连接到存根程序的应用程序以及单独的与任务相关的用户出口程序。 箭头从应用程序中的 CALL statname 命令指向存根中的 ENTRY statname 入口点。 另一个箭头从存根中的 DFHRMCAL TO=ename 宏调用指向任务相关用户出口程序中的名称入口点。
统计名称
可以在外部引用的标签。 Statname 必须符合汇编语言 ENTRY 语句的要求,并且通常解析 V 型地址常量或高级语言 CALL 的目标。 单个存根可以包含多个此类标签。
名称
要处理资源管理器请求的任务相关用户出口程序的条目名称 (在 EXEC CICS ENABLE 命令上指定)。
您可以定义高级语言命令,供程序员在想要访问非CICS 资源时使用。 必须使用转换程序将本地定义的高级语言命令转换为传统 CALL 到存根程序的必需入口点。 或者,应用程序可以发出 CALL 命名存根入口点,如 图 1中所示。 例如,要从非CICS 资源读取记录,应用程序可以使用以下 COBOL 语句:
CALL 'XYZ' USING PARM1 PARM2...
XYZ 是存根程序中的入口点 (statname)。 存根将命令转换为宏调用 (DFHRMCAL) 到与任务相关的用户出口程序 (在 TO= 操作数中指定)。 从任务相关的用户出口程序返回到调用应用程序,而不是存根程序。

应用程序可以使用参数来确定是否调用了资源管理器。 例如,如果应用程序将参数设置为零,而资源管理器将其设置为非零,那么返回时的参数值指示是否调用了资源管理器。

备注信息:
  • 只能使用 DFHRMCAL 宏的 TO , RTNABND 和 SUPPEDF 操作数。 任何其他操作数仅供 CICS 内部使用。
  • DFHRMCAL 宏不能由 AMODE (64) 应用程序调用。