PROCEDURE [XREF] csp$disable_menu_item (
  item_number: cst$menu_item_number;
  VAR status: ost$status);
*copyc cst$menu_item_number
*copyc ost$status
