ЖурналРасчетовЗарплата.ВыбратьЗаписиПоОбъекту(Сотр удник,Д1,Д2);
Пока ЖурналРасчетовЗарплата.ПолучитьЗапись()=1 Цикл
Если ЖурналРасчетовЗарплата.Перерасчет = 1 тогда
продолжить
КонецЕсли;
ВР = ЖурналРасчетовЗарплата.ВидРасч;
КоэфСторно = ?(ЖурналРасчетовЗарплата.Сторно = 1, -1, 1);
Если (ВР.ВходитВГруппу(ГруппаРасчетов.ОсновныеНачислени я) = 1) или (ВР = ВидРасчета.ОплатаПраздничных) Тогда
Факт = Факт + ЖурналРасчетовЗарплата.Часы * КоэфСторно;
Нач = Нач + ЖурналРасчетовЗарплата.Результат;
ИначеЕсли ВР.ВходитВГруппу(ГруппаРасчетов.ВсеОтклонения) = 1 Тогда
Откл = Откл + КалендарьНорм.Часов(макс(ЖурналРасчетовЗарплата.Да таНачала,Д1), мин(ЖурналРасчетовЗарплата.ДатаОкончания,Д2)) * КоэфСторно;