Hi all,
Here is how to do it as a dictionary I-type. It is trivial to convert this
for a "normal" program. The code below works for the nasty cases of doing it
on Feb 29 or for someone born on that date.
OCONV(DATE(),'D4YMD'); OCONV(DOB,'D4YMD'); @1[1,[EMAIL PROTECTED],4];
IF @1[6,5] GE @2[6,
Dom,
That is also covered in the GetElapsedPeriod function with an extra "to"
date parameter. It otherwise defaults to the current date.
param = 'GetElapsedPeriod'
elapsedDates = iconv('12 October 1967','d'):@am:iconv('6 April
2006','d')
call DateUtility(param,elapsedDates)
currentAge = param ;*
For age in whole years, this is pretty easy, just subtract the DOB year
from the current year to get age, but if the current month and day are
earlier in the year than the date of birth month and day, subtract 1
from the age.
Suppose variable DOB holds the date of birth in internal format. This
c
