
  PROCEDURE [XREF] lop$report_error (error_condition: ost$status_condition;
        text_1: string ( * );
        text_2: string ( * );
        number: integer);
?? PUSH (LISTEXT := ON) ??
*copyc LLE$LOAD_MAP_DIAGNOSTICS
*copyc OST$STATUS
?? POP ??
