Define Verb  LIST

  Image  SYS$UTILITIESX:[LIST]LIST


      Parameter  P1                           ! username, *, \name type

      Qualifier  ABOUT
                 Nonnegatable

      Qualifier  ADD
                 Nonnegatable
                 Syntax = ADD

      Qualifier  CHECK
                 Nonnegatable
                 VALUE (Required,Type=$NUMBER)
                 Syntax = CHECK

      Qualifier  CLEANUP
                 Nonnegatable

      Qualifier  COMPRESS
                 Nonnegatable

      Qualifier  DELETE
                 Nonnegatable
                 Syntax = DELETE

      Qualifier  FULL
                 Nonnegatable

      Qualifier  GROUP
                 Nonnegatable
                 VALUE (Type=$FILE)

      Qualifier  LISTING
                 Nonnegatable
                 Default
                 Value(default="SYS$UTILITIESX:[LIST]PHONE.BOOK",
                       type=$FILE)

      Qualifier  MODIFY
                 Nonnegatable
                 Syntax = MODIFY

      Qualifier  OUTPUT
                 Nonnegatable
                 Value (default="list.out",Type=$FILE)

      Qualifier  RENAME
                 Nonnegatable
                 Syntax = RENAME

      Qualifier  USER
                 Nonnegatable
                 Value (Required,Type=$FILE)



      Disallow   Any2( ABOUT, ADD, DELETE, MODIFY, OUTPUT, RENAME, CHECK )

      Disallow   GROUP and (ABOUT or ADD or DELETE or MODIFY or 
                            RENAME or USER)

      Disallow   USER and (ABOUT or OUTPUT or DELETE or GROUP or 
                           ADD or RENAME)

      Disallow   CLEANUP and (ABOUT or ADD or CHECK or DELETE or FULL or 
                              GROUP or MODIFY or OUTPUT or RENAME or USER)

      Disallow   COMPRESS and (ABOUT or ADD or CHECK or DELETE or FULL or 
                               GROUP or MODIFY or OUTPUT or RENAME or USER)



Define Syntax ADD                               ! Will be prompted if not given

   Parameter  P1                                ! Username

   Parameter  P2                                ! Name

   Parameter  P3                                ! Phone

   Parameter  P4                                ! Employer


Define Syntax CHECK                             ! Will be prompted if not given

   Parameter  P1                                ! (NOT USED IN CHECK)

   Parameter  P2                                ! (NOT USED IN CHECK)

   Parameter  P3                                ! (NOT USED IN CHECK)

   Parameter  P4                                ! (NOT USED IN CHECK)


Define Syntax DELETE                            ! Will be prompted if not given

   Parameter  P1                                ! Username


Define Syntax MODIFY                            ! Will be prompted if not given

   Parameter  P1                                ! Name

   Parameter  P2                                ! Phone

   Parameter  P3                                ! Employer


Define Syntax RENAME                            ! Will be prompted if not given

   Parameter  P1                                ! Previous Name

   Parameter  P2                                ! New Name

   Parameter  P3                                ! Employer