@ACCEPT BIND -- moves the bind address
The @ACCEPT BIND statement moves the bind address of a record to a location in program variable storage. The requesting program is usually a subprogram that requires the address of a record in order to access it.
idmscu
The @ACCEPT BIND statement moves the bind address of a record to a location in program variable storage. The requesting program is usually a subprogram that requires the address of a record in order to access it.
This article describes the following information:
2
2
Currency
Currency must be established for the record whose bind address will be returned to the application program.
A successful execution of the @ACCEPT BIND command does not update the currency of the record type or the run unit.
Syntax
►►─── @ACCEPT BIND=bind-address───────────────────────────────────────────────► ►─── ,REC=record-name───────────────────────────────────────────────────────►◄
Parameters
BIND=
bind-address
Specifies the 4-byte (fullword) location in storage to which the system returns the record's bind address. Note that
bind-address
does not specify a database key.REC=
Specifies the record whose bind address will be returned to the specified location in program variable storage.
record-name
Must be a record previously bound by the run unit.
Status Codes
After completion of the @ACCEPT BIND statement, the ERRSTAT field in the IDMS communications block indicates the outcome of the operation. The following is a list of the acceptable status codes for this function and their corresponding meaning:
- 0000The request has been serviced successfully.
- 1508The specified record is not in the named subschema
Example
The following @ACCEPT BIND statement moves the bind address for an EMPLOYEE record to register 1.
@ACCEPT BIND=(R1),REC='EMPLOYEE'