OpenTP1 Version 7 Programming Reference COBOL Language

[Contents][Index][Back][Next]

CBLDCXAT('CONNECT') - Establish an association

Format

PROCEDURE DIVISION specification

CALL 'CBLDCXAT' USING unique-name-1

DATA DIVISION specification

01  unique-name-1.
    02  data-name-A   PIC X(8) VALUE 'CONNECT '.
    02  data-name-B   PIC X(5).
    02  FILLER       PIC X(3).
    02  data-name-Z   PIC S9(9)  COMP VALUE ZERO.
    02  data-name-C   PIC X(9).
    02  FILLER       PIC X(3).
    02  data-name-D   PIC X(9).

Description

CBLDCXAT('CONNECT') requests the XATMI communication service specified in data-name-C to establish the association specified in data-name-D.

CBLDCXAT('CONNECT') returns after sending an association establishment request to the remote system. It cannot be used for receiving the notification of association establishment.

CBLDCXAT('CONNECT') can be used only for OSI TP communication using the TP1/NET/OSI-TP-Extended.

CBLDCXAT('CONNECT') can be invoked either inside or outside the transaction range.

Data areas whose values are set in the UAP

data-name-A

Specify VALUE 'CONNECT[Figure]' as a request code for association establishment.

data-name-C

Specify the name of the XATMI communication service that will be asked to establish an association. The specified name must be the name of the XATMI communication service definition file assigned to the xat_invoke_server operand in the XATMI communication service definition. Add a space after the service name.

data-name-D

Specify the name of the association to be established. The specified name must be the connection name assigned to the -c option of the nettalccn operand in the protocol-specific definition contained in the TP1/NET/OSI-TP-Extended definition. Add a space after the association name.

data-name-Z

Specify 0.

Data area whose value is returned from OpenTP1

data-name-B

A status code of 5 digits is returned.

Status codes

Status code Explanation
00000 Normal termination.
04570 The value specified for a data name is invalid.
04571 The memory became insufficient.
04572 CBLDCRPC('OPEN ') has not been invoked.
04575 Acquisition of address information of the XATMI communication service failed.
04576 The XATMI communication service is being terminated.
04577 The service request failed during sending to the XATMI communication service.
04578 The service request failed during receiving from the XATMI communication service. The probable cause is that a connection establishment request is already being executed by the XATMI communication service.
04580 The specified association name is not defined.
04581 The association has already been established.
04582 The association is being established.
04583 The association is being released.
04584 The association cannot be established because it is in recipient mode.