COBOL Manual for TNS and TNS/R Programs

Libraries and Utility Routines
HP COBOL Manual for TNS and TNS/R Programs—522555-006
13-91
COBOLFILEINFO
error-number
is a numeric data item in which COBOL_ASSIGN_ returns an error code. Possible
values for error-number and their respective meanings are:
COBOLFILEINFO
The COBOLFILEINFO routine is for the Guardian environment. In the OSS
environment, use the COBOL_FILE_INFO_ routine.
The COBOLFILEINFO routine is for these situations:
•
An application needs to perform some operation not defined in HP COBOL on a
file normally managed by the HP COBOL run-time routines. This application must
obtain the file system file number assigned when the file was opened.
•
An application that manages a file through TAL routines can operate as a process
pair, letting HP COBOL perform the open, close, and checkpoint operations with
the run-time routines. This application must be able to obtain the file system file
number assigned when the file is opened.
•
An application can put the file-system file name of a file into an application-
generated error message.
As with any ENTER statement, you must either qualify the name COBOLFILEINFO
with the library-reference COBOLLIB or include a SEARCH directive specifying
Value Meaning
0 No error occurred.
1 system-file-name has invalid syntax or the name has no length (such as
a group containing an OCCURS DEPENDING whose length is 0).
2 system-file-name is open and cannot be changed.
4 There is not enough system space to add the new name.
5 file-type is not 0 or 2, file-type is specified for a file whose
organization is not sequential, or file-type or file-code is specified for
an OSS file.