CONST, TYPE, VAR

     The following are globally declared in the menu record (note: the list
     excludes the type Menu_Record that is described above):

     CONST
         MAX_CHOICES = 30;
         MENUSTRLENGTH = 40;

     TYPE
        MENU_HOOK = PROCEDURE(VAR CH:CHAR;CHOICE:INTEGER;VAR
     ECODE:INTEGER);
         {V5.0 ONLY}

     VAR
        HOOK : POINTER;    {V4.0 ONLY}


     Max_Choices - this constant indicates the maximum number of topics
     that are allowed in the menu record. The Toolkit is shipped with a
     Max_Choices of 30, but this can be changed to any appropriate value.

     MenuStrLength - this constant represents the maximum string length of
     each topic. Once again, the value can be readily changed to a
     different value.