   PROCEDURE [XREF] cmp$set_default_mainframe_name (
            VAR status : ost$status);
?? PUSH(LISTEXT := ON) ??
*copyc ost$status
?? POP ??
