User Exits › User Exit 8

User Exit 8

Purpose

This exit point allows execution of a user‑developed exit routine that performs user‑defined initialization and termination processing for the CA XCOM Data Transport server. This exit allows extension of CA XCOM Data Transport with user‑supplied control blocks and processing. For example, the exit can acquire (GETMAIN) and release (FREEMAIN) control blocks, or load custom user modules.

Module Name and Entry Point

The default module name and entry point for this exit is XCOMEX08. The default module name can be overridden by specifying the load-module name in the Default Options.

How to Enable

Specify EXIT08=YES | Load-module name in the Default Options to enable this exit.

Calling Module

The module XCOMXFER calls this exit.

Entry Method

This exit is a branch entry.

Required DSECT

EX08PLST is the required DSECT.

Addressing Mode at Entry

The addressing mode at entry is 31.

Registers at Entry

The following registers are available at entry:

R0

Undefined

R1

Address of EX08PLST

R2 to R12

Undefined

R13

Address of register save area

R14

Return address

R15

Entry point address

Registers at Exit

The following registers are available at exit:

R0 to R14

Undefined

R15

Return code

Valid Return Code

The only valid return code is 0 for a normal return.

Sample Program

The following is a sample program using this exit:

CAI.CBXGSAMP(XCOMEX08)