INQUIRE_TRANDEF 调用
在 DFHXMXDX 宏调用上提供了 INQUIRE_TRANDEF 函数。 其目的是允许您获取有关指定事务定义的信息。 通常，此函数调用等同于 EXEC CICS® INQUIRE TRANSACTION 命令，但存在一些差异。
INQUIRE_TRANDEF
DFHXMXDX [CALL,]
[CLEAR,]
[IN,
FUNCTION(INQUIRE_TRANDEF),
INQ_TRANSACTION_ID(name4 | string | ‘string'),]
[OUT,
[BREXIT(name8),]
[CMDSEC(name1),]
[DTIMEOUT(name4 | (Rn)),]
[DUMP(name1),]
[DYNAMIC(name1),]
[INDOUBT(name1),]
[INDOUBT_WAIT(name1),]
[INDOUBT_WAIT_TIME(name4),]
[INITIAL_PROGRAM(name8),]
[ISOLATE(name1),]
[LOCAL_QUEUING(name1),]
[OTSTIMEOUT(name4 | (Rn)),]
[PARTITIONSET(name1),]
[PARTITIONSET_NAME(name8),]
[PROFILE_NAME(name8),]
[REMOTE(name1),]
[REMOTE_NAME(name8),]
[REMOTE_SYSTEM(name4),]
[RESSEC(name1),]
[RESTART(name1),]
[ROUTABLE_STATUS(ROUTABLE|NOT_ROUTABLE),]
[RUNAWAY_LIMIT(name4 | (Rn)),]
[SHUTDOWN(name1),]
[SPURGE(name1),]
[STATUS(name1),]
[STORAGE_CLEAR(name1),]
[STORAGE_FREEZE(name1),]
[SYSTEM_ATTACH(name1),]
[SYSTEM_RUNAWAY(name1),]
[TASKDATAKEY(name1),]
[TASKDATALOC(name1),]
[TCLASS(name1),[TCLASS_NAME(name8),]]
[TPURGE(name1),]
[TRACE(name1),]
[TRAN_PRIORITY(name4 | (Rn)),]
[TRAN_ROUTING_PROFILE(name8),]
[TRANSACTION_ID(name4),]
[TWASIZE(name4 | (Rn)),]
RESPONSE (name1 | *),
REASON (name1 | *)]此命令是线程安全的。
以下参数描述简要说明了可以在 INQUIRE_TRANDEF 调用上返回的可能值。 有关其中一些参数的更详细说明，请参阅 TRANSACTION 属性中 TRANSACTION 资源定义的相应参数描述。
- BREXIT (name8)
- 返回为指定事务指定的缺省网桥出口程序的名称。 如果未指定网桥出口，那么将返回空白。
- name8
- 用于接收网桥出口程序的名称的 8 字节位置的名称。
- CMDSEC (name1)
- 在 1 字节的位置 (name1) 返回一个相等的值，该值指示是否需要对事务进行命令安全性检查。
- XMXD_YES
- 需要进行命令安全性检查。
- XMXD_NO
- 不需要命令安全性检查。
- DTIMEOUT (name4)
- 返回事务的死锁超时值。
- name4
- 要接收死锁超时值的 4 字节位置的名称，以二进制值表示。
- (Rn)
- 用于接收死锁超时值的寄存器，以二进制值表示。
请注意，值为零表示事务资源定义指定 DTIMOUT (NO)。
- DUMP (name1)
- 在 1 字节位置 (name1) 中返回一个相等的值，指示如果事务异常终止， CICS 是否执行事务转储。
- XMXD_YES
- 需要事务转储。
- XMXD_NO
- 不需要事务转储。
- DYNAMIC (name1)
- 在 1 字节的位置 (name1) 中返回一个相等的值，指示是否为动态事务路由定义了事务。
- XMXD_YES
- 该事务将动态路由到远程 CICS。
- XMXD_NO
- 事务不会动态路由。
- INDOUBT (name1)
- 在 1 字节的位置 (name1) 中返回一个相等的值，该值指示当工作单元处于不确定时间段时， CICS 区域发生故障或与其协调程序失去连接时要执行的操作。 (该操作基于 TRANSACTION 资源定义的 ACTION 属性。)该操作依赖于 INDUT_WAIT 和 INDUT_WAIT_TIME; 如果 INDUT_WAIT 返回 XMXD_YES ，那么直到 INDUT_WAIT_TIME 中返回的时间到期后才执行该操作。
- XMXD_BACKOUT
- 将回退事务对可恢复资源所作的任何更改。
- XMXD_COMMIT
- 将落实事务对可恢复资源所作的任何更改。
- IN可疑等待 (name1)
- 在 1 字节位置 (name1) 中返回一个等值，指示当工作单元 (UOW) 处于不确定状态时发生故障时如何响应。
- XMXD_NO
- UOW 不等待，暂挂从故障恢复。 CICS 将立即执行对 TRANSACTION 定义的 ACTION 属性指定的任何操作。
- XMXD_YES
- UOW 将等待，暂挂从故障恢复，以确定是要回退还是落实可恢复资源。
- IN可疑等待时间 (name4)
- 返回在不确定时间段内失败后，事务执行 INDOUBT 字段中返回的操作之前的时间长度 (以分钟为单位)。 仅当工作单元不确定且 INDOUBT-wait 返回 XMXD_YES 时，返回的值才有效。
- name4
- 要接收延迟时间的 4 字节位置的名称，以二进制值表示。
另请参阅 INDOUBT 和 INDOUBT 等待。
- INITIAL_PROGRAM (name8)
- 返回要为事务提供控制的初始程序的名称。
- name8
- 用于接收初始程序名的 8 字节位置的名称。
- INQ_TRANSACTION_ID (name4 | string | 'string')
- 指定此事务定义查询的事务标识。
- name4
- 包含事务标识名称的 4 字节位置的名称。
- 字符串（string）
- 不带空格的字符串，用于命名事务标识。
- "string"
- 用引号括起的字符串，用于命名事务标识。 通过在引号内填充空格，将字符串长度设置为 4。
- 隔离 (name1)
- 在 1 字节位置 (name1) 中返回一个相等的值，该值指示事务的任务生存期用户密钥存储器是否需要事务隔离。
- XMXD_NO
- 任务生存期用户密钥存储器不需要事务隔离。
- XMXD_YES
- 任务生存期用户密钥存储需要事务隔离。
- LOCAL_排队 (name1)
- 在 1 字节的位置 (name1) 中返回一个相等的值，该值指示如果要在另一个系统上启动事务，并且远程系统不可用，那么此事务的启动请求是否适合在本地排队。
- XMXD_NO
- 该请求不会在本地排队。
- XMXD_YES
- 可以在本地对请求进行排队。
- OTSTIMEOUT (name4)
- 返回允许对象事务服务 (OTS) 事务在 Enterprise JavaBeans (EJB) 环境中创建并在此 CICS 事务下执行的缺省时间段 (以秒计) ，而不允许 OTS 事务的发起方获取同步点 (或回滚 OTS 事务)。
- name4
- 要接收超时设置的 4 字节位置的名称，以二进制值表示。
- (Rn)
- 用于接收超时设置的寄存器，以二进制值表示。
值为零表示事务资源定义指定 OTSTIMEOUT (NO)。
- PARTITIONSET (name1)
- 在 1 字节位置 (name1) 中返回一个等值，指示在事务定义上指定的分区集。
- XMXD_KEEP
- 为分区集指定保留名称 KEEP ，这意味着在此事务定义下运行的任务将应用程序分区集用于与事务关联的终端。
- XMXD_NAMED
- 分区集是在事务定义上专门指定的。 在 PARTITIONSET_NAME 参数上返回名称。
- XMXD_NONE
- 没有为事务定义指定分区集。
- XMXD_OWN
- 为分区集指定了保留名称 OWN ，这意味着在此事务定义下运行的任务将执行其自己的分区集管理。
- PARTITIONSET_NAME (name8)
- 返回在事务定义上定义的分区集的名称。
- name8
- 要接收分区集名称的 8 字节位置的名称。
- PROFILE_NAME (name8)
- 返回与事务定义关联的概要文件定义的名称。
- name8
- 用于接收与事务定义关联的概要文件定义的名称的 8 字节位置的名称。
- 远程 (name1)
- 在 1 字节位置 (name1) 中返回一个相等的值，该值指示是否将事务定义为远程事务。
- XMXD_NO
- 该事务不是远程事务。
- XMXD_YES
- 该事务是远程事务。
- REMOTE_NAME (name8)
- 返回远程系统中已知事务的名称。
- name8
- 用于接收事务的远程名称的 8 字节位置的名称。
- REMOTE_SYSTEM (name4)
- 返回在事务定义上指定的远程系统的名称。
如果 DYNAMIC 参数返回 XMXD_YES ，那么 REMOTE_SYSTEM 返回可由动态路由程序更改的缺省名称。
如果 DYNAMIC 参数返回 XMXD_NO ，那么这是要将事务路由到的实际远程系统。- name4
- 用于接收远程系统的已定义名称的 4 字节位置的名称。
- RESSEC (name1)
- 在 1 字节的位置 (name1) 中返回一个等值，指示是否需要对事务进行资源安全性检查。
- XMXD_NO
- 不需要资源安全性检查。
- XMXD_YES
- 需要进行资源安全性检查。
- RESTART (name1)
- 在 1 字节的位置 (name1) 返回一个等值，指示是否考虑事务重新启动。
- XMXD_NO
- 无法重新启动事务。
- XMXD_YES
- 可以重新启动事务。
- ROUTABLE_STATUS (ROUTABLE | NOT_ROUTABLE)
- 返回一个值，指示如果事务是合格 EXEC CICS START 命令的主体，那么是否将使用增强型路由方法对其进行路由。
- NOT_ROUTABLE
- 如果事务是 START 命令的主题，那么将使用 "传统" 方法对其进行路由。
- ROUTABLE
- 如果事务是符合条件的 START 命令的主题，那么将使用增强型方法对其进行路由。
有关 EXEC CICS START 命令调用的路由事务的增强方法和 "传统" 方法的详细信息，请参阅 CICS 事务路由。
- RUNAWAY_LIMIT (name4 | (Rn))
- 返回在事务定义上指定的 runaway-task 时间限制。 如果 SYSTEM_RUNAWAY 为 XMXD_YES ，那么返回的值是 ICVR 系统初始化参数定义的值。
- name4
- 要接收任务失控限制的 4 字节位置的名称，以二进制值表示。
- (Rn)
- 用于接收任务失控限制的寄存器，以二进制值表示。
- SHUTDOWN (name1)
- 在 1 字节的位置 (name1) 中返回一个相等的值，指示在 CICS 关闭期间是否可以运行事务。
- XMXD_DISABLED
- 在 CICS 关闭期间，将禁止事务运行。
- XMXD_ENABLED
- 允许事务在 CICS 关闭期间运行。
- SPURGE (name1)
- 在 1 字节位置 (name1) 中返回一个等值，指示是否将事务定义为系统可清除。
- XMXD_NO
- 事务不可系统清除。
- XMXD_YES
- 事务是可系统清除的。
- 状态 (name1)
- 在 1 字节位置 (name1) 中返回一个表示事务定义状态的等同值。
- XMXD_DISABLED
- 事务定义已禁用。
- XMXD_ENABLED
- 已启用事务定义。
- STORAGE_CLEAR (name1)
- 在 1 字节的位置 (name1) 中返回一个相等的值，该值指示在 FREEMAIN 命令释放与此事务定义关联的任务的任务生存期存储器之前是否要将其清除。
- XMXD_NO
- 在释放任务生存期存储器之前，无需将其清除。
- XMXD_YES
- 必须先清除任务生存期存储器，然后才能将其释放。
- STORAGE_冷冻 (name1 | (Rn))
- 在 1 字节的位置 (name1) 中返回一个等值，指示是否通过 CICS提供的现场工程事务 CSFE 上的 STGFRZ 选项为事务定义存储器冻结。
- XMXD_NO
- 在事务运行期间正常释放存储器。
- XMXD_YES
- 在运行事务期间通常释放的存储器将被冻结。
- SYSTEM_ATTACH (name1)
- 返回 1 字节位置 (name1) 中的等同值，该值指示是否始终将使用此 tranid 附加的任务作为系统任务附加。
- XMXD_NO
- 正在为此事务附加用户任务。
- XMXD_YES
- 正在为此事务连接系统任务。
- SYSTEM_RUNAWAY (name1)
- 在 1 字节的位置 (name1) 中，返回一个相等的值，该值指示事务定义是否指定在 ICVR 系统初始化参数上指定的系统缺省失控任务时间限制。
- XMXD_NO
- 事务不受系统失控限制的控制。
- XMXD_YES
- 事务定义指定系统缺省失控限制。
- TASKDATAKEY (name1)
- 在 1 字节位置 (name1) 中返回一个相等的值，该值指示与此事务定义关联的任务的任务生存期存储器的存储键。
- XMXD_CICS
- 为任务生存期存储器指定了 CICS 键。
- XMXD_USER
- 为任务生存期存储器指定了 USER 键。
- TASKDATALOC (name1)
- 在 1 字节位置 (name1) 中返回一个相等的值，该值指示与此事务定义关联的任务的任务生存期存储的数据位置。
- XMXD_ANY
- 任务生存期存储器可以位于虚拟存储器中的 16 MB 以上。
- XMXD_BELOW
- 任务生存期存储器必须位于虚拟存储器中低于 16 MB 的位置。
- TCLASS (name1)
- 在 1 字节的位置 (name1) 中返回一个相等的值，指示事务是否属于事务类。
- XMXD_NO
- 事务不是事务类的成员。
- XMXD_YES
- 事务是 TCLASS_NAME 参数中指定的事务类的成员。
- TCLASS_NAME (name8)
- 返回事务所属的事务类的名称。
- name8
- 要接收事务所属的事务类名的 8 字节位置的名称。
- TPURGE (name1)
- 在 1 字节的位置 (name1) 中返回一个等值，指示在发生 z/OS® Communications Server 终端错误时是否将事务定义为可清除。
- XMXD_NO
- 如果发生终端错误，那么无法清除事务。
- XMXD_YES
- 如果发生终端错误，那么可以清除事务。
- TRACE (name1)
- 在 1 字节位置 (name1) 中返回一个等值，指示为事务定义的跟踪级别:
- XMXD_SPECIAL
- CICS 特殊级别跟踪这是通过 EXEC CICS SET TRANSACTION 命令设置特殊跟踪的结果。
- XMXD_STANDARD
- CICS 标准级别跟踪在 TRANSACTION 资源定义中等同于 TRACE (YES)。
- XMXD_消零
- 禁止对事务进行跟踪，这等同于 TRANSACTION 资源定义中的 TRACE (NO)。
- TRAN_PRIORITY (name4 | (Rn))
- 返回在事务定义上指定的事务优先级。
- name4
- 要接收事务优先级的 4 字节位置的名称，以二进制值表示。
- (Rn)
- 用于接收事务优先级的寄存器，以二进制值表示。
- TRAN_ROUTING_PROFILE (name8)
- 返回 CICS 用于将事务路由到远程系统的概要文件的名称。
- name8
- 要接收事务路由概要文件的 8 字节位置的名称。
- TRANSACTION_ID (name4)
- 返回此事务定义查询的主事务标识。
- name4
- 包含事务标识名称的 4 字节位置的名称。
- TWASIZE (name4 | (Rn))
- 返回在事务定义上指定的事务工作区的大小。
- name4
- 用于接收事务工作区大小的 4 字节位置的名称，以二进制值表示。
- (Rn)
- 用于接收事务工作区大小的寄存器，以二进制值表示。
INQUIRE_TRANDEF 的 RESPONSE 和 REASON 值
| RESPONSE | 推理 |
|---|---|
| 确定 | 无 |
| EXCEPTION | UNKNOWN_TRANSACTION_ID |
| INVALID | 无 |
| DISASTER | LOGIC_ERROR |
| PURGED | 无 |