MODULE INQUIRE$PARSE_TABLE
DEFINE VERB _INQUIRE
!
	PARAMETER P1, LABEL=SYMBOL, VALUE(REQUIRED)
	PARAMETER P2, LABEL=PROMPT
!
	QUALIFIER BUFLEN, NONNEGATABLE, VALUE(REQUIRED,TYPE=$NUMBER)
	QUALIFIER ECHO, DEFAULT
	QUALIFIER ERASE, NONNEGATABLE, VALUE(REQUIRED,TYPE=ERASE_TYPE)
	QUALIFIER ESCAPE
	QUALIFIER ET
	QUALIFIER FILTER, DEFAULT
	QUALIFIER LOWER, DEFAULT
	QUALIFIER POSITION, NONNEGATABLE, VALUE(REQUIRED,LIST)
	QUALIFIER PROMPT, LABEL=PROMPTQUAL, VALUE(REQUIRED)
	QUALIFIER HLPPFX, NONNEGATABLE, VALUE(REQUIRED)
	QUALIFIER HLPSFX, NONNEGATABLE, VALUE(REQUIRED)
	QUALIFIER HLPLIB, NONNEGATABLE, VALUE(REQUIRED,TYPE=$INFILE)
	QUALIFIER PUNCTUATION, DEFAULT
	QUALIFIER PURGE
	QUALIFIER REPOSITION
	QUALIFIER REPROMPT, DEFAULT
	QUALIFIER SECONDS, NONNEGATABLE, VALUE(REQUIRED)
	QUALIFIER TRMCHARS, VALUE(LIST,TYPE=TRMCHARS_TYPE)

DEFINE TYPE TRMCHARS_TYPE
	KEYWORD CHARACTERS, VALUE(REQUIRED)
	KEYWORD CONTROL, VALUE(REQUIRED)

DEFINE TYPE ERASE_TYPE
	KEYWORD EOL
	KEYWORD EOS
	KEYWORD LINE
	KEYWORD SCREEN