программное добавление записей в регистр кудир

[mag1595]

Помогите пожалуйста!!! Пытаюсь при проведении документа реализация товаров услуг сделать записи в КУДиР
Вот код:

НаборЗаписьейКУДиР = РегистрыНакопления.КнигаУчетаДоходовИРасходов.СоздатьНаборЗаписей();
            НаборЗаписьейКУДиР.Отбор.Регистратор.Значение=СтруктураШапкиДокумента.ссылка;
            ЗаписьКУДиР = НаборЗаписьейКУДиР.Добавить();
            ЗаписьКУДиР.Период = ДатаДока;
            ЗаписьКУДиР.Регистратор = СтруктураШапкиДокумента.Ссылка;
            ЗаписьКУДиР.Активность = Истина;
            ЗаписьКУДиР.Организация = Справочники.Организации.НайтиПоНаименованию(СтруктураШапкиДокумента.Организация);
            ЗаписьКУДиР.Содержание = "Доход от "+СтруктураШапкиДокумента.Ссылка;
            ЗаписьКУДиР.РеквизитыПервичногоДокумента = СтруктураШапкиДокумента.Ссылка;
            ЗаписьКУДиР.Графа4 = Сумма;
            ЗаписьКУДиР.ДоходЕНВД = Сумма;
            НаборЗаписьейКУДиР.Записать(Истина);


Но почему-то записи в регистр не добавляются. Почему? Что не так?

[DmitriyF]

Помогите пожалуйста!!! Пытаюсь при проведении документа реализация товаров услуг сделать записи в КУДиР
Вот код:

НаборЗаписьейКУДиР = РегистрыНакопления.КнигаУчетаДоходовИРасходов.СоздатьНаборЗаписей();
            НаборЗаписьейКУДиР.Отбор.Регистратор.Значение=СтруктураШапкиДокумента.ссылка;
            ЗаписьКУДиР = НаборЗаписьейКУДиР.Добавить();
            ЗаписьКУДиР.Период = ДатаДока;
            ЗаписьКУДиР.Регистратор = СтруктураШапкиДокумента.Ссылка;
            ЗаписьКУДиР.Активность = Истина;
            ЗаписьКУДиР.Организация = Справочники.Организации.НайтиПоНаименованию(СтруктураШапкиДокумента.Организация);
            ЗаписьКУДиР.Содержание = "Доход от "+СтруктураШапкиДокумента.Ссылка;
            ЗаписьКУДиР.РеквизитыПервичногоДокумента = СтруктураШапкиДокумента.Ссылка;
            ЗаписьКУДиР.Графа4 = Сумма;
            ЗаписьКУДиР.ДоходЕНВД = Сумма;
            НаборЗаписьейКУДиР.Записать(Истина);


Но почему-то записи в регистр не добавляются. Почему? Что не так?

Это где написано? В каком месте?

[mag1595]

Находится это в модуле документа РеализацияТоваровУслуг.
Решила проблему при помощи конструктора движений.
Вот код:
Если ЭтотОбъект.ВидОплаты = Перечисления.ВидыОплат.Наличный Тогда
         СуммаОбщ = 0;
         Движения.КнигаУчетаДоходовИРасходов.Очистить();
         Для Каждого ТекСтрокаАгентскиеУслуги Из АгентскиеУслуги Цикл
         СуммаОбщ = СуммаОбщ + ТекСтрокаАгентскиеУслуги.СервисныйСбор + ТекСтрокаАгентскиеУслуги.СуммаКомиссии
                     + ТекСтрокаАгентскиеУслуги.СервисныйСборЗаВозврат + ТекСтрокаАгентскиеУслуги.ВозвратТарифа
                     + ТекСтрокаАгентскиеУслуги.КомиссияУслугСвязи;
         КонецЦикла;
            
            Движение = Движения.КнигаУчетаДоходовИРасходов.Добавить();
            Движение.Период = Дата;
            Движение.Организация = Организация;
            Движение.Содержание = "Доход от "+СтруктураШапкиДокумента.Ссылка;
            Движение.Графа4= СуммаОбщ;
            Движение.ДоходЕНВД = СуммаОбщ;
            Движение.РеквизитыПервичногоДокумента = "№ "+ЭтотОбъект.Номер+" от "+Строка(ЭтотОбъект.Дата);