t_date = record
    day: 1..31;
    month: 1..12;
    year: 2000..3000;
  end;