DEFINE VERB MODIFY
IMAGE UD7:[ANONYMOUS.MODIFY_ALPHA]DO_MODIFY.EXE
    PARAMETER P1,LABEL=FSPEC,PROMPT="File(s)",VALUE(TYPE=$FILE,REQUIRED,LIST)
	PARAMETER P2,LABEL=STRING1,PROMPT="Srch String",VALUE
	PARAMETER P3,LABEL=STRING2,PROMPT="Replace String",VALUE
	QUALIFIER CONTROL,LABEL=CONTROL,VALUE(DEFAULT=NOCONTROL)
	QUALIFIER CONFIRM,LABEL=CONFIRM,VALUE(DEFAULT=NOCONFIRM)
	QUALIFIER EXACT,LABEL=EXACT,VALUE(DEFAULT=NOEXACT)
	QUALIFIER FIXED,LABEL=FIXED,VALUE(DEFAULT=NOFIXED)
	QUALIFIER EXCLUSIVE,LABEL=EXCLUSIVE,VALUE(DEFAULT=NOEXCLUSIVE)
	QUALIFIER LOG,DEFAULT,LABEL=LOG
	QUALIFIER OUTPUT,LABEL=OUTPUT,VALUE(REQUIRED,LIST)
	QUALIFIER LENGTH,LABEL=LENGTH,VALUE(REQUIRED,LIST)
	QUALIFIER DETAB,LABEL=DETAB,VALUE(LIST)
	QUALIFIER RANGE,LABEL=RANGE,VALUE(REQUIRED,LIST)
	QUALIFIER CLIP,LABEL=CLIP,VALUE(DEFAULT=NOCLIP,LIST)
	QUALIFIER WRAP,LABEL=WRAP
	QUALIFIER TRUNCATE,LABEL=TRUNCATE,VALUE(DEFAULT=NOTRUNCATE)
	QUALIFIER F77,LABEL=F77,VALUE(DEFAULT=NOF77)
	QUALIFIER COMMENT
	QUALIFIER UNCOMMENT
    DISALLOW NOT STRING1 AND NOT (LENGTH OR DETAB OR CLIP OR F77)
    DISALLOW TRUNCATE AND NOT LENGTH
    DISALLOW COMMENT AND NOT F77
    DISALLOW UNCOMMENT AND NOT F77