
  TYPE
    pft$selection_id_sequence = amt$file_id_sequence;

*copyc amt$file_id_sequence
