Не получается выгрузить спр.Номенклатура выгружаю в РегСвед.

"Есть РегистрСведений (Измерение: Номенклатура) и есть спр.Номенклатура.
Вот хочу выгрузить спр.Номенклатура в РегистрСведений, но он не грузить инфу считывает, но не записывает. Подскажите почему, где у меня ошибка. Следующий код.

Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
              |    Номенклатура.Ссылка
              |ИЗ
              |    Справочник.Номенклатура КАК Номенклатура
              |ГДЕ
              |    Номенклатура.ЭтоГруппа = ЛОЖЬ
              |";
   Результат = Запрос.Выполнить();
   Выборка = Результат.Выбрать();
   
   
   Пока Выборка.Следующий()Цикл
   ТекущийСпр = Выборка.Ссылка.ПолучитьОбъект();
   
   НаборЗаписей = РегистрыСведений.Цены.СоздатьНаборЗаписей();
       
   НаборЗаписей.Отбор.Номенклатура.Установить(ТекущийСпр);
   НаборЗаписей.Отбор.Период.Установить(ТекущаяДата);
   
   НовЗапись = НаборЗаписей.Добавить();
   
   НовЗапись.Номенклатура= ТекущийСпр;
   НовЗапись.Период=ТекущаяДата;
   
   НаборЗаписей.Записать(Истина);
       
   КонецЦикла;"

"Измерение "Номенклатура" регистра сведений "Цены" наверняка имеет тип "СправочникСсылка", поэтому получение объекта по ссылке лишнее. А так:

НаборЗаписей = РегистрыСведений.Цены.СоздатьНаборЗаписей();

Пока Выборка.Следующий()Цикл
 
  НовЗапись = НаборЗаписей.Добавить();
 
  НовЗапись.Номенклатура = Выборка.Ссылка;
  НовЗапись.Период=ТекущаяДата;
// еще возможно нужно указать
  НовЗапись.ТипЦен = ??;
  НовЗапись.Цена = ??;
 
КонецЦикла;

НаборЗаписей.Записать(Истина);
"

Денис)))))))))))))))))) Спасибки)))))))))

И еще нужно учесть, много ли вообще записей будет сделано в регистр сведений, а то НаборЗаписей все пишет сначала в память и, в случае 32-х битной Windows, может вывалиться с ошибкой "Недостаточно памяти".