REXX for CICS TS: Db2 接口

REXX Db2 接口提供从 REXX exec 执行 SQL 语句和 Db2 命令的方法。

SQL 是动态准备和执行的。您可以使用Db2 检测设施接口 (IFI) 来发出 Db2 命令。 REXX Db2 接口提供 REXX 预定义变量中 SQL 的结果。 REXX Db2 接口支持 DB2® V 2.3 及更高版本。本信息说明如何从 REXX for CICS® TS 使用 Db2 接口。

有关 SQL 语句或 Db2 命令的更多信息，请参阅 SQL: Db2 for z/OS 产品文档中 Db2 的语言和 Db2 命令。有关 IFI 的更多信息，请参阅 Db2 for z/OS 产品文档中的 "检测设施接口 (IFI) 编程"。

注: 必须在 Db2 资源控制表 (RCT) 中输入 REXX 事务标识。请参阅样本 JCL CICRCT。

编程注意事项

要在 REXX exec 中嵌入 SQL ，必须更改主机命令环境。 ADDRESS 指令后跟环境的名称用于更改主机命令环境。

ADDRESS 指令有两种格式; 一种影响指令后发出的所有命令，另一种仅影响单个命令。有关主机命令环境的更多信息，请参阅更改主机命令环境。有关 ADDRESS 指令的更多信息，请参阅 ADDRESS。

支持 REXX Db2 接口的 REXX 命令环境为 EXECDB2 和 EXECSQL:

EXECDB2 是支持 Db2 命令的命令环境。
EXECSQL 是支持 SQL 语句的命令环境。

注: EXECSQL 和 EXECDB2 是授权命令。您必须是 REXX 授权用户才能使用 EXECSQL 和 EXECDB2 命令环境。

REXX for CICS TS 提供了一个名为 CICRXTRY 的 exec ，可用于以交互方式处理 REXX 语句和命令。 CICRXTRY 可以是伪会话式的。伪和 SETSYS 伪命令用于打开或关闭伪会话方式。如果环境设置为伪会话式，那么将落实从 CICRXTRY 发出的 SQL 语句。如果环境设置为会话式，那么将不会落实从 CICRXTRY exec 发出的任何 SQL 语句，并且锁定的任何资源将保持锁定状态，直到您退出 CICRXTRY exec 或发出 CICS SYNCPOINT 命令为止。如果在冗长的 REXX execs 中嵌入 SQL 语句，那么应该进行类似的考虑。