OpenTP1 Version 7 TP1/Client User's Guide TP1/Client/W, TP1/Client/P
CALL 'CBLDCCLS' USING identifier-1
01 identifier-1. 02 data-name-A PIC X(8) VALUE 'GETTRNID'. 02 data-name-B PIC X(5). 02 FILLER PIC X(3). 02 data-name-C PIC X(17). 02 data-name-D PIC X(17). 02 FILLER PIC X(2). 02 data-name-E PIC 9(9) COMP.
CALL 'CBLDCCLT' USING identifier-1
01 identifier-1. 02 data-name-A PIC X(8) VALUE 'GETTRNID'. 02 data-name-B PIC X(5). 02 FILLER PIC X(3). 02 data-name-C PIC X(17). 02 data-name-D PIC X(17). 02 data-name-E PIC 9(9) COMP.
Collects the current transaction global identifier and transaction branch identifier.
OpenTP1 allocated these identifiers when any of the following programs started the transaction.
Status code | Meaning |
---|---|
00000 | Normal termination |
02501 | Invalid value for the data name. The request code (data-name-A) may be invalid. |
02502 | The program is issued from an incorrect context. |
02504 | Insufficient memory |
02544 | The client ID specified for data-name-E differs from the one received with CBLDCCLS('CLTIN ') or CBLDCCLS('EXCLTIN '). |
All Rights Reserved. Copyright (C) 2006, 2009, Hitachi, Ltd.