Platform

x64, Win32

Purpose

To obtain directory information.

Syntax

SUBROUTINE FILES@(PAT, N, NMAX, FILES, ATTR, DATE, TIME, FILE_SIZE)
CHARACTER (LEN=*) PAT,FILES(NMAX)
INTEGER (KIND=2) N,NMAX
INTEGER (KIND=2) ATTR(NMAX), DATE(NMAX), TIME(NMAX)
INTEGER (KIND=3) FILE_SIZE(NMAX)

Description

Returns directory information for files selected by PAT (e.g. A:\*.FOR). N is returned as the number of file names returned. If N is equal to NMAX there may be more matches which could not be returned. The remainder of the arrays return information about the files. Hidden files and directories are returned by this routine together with ordinary files. Such files may be distinguished by using the DOS file attribute returned in the ATTR array. The date and time are returned in the DOS compressed format.

The information returned within the ATTR array is equivalent to the dwFileAttributes element of the WIN32_FIND_DATA structure as described in the Microsoft documentation.

File sizes that are greater than or equal to 2147483647 are returned as 2147483647.
The routine FILES8@ has the same arguments except that FILE_SIZE is declared as REAL*8.

Example

See SET_FILE_ATTRIBUTE@ .