Using the CICS Monitor Exit Interface › Use the EXEC CICS Command Level Program Coding Method › Set User Data

Set User Data

The SET_USERDATA function sets or saves data values associated with an executing transaction.

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

	MVC   MEIC_Function,=AL4(MEIC_SetUserData)   Function
	MVC   MEIC_F009_Name,=CL32'dataelementname'
	MVC   MEIC_F009_Type,=AL1(MEIC_F009_EBCDIC)
	MVC   MEIC_F009_DataLen,=Y(256)
	MVC   MEIC_F009_Data(256),=CL256'datavalue'

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

	EXEC CICS RETURN