IBM SC34-6814-04 User Manual

Page 199

Advertising
background image

2. Reinvoke the routing program, on the routing region, for route selection

failure.

3. Return a RESUNAVAIL condition on the EXEC CICS LINK command

executed by the mirror on the target region. (This condition is not returned
to the application program.)

CICS ignores any changes made by the exit program to the values of any of
the exit parameters. Your exit program can set a return code, but not change
any parameters.

For guidance information about dynamically routing DPL requests, see the
CICS Intercommunication Guide. For guidance information about dynamically
routing Link3270 bridge requests, see the CICS External Interfaces Guide. For
programming information about writing a dynamic routing program to route DPL
requests, see “Routing DPL requests dynamically” on page 597. For
programming information about writing a dynamic routing program to route
Link3270 bridge requests, see “Routing bridge requests dynamically” on page
603.

XPCREQC

XPCREQC is invoked after a link request has completed. You can use this exit
to pass back a response to the application via the EIBRESP or EIBRESP2
fields. Such responses could be used to keep status information about a link
request up-to-date. For example, if a link request fails because a connection is
unavailable, XPCREQC could set EIBRESP=500 (a response code not used by
CICS) to indicate the failure, enabling the application, in conjunction with the
other exit, XPCREQ, to determine a suitable course of action.

Note: The XPCREQC exit is invoked by internal requests made by CICS code,

as well as by requests made by applications.

Exit XPCREQ:

When invoked

By the EXEC interface program before a link request is processed.

Exit-specific parameters

UEPCLPS

Address of the command parameter list.

UEPPCTOK

Address of a 4-byte token to be passed to XPCREQC. This allows
you, for example, to pass a work area to exit XPCREQC.

UEPRCODE

Address of a 6-byte hexadecimal copy of EIBRCODE.

UEPRECUR

Address of a halfword recursion counter. The counter is set to 0
when the exit is first invoked, and is incremented for each recursive
call.

UEPRESP

Address of a 4-byte copy of EIBRESP.

UEPRESP2

Address of a 4-byte copy of EIBRESP2.

UEPTSTOK

Address of a 4-byte token that is valid throughout the life of a task.
See “Using the task token UEPTSTOK” on page 185.

Chapter 1. Global user exit programs

177

Advertising