*copyc csc$max_menu_items
  TYPE
    cst$menu_item_number = 0 .. csc$max_menu_items;
