
  PROCEDURE [XREF] cmp$get_logical_pp_table_index
    (    element_name: cmt$element_name;
     VAR logical_pp_table_index: integer;
     VAR status: ost$status);
