Tim Ericson wrote:
> PARM file
> # FDOMAIN.XEQ - DISPLAY A FILE'S DOMAIN.
> # Tim Ericson, Leonard S. Berkowitz & Paul Gobes
> IF FINFO ("!file","EXISTS") THEN
> IF (FINFO ("!file","FOPTIONS") ) BAND 2 = 2 THEN
> ECHO !file is TEMPORARY
> ELSEIF (FINFO ("!file","FOPTIONS") ) BAND 1 = 1 THEN
> ECHO !file is PERMANENT
> ENDIF
> ELSE
> ECHO !file does not exist.
> ENDIF
>
Yes the above command works. I would like to know how you came up with '
BAND 2 = 2'?
I came up with the following:
IF ( FINFO ("!FILE","FOPTIONS") ) = 1026 THEN
ECHO TEMP
ELSEIF ( FINFO ("!FILE","FOPTIONS") ) = 5 THEN
ECHO FIXED
ENDIF
Abraham Zwygart
Anodizing Inc.