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