Previous: prsgtt Up: ../plot79_p.html Next: prsik
INTEGER FUNCTION PRSGTW (STATUS, STDHMS, HLPSTR, LENHLP, DEFSTR,
X LENDEF, WRDLST, PTRWRD, LENWRD, NWORDS)
C$ (Parse Internal - Get Word)
C$ Get a word from the input. The arguments are:
C$
C$ STATUS.........Parsing status value (and function value)
C$ returned; one of NOPABT, NOPAMB, NOPHLP,
C$ NOPIFL, NOPNUL, EOF, OKAY, OVRFLO, or
C$ REPARS.
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$ WRDLST(*)......Packed Hollerith word list in format for
C$ PRSIK. For field type SWITCH, the words
C$ must NOT contain the leading slash, and if
C$ they can be followed by a value, MUST
C$ contain the trailing colon.
C$ PTRWRD(*)......Pointers to words in WRDLST(*), created by
C$ PRSCK.
C$ LENWRD(*)......Lengths of words in WRDLST(*), created by
C$ PRSCK.
C$ NWORDS.........Number of words in WRDLST(*).
C$ (25-APR-84)