Define Verb  MODIFY

  Image  "SYS$DISK:[]MODIFY"

    Parameter  P1 , Prompt="File(s)" , Value( Required, List, Type=$INFILE )

    Parameter  P2 , Prompt="Search for" , Value( Required )

      Qualifier  DELETE , Syntax=MOD_DEL

    Parameter  P3 , Prompt="Replace with" , Value( Required )

      Qualifier  CONFIRM

      Qualifier  COLUMNS , Value( Required, List )

      Qualifier  CTRL

      Qualifier  EXACT

      Qualifier  LINE

      Qualifier  LOG , Value( Type=LOGVAL )

      Qualifier  OUTPUT , Value( Required, Type=$OUTFILE )

      Qualifier  SELECT , Value( Required )

      Qualifier  SYMBOL , Value

      Qualifier  VERSION , Syntax=MOD_VER

	Disallow  DELETE and P3
	Disallow  DELETE and LINE

	  Define Type  LOGVAL
	    Keyword  ALL

Define Syntax  MOD_DEL

    Parameter  P1 , Prompt="File(s)" , Value( Required, List, Type=$INFILE )

    Parameter  P2 , Prompt="Search for" , Value( Required )

Define Syntax  MOD_VER

    Noparameters