Процедура "После загрузки" может выглядеть так:
ОписаниеОшибкиОпределенияПользователя = "";
Объект.Ответственный = ПараметрыСеанса.ТекущийПользователь;
Попытка
Объект.Записать()
Исключение
Сообщить(Объект);
Сообщить(ОписаниеОшибки());
Сообщить("Документ не перенесен!");
Отказ = Истина;
КонецПопытки;
ОбъектТЧ = Объект.ОтражениеВУчете; //iri
Для каждого ОбъектТ из ОбъектТЧ Цикл
ИсточникСчет = ОбъектТ.СчетКт;
Если ИсточникСчет = ПланыСчетов.Хозрасчетный.НДФЛ Тогда
ОбъектТ.СубконтоКт2 = ОбъектТ.ПодразделениеКТ.РегистрацияВИФНС;
КонецЕсли;
КонецЦикла;
Объект.Записать() 