The INQ_APPLICATION_DATA call

The INQ_APPLICATION_DATA call enables you to inquire on application system data in the AP domain.

INQ_APPLICATION_DATA

  DFHAPIQX [CALL,]
     [CLEAR,]
     [IN,
     FUNCTION(INQ_APPLICATION_DATA),]
     [OUT,
     [ACEE(name4 | (Rn) | * ),]     [DSA(name4 | (Rn) | * ),]
     [EIB(name4 | (Rn) | * ),]
     [RSA(name4 | (Rn) | * ),]
     [SYSEIB(name4 | (Rn) | * ),]
     [TCTUA(name4 | (Rn) | * ),]
     [TCTUASIZE(name4 | * ),]
     [TWA(name4 | (Rn) | * ),]
     [TWASIZE(name4 | (Rn) | * ),]
     RESPONSE (name1 | * ),
     REASON (name1 | * )]

This command is threadsafe.

ACEE(name4 | (Rn | * )
returns the address of the access control environment element (ACEE).
name4
The name of a fullword area that is to receive the address of the ACEE.
(Rn)
A register that is to receive the ACEE address.
*
The parameter list itself, in name APIQ_ACEE, is used to hold the address.
DSA(name4 | (Rn | * )
returns the head of the chain of dynamic storage used by application programs to make them reentrant (for example, for assembler programs, the DFHEISTG storage).
name4
The name of a 4-byte area that is to receive the address of the head of the dynamic storage chain.
(Rn)
A register that is to receive the DSA address.
*
The parameter list itself, in name APIQ_DSA, is used to hold the address.
EIB(name4 | (Rn) | *)
returns the address of the EXEC interface block (EIB) for the current task.
name4
The name of a fullword area that is to receive the address of the EIB.
(Rn)
A register that is to receive the address of the EIB.
*
The parameter list itself, in name APIQ_EIB, is used to hold the address.
RSA(name4 | (Rn | * )
returns the address of the register save area for the current task.
name4
The name of a fullword area that is to receive the address of the register save area.
(Rn)
A register that is to receive the address of the register save area.
*
The parameter list itself, name APIQ_RSA, is used to hold the address.
SYSEIB(name4 | (Rn) | *)
returns the address of the system EXEC interface block of the current task.
name4
The name of a fullword area that is to receive the address of the system EXEC interface block.
(Rn)
A register that is to receive the address of the system EXEC interface block.
*
The parameter list itself, name APIQ_SYSEIB, is used to hold the address.
TCTUA(name4 | (Rn) | *)
returns the address of the terminal control table user area (TCTUA) for the current task.
name4
The name of a fullword area that is to receive the address of the TCTUA.
(Rn)
A register that is to receive the address of the TCTUA.
*
The parameter list itself, name APIQ_TCTUA, is used to hold the address.
TCTUASIZE(name4 | (Rn) | *)
returns the length in bytes of the TCTUA for the current task.
name4
The name of a 4-byte area that is to receive the length in bytes of the TCTUA.
(Rn)
A register that is to receive the length of the TCTUA.
*
The parameter list itself, name APIQ_TCTUASIZE, is used to hold the length of the TCTUA.
TWA(name4 | (Rn) | *)
returns the address of the transaction work area.
name4
The name of a fullword area that is to receive the address of the TWA.
(Rn)
A register that is to receive the address of the TWA.
*
The parameter list itself, name APIQ_TWA, is used to hold the address of the TWA.
TWASIZE(name4 | (Rn) | *)
returns the length, in bytes, of the transaction work area (TWA).
name4
The name of a 4-byte area that is to receive the length, in bytes, of the TWA.
(Rn)
A register that is to receive the length of the TWA.
*
The parameter list itself, name APIQ_TWASIZE, is used to hold the length of the TWA.

RESPONSE and REASON values for INQ_APPLICATION_DATA

RESPONSE REASON
OK None
EXCEPTION DPL_PROGRAM
  NO_TRANSACTION_ENVIRONMENT
  TRANSACTION_DOMAIN_ERROR
DISASTER ABEND
  LOOP
  INQ_FAILED
INVALID INVALID_FUNCTION
KERNERROR None
PURGED None