INQUIRE_ACCESS 调用

INQUIRE_ACCESS 返回由起始地址和长度指定的存储器元素的访问键。如果元素未完全包含在其中一个 CICS® 动态存储区 (DSA) 中，那么 CICS 将返回异常响应。

INQUIRE_ACCESS

DFHSMSRX [CALL,]
      [CLEAR,]
      [IN,
      FUNCTION(INQUIRE_ACCESS),
      ELEMENT_ADDRESS(name4 | (Rn) | *),
      ELEMENT_LENGTH(name4 | (Rn) | *),]
      [OUT,
      ACCESS(CICS | READ_ONLY | USER),
      RESPONSE(name1 | *),
      REASON(name1 | *)]

此命令是线程安全的。

访问 (CICS| READ_ONLY | USER)

返回存储元素的访问键。

CICS: CICS 键 (CICS-key)
READ_ONLY: 只读存储器
USER: 用户密钥。

ELEMENT_ADDRESS (name4 | (Rn) | *)

指定存储元素的地址。

ELEMENT_LENGTH (name4 | (Rn) | *)

指定存储元素的长度 (以字节为单位)。长度为零将被视为长度为 1。

INQUIRE_ACCESS 的 RESPONSE 和 REASON 值

RESPONSE	推理
确定	无
EXCEPTION	INVALID_ELEMENT
DISASTER	无
INVALID	无
KERNERROR	无