процедура сравнения

[Brunette]

в VFP как реализовать процедуру сравнения дат... у нас есть дата первого посещения... при повторном посещении будет фиксироваться вторая дата приема...
дело в том, что исследование можно повторять не чаще 1 раза в 7 дней.  как сделать так, чтобы БД весело хрюкнула - типа, иди, пациент дорогой, еще погуляй?

[win_pup]

просто находишь разницу дат и проверяешь, что бы она была меньше 7-ми:

if (D2 - D1) < 7
   MessageBox (\'Иди погуляй!...\')
else
   MessageBox (\'Добро пожаловат на приём!...\')
endif

[Brunette]

win_pup
с разницей это понятно... а ничего если эти даты в разных таблицах?
это роли не играет?

[win_pup]

а какая ему разница, в каких они таблицах, главное, что бы это были 2 даты (тип Date)...

а перед сравнением лучше сначала записать сравниваемые значения дат (т.к. они ведь в разных таблицах) в две переменные, и сравнивать уже, собственно, значения не самих полей, а значения соответствующих переменных...

[Brunette]

их лучше объявить локальными переменными или это не играет роли?

[win_pup]

я не знаю, всё зависит от того, как написан код, и в каких облластях им будет присваиваться значение...
если значения переменным будет присваиваться в разных областях видимости (в разных процедурах, методах), то тогда конечно надо определить их как глобальные, а если присваивать им значения в том же методе, где и условие проверки, то явного определения вообще не требуется...

ещё раз повторюсь: это зависит от структуры алгоритма.

[Brunette]

ок
разберусь сама )
пасиба