Copyright © Cloud Software Group, Inc. All Rights Reserved
Copyright © Cloud Software Group, Inc. All Rights Reserved


Chapter 3 Tools : @SESSION
@SESSION
Alters session-related items maintained by this table. (TBL)
Table Definition
Parameters
This table has two parameters: INSTANCE and LOCATION.
Parameters
Typ
Syn
Len
Description
INSTANCE
 
B
4
Must be 0.
LOCATION
I
C
16
Location of @SESSION table (remote system).
* 
The INSTANCE parameter must be set to 0.
Fields
@SESSION has only a single row. Fields marked with an asterisk (*) can be changed subject to validity checking. All other fields, including those marked RESERVED, must not be changed.
Field Name
Typ
Syn
Len
Dec
Key
Ord
Rq
Description
ADDRESS
I
B
4
0
P
 
 
Reserved.
USERID
I
C
8
0
 
 
 
The current user ID.
SEARCH
S
C
1
0
 
 
 
The library search path for the current transaction.
GROUP *
I
C
16
0
 
 
 
The current security group.
REMOTELOCATION *
I
C
16
0
 
 
 
The default remote location.
HOMELOCATION
I
C
16
0
 
 
 
The name of this TIBCO Object Service Broker system.
TERMINAL
I
C
16
0
 
 
 
The user’s terminal name.
STORE
I
C
16
0
 
 
 
Reserved.
TESTLOCATION
I
C
16
0
 
 
 
Reserved.
COMMHANDLE *
I
B
4
0
 
 
 
Address of a communications area.
COMMLENGTH *
C
B
2
0
 
 
 
Length of the communications area.
COMMFREEHANDLE
I
B
4
0
 
 
 
Address of free space in the communications area.
COMMFREELENGTH
C
B
2
0
 
 
 
Length of free space in the communications area.
SEG0INHANDLE
I
B
4
0
 
 
 
Address of IMS input segment 0.
SEG01INLENGTH
C
B
2
0
 
 
 
Length of IMS input segment 0.
SEG1INHANDLE
I
B
4
0
 
 
 
Address of IMS input segment 1.
SEG1INLENGTH
C
B
2
0
 
 
 
Length of IMS input segment 1.
SEG2INHANDLE
I
B
4
0
 
 
 
Address of IMS input segment 2.
SEG2INLENGTH
C
B
2
0
 
 
 
Length of IMS output segment 2.
SEG0OUTHANDLE *
I
B
4
0
 
 
 
Address of IMS output segment 0.
SEG01OUTLENGTH *
C
B
2
0
 
 
 
Length of IMS output segment 0.
SEG1OUTHANDLE *
I
B
4
0
 
 
 
Address of IMS output segment 1.
SEG1OUTLENGTH *
C
B
2
0
 
 
 
Length of IMS output segment 1.
SEG2OUTHANDLE *
I
B
4
0
 
 
 
Address of IMS output segment 2.
SEG2OUTLENGTH *
C
B
2
0
 
 
 
Length of IMS output segment 2.
APIINHANDLE
I
B
4
0
 
 
 
Address of dataIn commarea (Call Level Interface, SDK (C/C++), and SDK (Java) only).
APIOUTHANDLE
I
B
4
0
 
 
 
Address of dataOut commarea (Call Level Interface, SDK (C/C++), and SDK (Java) only).
PLATFORM
S
C
1
0
 
 
 
The platform where your TIBCO Object Service Broker system is running:
•
N–Windows
•
S–Solaris
•
V–z/OS
RELEASE
S
C
16
0
 
 
 
The release number of the TIBCO Object Service Broker system you are running.
See Also
TIBCO Object Service Broker for z/OS External Environments or TIBCO Object Service Broker for Open Systems External Environments for information about the Call Level Interface, the SDK (C/C++), and the SDK (Java).
Usage Notes
•
Supported operations are: GET and FORALL (which both retrieve the single row), and REPLACE (which replaces the single row, subject to a number of validity tests).
•
Not supported: the selection operation, and parameter value (PRM) tables and subview (SUB) tables.
•
@SESSION behaves like a session table in that its content and effects are local to one TIBCO Object Service Broker session and are not seen by other users, even if they are sharing a single Execution Environment.
•
Fields COMMHANDLE and COMMLENGTH are primarily for use in the z/OS CICS environment; however, they could be provided in other environments as well. These fields can be replaced by the user (subject to the restriction that the COMMHANDLE value must be the value of field ADDRESS of a row in System Interpreted Table @MAP) with SCOPE of ENVIRONMENT, and COMMLENGTH must not exceed the value of SIZE in the same row of @MAP.
•
The IMS-specific fields contain meaningful information in a z/OS IMS environment only.
Example
@SESSION_SAMPLE1 Rule
The @SESSION_SAMPLE1 rule changes the TIBCO Object Service Broker security group for the current session to NEWGROUP. The user must have security authorization to make this change; otherwise, the SECURITYFAIL exception is raised.
 
@SESSION_SAMPLE1;
_
_ ---------------------------------------------------------------------------
_ ------------------------------------------------------------+--------------
_ GET @SESSION(0); | 1
_ @SESSION.GROUP='NEWGROUP'; | 2
_ REPLACE @SESSION(0); | 3
_ ---------------------------------------------------------------------------
 
@SESSION_SAMPLE2 Rule
The @SESSION_SAMPLE2 rule uses @MAP to allocate and register environment storage for a new commarea of 1000 bytes. The address of the new commarea is then placed in the COMMHANDLE field of @SESSION and the length of the storage area is placed in field COMMLENGTH.
If an external program is subsequently called, the address and length of the COMMAREA are passed to it. The COMMAREA can be manipulated using MAP tables. If the address placed in @SESSION.COMMHANDLE is not that of a valid block of environment storage, the DATAREFERENCE exception is raised.
 
@SESSION_SAMPLE2;
_
_ ---------------------------------------------------------------------------
_ ------------------------------------------------------------+--------------
_ @MAP.ADDRESS = 0; | 1
_ @MAP.SIZE = 1000; | 2
_ INSERT @MAP('ENVIRONMENT'); | 3
_ GET @SESSION(0); | 4
_ @SESSION.COMMHANDLE = @MAP.ADDRESS; | 5
_ @SESSION.COMMLENGTH = @MAP.SIZE; | 6
_ REPLACE @SESSION(0); | 7
_ ---------------------------------------------------------------------------
 
Copyright © Cloud Software Group, Inc. All Rights Reserved
Copyright © Cloud Software Group, Inc. All Rights Reserved