В модуле документа писал так
Процедура ДатаПриИзменении() отработает только если вы принудительно вызовите эту процедуру, либо если вы изменили поле "Дата" вручную на форме. Вам надо или в процедуре "ПриСозданииНаСервере" прописать
Если Объект.Ссылка.Пустая() Тогда
Дата1 = КонецДня(Дата);
КонецЕсли;
Или, как уже говорилось в процедуре "ПередЗаписью" модуля формы.