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