The INQUIRE_ACCESS call

INQUIRE_ACCESS returns the access-key of an element of storage specified by start address and length. If the element is not wholly contained within one of the CICS® dynamic storage areas (DSAs), CICS returns an exception response.

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 | *)]

This command is threadsafe.

ACCESS(CICS|READ_ONLY|USER)

returns the access-key of the storage element.

CICS: CICS-key
READ_ONLY: Readonly storage
USER: User-key.

ELEMENT_ADDRESS(name4 | (Rn) | *)

specifies the address of the storage element.

ELEMENT_LENGTH(name4 | (Rn) | *)

specifies the length of the storage element, in bytes. A length of zero is treated as a length of one.

RESPONSE and REASON values for INQUIRE_ACCESS

RESPONSE	REASON
OK	None
EXCEPTION	INVALID_ELEMENT
DISASTER	None
INVALID	None
KERNERROR	None