  TYPE
    rat$open_file_list = array [1 .. 2 ] of rat$open_file_item,

    rat$open_file_item = record
      name: amt$local_file_name,
      identifier: amt$file_identifier,
      attached: boolean,
      opened: boolean,
    recend;

*copyc amt$local_file_name
*copyc amt$file_identifier
