  TYPE
    pft$subfile = record
      recorded_vsn: rmt$recorded_vsn,
      byte_address: amt$file_byte_address,
      allocated_length: amt$file_byte_address,
    recend;

*copyc amt$file_byte_address
*copyc rmt$recorded_vsn
