Issue an EXEC CICS® LINK to program EZACIC20 to start or stop the CICS socket interface. You need to follow these
steps in the LINKing program.
Procedure
Perform the following steps to start or stop the CICS socket interface with program
link:
- Define the COMMAREA for EZACIC20 by including the following
instruction in your DFHEISTG definition:
EZACICA AREA=P20,TYPE=CSECT
The length of the area is equated to P20PARML, and the name of the
structure is P20PARMS.
- Initialize the COMMAREA values as follows:
- P20TYPE
-
- I
- Initialization
- T
- Immediate termination
- D
- Deferred termination
- Q
- Quiesce the CICS socket interface by querying the PLT shutdown immediate configuration
option and performing the shutdown based on the results of that query
- P20OBJ
-
- C
- CICS sockets interface
- L
- Listener
- P20LIST
- Name of listener (if this is listener initialization or termination)
- Issue the EXEC CICS LINK to program EZACIC20. EZACIC20 does not return until the function
is complete.
- Check the P20RET field for the response from EZACIC20.
See the P20RET field of the P20PARMS structure in the hlq.SEZACMAC(EZACICA)
macro for the meanings of the return values from calling EZACIC20.
Results
EZACIC20 can issue the following user abend codes:
- Abend code E20L is issued if the CICS socket interface is not in startup or termination and no
COMMAREA was provided.
- Abend
code E20T is issued if CICS is not active or if you run the EZACIC20 program at the wrong PLT
phase. See CICS program list table for more information
about setting CICS TCP sockets
to automatically startup or shutdown by using updates to the PLT.