[Optional.] Use these steps to add an entry to the CICS PLTPI table to activate the XMEOUT exit each time CICS is started (eliminating the need for entering the above CECI ENABLE command).
-
Create a PLTPI program.
Run the CICS DFHEITAL procedure with assembler code to start the EVXMEOUT exit. The assembler input for the DFHEITAL job is in
hlq.ASM(EVPLTPI). A sample DFHEITAL job is available inSDFHPROC(DFHEITAL). -
Update the PLTPI table.
Add the name of the load module created in Step 1 to the PLTPI table after the DFHDELIM entry. By default, the name is EVPLTPI. A sample PLTPI table follows:
* LIST OF PROGRAMS TO BE EXECUTED SEQUENTIALLY DURING SYSTEM * INITIALIZATION. * DFHPLT TYPE=INITIAL,SUFFIX=I1 DFHPLT TYPE=ENTRY,PROGRAM=TRAQA DFHPLT TYPE=ENTRY,PROGRAM=TRAQB * DFHPLT TYPE=ENTRY,PROGRAM=DFHDELIM * DFHPLT TYPE=ENTRY,PROGRAM=TRASA DFHPLT TYPE=ENTRY,PROGRAM=TRASB DFHPLT TYPE=ENTRY,PROGRAM=EVPLTPI DFHPLT TYPE=FINAL * ENDUse the DFHAUPLE job to assembler the PLTPI table. A sample DFHAUPLE job is available in
SDFHINST(DFHAUPLE). - Identify the PLTPI to CICS. Add a PLTPI entry to the CICS startup parameters if one is not already specified.
-
Add a definition for the new PLTPI module.
Enter this command from a CICS session to define the new PLTPI module:
CEDA DEFINE PROGRAM(EVPLTPI) GROUP(EVOGRP) LANGUAGE(ASSEMBLER)