define verb VERB

   ! VERB_UTILITY is the image name, and (if you choose to use this
   ! utility as a DCL verb rather than as a foreign command) you must
   ! uncomment the following link and then either copy this image into
   ! SYS$SYSTEM: or define the VERB_UTILITY logical name to reference
   ! the device and directory location of the image.
   !
   image VERB_UTILITY
   !
   parameter P1, prompt="Verb", value (list)
   !
   qualifier ALL, nonnegatable
   qualifier PROCESS, nonnegatable
   qualifier TABLE, nonnegatable
      value (default="sys$share:dcltables",type=$infile)
   qualifier OUTPUT, nonnegatable, value (type=$outfile)
   qualifier WIDTH, nonnegatable, value (required,type=$number)
   qualifier IMAGE, nonnegatable, value (required,type=$infile)
   qualifier SYMBOL, nonnegatable, value (required)
   qualifier FILE, nonnegatable, value (required,type=$infile)
   qualifier COUNT, nonnegatable, value (required,type=$number)
   qualifier LIST, nonnegatable
   !
   disallow any2 (TABLE, PROCESS, IMAGE)
   disallow (IMAGE and not SYMBOL)
   disallow (SYMBOL and not IMAGE)
   !