Обработка.Перенос по com соединению

Добрый день. Ситуация такая. Написал обработку для заполнения документа Ввод начальных остатков. Базы БП и УТ соединяются по com соединению. Данные для УТ берется из отчета в БП сальдовая ведомость по счету. Обработка все переносит, но такой момент. Обработка каждую строку номенклатуры заноситься в новый документ с одной строчкой в ТЧ. Подскажите как подредактировать код что бы создало n-ое количесто документов равное количеству складов и в них заносилась вся номенклатура по каждому складу.

Запр_.УстановитьПараметр("НачалоПериода",Дата(2016,12,1,0,0,0));
Запр_.УстановитьПараметр("КонецПериода",Дата(2016,12,31,0,0,0));
выб0=Запр_.Выполнить().Выбрать();
Пока выб0.Следующий() Цикл

вно=Документы.ВводОстатков.СоздатьДокумент();
вно.ТипОперации=Перечисления.ТипыОперацийВводаОстатков.ОстаткиСобственныхТоваров;
вно.Организация=Справочники.Организации.НайтиПоНаименованию(выб0.Организация.наименование,истина);
вно.Дата=Дата(2017,01,1,0,0,0);
вно.Ответственный=Справочники.Пользователи.НайтиПоНаименованию("Залевская Наталья",истина);

вно.Склад=Справочники.Склады.НайтиПоНаименованию(выб0.Субконто3.Наименование,истина);
вно.НалогообложениеНДС=Перечисления.ТипыНалогообложенияНДС.ПродажаНеОблагаетсяНДС;

строка=вно.Товары.Добавить();
строка.Номенклатура=Справочники.Номенклатура.НайтиПоНаименованию(выб0.Субконто1.Наименование,истина);
строка.Количество=выб0.КолКонечныйОстатокДт;
строка.Сумма=выб0.БУКонечныйОстатокДт;
строка.Цена=строка.Сумма/строка.Количество;
строка.КоличествоУпаковок=выб0.КолКонечныйОстатокДт;
строка.СтавкаНДС=Перечисления.СтавкиНДС.НДС0;
строка.СуммаБезНДС=выб0.БУКонечныйОстатокДт;

вно.Записать();