
  PROCEDURE [XREF] osp$system_error (error_message: string ( * );
        status: ^ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc OST$STATUS
?? POP ??
