COBOL Manual for TNS and TNS/R Programs

Libraries and Utility Routines
HP COBOL Manual for TNS and TNS/R Programs—522555-006
13-92
COBOLFILEINFO
COBOLLIB to provide automatic resolution of the reference. The general form of the
ENTER statement to use COBOLFILEINFO follows.
library-reference
is a mnemonic-name associated, in the SPECIAL-NAMES paragraph, with either
COBOLLIB or some other object file containing an object copy of
COBOLFILEINFO.
fd-name
is the COBOL name of the file in the FD entry.
error-code
is a numeric data item described as USAGE COMPUTATIONAL PICTURE 9999
(or S9999)or USAGE NATIVE-2. The COBOLFILEINFO routine returns the last file
system file-system error code to this data item. The value returned is always
positive.
The access mode (see Linkage Section) of error-code must be STANDARD.
file-name
is a DISPLAY data item of at least 24 characters where the actual 24-byte internal
file name is returned. The internal form of the file name is three 8-character fields
containing the three portions of the file name, with trailing spaces inserted and with
no period (.) separators.
ENTER COBOLFILEINFO
"
USING
library-reference
fd-name
OF
TAL
error-code
file-name
file-number
ns
"
ns
VST357.vsd