Exit xsnex – IBM SC34-6814-04 User Manual

Page 223

Advertising
background image

UEPTRMTY

Address of the terminal-type byte.

UEPSNFLG

Address of a 2-byte field containing flags:

UEPSNOK

Sign-off was successful

UEPSNFL

Sign-off failed

UEPSNNML

Normal sign-off

UEPSNTIM

Timeout sign-off.

Return codes

UERCNORM

Continue processing.

UERCPURG

Task purged during XPI call.

XPI calls

All can be used.

Exit XSNEX

The purpose of XSNEX, in conjunction with its supporting sample programs, is to
provide a short-term migration aid. It is designed to give you time to modify those
application programs that have a dependency on the way CICS handles EXEC
CICS SIGNON and SIGNOFF before CICS TS 2.1, to enable them to work with the
current behavior.

Note: XSNEX is a migration aid only. You should consider removing all

application dependency on the old sign-on and sign-off behaviour.

There are no exit-specific parameters for this global user exit, which is invoked
whenever an application program issues an EXEC CICS SIGNON or an EXEC
CICS SIGNOFF command. You are not intended to write your own global user exit
program for this exit point. IBM provides DFH$SNEX, the sole purpose of which is
to make CICS handle EXEC CICS SIGNON and SIGNOFF commands in the same
way as in CICS TS 1.3 and earlier.

The supplied programs are:

DFH$SNEX

This user exit program is supplied in SDFHSAMP. The only function the
program performs is to set return code UERCPREV, which causes the security
domain to restore CICS behavior as in CICS TS 1.3 and earlier. You can enable
this user exit program using DFH$SNPI.

DFH$SNPI

This post-initialization program is supplied in SDFHSAMP. It issues an EXEC
CICS ENABLE PROGRAM('DFH$SNEX') EXIT('XSNEX') command to enable
the IBM-supplied user exit program, DFH$SNEX, in the final stages of CICS
initialization.

Chapter 1. Global user exit programs

201

Advertising