Ошибка возникает по причине того, что расчет ставки налога ФФОМС и ТФОМС идут следом друг за другом и вычисленная ставка налога для ФФОМС затирается затем ставкой налога для ТФОМС (которая в этом году равна 0%)
Для исправления этой ситуации было добавлено пару строк в модуль документа "ЗакрытиеМесяца".
со строки № 7254
было:
Если РезультатФФОМС <> 0 Тогда
ТаблицаРаспределения = РаспределитьВзносыПоНачислениям(РезультатФФОМС, НачисленияФОМС, СтавкаТарифа, СтавкаТарифаИнвалид, Инвалид, ИмяШкалыВзносов, МатПомощьЕдиновременная, МатПомощьПриРождении);
ТаблицаРаспределения.ВыбратьСтроки();
Пока ТаблицаРаспределения.ПолучитьСтроку() = 1 Цикл
СформироватьПроводку("ФФОМС", Сотрудник, ТаблицаРаспределения, ТаблицаРаспределения.Сумма + ТаблицаРаспределения.СуммаЕНВД);
СформироватьПроводкуСВЗ("ФФОМС", Сотрудник, ТаблицаРаспределения.Сумма + ТаблицаРаспределения.СуммаЕНВД, 0, ТаблицаРаспределения);
КонецЦикла;
КонецЕсли;
стало:
Если РезультатФФОМС <> 0 Тогда
ИмяШкалыВзносов = "ФФОМС"; //добавлено LB2012
СтавкаТарифа = глПолучитьСтавкуВзноса(ВидТарифа,ИмяШкалыВзносов,ДатаКон) / 100; //добавлено LB2012
ТаблицаРаспределения = РаспределитьВзносыПоНачислениям(РезультатФФОМС, НачисленияФОМС, СтавкаТарифа, СтавкаТарифаИнвалид, Инвалид, ИмяШкалыВзносов, МатПомощьЕдиновременная, МатПомощьПриРождении);
ТаблицаРаспределения.ВыбратьСтроки();
Пока ТаблицаРаспределения.ПолучитьСтроку() = 1 Цикл
СформироватьПроводку("ФФОМС", Сотрудник, ТаблицаРаспределения, ТаблицаРаспределения.Сумма + ТаблицаРаспределения.СуммаЕНВД);
СформироватьПроводкуСВЗ("ФФОМС", Сотрудник, ТаблицаРаспределения.Сумма + ТаблицаРаспределения.СуммаЕНВД, 0, ТаблицаРаспределения);
КонецЦикла;
КонецЕсли;
------
и со строки №7263
было:
Если РезультатТФОМС <> 0 Тогда
ТаблицаРаспределения = РаспределитьВзносыПоНачислениям(РезультатТФОМС, НачисленияФОМС, СтавкаТарифа, СтавкаТарифаИнвалид, Инвалид, ИмяШкалыВзносов, МатПомощьЕдиновременная, МатПомощьПриРождении);
ТаблицаРаспределения.ВыбратьСтроки();
Пока ТаблицаРаспределения.ПолучитьСтроку() = 1 Цикл
СформироватьПроводку("ТФОМС", Сотрудник, ТаблицаРаспределения, ТаблицаРаспределения.Сумма + ТаблицаРаспределения.СуммаЕНВД);
СформироватьПроводкуСВЗ("ТФОМС", Сотрудник, ТаблицаРаспределения.Сумма + ТаблицаРаспределения.СуммаЕНВД, 0, ТаблицаРаспределения);
КонецЦикла;
КонецЕсли;
стало:
Если РезультатТФОМС <> 0 Тогда
ИмяШкалыВзносов = "ТФОМС";//добавлено LB2012
СтавкаТарифа = глПолучитьСтавкуВзноса(ВидТарифа,ИмяШкалыВзносов,ДатаКон) / 100;//добавлено LB2012
ТаблицаРаспределения = РаспределитьВзносыПоНачислениям(РезультатТФОМС, НачисленияФОМС, СтавкаТарифа, СтавкаТарифаИнвалид, Инвалид, ИмяШкалыВзносов, МатПомощьЕдиновременная, МатПомощьПриРождении);
ТаблицаРаспределения.ВыбратьСтроки();
Пока ТаблицаРаспределения.ПолучитьСтроку() = 1 Цикл
СформироватьПроводку("ТФОМС", Сотрудник, ТаблицаРаспределения, ТаблицаРаспределения.Сумма + ТаблицаРаспределения.СуммаЕНВД);
СформироватьПроводкуСВЗ("ТФОМС", Сотрудник, ТаблицаРаспределения.Сумма + ТаблицаРаспределения.СуммаЕНВД, 0, ТаблицаРаспределения);
КонецЦикла;
КонецЕсли;
