DEFINE VERB BRU
	IMAGE BRUDIR:BRUREAD
	QUALIFIER COPY, DEFAULT
	QUALIFIER LOG
	QUALIFIER LIST, VALUE (TYPE=$FILE, DEFAULT=SYS$OUTPUT)
	QUALIFIER TOTAL, DEFAULT
	DISALLOW ANY2 (COPY,LIST)
	DISALLOW ANY2 (LOG,LIST)
	QUALIFIER SELECT, VALUE (REQUIRED, TYPE=$FILE, LIST)
	QUALIFIER EXCLUDE, VALUE (REQUIRED, TYPE=$FILE, LIST)
	QUALIFIER REWIND
	QUALIFIER HELP, VALUE (TYPE=$FILE,DEFAULT="BRUDIR:BRU.TXT")

	PARAMETER P1, VALUE (DEFAULT="MUA0:",TYPE=$FILE,LIST),
		LABEL=TAPE

	QUALIFIER DEBUG, SYNTAX=SDEBUG

DEFINE SYNTAX SDEBUG
	IMAGE BRUDIR:BRUREAD