OpenTP1 Version 7 Programming Reference COBOL Language

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

CBLDCDAM('RLES') - Release a logical file from the shutdown state

Format

PROCEDURE DIVISION specification

CALL  'CBLDCDAM'  USING  unique-name-1  unique-name-2

DATA DIVISION specification

01  unique-name-1.
    02  data-name-A    PIC X(8) VALUE 'DCDAMSVC'.
    02  data-name-B    PIC X(5).
    02  FILLER        PIC X(3).
    02  data-name-C    PIC X(8).
    02  FILLER        PIC S9(9) COMP.
    02  FILLER        PIC S9(9) COMP.
    02  FILLER        PIC X(32).
01  unique-name-2.
    02  data-name-E    PIC X(4) VALUE 'RLES'.
    02  data-name-F    PIC X(1).
    02  FILLER        PIC X(1).
    02  FILLER        PIC X(1).
    02  FILLER        PIC X(1).
    02  data-name-Z    PIC S9(9) COMP VALUE ZERO.

Description

CBLDCDAM('RLES') releases a logical file which has been held by CBLDCDAM('HOLD'). It also releases a logical file which has been shut down due to an error.

Data areas whose values are set in the UAP

data-name-A

Specify VALUE 'DCDAMSVC' for the interface code used with the DAM file.

data-name-C

Specify a logical file name with up to 8 characters. If the specified logical file name comprises less than 8 characters, pad the remaining portion with space.

data-name-E

Specify VALUE 'RLES' for the request code indicating release of a logical file from the shutdown state.

data-name-F

Specify a shutdown release type with VALUE 'L' or VALUE 'O'.

VALUE 'L': The file is released from the logical shutdown state.

VALUE 'O': The file is released from the shutdown state due to an error.

data-name-Z

Specify 0.

Data area to which a value is returned from OpenTP1

data-name-B

A status code of 5 digits is returned.

Status codes

Status code Explanation
00000 The specified logical file was released from the shutdown state normally.
01600 CBLDCRPC('OPEN ') was not called.
'N' is specified for atomic_update in the user service definition. (This error is returned only when accessing a recoverable DAM file.)
CBLDCRPC('STRT') was not called. (This error is returned only when accessing an unrecoverable DAM file.)
The UAP is incorrectly linked as follows:
  • The library (-1tdam) to be used for access to a TAM file using the DAM service API is linked incorrectly.
  • The definition of the resource manager for transaction control object files is incorrect.
01601 The logical file specified for data-name-C has not been defined.
01607 The memory became insufficient.
01610 The value specified as the logical file name is invalid.
01611 The value specified for data-name-F is invalid.
01618 The OpenTP1 file system version does not much the OpenTP1 system version.
01619 The physical file corresponding to the logical file specified for data-name-C does not exist.
01620 An input error occurred.
01623 The specified logical file is not in logical shutdown state.
01624 The specified logical file is not in shutdown state due to an error.
01627 The number of open character special files exceeds the specified maximum number.
01628 The access permission for character special files has not been granted.
The DAM file to be accessed is protected by the security facility. The UAP attempting to release the logical file from the shutdown state has no access permission.
01632 The physical file is not a character special file, or the device corresponding to the specified special file does not exist.
01633 The physical file corresponding to the logical file specified for data-name-C has not been initialized as an OpenTP1 file system.
01638 The access permission for the physical file that corresponds to the logical file specified for data-name-C has not been granted.
01646 The DAM file to be released from the shutdown state is protected by the security facility. No ACL exists for the file.
01690 The interface code (data-name-A) is invalid.
01691 The request code (data-name-E) is invalid.