COBOL Manual for TNS/E Programs (H06.08+, J06.03+)

Table 49 I-O Status Codes Augmented by GUARDIAN-ERR (continued)
Cause of Status CodeCOBOL Statement(s)GUARDIAN-ERR ValueStatus Code
Opening for INPUT or
OUTPUT: device won’t
support it
OPEN0“37”
File is lockedOPEN0“38”
File is not disk or is an
unstructured disk file and
OPEN0“39”
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
File is not closedOPEN0“41”
Attempt to close an
unopened file
CLOSE0“42”
Attempt to access an
unopened file
LOCKFILE, UNLOCKFILE0
No successful READDELETE, REWRITE
(sequential access)
0“43”
New record has different
size than replaced one
REWRITE0“44”
Current position undefinedREAD sequential0“46”
File is not opened for INPUT
or I-O
READ, START0“47”
Indexed or relative file not
open for OUTPUT and not
WRITE (sequential access)0“48”
open EXTEND sequential
access
Indexed or relative file not
open for I-O
WRITE (random or dynamic
access)
0
File was not opened for
OUTPUT, EXTEND, or I-O
WRITE (sequential file)0
File was not opened for I-ODELETE, REWRITE0“49”
File was not opened for
nowait I-O, and TIME LIMIT
was specified
LOCKFILE, READ, START0“90”
Wrong file type for
ADVANCING operations
WRITE0
254 Procedure Division