Доброго времени суток.В БП 2.0 такой код прокатывал, в БП 3.0 по коду видно что срабатывает, субконто меняется, но в проводках ничего не меняется.
Пробовал Источник.Движения.Записать(); тоже не срабатывает.
Где не так?

Процедура ПроведениеДокументов(Источник, Отказ, РежимПроведения) Экспорт
    
    Если ТипЗнч(Источник) = Тип("ДокументОбъект.РеализацияТоваровУслуг") Тогда
        Если ЗначениеЗаполнено(Источник.РеализацияМатериалов) Тогда
            Движения = Источник.Движения;
            Проводки = Движения.Хозрасчетный;
            Для Каждого Проводка Из Проводки Цикл
                сч_91_02 = ПланыСчетов.Хозрасчетный.ПрочиеРасходы;
                Если Не Проводка.СчетДт = сч_91_02 Тогда
                    Продолжить;
                КонецЕсли;
                БухгалтерскийУчет.УстановитьСубконто(сч_91_02, Проводка.СубконтоДт, "ПрочиеДоходыИРасходы", Источник.РеализацияМатериалов);
            КонецЦикла;    
            //Источник.Движения.Записать();
        КонецЕсли;        
    КонецЕсли;     
    
КонецПроцедуры

разобрался:

вместо Источник.Движения.Записать(); надо Проводки.Записать();