Use the CICS Monitor Exit Interface › Use the EXEC CICS Command Level Program Coding Method › Record Non CICS Program Usage

Record Non CICS Program Usage

Many CICS transactions execute programs that are not defined to CICS. Knowing the names of non-CICS or external programs that are being used lets you track their usage.

Use the following CICS command level program example to code this function:

....+....1....+....2....+....3....+....4....+....5....+....6||7..
DFHEISTG	    DSECT ,
MEIC		    GSVCMEI GEN_COMMAREA,DSECT=NO

module   DFHEIENT

	MVS   MEIC_Function,=AL4(MEIC_ProgramUse) 	Function
	MVC   MEIC_F002_Program,=CL08'program'		Program

	EXEC CICS LINK PROGRAM('GSVCMEI')			  X
	     COMMAREA(MEIC)					  X
	     LENGTH(=AL2(MEIC_L))

	EXEC CICS RETURN

Program usage parameters:

program

Specifies an eight-character program name.