Previous Topic: TIRCRTRX—Default Retry Limit ExitNext Topic: Purpose


Source Code

This exit is used by CICS applications only. The source code for this exit is in CA Gen CEHBSAMP library, in member TIRCRTRX. The sample exit provided is written in COBOL and uses standard OS Linkage.

The Linkage Parameter list used by TIRCRTRX is as follows:

01  RUNTIME-PARM1              	PIC X.      
01  RUNTIME-PARM2               	PIC X.
01  RETRY-TIMES			PIC S9(4) COMP.
01 GLOBDATA 			size 3645 bytes.