On May 14, 2009, at 9:17 AM, J. Landman Gay wrote:
[email protected] wrote:
Hi all,
I could need a hint on how to compute the age of a person when I have
the birthday.
The "convert to seconds" and "subtract"ion part is easy, but how to
proceed? :-)
My variation, if all you need is the year:
function getAge pDate
put the date into tNow
convert pDate to dateitems
convert tNow to dateitems
repeat with x = 1 to 3
put item x of tNow - item x of pDate & comma after tAge
end repeat
if item 2 of tAge < 0 or item 3 of tAge < 0
Shouldn't this be
if item 2 of tAge < 0 OR (item 2 of tAge = 0 AND item 3 of tAge
< 0)
Otherwise it returns the wrong age if the day of the month is less
than the day of the month of the birthdate.
then subtract 1 from item 1 of tAge
return item 1 of tAge
end getAge
Yours in math-challengedness,
Devin
Devin Asay
Humanities Technology and Research Support Center
Brigham Young University
_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution