Define Verb  RNOINDEX

  Image  "SYS$DISK:[]RNOINDEX"

   Qualifier  VERSION , Nonnegatable, Syntax=SHOWVER

    Parameter  P1 , PROMPT="File", Value(Required,Type=$INFILE)

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

      Qualifier  HEADER , Nonnegatable, Value(Required)

      Qualifier  RHEADER , Nonnegatable, Value(Required)

	Disallow  RHEADER AND NOT HEADER

      Qualifier  DEBUG

  Define Syntax	SHOWVER

    Parameter  P1 , Value(Type=$INFILE)