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

Ребят подскажите, документ проводится - далее я меня проводки ( а именно ДТ) - код отрабатывает, отладчиком смотрб счет ДТ и судконто встают верно - но после проведения почету то проводка не меняется. Что не так сделал?

написал этот код в ПередУдалением

нифига не понял....
Зачем делать проводки в ПередУдалением....

А так - в подписки смотри...

Это код написал в процедуре "Обработка проведения"

После
    Если Не Отказ Тогда
        ДвиженияПоРегистрам(Режим, Отказ, Заголовок, СтруктураШапкиДокумента);
    КонецЕсли;

отбор.регистратор.установить

(4) написал бы в обработке

(6)? не понятно что имелось ввиду. Я же написал:

НаборЗаписейБУ.Отбор.Регистратор.Использование = Истина;
НаборЗаписейБУ.Отбор.Регистратор.Значение = ЭтотОбъект.Ссылка;

(8) вида сравнения не вижу. а мож, оно и не надо

(0) В обработке проведения надо делать через коллекцию Движения. Замени

НаборЗаписейБУ = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
НаборЗаписейБУ.Отбор.Регистратор.Использование = Истина;
НаборЗаписейБУ.Отбор.Регистратор.Значение = ЭтотОбъект.Ссылка;
НаборЗаписейБУ.Прочитать();


На

НаборЗаписейБУ = Движения.Хозрасчетный;

+ к (10) а то получается, что ты читаешь из базы данных старые движения и что-то там с ними делаешь.

Моя цель , это заменить после проведения документа проводки по ДТ ( т.е документ провелся и сразу мне надо поменять счет ДТ и аналитику).

(10) я устанавливаю отбор по конкретному документу.

(12) Читай внимательно (11) до просветления.

(13) можешь показать код как предлагаешь сделать?

(14) Всё абсолютно то же самое, что в (0), но только с учетом того, что написано в (10).

В (10) я вроде русским языком написал что на что нужно заменить.
+ еще убрать последнюю строку

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

Примерно так должно получиться:

НаборЗаписейБУ = Движения.Хозрасчетный;
Для Каждого ЗаписьБУ Из НаборЗаписейБУ Цикл
   ЗаписьБУ.СчетДт = дор_Счет;
   ЗаписьБУ.СубконтоДт.Очистить();
   БухгалтерскийУчет.УстановитьСубконто(ЗаписьБУ.СчетДт,ЗаписьБУ.СубконтоДт, 1, дор_Субконто1);
   БухгалтерскийУчет.УстановитьСубконто(ЗаписьБУ.СчетДт,ЗаписьБУ.СубконтоДт, 2, дор_Субконто2);
   БухгалтерскийУчет.УстановитьСубконто(ЗаписьБУ.СчетДт,ЗаписьБУ.СубконтоДт, 3, дор_Субконто3);
КонецЦикла;

(12) это ты не после проведения, а внутри проведения зафигачил.