Комплексная 7.7, выбор Партии по наименованию ГТД

Есть таблица значений с колонкой ГТД.Наименование, создаю расходную накладную(Документ.Реализация), как мне подставить Партию для товара по наименованию ГТД?

"есть механизм по создании партий, например в документе ПоступлениеТМЦИмпорт
по аналогии и создаём


Процедура СоздатьПартию(ПартияИсточник = 0)

Если ПустоеЗначение(Номенклатура) = 1 Тогда
   Возврат;
КонецЕсли;  
Если ПустоеЗначение(Партия) = 0 Тогда
// если партия уже записана - не трогаем ее!
   Возврат;
КонецЕсли;  

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

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

нет, партия уже есть в справочнике партии, ее просто нужно выбрать, новую не надо создавать

"> нет, партия уже есть в справочнике партии, ее просто нужно выбрать, новую не надо создавать

тогда в ТЗ передавать не Партия.Наименование ,а Партия.ТекущийЭлемент();"

да, но так не хочется((( хотелось бы свернуть

> да, но так не хочется((( хотелось бы свернуть

так и свернёшь не по наименованиям, а элементам !

подскажи что и как можно свернуть ТЗ или сам документ?

> подскажи что и как можно свернуть ТЗ или сам документ?

покажи, как ТЗ формируешь

" ТаблицаНоменклатуры = СоздатьОбъект("ТаблицаЗначений");
ТаблицаНоменклатуры.НоваяКолонка("Номенклатура","Справочник.Номенклатура",,,,,,);
ТаблицаНоменклатуры.НоваяКолонка("Количество","Число",,,,,,);
ТаблицаНоменклатуры.НоваяКолонка("Цена","Число",,,,,,);
ТаблицаНоменклатуры.НоваяКолонка("ГТД",,,,,,,);
       Номенклатура=СоздатьОбъект("Справочник.Номенклатура");
       ДокИз=СоздатьОбъект("Документ.ПоступлениеТМЦ");
ДокИз.ВыбратьДокументы(ДатаНачала, ДатаКонца);
Пока ДокИЗ.ПолучитьДокумент()=1 Цикл    
ДокИз.ВыбратьСтроки();  
Пока ДокИз.ПолучитьСтроку() = 1 Цикл
ТаблицаНоменклатуры.НоваяСтрока();
ТаблицаНоменклатуры.Номенклатура = ДокИз.Номенклатура;
ТаблицаНоменклатуры.Количество = ДокИз.Количество;
ТаблицаНоменклатуры.Цена = ДокИз.Цена;
ТаблицаНоменклатуры.ГТД = ДокИЗ.Партия;
...
ДокВ=СоздатьОбъект("Документ.Реализация");
ДокВ.Новый();
ДокВ.Партия=ТаблицаНомеклатуры.ГТД;
"