Untitled
unknown
plain_text
2 years ago
2.5 kB
3
Indexable
Процедура ОбработкаПроведения(Отказ, РежимПроведения) ПериодРегистрации = НачалоМесяца(Дата); // регистр ОсновныеНачисления Движения.ОсновныеНачисления.Записывать = Истина; ВидРасчетаСверхурочные = ПланыВидовРасчета.ОсновныеНачисления.Сверхурочные; НачалоБазовогоПериода = ДобавитьМесяц(ПериодРегистрации, -1); КонецБазовогоПериода = КонецМесяца(НачалоБазовогоПериода); Для Каждого ТекСтрокаОсновныеНачисления Из ОсновныеНачисления Цикл Движение = Движения.ОсновныеНачисления.Добавить(); Движение.Сторно = Ложь; Движение.ВидРасчета = ТекСтрокаОсновныеНачисления.ВидРасчета; Движение.ПериодДействияНачало = ТекСтрокаОсновныеНачисления.ДатаНачала; Движение.ПериодДействияКонец = ТекСтрокаОсновныеНачисления.ДатаОкончания; Движение.ПериодРегистрации = ПериодРегистрации; Движение.Сотрудник = ТекСтрокаОсновныеНачисления.Сотрудник; Движение.Подразделение = ТекСтрокаОсновныеНачисления.Подразделение; Если ТекСтрокаОсновныеНачисления.ВидРасчета = ВидРасчетаСверхурочные Тогда Движение.БазовыйПериодНачало = НачалоБазовогоПериода; Движение.БазовыйПериодКонец = КонецБазовогоПериода; КонецЕсли; КонецЦикла; // Запись рабочих наборов записей Движения.Записать(); // Окончательный расчет данных в регистрах Расчет.РассчитатьНачисления(Ссылка, Движения.ОсновныеНачисления, Отказ); КонецПроцедуры
Editor is loading...