Регистр сведений

[Дринкинс]

Здравствуйте.

   

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

Для стр = 0 По ТЗ.Количество()-1 Цикл

НоменклатураБезПроизводства = Справочники.Номенклатура.НайтиПоНаименованию(ТЗ.Получить(стр).Номенклатура);
Набор = РегистрыСведений.НоменклатураСнятаяСПроизводства.СоздатьНаборЗаписей();
НоваяЗапись = Набор.Добавить();
НоваяЗапись.Номенклатура = НоменклатураБезПроизводства;
//Набор.Загрузить(ТЗ);
Набор.Записать();

КонецЦикла;    


Данным кодом из таблицы значений хочу записать данные в регистр сведений но почему то записывается только одна последняя номенклатура. Помогите где ошибка

[MuI_I_Ika]

Что-то не то у вас в ТЗ записано.

[wise]

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

Набор = РегистрыСведений.НоменклатураСнятаяСПроизводства.СоздатьНаборЗаписей();
Для стр = 0 По ТЗ.Количество()-1 Цикл
      НоменклатураБезПроизводства = Справочники.Номенклатура.НайтиПоНаименованию(ТЗ.Получить(стр).Номенклатура);
    Если НоменклатураБезПроизводства <> Справочники.Номенклатура.ПустаяСсылка() Тогда
      НоваяЗапись = Набор.Добавить();
      НоваяЗапись.Номенклатура = НоменклатураБезПроизводства;
    КонецЕсли;
КонецЦикла;
Набор.Записать();