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