	module	macro_preprocessor
	ident	"V01-02"
	define verb	mpp
		image "hsc000$dua1:[levine.sys.macro_f]macro_main.exe"
		parameter p1,
				label=source_file,
				prompt="Source File ? ",
				value(required,type=$file)
		qualifier list,
				nonnegatable,
				label=list_file,
				placement=global,
				value(type=$file)
		qualifier output,
				label=output_file,
				placement=global,
				value(type=$file),
				negatable
		qualifier detab,
				label=detab,
				placement=global,
				nonnegatable,
				value(list,type=$number)
		qualifier debug,
				label=debug,
				placement=global,
				nonnegatable
		qualifier ada,
				label=ada,
				placement=global,
				nonnegatable
		qualifier basic,
				label=basic,
				placement=global,
				nonnegatable
		qualifier cc,
				label=cc,
				placement=global,
				nonnegatable
		qualifier cobol,
				label=cobol,
				placement=global,
				nonnegatable
		qualifier command,
				label=command,
				placement=global,
				nonnegatable
		qualifier fortran,
				label=fortran,
				placement=global,
				nonnegatable
		qualifier macro,
				label=macro,
				placement=global,
				nonnegatable
		qualifier pascal,
				label=pascal,
				placement=global,
				nonnegatable
		qualifier pli,
				label=pli,
				placement=global,
				nonnegatable
		qualifier pl1,
				label=pl1,
				placement=global,
				nonnegatable
		disallow any2(ada,basic,cobol,fortran,macro,pascal
			,pli,pl1,command,cc)
		qualifier set,
				label=set,
				placement=global,
				nonnegatable,
				value(list,required,type=$quoted_string)
		qualifier case_sensitive,
				label=case_sensitive,
				placement=global,
				nonnegatable
