Como calcular edad

03/01/2005 - 15:47 por Julio Caraballo | Informe spam
Feliz año nuevo a todo el grupo

alguien tiene idea o sabe donde puedo conseguir un control que me calcula la
edad a partir de una fecha de nacimiento


Gracias a todos
 

Leer las respuestas

#1 Ana María Bisbé York
03/01/2005 - 16:02 | Informe spam
Hola Julio:

Hay un excelente escrito de LuisMa Guayán que trata sobre temas de horas.
Allí encuentras la función que te describo más abajo.

Trabajar con fechas y horas en Visual FoxPro - Luis María Guayán
http://www.portalfox.com/article.php?sid62

Edad de una persona: Calcula la edad de una persona pasando como parámetros
la fecha de nacimiento y la fecha a la cual calculamos la edad. Si no se
pasa el segundo parámetro se toma por defecto la fecha actual.
? Edad(DATE(2000,3,1))FUNCTION Edad(tdNac, tdHoy) LOCAL lnAnios IF
EMPTY(tdHoy) tdHoy = DATE() ENDIF lnAnios = YEAR(tdHoy) - YEAR(tdNac)
IF GOMONTH(tdNac, 12 * lnAnios) > tdHoy lnAnios = lnAnios - 1 ENDIF
RETURN lnAniosENDFUNC
¡ Feliz Año Nuevo !

Saludos,

Ana
www.amby.net

"Julio Caraballo" escribió en el mensaje
news:%
Feliz año nuevo a todo el grupo

alguien tiene idea o sabe donde puedo conseguir un control que me calcula


la
edad a partir de una fecha de nacimiento


Gracias a todos


Preguntas similares