The INQUIRE_TASK_STORAGE64 call

INQUIRE_TASK_STORAGE64 enables you to request details of all elements of task-lifetime 64-bit storage belonging to a task. You can specify the transaction number of the task explicitly on the call, or let it default to the current task.

INQUIRE_TASK_STORAGE64

DFHSMMCX  [CALL,]
       [CLEAR,]
       [IN,
       FUNCTION (INQUIRE_TASK_STORAGE64),
       [TRANSACTION_NUMBER(name4 | (Rn) | *),]
       ELEMENT_BUFFER64(buffer-descriptor),
       LENGTH_BUFFER64(buffer-descriptor),]
       [OUT,
       NUMBER_OF_ELEMENTS(name4 | (Rn) | *),
       RESPONSE (name1 | *),
       REASON (name1 | *)]

This command is threadsafe.

ELEMENT_BUFFER64(buffer-descriptor): Defines the address and length of a buffer into which CICS® returns a list of start addresses of all the elements of task-lifetime 64-bit storage belonging to either the specified task or, by default, the current task.
The start addresses returned do not include the leading check zone. For a description of a buffer descriptor, see XPI syntax.
LENGTH_BUFFER64(buffer-descriptor): Defines the address and length of a buffer into which CICS returns a list of the lengths of the elements of task-lifetime 64-bit storage belonging to either the specified task or, by default, the current task. The lengths returned do not include the leading or trailing check zones.
For a description of a buffer descriptor, see XPI syntax.
NUMBER_OF_ELEMENTS(name4 | (Rn) | *): Returns the number of entries in each of the two buffers, ELEMENT_BUFFER64 and LENGTH_BUFFER64, as a full-word binary value.
TRANSACTION_NUMBER(name4 | (Rn) | *): Specifies, as a 4 byte packed decimal value, the transaction number of the task to which the 64-bit storage belongs.
If you omit the transaction (task) number, CICS assumes the current task.

Note: XPI commands can only run in AMODE 31. INQUIRE_ELEMENT_LENGTH and INQUIRE_TASK_STORAGE64 return either the element address as a 64-bit address or a list of 64-bit address in a 31-bit buffer. These addresses are not accessible to AMODE 31 programs.

RESPONSE and REASON values for INQUIRE_TASK_STORAGE64

RESPONSE	REASON
OK	None
EXCEPTION	INSUFFICIENT_STORAGE
	NO_TRANSACTION_ENVIRONMENT
DISASTER	None
INVALID	None
KERNERROR	None
PURGED	None