Retrieves some operating system information about a given file.
Syntax:
CALL "C$FILEINFO"
USING file-name, file-info
GIVING status
Parameters:
- file-name
- PIC X(n)
- file-info
- Define the following group
01 file-info
03 file-size pic x(8) comp-x.
03 file-date pic 9(8) comp-x.
03 file-time pic 9(8) comp-x.
- status
- Any numeric type
On Entry:
- file-name
- The name of the file
On Exit:
- file-info
- The group item to receive the file information
- status
- Returns zero if the delete is successful, or non-zero if not.
Comments:
To obtain an extended file status code for this operation, define
status as
comp xx comp-x and follow the example in
Extended File Status Codes.