How do you work out the age of person if you have their date of birth.

month:=@Month(child.dob);
day:=@Day(child.dob);
year:=@Year(child.dob);
REM {Age is basically years since year of birth and...};
age := @Year(@Today) - Year ;

REM {If month (or month and day) is after now then subtract 1};
age2:=@If(Month > @Month(@Today) |
(Month = @Month(@Today) & Day
>= @Day(@Today) ) ;
age-1;
age);

@Text(age2)