In a multiregion environment, where an application is using shared
temporary storage queues, there are special considerations when using the
Link3270 bridge facility. This is because there is a unique Link3270 bridge
facility for every CICS region.
If you form all or part of the name of shared temporary storage queues
from the terminal id, the same terminal id must be used for each Link3270
bridge facility in a pseudo-conversation across the CICS regions. You can
use a bridge facility autoinstall program exit for this purpose. The CICS
system initialization parameter AIBRIDGE controls the
calling of a bridge facility autoinstall user replaceable module.
- Change the AIBRIDGE parameter to AIBRIDGE=YES.
- Modify the CICS-supplied sample autoinstall user replaceable module,
DFHZATDX, to change the terminal id that is supplied by the Link3270 bridge. The sample code below changes the last character of the terminal id
from a } to a #.
INSTALL_BRIDGE_FACILITY DS 0H
USING INSTALL_BRFAC_COMMAREA,R2 Address commarea
* ==> PUT INSTALL CODE HERE
USESEL DS 0H
*
* This sample accepts the selected termid/netname.
* Special consideration MUST be given to how this termid
* will be used.
* In particular it must not conflict with the namespace of
* real terminals.
*
L R5,INSTALL_BRFAC_SELECTED_PTR
USING INSTALL_BRFAC_SELECTED_PARMS,R5
L R8,INSTALL_BRFAC_TERMID_PTR
MVC SELECTED_BRFAC_TERMID,0(R8)
L R8,INSTALL_BRFAC_NETNAME_PTR
MVC SELECTED_BRFAC_NETNAME,0(R8)
* following 5 lines inserted for application shared TSQ's
CLI SELECTED_BRFAC_TERMID+3,X'D0' is the last char a }?
BNE RETURN If not then already altered, so accept it
* otherwise change the last char of the termid and netname
MVI SELECTED_BRFAC_TERMID+3,X'7B' change } to #
MVI SELECTED_BRFAC_NETNAME+3,X'7B' change } to #
MVI SELECTED_BRFAC_RETURN_CODE,RETURN_OK Say all OK
*
B RETURN EXIT PROGRAM
- If you want to write your own autoinstall user replaceable module,
edit the system initialization parameter AIEXIT to specify
the name of the module.
For more information about DFHZATDX, see "Allocating a bridge facility
name for a pseudo-conversation when using he Link3270 bridge for transaction
routing in the CICS External Interfaces Guide and "Writing a
program to control autoinstall of terminals" in the CICS Customization
Guide.