INQUIRE PROGRAM command
Retrieves information about the named CICS for workstation program. In Smalltalk, the parameters of the INQUIRE PROGRAM command are contained in two classes: CICSInquireprogram and CICSInquireprogramResult.
See CICS Transaction Server Application Programming Reference for the syntax of the command a description of the parameters.
Defined instance methods
Parameters supplied to CICS in CICSInquireprogram
| | | | |
PROGRAM(name) | program: | Input | Fixed(8) | |
Parameters returned by CICS in CICSInquireprogramResult
| | | | |
RESP | resp | Output | Fixed(2) | Inherited from CICSResult. |
RESP2 | resp2 | Output | Fixed(2) | Inherited from CICSResult. |
STATUS(cvda) | status | Output | Binary 32 | |
Example
Inquire after the program named PROGDLL, and if the program is disabled, return an error message.
| result |
result := CICS inquireprogram program: 'PROGDLL'; exec.
result status = CVDA_DISABLED
ifTrue: [^Transcript cr; show: 'The requested program is disabled.'].
Last modified date: 07/09/2019