
  TYPE
    cst$menu_item_string = RECORD
      menu_string: ^clt$command_line,
      long_label: ost$name,
      alternate_long_label: ost$name,
      short_label: string (6),
      alternate_short_label: string (6),
      item_number: cst$menu_item_number,
      CASE key_type: cst$key_type OF
      = csc$standard_function =
        standard_function: cst$standard_functions,
      = csc$application_function =
        application_function: cst$application_functions,
      = csc$screen_function =
        screen_event: cst$screen_events,
      = csc$unused_entry =
        ,
      CASEND,
    RECEND;

*copyc clt$command_line
*copyc cst$application_functions
*copyc cst$menu_item_number
*copyc cst$standard_functions
*copyc ost$name
