ошибка запроса OLE 7.7 из 8.1

 	ВыбНачПериода = НачПериода;

	ВыбКонПериода = КонПериода;

	ЗапросЗагр = БазаИсточник.CreateObject("Запрос");

	ЗапросЗагр.УстановитьПараметр("ВыбНачПериода",ВыбНачПериода);

	ЗапросЗагр.УстановитьПараметр("ВыбКонПериода",ВыбКонПериода);

	ТекстЗапроса = 

	"//{{ЗАПРОС(Сформировать)

	|Номера = Справочник.Номера.ТекущийЭлемент;

	|Наименование = Справочник.Номера.Наименование;

	|Владелец = Справочник.Номера.Владелец;

	|ДатаВыхода = Справочник.Номера.ДатаВыхода;

	|Функция Счётчик = Счётчик();

	|Группировка Номера;

	|Условие(ДатаВыхода >= ВыбНачПериода);

	|Условие(ДатаВыхода <= ВыбКонПериода);

	|"//}}ЗАПРОС

	;

	// Если ошибка в запросе, то выход из процедуры

	Если ЗапросЗагр.Выполнить(ТекстЗапроса) = 0 Тогда

		Возврат;

	КонецЕсли;

	

    ТЗДанных = ЗапросЗагр.Выгрузить();

   

 



 	ЗапросЗагр = БазаИсточник.CreateObject("Запрос");

	ТекстЗапроса = 

	"//{{ЗАПРОС(Сформировать)

	|Номера = Справочник.Номера.ТекущийЭлемент;

	|Наименование = Справочник.Номера.Наименование;

	|Владелец = Справочник.Номера.Владелец;

	|ДатаВыхода = Справочник.Номера.ДатаВыхода;

	|Функция Счётчик = Счётчик();

	|Группировка Номера;

  	|Условие(ДатаВыхода >= '" +Формат(НачПериода, "ДДДММГГГГ") + "');

        |Условие(ДатаВыхода <= '" +Формат(КонПериода, "ДДДММГГГГ") + "');

	|"//}}ЗАПРОС

	;

	// Если ошибка в запросе, то выход из процедуры

	Если ЗапросЗагр.Выполнить(ТекстЗапроса) = 0 Тогда

		Возврат;

	КонецЕсли;

	

    ТЗДанных = ЗапросЗагр.Выгрузить();