
  TYPE
    pft$p_sequence_record = ^pft$sequence_record;

*copyc pft$sequence_record
