X-NEWS: cerritos.edu vmsnet.sources: 535
Relay-Version: VMS News - V6.0-3 14/03/90 VAX/VMS V5.4; site cerritos.edu
Path: cerritos.edu!nic.csu.net!usc!sdd.hp.com!spool.mu.edu!uunet!mcsun!ukc!slxsys!ibmpcug!keith
Newsgroups: comp.os.vms,vmsnet.sources,connect.audit
Subject: DCL_MENBU - erratum
Message-ID: <1991May7.100735.4253@ibmpcug.co.uk>
From: keith@ibmpcug.co.uk (Keith Brown)
Date: 7 May 91 10:07:35 GMT
Organization: The IBM PC User Group, UK.
Lines: 93
Xref: cerritos.edu comp.os.vms:27119 vmsnet.sources:535


M. Scott Dewey <msd@rrdfunphy.nist.gov> spotted that I'd distributed the wrong
version of the .CLD file.  Sorry :-(.  As the correct version is pretty short
I'm appending it to this.

                                        Keith Jewell

+-------------------------------------------+-----------------------------------+
| Keith Jewell				    | Telephone: (0386)840319 ext.222  |
| Head of Mathematics & Computing Sciences  | Telex:     337017	       	       |
| Campden Food & Drink Research Association | Fax:       (0386)841306	       |
| Chipping Campden                          | Email:     keith@ibmpcug.CO.UK   |
| Gloucestershire GL55 6LD                  |                                  |
| England                                   |                                  |
+-------------------------------------------+----------------------------------+
|No responsibility accepted for anything.  Read what I write, use what I give  |
| at your own risk							       |
+------------------------------------------------------------------------------+
MODULE MENU_TABLE

define verb RUN_MENU
   routine RUN_MENU
   parameter P1 , prompt="File"
      value (type=$infile)
   qualifier MODE
      nonnegatable
      default
      value (default="V")
   qualifier ROW
      nonnegatable
      default
      value (default="0",type=$number)
   qualifier COLUMN
      nonnegatable
      default
      value (default="0",type=$number)              
   qualifier HEIGHT
      nonnegatable
      default
      value (default="0",type=$number)
   qualifier WIDTH
      nonnegatable
      default
      value (default="0",type=$number)
   qualifier LABEL
      nonnegatable
      value
   qualifier LABPOS
      nonnegatable
      default
      value (default="B")
   qualifier HELPLIB
      nonnegatable
      value (default="SYS$HELP:HELPLIB")
   qualifier NUMBER
      default
      value (default="MENU_NUMBER")
   qualifier CHOICE
      nonnegatable
      value (default="MENU_CHOICE")
   qualifier SYMBOL
      default
      value (default="MENU_SYMBOL")
   qualifier MARKER
      nonnegatable
      default
      value (default="=")
   qualifier SPAWN
      default
      value (default=".")
    qualifier DO_COMMAND
      default
      value (default="|")
   qualifier INDIRECT
      default
      value (default="@")
    qualifier LOGICAL
      default
      value (default=">")
    qualifier SUBSTITUTE
      default
      value (default="<")
    qualifier FILES
      value (type=$file)
    qualifier DEVICE
    qualifier DIRECTORY
    qualifier TYPE
    qualifier VERSION
-- 
Automatic Disclaimer:
The views expressed above are those of the author alone and may not
represent the views of the IBM PC User Group.
--