Ситуация.
В документе делаются движения по регистрам, но не через свойства документа "Движения", а через набор записей регистра.
Как этидвижения изменить при перехвате в подписке на событие? Объект идет без движений.

а почему не рассказываешь о каком событии идет речь?

набор записей соответствующего реистра, при записи. И событий не надо даже.

Перехватить в подписке на событие ПриЗаписиНабораЗаписейРегистра - создать набор записей с отбором по этому регистратору

(3)Хм... спасибо за идею... Попробую.

2(4) и можно как в (2), не принципиально... Почему нужно создавать набор записей и читать с отбором по регистратору - потому что раз у тебя такой хитрый документ, то он вообще может записывать не сразу все проводки и чатями - создал несколько - записал, создал еще несколько - опять записал.. Если бы он гарантировано записывал только в одном месте, то можно было бы и не создавать набор записей, а просто юзать Источник...
я уже просто обжегся на этом

Вообще докумет "Распределение НДС косвенных расходов" в УПП.
Там такое написано... черт ногу сломит. В стандартный функционал не хочется лезть.

(6)Подскажите, получилось ли что-нибудь по этому вопросу. У меня такая же ситуация. Создала набор записей, изменяю в нем данные в обработке проведения, но после проведения в регистре старые данные. Движения по этому регистру в обработке проведения пустые.

2(7) изменяешь, а записываешь?

Да, не записывала. В обработке проведения получилось. Хочу перенести в подписку на событие, там Записать() не пишу, но регистры отсаются не измененные. Как быть?

2(9) ну это же очевидно!!! Написать .Записать()!

Подписка ПриЗаписиРегистра, получается цикл

как меняете движения?

Процедура ПриЗаписиРегистроНакопленияНДССменаОрганизации(Источник, Отказ, Замещение) Экспорт
           
   ТипИсточника = ТипЗнч(Источник);
   
   Если Источник <> Неопределено И Источник.Количество() > 0 Тогда
           
   Для каждого ТекСтрока из Источник Цикл
      ТекСтрока.Организация = ТекСтрока.ДоговорКонтрагента.Организация;
   КонецЦикла;
               
   //    Источник.Записать();
               
   КонецЕсли;
   
КонецПроцедуры

5 минут, нужно поэкспериментировать

ну как?

(7)Да, все получилось, работает.

2(15) плохо.. я просто в своей практике на основании записей одного регистрадобавлял записи в другой, а в том же как бы не пробовал менять записи в событии призаписи...
делал такое:
   тзФ = Источник.Выгрузить();
   тзФ.ЗаполнитьЗначения(Неопределено,"Организация");
   Источник.Загрузить(тзФ);
   //Источник.Записать();
   Для Каждого Строка Из Источник Цикл
       Сообщить(""+Строка.Организация);
       Строка.Организация = Неопределено;
   КонецЦикла;

Для разных регистров - все равно организация не очищается.. Делал и для других измерений... Если раскоментировать строчку с Записать - тогда 1С вываливается по причине бесконечной рекурсии..
Что можно посоветовать - все-таки менять движения уже в припроведении...

В моем случае код следующий. Доп. оптимизацией не занимался.

Если НЕ Справочники.РТС_Константы.НДСРаспределение_Использование.Знач
       ИЛИ НЕ Справочники.РТС_Константы.НДСРаспределение_Версия.Знач = Метаданные.Версия Тогда
   
       Возврат;
   
   КонецЕсли;
   
   Док = Источник.Отбор.Регистратор.Значение;
   Если ТипЗнч(Док) = Тип("ДокументСсылка.РаспределениеНДСКосвенныхРасходов") Тогда
       
       Если НЕ Док.ДляСписанияНДСиспользоватьСчетИАналитикуУчетаЗатрат Тогда
           
           Возврат;
           
       КонецЕсли;
       
       
       
       ВидРег = ?(ТипЗнч(Источник) = Тип("РегистрБухгалтерииНаборЗаписей.Хозрасчетный"),"Хозрасчетный",
       ?(ТипЗнч(Источник) = Тип("РегистрБухгалтерииНаборЗаписей.Налоговый"),"Налоговый",
       ?(ТипЗнч(Источник) = Тип("РегистрНакопленияНаборЗаписей.ЗатратыНалоговыйУчет"),"*Налоговый",
       ?(ТипЗнч(Источник) = Тип("РегистрНакопленияНаборЗаписей.ЗатратыБухгалтерскийУчет"),"*Хозрасчетный",""))));
       
       
       Если НЕ ЗначениеЗаполнено(Справочники.РТС_Константы.Аналитика26Счета.Знач) Тогда
           ЗаписьЖурналаРегистрации("Не заполнено значние в константе 26 счет.");
           Возврат;
       КонецЕсли;
       
       Если Не ЗначениеЗаполнено(Справочники.РТС_Константы.Аналитика44Счета.Знач) Тогда
           ЗаписьЖурналаРегистрации("Не заполнено значние в константе 44 счет.");
           Возврат;
       КонецЕсли;
       
       СтЗ44 = Справочники.РТС_Константы.Аналитика44Счета.Знач;
       СтЗ26 = Справочники.РТС_Константы.Аналитика26Счета.Знач;                
       
       Если  ВидРег = "Хозрасчетный" ИЛИ ВидРег = "Налоговый" Тогда
           
           ТЗ_Бух = Источник.Выгрузить();                                                            
           Для каждого Стр Из ТЗ_Бух Цикл
               
               Если Стр.СчетДт.ПринадлежитЭлементу(ПланыСчетов[ВидРег].РасходыНаПродажу) Тогда
                   
                   Стр.СубконтоДт1 = СтЗ44;
                   
               ИначеЕсли Стр.СчетКт.ПринадлежитЭлементу(ПланыСчетов[ВидРег].РасходыНаПродажу) Тогда
                   
                   Стр.СубконтоКт1 = СтЗ44;
                   
               КонецЕсли;
               Если Стр.СчетДт.ПринадлежитЭлементу(ПланыСчетов[ВидРег].ОбщехозяйственныеРасходы) Тогда
                   
                   Стр.СубконтоДт2 = СтЗ26;
                   
               ИначеЕсли Стр.СчетКт.ПринадлежитЭлементу(ПланыСчетов[ВидРег].ОбщехозяйственныеРасходы) Тогда
                   
                   Стр.СубконтоКт2 = СтЗ26;
                   
               КонецЕсли;
               
           КонецЦикла;                                                          
           Источник.Загрузить(ТЗ_Бух);
           
       ИначеЕсли ВидРег = "*Хозрасчетный" ИЛИ ВидРег = "*Налоговый" Тогда
           
           ВидРег = СтрЗаменить(ВидРег,"*","");
           
           ТЗ_Набор = Источник.Выгрузить();
           
           Для каждого Стр Из ТЗ_Набор Цикл
               
               Если Стр.СчетУчета.ПринадлежитЭлементу(ПланыСчетов[ВидРег].РасходыНаПродажу) Тогда
                   
                   Стр.СтатьяЗатрат = СтЗ44;
                   
               ИначеЕсли Стр.СчетУчета.ПринадлежитЭлементу(ПланыСчетов[ВидРег].ОбщехозяйственныеРасходы) Тогда
                   
                   Стр.СтатьяЗатрат = СтЗ26;
                   
               КонецЕсли;
               
           КонецЦикла;
           
           Источник.Загрузить(ТЗ_Набор);
       КонецЕсли;
   КонецЕсли;

(18)+
Стояла задача поменять аналитику.

2(19) ну РБ я вроде тоже менял, а вот РН в случае (13,17) - почему-то не получается...

(20)Хм... а может пустую ссылку заместо "неопределено" вставить?

(20)Вот после этого -

ИначеЕсли ВидРег = "*Хозрасчетный" ИЛИ ВидРег = "*Налоговый" Тогда

Меняются два регистр накопления.

сейчас уже не успею, нужно уйти...

(13)Вообще-то должно работать. Может подписка не на то событие?
В отладчике посмотреть не получается?

2(24) подписка та, я специально вставил даже сообщить.. Кроме того и тзФ и Источник в отладчике содержат пустое измерение "Организации" но потом в вдижения документа - оно заполнено...

Ну ладно, спасибо. Сделаю в обработке проведения пока. Тоже вариант.