Server Guide : Appendix B. CICS Smalltalk classes : INQUIRE TDQUEUE command
INQUIRE TDQUEUE command
Retrieves information about the named transient data queue definition from the destination control table (DCT). In Smalltalk, the parameters of the INQUIRE TDQUEUE command are contained in two classes: CICSInquiretdqueue and CICSInquiretdqueueResult.
See CICS Application Programming Reference for the syntax of the command a description of the parameters.
Defined instance methods
Parameters supplied to CICS in CICSInquiretdqueue
 
Parameter
Instance method
Mode
Type
Notes/exceptions
TDQUEUE(name)
tdqueue:
Input
Fixed(4)
 
Parameters returned by CICS in CICSInquiretdqueueResult
 
Parameter
Instance method
Mode
Type
Notes/exceptions
ATITERMID(data-area)
atitermid
Output
Fixed(4)
Intrapartition queues only.
ATITRANID(data-area)
atitranid
Output
Fixed(4)
Intrapartition queues only.
ENABLESTATUS(cvda)
enablestatus
Output
Binary 32
All queues except for indirect queues.
OPENSTATUS(cvda)
openstatus
Output
Binary 32
Extrapartition queues only.
RESP
resp
Output
Fixed(2)
Inherited from CICSResult.
RESP2
resp2
Output
Fixed(2)
Inherited from CICSResult.
TRIGGERLEVEL(data-area)
triggerlevel
Output
Binary 32
Intrapartition queues only.
TYPE(cvda)
type
Output
Binary 32
 
Example
Inquire after the TD queue named TDQ1 and, if the queue is disabled, enable it.
| result enable |
result := CICS inquiretdqueue tdqueue: 'TDQ1'; exec.
result enablestatus = CVDA_DISABLED
ifTrue: [enable := CICS settdqueue tdqueue: 'TDQ1';
enablestatus: CVDA_ENABLED;
exec]
Last modified date: 07/09/2019