Проведение по регистру сведений. Пустой регистр

1С v8

21.12.15

✎

19:57

В модуле документа пишу
Процедура ОбработкаПроведения(Отказ, РежимПроведения)
    НаборЗаписей = РегистрыСведений.ЦеныПродаж.СоздатьНаборЗаписей();
    НаборЗаписей.Отбор.Регистратор.Установить(Ссылка);
    Для Каждого ТекСтрока Из Товары Цикл
        НоваяЗапись              = НаборЗаписей.Добавить();
        НоваяЗапись.Регистратор  = Ссылка;
        НоваяЗапись.Период       = Ссылка.Дата;
        НоваяЗапись.Номенклатура = ТекСтрока.Номенклатура;
        НоваяЗапись.ЦенаПродажи = ТекСтрока.Цена;
        НоваяЗапись.Склад = Склад;

    КонецЦикла;
    НаборЗаписей.Записать();
    //
КонецПроцедуры

1 sidalexsandr

21.12.15

✎

19:57

Итог пустой регистр

2 GreatOne

21.12.15

✎

19:58

Прочитать

3 sidalexsandr

21.12.15

✎

19:59

(2) У меня в экранной форме документа выводятся значения регистра.

4 GreatOne

21.12.15

✎

20:07

У меня в консольной форме на холодильнике не работает (

5 RomanYS

21.12.15

✎

20:48

в обработке проведения вместо
НаборЗаписей = РегистрыСведений.ЦеныПродаж.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Регистратор.Установить(Ссылка);

делай
НаборЗаписей = Движения.ЦеныПродаж;

6 sidalexsandr

21.12.15

✎

21:35

(5) Спасибо, сработало.
Вот полный текст модуля проведения
Процедура ОбработкаПроведения(Отказ, РежимПроведения)
    Движения.ЦеныПродаж.Очистить();

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

    КонецЦикла;

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