SETFILEACCESSQQ

Run-Time Function: Sets the file access mode for a specified file.

Module: USE DFLIB

Syntax

result = SETFILEACCESSQQ (filename, access)

filename
(Input) Character*(*). Name of a file to set access for.

access
(Input) INTEGER(4). Constant that sets the access. Can be any combination of the following flags, combined by an inclusive OR (such as IOR or OR):

• FILE$ARCHIVE - Marked as having been copied to a backup device.
• FILE$HIDDEN - Hidden. The file does not appear in the directory list that you can request from the command console.
• FILE$NORMAL - No special attributes (default).
• FILE$READONLY - Write-protected. You can read the file, but you cannot make changes to it.
• FILE$SYSTEM - Used by the operating system.

The flags are defined in module DFLIB.F90 in the \DF98\INCLUDE subdirectory.

Results:

The result is of type LOGICAL(4). The result is .TRUE. if successful; otherwise, .FALSE..

To set the access value for a file, add the constants representing the appropriate access.

Compatibility

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

See Also: GETFILEINFOQQ

Example

 USE DFLIB
 INTEGER(4) permit
 LOGICAL(4) result

 permit = 0   ! clear permit
 permit = IOR(FILE$READONLY, FILE$HIDDEN)
 result = SETFILEACCESSQQ ('formula.f90', permit)
 END