Выгрузка договоров из 1с в базу sql. Проверка корректной даты

Добрый день! Помогите разобраться. Выгружаю справочник Договоров в базу SQL. В спр. есть поле Дата договора, которую пользователи иногда заполняют некорректно, например, 20.08.0216. Написала процедуру выгрузки, но она выдает ошибку при некорректных датах. Как мне перед загрузкой правильно проверить дату?


Процедура КнопкаВыполнитьНажатие(Кнопка)

СтрокаПодключения = ".....";

Connection = Новый COMОбъект("ADODB.Connection");
Command = Новый COMОбъект("ADODB.Command");
RecordSet = Новый COMОбъект("ADODB.RecordSet");

Connection.Open(СокрЛП(СтрокаПодключения));
Command.ActiveConnection = Connection;

Command.CommandText = "Delete FROM [db_1c].[asu].[vwСправочникДоговоров]";
Command.Execute();

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ДоговорыКонтрагентов.Владелец.Код КАК КодКонтрагента,
| ДоговорыКонтрагентов.Номер КАК НомерД,
| ДоговорыКонтрагентов.Дата КАК ДатаД,
| ДоговорыКонтрагентов.Код КАК КодДоговора,
| ДоговорыКонтрагентов.Наименование КАК Наименование,
| ДоговорыКонтрагентов.А_СтавкаНДС КАК СтавкаНДС,
| ДоговорыКонтрагентов.А_НомерСУЗ КАК НомерСУЗ,
| ДоговорыКонтрагентов.А_ОтветсвенноеЛицо.Наименование КАК Инициатор,
| ДоговорыКонтрагентов.А_ИдентификаторМОпо159ФЗ КАК ИГК
|ИЗ
| Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов
|ГДЕ
| ДоговорыКонтрагентов.ПометкаУдаления = ЛОЖЬ
| И ДоговорыКонтрагентов.ЭтоГруппа = ЛОЖЬ
| И ДоговорыКонтрагентов.А_ДоговорЗавершен = ЛОЖЬ";

РезультатЗапроса = Запрос.Выполнить();
Выборка = РезультатЗапроса.Выбрать();

Пока Выборка.Следующий() Цикл

Command.CommandText = "ins ert in to [db_1c].[asu].[vwСправочникДоговоров] ([Код_контрагента],[№_договора],[Код_договора],[Наименование],[Ставка_НДС],[№_СУЗ],[Инициатор договора],[ИГК],[Дата_договора]) values('"+Выборка.КодКонтрагента+"', '"+Выборка.НомерД+"', '"+Выборка.КодДоговора+"', '"+Выборка.Наименование+"', '"+СтавкаНДС+"', '"+Выборка.НомерСУЗ+"', '"+Выборка.Инициатор+"', '"+Выборка.ИГК+"', Cast('"+Формат(ДатаДоговора, "ДФ = ггггММдд")+"' as smalldatetime) )";
Command.CommandTimeOut = 9000;
Command.Execute();
КонецЦикла;

КонецПроцедуры