Configuring and Installing Optional Components › Tasks for Separately Licensed Components › Install the XTDOUT COF Interface for CICS/TS

Install the XTDOUT COF Interface for CICS/TS

The following list pertains to the CICS/TS interface:

• It uses the CICS global exit (XTDOUT) to intercept all transient data write requests. CA OPS/MVS matches a transient data queue name against a list of designated queue names for AOF processing.
• Messages sent to the matched queue names are forwarded to the AOF for rules processing, which also allows for message suppression and rewording. Messages sent to unmatched queue names are ignored by the exit.
• You build and maintain the designated queue name list with the ADDRESS OPSCTL COF command.
• No changes to the standard CICS DCT are required to intercept transient data messages and the selection of specific destinations can be dynamically altered.
• You can build a distinct queue name list for each CICS region, and a general default list for undefined CICS regions.

To install the XTDOUT COF interface

1. Copy load module OPCITDCN from SYS1.OPS.CCLXLOAD to a library in the CICS DFHRPL concatenation.

   The module is linked AMODE=31 and RMODE=ANY.

2. Define the transaction and program to CICS using the CICS RDO facility:

   DEFINE GROUP(OPXTDOUT) PROGRAM(OPCITDCN)
      DATALOCATION(ANY) EXECKEY(CICS)
      LANGUAGE(ASSEMBLER) RESIDENT(YES)
      DESCRIPTION(OPS/MVS XTDOUT GLOBAL EXIT)
   DEFINE GROUP(OPXTDOUT) TRANSID(OPTD) PROGRAM(OPCITDCN)
      TASKDATAKEY(CICS) TASKDATALOC(ANY)
      DESCRIPTION(OPS/MVS XTDOUT EXIT CONTROL)
   INSTALL GROUP(OPXTDOUT)
   ADD GROUP(OPXTDOUT) LIST(DFHLIST)
   

   The XTDOUT exit code is contained in the OPCITDCN program, and it is enabled as an entry point address in this module using the name OPCITDEX. The exit program does not need to be defined to CICS.

3. Enable the XTDOUT exit by invoking OPTD from a CICS terminal or with a MODIFY command from a z/OS console. OPCITDCN may be added to the CICS PLTPI stage 3 for automatic exit enablement at CICS initialization when desired.
4. Activate the AOF processing of CICS messages by setting the INITCOF and CICSAOF parameters to YES and define, at the least, the default transient data queue name list.

   X = OPSPRM('SET','INITCOF','YES')
   X = OPSPRM('SET','CICSAOF','YES')
   ADDRESS OPSCTL "COF DEFINE JOBNAME(DEFAULT)",
        "DESTIDS(CSMT,CSSL,CADL,...)"
   

   The XTDOUT COF interface for CICS/TS is installed.

For information on permitting the suppression of transient data queue messages by AOF rules, see the description of the CICSDELETE parameter in the Parameter Reference.

The OPTD transaction may be used to disable and re-enable the exit at any time by invoking OPTD with a single character command code as follows:

• OPTD E-Enable the XTDOUT exit (default command)
• OPTD D-Disable the XTDOUT exit
• OPTD S-Display the status of the XTDOUT exit
• OPTD T-Issue a test message to the transient data queue
• OPTD H-Issue the periodic CICS status message, OPS3420O