Чтобы в расширении выполнить процедуру после типовой в 1с 8.3, вставьте следующий код в модуль формы документа
&НаСервере &После("РассчитатьНачисленияНаСервере") Процедура Расш1_РассчитатьНачисленияНаСервереПосле(ВыводитьСообщения = Ложь) Док=ЭтаФорма.РеквизитФормыВЗначение("Объект"); НачисленияТЧ=Док.Начисления; Для Каждого СтрокаНачисленияТЧ из НачисленияТЧ Цикл ОтработаноЧасов=Окр(((КонецДня(СтрокаНачисленияТЧ.ДатаОкончания)-НачалоДня(СтрокаНачисленияТЧ.ДатаНачала))/86400)*8,0,1); Если СтрокаНачисленияТЧ.ОтработаноЧасов>ОтработаноЧасов Тогда Сообщить("Отработанные часы были скорректированы с "+СокрЛП(СтрокаНачисленияТЧ.ОтработаноЧасов)+" на "+СокрЛП(ОтработаноЧасов)); СтрокаНачисленияТЧ.ОтработаноЧасов=ОтработаноЧасов; СтрокаНачисленияТЧ.ОплаченоЧасов=ОтработаноЧасов; КонецЕсли; КонецЦикла; КонецПроцедуры