OpenTP1 Version 7 Programming Reference COBOL Language
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:
|
|
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. |
All Rights Reserved. Copyright (C) 2006, 2010, Hitachi, Ltd.