
  PROCEDURE [XREF] iip$terminal_command (terminal_attributes:
    ift$terminal_attributes;
    VAR status: ost$status);
?? PUSH (LISTEXT := ON) ??
*copyc ift$terminal_attributes
*copyc IFE$ERROR_CODES
*copyc OST$STATUS
?? POP ??
