
  TYPE
    oft$operator_menu_descriptor = RECORD
      next_descriptor_p: ^oft$operator_menu_descriptor,
      menu_id: oft$menu_id,
      source_task: ost$global_task_id,
      job_name: jmt$system_supplied_name,
      menu_class: oft$operator_class,
      number_of_displayable_lines: oft$number_of_displayable_lines,
      number_of_choices: oft$number_of_choices,
      choice: oft$number_of_choices,
      choice_made: boolean,
      response_string: ost$string,
      menu_text: oft$menu_selections,
      help_text_p: ^oft$menu_selections,
      help_text_line_count: oft$number_of_displayable_lines,
    RECEND;

*copyc jmt$system_supplied_name
*copyc oft$menu_id
*copyc oft$menu_selections
*copyc oft$operator_class
*copyc ost$global_task_id
*copyc ost$string
