re age from date of birth

[randywenks]

Under table sets, edit structure, I have among others, the following :

Field: Type:

Client_Dob Date

Cl_Age Numeric

Todays_Date Date

On my form, I want to get the �cl age� to show an age in years.

Do I need enter something in the edit structure section, or in the restructure table section, or later when I�m building the form use the function button to enter it there?

I�ve read the bulletins in print age, but don�t see where I need to imput the information or maybe I�m not using the right calculation in the right place.

I have tried to edit field rules by right clicking the table icon, then going to cl_age then typing in �trim(str((date()-client_dob)/365.25))� under calculated field expression, but I get the error code: �The equation must return a number�. How stupid am I? What do I do to fix?
can you straighten me out? Randy

[Tom Cone Jr]

RE: re age from date of birth

Randy,

Most would probably not store a numeric age in the table in the first place. If you do so, the value will be incorrect as soon as enough time passes. Might become wrong the next day, or a year later.

Most would calculate the current age when it's needed for some purpose. Like in a report.

there have been numerous threads on this and related subjects. Search this forum, and check the code archive.

-- tom

[randywenks]

RE: re age from date of birth

Tom
Are you saying its not possible to keep clients age current as I look at the form daily as I review my clients? The form I made is showing basic info and it would be helpful.
Randy

[JerryBrightbill]

RE: re age from date of birth

Randy

If you want to view the current age on a form, create a calculated field on the form, not in the table. The field in the table will only update when a change is made, whereas the field on the form calculates wherever the form is opened.

Jerry

[CraigSchumacker]

RE: re age from date of birth

Randy:

Here is a simple function that calculates age:

function PERSONS_AGE as N(BIRTHDATE as D)

PERSONS_AGE = year(date())-year(BIRTHDATE)
if addyears(BIRTHDATE,PERSONS_AGE) > date()
PERSONS_AGE = PERSONS_AGE - 1
end if

end function
end

As jerry points out, after creating the function, it must be used in a calculated field to properly reflect the age. The calculated field must be at the form or report level, not within the table.


The usage is as follows:

varbirthday = ctod("05/30/1964")

The_Age = persons_age(varbirthday)

?The_Age
= 37.000000

This function only calculates integers.

There are a lot of other solutions to calculating age if you search this board. Alpha Five Version Five has a built in function that does this.

Craig

[Super Dave]

RE: re age from date of birth

you can draw your own methosd for this, but I wrote it any years ago in alpha 4 i thin and it goes
date - dateofbirth (to get days old) / 365.25
you need to make it an integer and floor it
Dave