Previous: prseol Up: ../plot79_p.html Next: prsfld
INTEGER FUNCTION PRSFIL (STATUS, STDHMS, HLPSTR, LENHLP, DEFSTR,
X LENDEF, OPTION)
C$ (Parse - File)
C$ Parse a general file name, leaving it in COMMON. The
C$ arguments are:
C$
C$ STATUS.........Parsing status value (and function value)
C$ returned; one of EOF, NOPABT, NOPFIL,
C$ NOPHLP, NOPIFL, NOPNUL, NOPUNK, OKAY,
C$ OVRFLO, or REPARS. The help return, NOPHLP,
C$ is only given if an alternative parse is in
C$ progress. Otherwise, this routine loops
C$ until the user completes the input field
C$ with something other than the help
C$ character.
C$ STDHMS......... .TRUE. - issue standard help message.
C$ .FALSE. - suppress standard help message.
C$ HLPSTR(*)......Packed Hollerith help string.
C$ LENHLP.........Length of HLPSTR(*).
C$ DEFSTR(*)......Packed Hollerith default value string.
C$ LENDEF.........Length of DEFSTR(*).
C$ OPTION.........Integer option code. Set to one or more of
C$ (INPUT,OUTPUT). Add option codes if more
C$ than one is required. If neither code is
C$ given, it is assumed that the file use will
C$ not known until open TIME.
C$ (25-APR-84)