CICS 提供的转换程序
您可以使用 ATTACH、CALL、LINK 或 XCTL 宏从批处理汇编语言程序动态调用命令级语言翻译器,或使用 CALL 从 C®、 PL/I 或 COBOL 程序动态调用命令级语言翻译器。
CICS®提供的独立转换程序安装在 CICSTSnn.CICS.SDFHLOAD 库中,其中 CICSTSnn 表示 CICS 发行版。 下表列出了此库中的独立转换程序。
| 语言 | 翻译器 |
|---|---|
| 汇编语言 | DFHEAP1$ |
| C | DFHEDP1$ |
| COBOL | DFHECP1$ 请参阅 注释。 |
| PL/I | DFHEPP1$ |
注意: 单独的 CICS 转换器尚未针对较新的 COBOL 语言进行更新,例如浮动注释分隔符、JSON GENERATE 和 JSON PARSE 以及编译器指令。 要使用 COBOL 编译器的最新功能,请使用集成的 CICS 翻译器。 请参阅 Enterprise COBOL for z/OS 迁移指南中的从单独的 CICS 翻译器迁移到集成翻译器。
独立转换程序的动态调用
您可以使用 ATTACH、CALL、LINK 或 XCTL 宏,从批处理汇编语言程序中动态调用命令级语言翻译器;也可以使用 CALL,从 C、 PL/I 或 COBOL 程序中动态调用命令级语言翻译器。
如果使用 ATTACH、LINK 或 XCTL,请使用相应的翻译加载模块 DFHExP1$ ,其中 x=A 表示汇编语言,x=C 表示 COBOL ,x=D 表示 C 语言,或 x=P 表示 PL/I。
如果使用 CALL ,请指定 PREPROC 作为用于调用转换程序的入口点名称。
在所有情况下,请将以下地址参数传递给转换程序:
- 转换程序选项列表的地址
- 转换程序使用的 DD 名称列表的地址 (这是可选的)
这些地址必须位于相邻的全字中,在全字边界上对齐。 注册 1 必须指向列表中的第一个地址,最后一个地址的高位位必须设置为 1 ,以指示列表的结尾。 对于一个或两个地址都是如此。
数据定义 (DD 名称) 列表
DD 名称列表必须以半字边界开始。 前两个字节包含列表中字节数的二进制计数 (不包括计数字段)。 列表中的每个条目都必须占用一个 8 字节字段。
条目的顺序如下所示:
| 条目 | 标准 DD 名称 | 条目 | 标准 DD 名称 | 条目 | 标准 DD 名称 |
|---|---|---|---|---|---|
| 1 | 不适用 | 3 | 不适用 | 5 | SYSIN |
| 2 | 不适用 | 4 | 不适用 | 6 | SYSPRINT |
| 7 | SYSPUNCH |
如果省略适用的条目,那么转换程序将使用标准 DD 名称。 如果使用长度小于 8 字节的 DD 名称,请在右侧用空格填充该字段。 可以通过将 X'FF ' 放在第一个字节中来省略条目。 您可以完全省略列表末尾的条目。