Ich denke, man braucht keine Tabelle, nur eine Abfrage, also
Query. Z.B. so oder ähnlich:
Delphi-Quellcode:
insert into personal values('jobo',23),('noname1',24),('mkinzler',20);
select pjubjahr, p.*
from personal p,
(select 2019 as pjubjahr union all
select 2020 union all
select 2021 union all
select 2022 union all
select 2023 union all
select 2024 union all
select 2025 )x
where mod(p.palterAktuell+ pjubjahr,5)=0
order by pjubjahr;
>pjubjahr pname palterAktuell
>2020 mkinzler 20
>2021 noname1 24
>2022 jobo 23
>2025 mkinzler 20
Wenn es nur um ein/nächste Jahr geht, kann man sich natürlich die "Unions" sparen.
Vielleicht gibts in Interbase auch noch einen Zeilengenerator als Ersatz für die Unions.
Ansonsten:
Ich finde es etwas merkwürdig, dass es eine Spalte mit dem aktuellen Alter gibt.
Wird diese Spalte jedes Jahr (oder zu jedem Geburtstag) angepasst?
Normalerweise nimmt man Geburtsjahr oder Geburtsdatum und berechnet von da aus alles nach Bedarf. Also die Datenbank berechnet, nicht man selbst.