Age calculation script

[Mark Smith]

This is to do with where the centuryCutoff is - if you set it to 5,  
you should get the expected answer (100 yrs, 0 months), I think.

best

Mark

On 8 Sep 2006, at 14:55, Roger.E.Eller at sealedair.com wrote:

> 2006/9/8, Mark Smith <mark at maseurope.net>:
>> function getAge bDay
>>    put 60 * 60 * 24 * 365 into secsPerYear
>>    put secsPerYear / 12 into secsPerMonth
>>
>>    put the seconds into tDay
>>
>>    -- assuming date of birth is given in short system date format
>>    convert bDay from short system date to seconds
>>
>>    put tDay - bDay into tAgeInSecs
>>
>>    put tAgeInSecs div secsPerYear into tYears
>>    put (tAgeInSecs mod secsPerYear) div secsPerMonth into tMonths
>>
>>    return tYears && tMonths
>> end getAge
>>
>> This is pretty rough and ready, it doesn't try to take into account
>> leap years and so-on, but unless the person is really old (100 yrs
>> + ?), it should be close enough. Also, see 'centuryCutoff' in the
>> docs if you're going to be dealing with older people.
>>
>>
>> Best,
>>
>> Mark
>
> Very nice!  It is interesting though, that early dates will return  
> strange
> results.  The date 9/1/1906 will result in 0 years and 0 months old.
>
> Roger Eller <roger.e.eller at sealedair.com>
>
>
> _______________________________________________
> use-revolution mailing list
> use-revolution at lists.runrev.com
> Please visit this url to subscribe, unsubscribe and manage your  
> subscription preferences:
> http://lists.runrev.com/mailman/listinfo/use-revolution