  TYPE
    iit$xt_record_position = integer;

  CONST
    iic$xt_end_of_record = 0,
    iic$xt_mid_record = 1;
