[Optional.] Use the following 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 in hlq.SAMP(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
END
Use the DFHAUPLE job to assembler the PLTPI table. A sample DFHAUPLE job is available in hlq.SAMP(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 the following command from a CICS session to define the new PLTPI module:
CEDA DEFINE PROGRAM(EVPLTPI) GROUP(EVOGRP) LANGUAGE(ASSEMBLER)