Заполнение табличной части документа

[Ирина1109]

Доброго времени суток!

Мне необходимо программно по каждой строке верхней таблицы заполнить нижнюю (прикладываю скриншот). Подскажите пожалуйста, как это можно организовать?

[Ирина1109]

Код Выделить Развернуть

Для каждого ЭлементРезультата из ТабПартий Цикл
            Если Ост = ЭлементРезультата.Количество Тогда
                НовыйДокумент = Документы.ДокументРасчетовСКонтрагентом.СоздатьДокумент();

                НовыйДокумент.Дата = ЭлементРезультата.ДатаДокумента;
                НовыйДокумент.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию(ЭлементРезультата.Поставщик);
                НовыйДокумент.НомерВходящегоДокумента = ЭлементРезультата.НомерСФ;
                НовыйДокумент.ДатаВходящегоДокумента = ЭлементРезультата.ДатаСФ;
                НовыйДокумент.СчетУчетаРасчетовСКомитентом = ПланыСчетов.Хозрасчетный.НайтиПоКоду("60.01");
                НовыйДокумент.Записать();

            КонецЕсли;

        СтрокаСФ = Док.ДанныеПоСФ.Добавить();
        СтрокаСФ.СчетФактура = НовыйДокумент.Ссылка;
        СтрокаСФ.ВидЦенности = Перечисления.ВидыЦенностей.Товары;
        СтрокаСФ.СпособУчетаНДС = Перечисления.СпособыУчетаНДС.ПринимаетсяКВычету;
        СтрокаСФ.СчетУчетаНДС = ПланыСчетов.Хозрасчетный.НайтиПоКоду("19.03");
        СтрокаСФ.СтавкаНДС = Перечисления.СтавкиНДС.НДС18;
        СтрокаСФ.Количество = ЭлементРезультата.Количество;
        СтрокаСФ.СуммаБезНДС = ЭлементРезультата.СуммаБезНДС;

    КонецЦикла;

По отладчику смотрю и в строкаСФ все что нужно записывается, но в документе не отображается. Подскажите пожалуйста, в чем моя ошибка?

[vitasw]

Может стоит корректировать документ ввода остатков?