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