GET_TP_PROPERTIES谓词返回事务程序(TP)和当前事务的属性。
以下结构描述了 GET_TP_PROPERTIES 谓词使用的谓词控制块。
语法
struct get_tp_properties {
unsigned short opcode;
unsigned char opext;
unsigned char reserv2;
unsigned short primary_rc;
unsigned long secondary_rc;
unsigned char tp_id[8];
unsigned char tp_name[64];
unsigned char lu_alias[8];
unsigned char luw_id[26];
unsigned char fqlu_name[17];
unsigned char reserve3[10];
unsigned char user_id[10];
unsigned char prot_luw_id[26];
unsigned char pwd[10];
};
成员
opcode
提供的参数。 指定谓词作代码,AP_GET_TP_PROPERTIES。
opext
提供的参数。 指定谓词作扩展。 如果设置了AP_EXTD_VCB位,则表示 get_tp_properties 结构包括用于同步点支持的 prot_luw_id 成员。 否则,谓词控制块将在 user_id 成员之后立即结束。
reserv2
保留字段。
primary_rc
返回的参数。 指定 APPC 在谓词完成时设置的主要返回代码。 有效的返回代码因发布的 APPC 谓词而异。 有关此谓词的有效错误代码,请参阅返回代码。
secondary_rc
返回的参数。 指定 APPC 在谓词完成时设置的辅助返回代码。 有效的返回代码因发布的 APPC 谓词而异。 有关此谓词的有效错误代码,请参阅返回代码。
tp_id
提供的参数。 标识本地 TP。 此参数的值由调用 TP 中的 TP_STARTED 或调用的 TP 中的 RECEIVE_ALLOCATE 返回。
tp_name
返回的参数。 提供发出谓词的 TP 的 TP 名称。 该名称以 64 字节 EBCDIC 字符串的形式返回,用 EBCDIC 空格填充在右侧。
lu_alias
返回的参数。 提供分配给本地 LU 的别名。 它以 8 字节 ASCII 字符串的形式返回,该字符串用 ASCII 空格填充在右侧。
luw_id
返回的参数。 为参与 TP 的事务提供未受保护的逻辑工作单元标识符。 事务中可以涉及多个 TP。 此标识符代表发起事务的 TP 分配,允许构成事务的会话在逻辑上连接。
luw_id可以表示为具有以下字段的luw_id_overlay结构:
typedef struct luw_id_overlay { unsigned char fqla_name_len; unsigned char fqla_name[17]; nsigned char instance[6]; unsigned char sequence[2];} LUW_ID_OVERLAY;
luw_id.fqla_name_len
原始 TP 的 LU 的完全限定 LU 名称的 1 字节长度。
luw_id.fqla_name
原始 TP 的 LU 的完全限定名称。 该名称以 17 字节 EBCDIC 字符串的形式返回,其中包含 NETID、句点和 LU 名称。 如果名称的长度小于 17 个字节, 则实例 和 序列号 将紧随其后。 (请注意,因此,不应使用 luw_id_overlay 结构的字段来访问这些值。它们仅用于兼容性。
luw_id.instance
由 LU 为发起的 TP 唯一生成的 6 字节字符串。
luw_id.sequence
一个 2 字节数字,指示工作单位的段。 (如果不支持同步点,则始终设置为 1。
如果 luw_id 长度小于 26 字节,则用 EBCDIC 空格填充右侧。
fqlu_name
返回的参数。 提供本地 LU 的完全限定名称。 该名称以 17 字节 EBCDIC 字符串的形式返回,其中包含 NETID、句点和 LU 名称。 名称用 EBCDIC 空格填充在右侧。
reserve3
保留字段。
user_id
提供的参数。 指示分配请求中启动的 TP 提供的 user_id 。 该名称以 10 字节 EBCDIC 字符串的形式提供,用 EBCDIC 空格填充在右侧。
prot_luw_id
返回的参数。 包含与 TP 参与的事务的受保护逻辑工作单元标识符(如果会话分配有 同步层 同步点)。
事务中可以涉及多个 TP。 此标识符代表发起事务的 TP 分配,允许构成事务的会话在逻辑上连接。
prot_luw_id可以表示为具有以下字段的luw_id_overlay结构:
typedef struct luw_id_overlay { unsigned char fqla_name_len; unsigned char fqla_name[17]; nsigned char instance[6]; unsigned char sequence[2];} LUW_ID_OVERLAY;
luw_id.fqla_name_len
原始 TP 的 LU 的完全限定 LU 名称的 1 字节长度。
luw_id.fqla_name
原始 TP 的 LU 的完全限定名称。 该名称以 17 字节 EBCDIC 字符串的形式返回,其中包含 NETID、句点和 LU 名称。 如果名称的长度小于 17 个字节, 则实例 和 序列号 将紧随其后。 (请注意,因此,不应使用 luw_id_overlay 结构的字段来访问这些值。仅提供这些项是为了兼容。
luw_id.instance
由 LU 为发起的 TP 唯一生成的 6 字节字符串。
luw_id.sequence
一个 2 字节数字,指示工作单位的段。 (如果不支持同步点,则始终设置为 1。
如果 prot_luw_id 长度小于 26 个字节,则用 EBCDIC 空格填充右侧。
pwd
提供的参数。 包含分配请求中发起的 TP 的 user_id 的密码。 密码以 10 字节 EBCDIC 字符串的形式提供,用 EBCDIC 空格填充在右侧。
返回代码
AP_OK
主要返回代码;已成功执行谓词。
AP_PARAMETER_CHECK
主要返回代码;由于参数错误,谓词未执行。
AP_BAD_TP_ID
辅助返回代码; tp_id 的值与 APPC 分配的 TP 标识符不匹配。
AP_COMM_SUBSYSTEM_ABENDED
主要返回代码;指示以下条件之一:
此会话使用的节点遇到 ABEND。
TP 与 PU 2.1 节点之间的连接已中断(LAN 错误)。
TP 计算机上的 SnaBase 遇到 ABEND。
系统管理员应检查错误日志以确定 ABEND 的原因。
AP_COMM_SUBSYSTEM_NOT_LOADED
主要返回代码;处理谓词时,无法加载或终止所需的组件。 因此,无法进行通信。 请联系系统管理员以采取纠正措施。AP_INVALID_VERB_SEGMENT
主要返回代码;VCB 超出了数据段的末尾。AP_STACK_TOO_SMALL
主要返回代码;应用程序的堆栈大小太小,无法执行谓词。 增加应用程序的堆栈大小。AP_TP_BUSY
主要返回代码;本地 TP 已发出对 APPC 的调用,而 APPC 正在处理同一 TP 的另一个调用。 如果本地 TP 有多个线程,并且多个线程使用相同的 tp_id发出 APPC 调用,则可能会出现这种情况。AP_UNEXPECTED_DOS_ERROR
主要返回代码;作系统在处理来自本地 TP 的 APPC 调用时,已将错误返回到 APPC。 作系统返回代码通过 secondary_rc返回。 它以 Intel 字节交换的顺序显示。 如果问题仍然存在,请咨询系统管理员。
注解
此谓词与 TP(而不是规范对话)相关,因此 TP 可以在任何状态下发出谓词。 没有状态更改。
luw_id成员包含fqla_name_len(LU 发起 TP 的完全限定 LU 名称的长度)、fqla_name(发起 TP 的 LU 的完全限定名称)、实例(由 LU 唯一生成的 TP)和序列(始终设置为 1 并指示工作单元段)。