
  PROCEDURE [XREF] iip$fetch_terminal (file_id: amt$file_identifier;
    open_file_desc_pointer: ^iit$open_file_description;
    terminal_attributes: ^ift$get_connection_attributes;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc AMT$FILE_IDENTIFIER
*copyc ift$get_connection_attributes
*copyc IIT$CONNECTION_DESCRIPTION
*copyc OST$STATUS
?? POP ??
