HP3000-L Archives

June 1999, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Abraham Zwygart <[log in to unmask]>
Reply To:
Abraham Zwygart <[log in to unmask]>
Date:
Wed, 16 Jun 1999 11:32:54 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (28 lines)
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.

ATOM RSS1 RSS2