Discussion :

[NABIL74]

bonjour tout le monde,
j'ai une table " personnel" où il y a les champs: "N°_pers" , "Nom_prenom" et
"date-naissance".
je veux connaître l'âge des personnes qui ont plus de 18 ans.
comment faire cette requête liée à un "Edit" ("Edit" sert à entrer la date pour calculer l'age de la personne).
merci d'avance.

[SergioMaster]

Bonjour
Quelle BDD ?

[NABIL74]

Salut SergioMaster,
je travaille sous delphi 7 avec des tables Paradox.
merci.

[SergioMaster]

avec des tables Paradox.

dommage, avec firebird cela aurait été plus simple

bon , j'ai deux solutions quand même a te proposer:
1) si tu n'as pas besoin d'être trop précis au niveau de l'age (au jour prés) l'age n'est ni plus ni moins que la division d'un nombre de jour divisé par 365.25

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

WHERE CAST((Date_naissance - :unedate)/365.25 as INTEGER)>=18

2) extraire les jours , mois, année par extract et décomposer le calcul de l'âge

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
WHERE EXTRACT(YEAR FROM date_naissance)-:AN>18
OR  (EXTRACT(YEAR FROM date_naissance)-:AN=17 AND EXTRACT(MONTH FROM date_naissance)<:MOIS)
OR (EXTRACT(YEAR FROM date_naissance)-:AN=17 AND EXTRACT(MONTH FROM date_naissance)=:MOIS AND  EXTRACT(DAY FROM date_naissance)<=:JOUR)

ce SQL n'est pas vérifié mais l'esprit y est , il faudra peut-être transtyper (CAST) les valeurs

P.S. Il existe un forum spécifique paradox ici

[ALWEBER]

Voila une requete Paradox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
SELECT DISTINCT Date1
FROM "MaTable.DB" 
WHERE
(Date1 < ('01/27/2009'-6574.0)
ORDER BY Date1

6574 = 18 * 365.25
Attention la date est en MoisJourAnne

[Just-Soft]

Voila une requete Paradox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
SELECT DISTINCT Date1
FROM "MaTable.DB" 
WHERE
(Date1 < ('01/27/2009'-6574.0)
ORDER BY Date1

6574 = 18 * 365.25
Attention la date est en MoisJourAnne

+1

donc faut utiliser DecodeDate.

[NABIL74]

ok ça marche!!!!
merci à tous d'être penchés sur mon cas et c'est d'ailleurs la vrai force de ce magnifique forum.