The IMPORT_TRAN call
Links the current unit of work of a task to an external transaction. Some information about the external transaction is recorded in the current unit of work.
IMPORT_TRAN
DFHOTTRX [CALL,]
[CLEAR,]
[IN,
FUNCTION(IMPORT_TRAN),
[FORMAT_ID,(name4|Rn),]
[BQUAL_LEN,(name4|Rn),]
[TID_BLOCK_IN,(block-descriptor),]
[TIMEOUT,(name4|Rn),]
[LOGICAL_SERVER,(name4|string|'string'),]
[PUBLIC_ID,(name64|string|'string'),]]
[OUT,
UOW_ID,(name8 | *),
RESPONSE (name1 | *),
REASON (name1 | *)]This command is threadsafe.
- BQUAL_LEN (name4 | Rn)
- Specifies the branch qualifier length of the OTS transaction identifier
(TID).
- name4
- The name of a 4-byte location containing the branch qualifier length.
- Rn
- A register containing the branch qualifier length.
- FORMAT_ID (name4 | Rn)
- Specifies the OTS transactions format identifier.
- name4
- The name of a 4-byte location containing the format ID.
- Rn
- A register containing the format ID.
- LOGICAL_SERVER (name4 | string | 'string')
- Specifies the name of the logical server in which the transaction is executing. Users of this XPI should choose values that are not similar to any CorbaServer definition that is installed in the CICS system.
- PUBLIC_ID (name64 | string | 'string')
- Specifies the public identifier associated with the transaction.
- TID_BLOCK_IN (block-descriptor)
- Specifies the unique OTS transaction identifier (TID) of the external transaction that will be associated with the task's unit of work. The block-descriptor is two fullwords of data, where the first word contains the address of the data, and the second word contains the length in bytes of the data.
- TIMEOUT (name4 | Rn)
- Specifies the OTS transaction timeout value in seconds.
- name4
- The name of a 4-byte location containing the timeout value.
- Rn
- A register containing the timeout value.
- UOW_ID (name8 | *)
- Specifies the identifier of the CICS unit of work into which the OTS transaction was imported.
RESPONSE and REASON values for IMPORT_TRAN
| RESPONSE | REASON |
|---|---|
| OK | None |
| EXCEPTION | TID_TOO_LONG
OTS_TRAN_ALREADY |
| DISASTER | None |
| INVALID | None |
| KERNERROR | None |
| PURGED | None |