
  PROCEDURE [XREF] ofp$store_menu_choice_r1
    (    menu_id: oft$menu_id;
         active_operator_classes: oft$operator_classes;
         choice: oft$number_of_choices;
         response_string: ost$string;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc oft$menu_id
*copyc oft$menu_selections
*copyc oft$operator_classes
*copyc ost$status
*copyc ost$string
?? POP ??
