Data Manipulation Language Statements › ACCEPT BIND RECORD

ACCEPT BIND RECORD

The ACCEPT BIND RECORD statement moves the bind address of a record to a specified location in program variable storage. Usually, a subprogram uses this statement to acquire the address of a record.

Currency

The ACCEPT BIND RECORD statement updates no currencies. However, your program must establish currency for the record type whose bind address it requires.

Syntax

►►─── ACCEPT BIND RECORD (record-name) INTO (bind-address); ──────────────────►◄

record-name

Specifies the record whose bind address will be copied into the specified location in variable storage. Record-name must be a record previously bound by the run unit.

INTO (bind-address)

Specifies the variable-storage location to which CA IDMS/DB and the system return the record's bind address. Bind-address is defined as a FIXED BINARY(31) field. After the ACCEPT BIND RECORD statement executes, bind-address contains a storage address, not a database key.

Example

This example uses ACCEPT BIND RECORD to move the bind address for the EMPLOYEE record to location REG1 in the requesting subprogram:

ACCEPT BIND RECORD (EMPLOYEE) INTO (REG1);

Status Codes

Upon completion of the ACCEPT BIND RECORD function, the ERROR_STATUS field in the IDMS DB communications block indicates the outcome of the operation: