Previous Topic: TIRTERMA—Termination ExitNext Topic: Purpose


Source Code

TIRTERMA Termination Exit is used by all non-cooperative applications targeting z/OS. The source code is in CA Gen CEHBSAMP library, in member TIRTERMA. The sample exit provided is written in COBOL and uses standard OS Linkage.

The parameters passed between the fail routine and the termination exits are defined via structure TERM-EXIT-PARM-LIST. This structure is included via copy member CBLTERM, which is also in the CEHBSAMP library.

The Linkage Parameter list used by TIRTERMA is as follows:

01  RUNTIME-PARM1                PIC X.
01  RUNTIME-PARM2                PIC X.
01  TERM-EXIT-PARM-LIST          structure defined in CBLTERM.
01  GLOBDATA                     size 3645 bytes.