
   PROCEDURE [XREF] cmp$change_definition_name (
            element_name : cmt$element_name;
          new_element_name : cmt$element_name;
          change_all : boolean;
       VAR status : ost$status);

?? PUSH(LISTEXT := ON) ??
*copyc ost$status
*copyc cmt$element_name
?? POP ??
