Copyright © TIBCO Software Inc. All Rights Reserved
Copyright © TIBCO Software Inc. All Rights Reserved


Chapter 7 Using the TIBCO Service Gateway for CICS : Performing CICS Functions at Session End

Performing CICS Functions at Session End
At session end, the default action taken by the TIBCO Object Service Broker CICS client program is to issue an EXEC CICS RETURN. You can execute a CICS command-level program written in COBOL, PL/I, assembler, or C at the end of your TIBCO Object Service Broker session either directly or through a CICS transid. Two methods are provided:
Supply the SESSIONENDACTION and SESSIONENDVALUE session parameters to TIBCO Object Service Broker at session startup
CALL the $SETSESSIONEND tool, which overrides any value set by the session parameters
Both methods require that you supply the COMMAREA: TIBCO Object Service Broker does not create a COMMAREA for this purpose. In either case, the CICS program or the CICS transid must be defined to CICS.
Starting a CICS Transaction
You can specify a CICS transaction to start after termination of the session and the TIBCO Object Service Broker CICS client. For non-seamless CICS clients, specify this using the following session parameters:
SESSIONENDACTION=START, SESSIONENDVALUE=transid
Alternatively, for all types of CICS clients, you can use the $SETSESSIONEND tool from within a rule:
CALL $SETSESSIONEND('START','transid');
The COMMAREA and TERMINAL are passed to the started CICS transaction.
Transferring to a CICS Program
You can specify a CICS program to be XCTLed to after termination of the session and the TIBCO Object Service Broker CICS client. For the non-seamless CICS client, specify this using the following session parameters:
SESSIONENDACTION=XCTL, SESSIONENDVALUE=program_name
In all cases, $SETSESSIONEND can be used within a rule. The syntax is:
CALL $SETSESSIONEND('XCTL','program_name');
The COMMAREA is passed to program_name, which must be defined to CICS.
See Also
TIBCO Object Service Broker Shareable Tools about the tools.

Copyright © TIBCO Software Inc. All Rights Reserved
Copyright © TIBCO Software Inc. All Rights Reserved