1С 7.x : Выбор запросом элементов справочника и Загрузка в Документ

 Запрос = СоздатьОбъект("Запрос");

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

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

	//|Период с ВыбНачПериода по ВыбКонПериода;

	|Обрабатывать НеПомеченныеНаУдаление;

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

	|Группировка Номенклатура без групп;  

	|Условие(ПустоеЗначение(СокрЛП(Номенклатура.Наименование))=0);

	|Условие(Номенклатура.ПометкаУдаления()=0);

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

	;

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

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

		Возврат;

	КонецЕсли;

    Запрос.Выгрузить(ТЗ,0,0);  

	Док = СоздатьОбъект("Документ");

	Док.НайтиДокумент(ВыбИнвентаризацияТМЦ);  

	Док.ЗагрузитьТабличнуюЧасть(ТЗ); 

	Док.Записать();