Previous: prsprm Up: ../plot79_p.html Next: prsrty


PRSQST

       INTEGER FUNCTION  PRSQST (STATUS, STDHMS, HLPSTR, LENHLP, DEFSTR,
      X     LENDEF)
 C$    (Parse - Quoted String)
 C$    Parse a quoted  string, leaving it  in COMMON.  The  string
 C$    may be delimited by  matching apostophes, quotation  marks,
 C$    or accents graves.  If the  quote character is required  in
 C$    the string,  the  usual  convention of  doubling  it  (e.g.
 C$    'O''hara' for  the  string  O'hara) is  followed.   A  null
 C$    string, represented by adjacent beginning and ending  quote
 C$    characters, is  legal input.   The surrounding  quotes  are
 C$    discarded in the  string stored in  COMMON.  The  arguments
 C$    are:
 C$
 C$    STATUS.........Parsing status  value (and  function  value)
 C$                   returned;  one  of   EOF,  NOPABT,   NOPHLP,
 C$                   NOPIFL, NOPNQS,  NOPUNK,  OKAY,  OVRFLO,  or
 C$                   REPARS.  The  help return,  NOPHLP, is  only
 C$                   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$    (25-APR-84)