Re: Фокс про
От: 191540 Россия  
Дата: 19.05.06 00:16
Оценка:
Здравствуйте, Succube, Вы писали:

S>У меня только один вопрос....

S>Создала хранимую процедуру Verify(), которая должна проверять введенную дату рождения. Если возраст превышает 18 лет, то возвращать True, в противном случае False.
S>Для определения системной даты используется функция Date(). Для определения года — Year(дата). Для возвращения результат — команда Return. Описание процедуры начинается с ключевого слова Procedure
S>Procedure Verify()
S>if year(date())-year(date_birth)>18 then
S>return.T.
S>else
S>return.F.
S>endif


S>КУДА ВОЗВРАЩАЕТМЯ .Т.


Вопрос не совсем понятен.
Но в любом случае код у меня (VFP 9 SP 1) работает

Откуда берется date_birth ?

Может быть сделать так:

Procedure Verify(date_birth)
.......
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.