bonjour à tous,
je suis à la recherche d'une procédure pour calculer l'âge d'une personne à
une date donnée.
avant de réinventer la roue, quelqu'un aurait-il cela dans ses archives ?
merci d'avance :-)
miles
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
paratge
Miles Davis a écrit :
bonjour à tous, je suis à la recherche d'une procédure pour calculer l'âge d'une personne à une date donnée. avant de réinventer la roue, quelqu'un aurait-il cela dans ses archives ? merci d'avance :-) miles
Bonjour,
je vois deux axes possibles, soit:
1 utiliser DateDifférence()
2 Utiliser le type "Durée"
DateNaissance est une date= gauche(maDateDébut,4) DateInstantT est une date= gauche(maDateFin,4) DuréeCongrès est une Durée = DateInstantT - DateNaissance
Si ça peux t'aider...
Bon dev
Miles Davis a écrit :
bonjour à tous,
je suis à la recherche d'une procédure pour calculer l'âge d'une personne à
une date donnée.
avant de réinventer la roue, quelqu'un aurait-il cela dans ses archives ?
merci d'avance :-)
miles
Bonjour,
je vois deux axes possibles, soit:
1 utiliser DateDifférence()
2 Utiliser le type "Durée"
DateNaissance est une date= gauche(maDateDébut,4)
DateInstantT est une date= gauche(maDateFin,4)
DuréeCongrès est une Durée = DateInstantT - DateNaissance
bonjour à tous, je suis à la recherche d'une procédure pour calculer l'âge d'une personne à une date donnée. avant de réinventer la roue, quelqu'un aurait-il cela dans ses archives ? merci d'avance :-) miles
Bonjour,
je vois deux axes possibles, soit:
1 utiliser DateDifférence()
2 Utiliser le type "Durée"
DateNaissance est une date= gauche(maDateDébut,4) DateInstantT est une date= gauche(maDateFin,4) DuréeCongrès est une Durée = DateInstantT - DateNaissance
Si ça peux t'aider...
Bon dev
Pascal F
Il se trouve que paratge a formulé :
Miles Davis a écrit :
bonjour à tous, je suis à la recherche d'une procédure pour calculer l'âge d'une personne à une date donnée. avant de réinventer la roue, quelqu'un aurait-il cela dans ses archives ? merci d'avance :-) miles
Bonjour,
je vois deux axes possibles, soit:
1 utiliser DateDifférence()
2 Utiliser le type "Durée"
DateNaissance est une date= gauche(maDateDébut,4) DateInstantT est une date= gauche(maDateFin,4) DuréeCongrès est une Durée = DateInstantT - DateNaissance
Si ça peux t'aider...
Bon dev
Pour completer: Info("Il est agé de :"+DuréeVersChaîne(DuréeCongrès,"AA"))
-- Pascal
Ne garder que le prénom pour me joindre
Il se trouve que paratge a formulé :
Miles Davis a écrit :
bonjour à tous,
je suis à la recherche d'une procédure pour calculer l'âge d'une personne à une date donnée.
avant de réinventer la roue, quelqu'un aurait-il cela dans ses archives ?
merci d'avance :-)
miles
Bonjour,
je vois deux axes possibles, soit:
1 utiliser DateDifférence()
2 Utiliser le type "Durée"
DateNaissance est une date= gauche(maDateDébut,4)
DateInstantT est une date= gauche(maDateFin,4)
DuréeCongrès est une Durée = DateInstantT - DateNaissance
Si ça peux t'aider...
Bon dev
Pour completer:
Info("Il est agé de :"+DuréeVersChaîne(DuréeCongrès,"AA"))
--
Pascal
N0.pascal.SPAM@efpe.biz
Ne garder que le prénom pour me joindre
bonjour à tous, je suis à la recherche d'une procédure pour calculer l'âge d'une personne à une date donnée. avant de réinventer la roue, quelqu'un aurait-il cela dans ses archives ? merci d'avance :-) miles
Bonjour,
je vois deux axes possibles, soit:
1 utiliser DateDifférence()
2 Utiliser le type "Durée"
DateNaissance est une date= gauche(maDateDébut,4) DateInstantT est une date= gauche(maDateFin,4) DuréeCongrès est une Durée = DateInstantT - DateNaissance
Si ça peux t'aider...
Bon dev
Pour completer: Info("Il est agé de :"+DuréeVersChaîne(DuréeCongrès,"AA"))
-- Pascal
Ne garder que le prénom pour me joindre
joseph cvjetic
"Miles Davis" a écrit dans le message de news:
bonjour à tous, je suis à la recherche d'une procédure pour calculer l'âge d'une personne
à
une date donnée. avant de réinventer la roue, quelqu'un aurait-il cela dans ses archives ? merci d'avance :-) miles
DateNaissance est une Date = SaiDate DateCourante est une Date = DateSys() NbAnnées, NbMois, NbJours sont des entiers SI DateNaissance > DateCourante ALORS Info("Date future") ; RETOUR TANTQUE DateNaissance..Jour <> DateCourante..Jour NbJours ++ DateNaissance..Jour ++ FIN TANTQUE DateNaissance..Mois <> DateCourante..Mois NbMois ++ DateNaissance..Mois ++ FIN NbAnnées = DateCourante..Année - DateNaissance..Année Info("Age: "+NbAnnées+" Ans "+NbMois+" mois "+NbJours+" jours")
J Cvjetic
"Miles Davis" <miles.davis@tiscali.fr> a écrit dans le message de news:
XnF98596666F7E91milesdavistiscalifr@193.252.117.183...
bonjour à tous,
je suis à la recherche d'une procédure pour calculer l'âge d'une personne
à
une date donnée.
avant de réinventer la roue, quelqu'un aurait-il cela dans ses archives ?
merci d'avance :-)
miles
DateNaissance est une Date = SaiDate
DateCourante est une Date = DateSys()
NbAnnées, NbMois, NbJours sont des entiers
SI DateNaissance > DateCourante ALORS Info("Date future") ; RETOUR
TANTQUE DateNaissance..Jour <> DateCourante..Jour
NbJours ++
DateNaissance..Jour ++
FIN
TANTQUE DateNaissance..Mois <> DateCourante..Mois
NbMois ++
DateNaissance..Mois ++
FIN
NbAnnées = DateCourante..Année - DateNaissance..Année
Info("Age: "+NbAnnées+" Ans "+NbMois+" mois "+NbJours+" jours")
bonjour à tous, je suis à la recherche d'une procédure pour calculer l'âge d'une personne
à
une date donnée. avant de réinventer la roue, quelqu'un aurait-il cela dans ses archives ? merci d'avance :-) miles
DateNaissance est une Date = SaiDate DateCourante est une Date = DateSys() NbAnnées, NbMois, NbJours sont des entiers SI DateNaissance > DateCourante ALORS Info("Date future") ; RETOUR TANTQUE DateNaissance..Jour <> DateCourante..Jour NbJours ++ DateNaissance..Jour ++ FIN TANTQUE DateNaissance..Mois <> DateCourante..Mois NbMois ++ DateNaissance..Mois ++ FIN NbAnnées = DateCourante..Année - DateNaissance..Année Info("Age: "+NbAnnées+" Ans "+NbMois+" mois "+NbJours+" jours")
J Cvjetic
Miles Davis
Miles Davis écrivait news::
bonjour à tous, je suis à la recherche d'une procédure pour calculer l'âge d'une ...
merci pour vos idées ;-)
pour info, j'ai mis ça en place (tiré d'un exemple vb trouvé sur le net)
Age = UneDate..Année - pdNaissance..Année
SI (DateNaiss..Mois > UneDate..Mois) ALORS Age = Age - 1 FIN SI ((DateNaiss..Mois = UneDate..Mois) ET (DateNaiss..Jour > UneDate..Jour)) ALORS Age = Age - 1 FIN RENVOYER (Age)
Miles Davis <miles.davis@tiscali.fr> écrivait
news:XnF98596666F7E91milesdavistiscalifr@193.252.117.183:
bonjour à tous,
je suis à la recherche d'une procédure pour calculer l'âge d'une ...
merci pour vos idées ;-)
pour info, j'ai mis ça en place (tiré d'un exemple vb trouvé sur le net)
Age = UneDate..Année - pdNaissance..Année
SI (DateNaiss..Mois > UneDate..Mois) ALORS
Age = Age - 1
FIN
SI ((DateNaiss..Mois = UneDate..Mois) ET (DateNaiss..Jour > UneDate..Jour))
ALORS
Age = Age - 1
FIN
RENVOYER (Age)
bonjour à tous, je suis à la recherche d'une procédure pour calculer l'âge d'une ...
merci pour vos idées ;-)
pour info, j'ai mis ça en place (tiré d'un exemple vb trouvé sur le net)
Age = UneDate..Année - pdNaissance..Année
SI (DateNaiss..Mois > UneDate..Mois) ALORS Age = Age - 1 FIN SI ((DateNaiss..Mois = UneDate..Mois) ET (DateNaiss..Jour > UneDate..Jour)) ALORS Age = Age - 1 FIN RENVOYER (Age)
