Technical data

CONNECT

DBM$_WRONGRTYP The record type of record-name is not the same as the

current record’s type.

DBM$_NOT_MTYP The current record is not a member record type of a set

in the TO set-name phrase.

DBM$_NOW_MBR The current record is already a member of the set

speciﬁed in the TO set-name phrase.

DBM$_CSTYP_NULL There is no current of set type for the set speciﬁed in

the TO set-name phrase. This occurs only if the set is

not a singular set.

DBM$_DUPNOTALL The program attempts to connect a record to a set and

its sort key value is identical to another record’s sort

key value already in the set.

DBM$_NOT_UPDATE A realm is not in update usage mode.

DBM$_CHKMEMBER The Oracle CODASYL DBMS CHECK (member)

condition was evaluated to be false. The database

remains unchanged.

Additional References

• Section 2.2 on reserved words (database special registers)

• HP COBOL Reference Manual, Chapter 6, section on scope of statements

• Section 4.8.1, on database On Error condition

• Section 5.14.1, on RETAINING clause

• USE statement

Examples

1. Connecting EMPLOYEE record to the CONSISTS_OF set:

CONNECT EMPLOYEE TO CONSISTS_OF.

2. Connecting EMPLOYEE record to all sets:

CONNECT EMPLOYEE TO ALL.

3. Connecting EMPLOYEE record to the CONSISTS_OF set without changing

the currency indicator of the CONSISTS_OF set:

CONNECT EMPLOYEE TO CONSISTS_OF

RETAINING SET CONSISTS_OF CURRENCY.

Procedure Division 4–25