Previous Topic: ACCEPT PAGE_INFONext Topic: ACCEPT TRANSACTION STATISTICS (DC/UCF)


ACCEPT PROCEDURE CONTROL LOCATION

The ACCEPT PROCEDURE CONTROL LOCATION statement copies the application program information block to a specified location in program variable storage. This 256-byte block is associated with a previously defined database procedure. The program information block acquires its information through the BIND PROCEDURE statement, described later in this chapter. The database procedure may have updated the information.

Only programs running under the central version, but in a different region/partition, should use the ACCEPT PROCEDURE CONTROL LOCATION statement.

Note: For more information about the application program information block, see the CA IDMS Database Administration Guide.

Syntax
►►─── ACCEPT PROCEDURE (procedure-name) INTO (procedure-control-location); ───►◄
Parameters
procedure-name

Specifies the name of the database procedure whose application program information block will be copied into variable storage. procedure-name must refer to an 8-character field in variable storage.

INTO (procedure-control-location)

Specifies the fullword-aligned 256-byte location in variable storage to which the DBMS copies the application program information block.

Example

The following statement copies the application program information block used by the procedure identified in the CHECK_ALL field in main storage to the location identified as CHECK_IT in main storage:

ACCEPT PROCEDURE (CHECK_ALL) INTO (CHECK_IT);
Status Codes

Upon completion of the ACCEPT PROCEDURE CONTROL LOCATION function, the ERROR_STATUS field in the IDMS DB communications block indicates the outcome of the operation:

0000

The request was serviced successfully.

1508

The subschema does not contain the named procedure.

1518

The procedure control location was not a valid address.