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