Huidige leeftijd berekenen

[Sanne]

Hier een fijne formule om in FileMaker Pro 7 de huidige leeftijd in jaren op basis van een geboortedatum te berekenen.

 

Let(
verjaardag = Date( Month( Geboortedatum ) ; Day( Geboortedatum ) ; Year( Get ( CurrentDate ) ) ) ; 

(Year( Get ( CurrentDate ) ) - Year( Geboortedatum ) - 1 ) + 
(Get ( CurrentDate ) >= verjaardag)

)

 

Ik hou me aanbevolen voor kortere formules!

[Koen Van Hulle]

Als je de Get(currentdate) vervangt door Get(Currentdatestamp), dan weet je tevens hoe oud hij precies is in seconden.

 

 

Koen

[miltenb]

Misschien is die van mij helemaal fout, maar wel korter :

 

is ongetest en ff uit het hoofd.

 

year( get (currentdate) ) - year( geboortedatum) -

case( dayofyear (geboortedatum) > dayofyear( get(currentdate)) ; 1 ; 0 )

 

Joost

[Sanne]

is ongetest en ff uit het hoofd

En dat wreekt zich natuurlijk, Joost

 

Ik quote de FM-Helptekst maar eens: "Returns a number equal to the number of days from the beginning of the year of date"

 

Dus 18 augustus valt in het ene jaar op de 230ste dag, en in het andere (geschrokken) jaar op de 231ste dag.

 

Dus korter is jouw formule wel, maar minder betrouwbaar : het zal alleen werken voor verjaardagen in januari en februari.

[miltenb]

Ik verwachtte al dat het schrikkeljaar een probleem zou zijn.

 

Daar zou ik een let-je voor kunnen maken. En daar op in hakend:

Een let is wellicht leesbaarder, maar niet per se korter. Wordt pas korter als het argument meer dan 1x gebruikt.

[miltenb]

ik zou hem dus makkelijker korter kunnen maken met jouw eigen berekening.

 

Joost

PS. Dat leek met niet echt eerlijk.

[miltenb]

Voor de liefhebbers :

 

Schrikkeljaar :

 

// schrikkeljaar : deelbaar door 4 of 400, niet 100

Case (

Mod ( Year ( datum ) ; 4 ) = 0 ;

Case (

Mod ( Year ( datum ) ; 400 ) = 0 ; 1 ;

Mod ( Year ( datum ) ; 100 ) = 0 ; 0 ;

1 // normaal schrikkeljaar

)

;

0

)

Edited December 4, 2004 by Guest

[miltenb]

Ik begin te zwammen...

[Sanne]

Ik begin te zwammen...

Is niet erg hoor. Het is vast één van je grootste charmes

[mikezwet]

Ik heb hem in fm7 zo gemaakt:

 

Case(Last_Per = "Dag" ; Bedrag berekend *

If( Mod(Year(Get ( CurrentDate )) ; 4 ) = 0; 366 ; 365) ; "de rest van case" )

 

Als in veld last_per "dag" is ingevuld doet hij dit keer 365 of 366 dagen afhankelijk of het jaartal afgerond deelbaar is door 4. Dat met 400 en 100 is volgens mij niet nodig....