Exit xdlipost – IBM SC34-6814-04 User Manual

Page 73

Advertising
background image

UEPPSB1

A PSB exists.

UEPPSBNM

Address of an area containing the 8-character PSB name. The
contents of the area can be overwritten by the exit, for all types of
request including UEPCSHIP; the new contents are used when the
DL/I request is processed.

UEPSYSDX

Address of the SYSID existence flag byte:

UEPSYS1

A SYSID exists.

UEPSYSID

Address of an area containing the 4-character SYSID name. The
contents of the area can be overwritten by the exit, for all types of
request including UEPCSHIP; the new contents are used when the
DL/I request is processed.

Return codes

UERCNORM

Continue processing

UERCBYP

Bypass DL/I request and return

UERCPURG

Task purged during XPI call.

XPI calls

All can be used.

Exit XDLIPOST

When invoked

On exit from the DL/I interface program.

Exit-specific parameters

UEPCTYPE

Address of type-of-request byte. Values are:

UEPCEXEC

An EXEC DLI request.

UEPCCALL

A CALL-level request.

UEPCSHIP

The request has been function shipped from another region.
When this value is set, restrictions apply to the setting and
use of the rest of the exit parameters, as described below.

UEPAPLIST

Address of application’s parameter list. The general format for
COBOL and assembler language is:

plist address --> parm1 address --> parm1

parm2 address --> parm2
parm3 address --> parm3
..............
up to a maximum of 18 parameters
excluding the optional parmcount.

Chapter 1. Global user exit programs

51

Advertising