COBOL Manual for TNS and TNS/R Programs

Procedure Division
HP COBOL Manual for TNS and TNS/R Programs—522555-006
8-38
Diagnosing Input-Output Errors
“35” 11 OPEN Opening for INPUT, I-O, or
EXTEND on nonexistent file:
OPTIONAL not specified
14 OPEN Opening for INPUT, I-O, or
EXTEND on temporary file: device
does not exist, and OPTIONAL not
specified
“37” 0 OPEN Opening for INPUT or OUTPUT:
device won’t support it
“38” 0 OPEN File is locked
“39” 0 OPEN File is not disk or is an unstructured
disk file and organization is not
sequential or file has alternate keys
LINAGE specified on file that is not
a printer or process
Multiple files specified on a device
that is not a tape
OUTPUT specified on an EDIT file
Record too large for file buffer size
Fixed length records not specified
for unstructured file
Organization does not match file
type
Key specs for file do not match
program key specs
“41” 0 OPEN File is not closed
“42” 0 CLOSE Attempt to close an unopened file
0 LOCKFILE,
UNLOCKFILE
Attempt to access an unopened file
“43” 0 DELETE,
REWRITE (sequential
access)
No successful READ
“44” 0 REWRITE New record has different size than
replaced one
“46” 0 READ sequential Current position undefined
“47” 0 READ,
START
File is not opened for INPUT or I-O
Table 8-12. I-O Status Codes Augmented by GUARDIAN-ERR (page4of5)
Status
Code
GUARDIAN-ERR
Value COBOL Statement(s) Cause of Status Code
xxx = Whatever file-system error is returned