ЗУП 3.1.6.6 В документе Увольнение сотрудника начисляется зарплата за прошлый период закрытый больничными

 
//влияет при расчете увольнения. Общий модуль ПерерасчетЗарплаты.
1. Функция ДанныеПерерасчетаПриУвольненииСотрудника(ДокументУвольнения, ИсправленныйДокумент, Сотрудник, Организация, ДатаУвольнения, ПериодПерерасчетов, ИсключаемыеРегистраторы, МенеджерРасчета) Экспорт
	
	ДанныеПерерасчета = ПерерасчетЗарплаты.ДанныеПерерасчетаПустаяСтруктура();
	ДанныеПерерасчета.НачисленияПерерасчет = МенеджерРасчета.ТаблицаНачислений();
	ДанныеПерерасчета.ПособияПерерасчет = МенеджерРасчета.ТаблицаНачислений();
	ДанныеПерерасчета.ТаблицаСотрудников = МенеджерРасчета.ТаблицаСотрудников();
	ДанныеПерерасчета.ТаблицаУдержаний = МенеджерРасчета.ТаблицаСотрудников();
	
	СотрудникиПериодДействияПерерасчет = ПерерасчетЗарплаты.ПустаяТаблицаСотрудникиПериодДействияПерерасчет();
	
	// Включаются ранее перерасчитанные в документе периоды
	Если ЗначениеЗаполнено(ДокументУвольнения) И ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ДокументУвольнения, "Проведен") Тогда
		
		Запрос = Новый Запрос;
		Запрос.УстановитьПараметр("Ссылка", ДокументУвольнения);
		Запрос.УстановитьПараметр("ПериодДействия", ПериодПерерасчетов.ДатаНачала);
		
		Запрос.Текст =
			"ВЫБРАТЬ РАЗЛИЧНЫЕ
			|	УвольнениеНачисления.Сотрудник КАК Сотрудник,
			|	УвольнениеНачисления.ПериодДействия КАК ПериодДействия,
			|	ИСТИНА КАК ПерерасчетНачислений
			|ИЗ
			|	Документ.Увольнение.Начисления КАК УвольнениеНачисления
			|ГДЕ
			|	УвольнениеНачисления.Ссылка = &Ссылка
			|	И УвольнениеНачисления.ПериодДействия < &ПериодДействия
			|
			|ОБЪЕДИНИТЬ
			|
			|ВЫБРАТЬ РАЗЛИЧНЫЕ
			|	УвольнениеНачисленияПерерасчет.Сотрудник,
			|	УвольнениеНачисленияПерерасчет.ПериодДействия,
			|	ИСТИНА
			|ИЗ
			|	Документ.Увольнение.НачисленияПерерасчет КАК УвольнениеНачисленияПерерасчет
			|ГДЕ
			|	УвольнениеНачисленияПерерасчет.Ссылка = &Ссылка
			|	И УвольнениеНачисленияПерерасчет.ПериодДействия < &ПериодДействия";
		
		Если ТипЗнч(ДокументУвольнения) <> Тип("ДокументСсылка.Увольнение") Тогда
			Запрос.Текст = СтрЗаменить(Запрос.Текст, "Документ.Увольнение", "Документ." + ДокументУвольнения.Метаданные().Имя);
			//перенесенные строчки кода
			Выборка = Запрос.Выполнить().Выбрать();
			Пока Выборка.Следующий() Цикл
				СтрокаСотрудникиПериодДействияПерерасчет = СотрудникиПериодДействияПерерасчет.Добавить();
				ЗаполнитьЗначенияСвойств(СтрокаСотрудникиПериодДействияПерерасчет, Выборка);
			КонецЦикла;
                       //перенесенные строчки кода 
		КонецЕсли;

2. //влияет на создание перерасчетов. Документ Увольнение.Модуль менеджера
Процедура ПровестиПоУчетам(ДокументСсылка, РежимПроведения, Отказ, ВидыУчетов = Неопределено, Движения = Неопределено, Объект = Неопределено, ДополнительныеПараметры = Неопределено) Экспорт

//----------------------------

                //добавленные строчки кода
		ЕстьПерерасчеты = Ложь;
                //добавленные строчки кода

		Если ЕстьПерерасчеты Тогда
			ПерерасчетЗарплаты.РегистрацияПерерасчетов(Движения, ДанныеДляРегистрацииПерерасчетов, РеквизитыДляПроведения.Организация);
		КонецЕсли;
		
		УчетСреднегоЗаработка.УдалитьПричиныПерерасчетов(РеквизитыДляПроведения.Ссылка, ДополнительныеПараметры);
		
		Если ОбщегоНазначения.ПодсистемаСуществует("ЗарплатаКадрыПриложения.КадровыйРезерв") Тогда 
			Модуль = ОбщегоНазначения.ОбщийМодуль("КадровыйРезерв");
			Модуль.СформироватьДвиженияИсторииКадровогоРезерва(Движения, ДанныеДляПроведения, "ДанныеКадровогоРезерва");
		КонецЕсли;
		
		ПерерасчетЗарплаты.УдалениеПерерасчетовПоДополнительнымПараметрам(РеквизитыДляПроведения.Ссылка, ДополнительныеПараметры);
		
	КонецЕсли;
	
	ПроведениеРасширенныйСервер.ЗаписьДвиженийПоУчетам(Движения, СтруктураВидовУчета);