Народ, на ровном месте запнулся!
Выставлено: SET CENTURY OFF, SET CENTURY TO 19 ROLL 2 и SET DATE GERMAN
Делаю в форме проверку для дурака-пользователя. В textbox вводится некоторая дата. При попытке сохранить данные у меня стоит код:

IF CTOD(thisform.textbox.value)<{^2000-01-01}
=MESSAGEBOX("Дата введена неправильно!",48)
thisform.textbox .SetFocus
CANCEL
ENDIF

IF CTOD(thisform.textbox .value)>DATE()
=MESSAGEBOX("Такая дата еще не наступила!",48)
thisform.textbox.SetFocus
CANCEL
ENDIF

Не срабатывает ни 1 ни 2 условие. Проге пофик, какая дата введена пользователем. На 1 условие она не пропускает ни одну дату, а на 2 условие пропускает любую, хоть 2100 год.
Помогите пожалуйста справиться с проблемой.

Спасибо, защита заработала ;-)