Calcular Edad entre dos fechas
Hola solicito su ayuda:
Tengo 3 campos y un boton de calcular edad
2 sn de tipo date (fecha) fecha_nac y fecha_nac1
1 campo de aƱos
bien en el campo fecha_nac se introduce la fecha de nacimiento de X persona y en el campo fecha_nac1 se introduce la fecha con la que se comparara la fecha de nacimiento (fecha_nac) que este caso la fecha siempre sera 01/09/04 es decir la edad calculada al Primero de Septiembre del 2004 y asi en el campo edad que apareciera el resultado de aƱos y meses cumplidos al Primero de Septiembre del 2004 y el boton de calcular realizara esa funcion de comparar las fechas y arrojara el resultado en el campo aƱos.
Pues esa mi duda a ver si alguien me pudiese echar la mano, de antemano gracias de todo corazon que dios lo bendigue y espero sus respuestas por favor auda.
Maverick
Tengo 3 campos y un boton de calcular edad
2 sn de tipo date (fecha) fecha_nac y fecha_nac1
1 campo de aƱos
bien en el campo fecha_nac se introduce la fecha de nacimiento de X persona y en el campo fecha_nac1 se introduce la fecha con la que se comparara la fecha de nacimiento (fecha_nac) que este caso la fecha siempre sera 01/09/04 es decir la edad calculada al Primero de Septiembre del 2004 y asi en el campo edad que apareciera el resultado de aƱos y meses cumplidos al Primero de Septiembre del 2004 y el boton de calcular realizara esa funcion de comparar las fechas y arrojara el resultado en el campo aƱos.
Pues esa mi duda a ver si alguien me pudiese echar la mano, de antemano gracias de todo corazon que dios lo bendigue y espero sus respuestas por favor auda.
Maverick
Que tal Maverick
Un pequeƱo ejemplo para que lo uses como necesites.
CREATE CURSOR CurTemp(edad c(30))
fecha_nac = DATE(1972,07,12)
fecha_nac1 = DATE(2004,09,01)
aƱos=STR((fecha_nac1-(fecha_nac))/365,2)
meses=IIF(month(fecha_nac1)-month(fecha_nac) < 0,12+month(fecha_nac1)-month(fecha_nac),month(fecha_nac1)-month(fecha_nac))
?aƱos
?meses
SELECT CurTemp
APPEND blank
Replace Edad WITH ALLTRIM(STR((fecha_nac1-(fecha_nac))/365,2))+' AƱos '+;
ALLTRIM(STR(IIF(month(fecha_nac1)-month(fecha_nac) < 0,12+;
month(fecha_nac1)-month(fecha_nac),month(fecha_nac1)-month(fecha_nac)))+' Meses')
Alex Vargas
Un pequeƱo ejemplo para que lo uses como necesites.
CREATE CURSOR CurTemp(edad c(30))
fecha_nac = DATE(1972,07,12)
fecha_nac1 = DATE(2004,09,01)
aƱos=STR((fecha_nac1-(fecha_nac))/365,2)
meses=IIF(month(fecha_nac1)-month(fecha_nac) < 0,12+month(fecha_nac1)-month(fecha_nac),month(fecha_nac1)-month(fecha_nac))
?aƱos
?meses
SELECT CurTemp
APPEND blank
Replace Edad WITH ALLTRIM(STR((fecha_nac1-(fecha_nac))/365,2))+' AƱos '+;
ALLTRIM(STR(IIF(month(fecha_nac1)-month(fecha_nac) < 0,12+;
month(fecha_nac1)-month(fecha_nac),month(fecha_nac1)-month(fecha_nac)))+' Meses')
Alex Vargas
