// 1-й вариант: ВсегоНачислено = 0; ЖЗ.ВыбратьЗаписиПоОбъекту (ТекСотр, ДатаНач, ДатаКон); Пока ЖЗ.ПолучитьЗапись()=1 Цикл Если ЖЗ.ВидРасч.ВходитВГруппу(ГруппаРасчетов.ВсеНачисления)=1 Тогда ВсегоНачислено = ВсегоНачислено + ЖЗ.Результат; КонецЕсли; КонецЦикла; // 2-й вариант: ВсегоНачислено = 0; ЖЗ.ВыбратьЗаписиПоОбъекту (ТекСотр, ДатаНач, ДатаКон); Пока ЖЗ.ПолучитьЗапись()=1 Цикл Если ГруппаРасчетов.ВсеНачисления.СодержитВидРасчета(ЖЗ.ВидРасч)=1 Тогда ВсегоНачислено = ВсегоНачислено + ЖЗ.Результат; КонецЕсли; КонецЦикла;
// Посчитаем все начисления текущего сотрудника за январь: ВсегоНачислено = 0; ЖЗ.ВыбратьЗаписиПоОбъекту (ТекСотр, ДатаНач, ДатаКон); Пока ЖЗ.ПолучитьЗапись()=1 Цикл Если ЖЗ.ВидРасч.ВходитВГруппу(ГруппаРасчетов.ВсеНачисления)=1 Тогда ВсегоНачислено = ВсегоНачислено + ЖЗ.Результат; КонецЕсли; КонецЦикла; // Теперь рассчитаем все записи текущего сотрудника, введеные в текущем месяце: ЖЗ.ВыбратьПериодПоОбъекту (ТекСотр, ДатаНач); Пока ЖЗ.ПолучитьЗапись()=1 Цикл ЖЗ.Рассчитать(); КонецЦикла; /// Рассчитаем все записи по документу, независимо от того, в каком расчетном периоде записи порождались: ЖЗ.ВыбратьЗаписиПоДокументу (ВыбрДокумент); Пока ЖЗ.ПолучитьЗапись()=1 Цикл ЖЗ.Рассчитать(); КонецЦикла; // Рассчитаем все записи по указанному подразделению. В журнале расчетов указана графа отбора "Подразделение". ТекПер = ЖЗ.ТекущийПериод(); ЖЗ.ВыбратьПоЗначению ("Подразделение",ВыбрПодразделение, ТекПер, ТекПер); Пока ЖЗ.ПолучитьЗапись()=1 Цикл ЖЗ.Рассчитать(); КонецЦикла;