
  PROCEDURE [XREF] cmp$get_element_name (physical_identification :
                cmt$physical_identification;
            VAR element : cmt$element_descriptor;
            VAR status : ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc cme$logical_configuration_mgr
*copyc cme$reserve_element
*copyc cmt$element_descriptor
*copyc cmt$physical_identification
*copyc ost$status
?? POP ??
