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


Chapter 3 Tools : $SETSESSIONEND

$SETSESSIONEND
Sets what execution is to take place when a TIBCO Object Service Broker session ends by returning data from the session to an external environment. (C)
Invocation
CALL $SETSESSIONEND(action, value)
 
The transaction code or program name for the next execution. Valid values depend on the type of action and are:
See Also
TIBCO Object Service Broker for z/OS External Environments for information about using TIBCO Object Service Broker with external environments.
Example
In the following examples:
SETSESSIONEND_1 sets the execution for a IMS TM application. According to the rule, when the current session ends, IMS TM initiates TRAN01.
SETSESSIONEND_2 sets the return code to 4. The return code can be used by the calling environment (for example, by JCL in z/OS batch) to determine the appropriate action to take.
SETSESSIONEND_1 Rule

 
RULE EDITOR ===> SCROLL: P
SETSESSIONEND_1;
_
_ ---------------------------------------------------------------------------
_ ------------------------------------------------------------+--------------
_ CALL $SETSESSIONEND('FORMAT', 'TRAN01'); | 1
_ ---------------------------------------------------------------------------

 
SETSESSIONEND_2 Rule

 
RULE EDITOR ===> SCROLL: P
SETSESSIONEND_2;
_
_ ---------------------------------------------------------------------------
_ ------------------------------------------------------------+--------------
_ CALL $SETSESSIONEND('RETCODE', 4); | 1
_ ---------------------------------------------------------------------------

 

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