Как давече выяснилось, автор отчета Samor_Ykt. За что ему огромногое спасибо!
Сам его использую с 2004 года и ни разу не пришлось его переписывать или поправлять. Все клиенты от него в восторге. В связи с изменениями 2010 года, пришлось в него заглянуть и малость поправить, чтобы отчет продолжил успешно работать в новом году.
В планах очередная доработка:
1. Добавить информацию о действующих вычетах по НДФЛ
2. Добавить возможность автоматически суммировать карточки при внутренних совмещениях
Версия 1.3 от 06.04.2011
1. Внесены изменения в формирование сумм по ФСС НС связанное с изменениями ЗиКа в 2011 году. Раньше ФСС НС "рассчитывался на ходу", теперь же он храниться в журнале страховых взносов, как и все остальные взносы.
Версия 1.2 от 01.04.2010
1. В отчет добавлена информация о версии
2. Добавлено отображение страховых взносов от НС (ФСС_НСиПЗ)
3. Проверка на наличие ЕНВД, если нет ЕНВД то строки ПФР по ЕНВД не отображаются
4. ПФР по дополнительному тарифу отображается только в том случае, если он не нулевой
5. Добавлена возможность формирования отчета по периоду действия, по умолчанию формируется по периоду регистрации. Смотреть лицевую карточку по периоду действия удобно для проверки годового отчета по НДФЛу, а также при проверке среднего заработка. Когда карточка формируется по периоду действия в шапке отчета отображается соответсвующее предупреждение, сальдо в этом случае не отображается.
Также внесено пару строк в процедуру ПриОткрытии. Можно в справочник "Сотрудники", в форму списка вставить кнопку, для быстрого формирования карточки по текущему сотруднику. В обработку нажатия кнопки, тогда нужно внести примерно такой код:
Процедура ПечатьЛК()
сз=СоздатьОбъект("СписокЗначений");
//формируем список для выбора
сз.ДобавитьЗначение("ид1", "по периоду регистрации за текущий год");
сз.ДобавитьЗначение("ид2", "по периоду регистрации за прошлый год");
сз.ДобавитьЗначение("ид3", "по периоду действия за текущий год");
сз.ДобавитьЗначение("ид4", "по периоду действия за прошлый год");
зн="";поз="";
Если сз.выбратьЗначение(зн,,поз,,1)=1 тогда
Если зн="ид1" Тогда
Если ПустоеЗначение(ТекущийЭлемент())=0 Тогда
Если ЭтоГруппа()=0 Тогда
Параметры = СоздатьОбъект("СписокЗначений");
Параметры.Установить("Сотрудник",ТекущийЭлемент());
Параметры.Установить("Год",ДатаГод(РабочаяДата()));
Параметры.Установить("ПоПериодуДействия",0);
глОткрытьФормуИВыполнитьКоманду("Отчет.ЛицеваяКарточка#", "Печать", Параметры);
КонецЕсли;
КонецЕсли;
Иначеесли зн="ид2" Тогда
Если ПустоеЗначение(ТекущийЭлемент())=0 Тогда
Если ЭтоГруппа()=0 Тогда
Параметры = СоздатьОбъект("СписокЗначений");
Параметры.Установить("Сотрудник",ТекущийЭлемент());
Параметры.Установить("Год",ДатаГод(ДобавитьМесяц(РабочаяДата(),-12)));
Параметры.Установить("ПоПериодуДействия",0);
глОткрытьФормуИВыполнитьКоманду("Отчет.ЛицеваяКарточка#", "Печать", Параметры);
КонецЕсли;
КонецЕсли;
Иначеесли зн="ид3" Тогда
Если ПустоеЗначение(ТекущийЭлемент())=0 Тогда
Если ЭтоГруппа()=0 Тогда
Параметры = СоздатьОбъект("СписокЗначений");
Параметры.Установить("Сотрудник",ТекущийЭлемент());
Параметры.Установить("Год",ДатаГод(РабочаяДата()));
Параметры.Установить("ПоПериодуДействия",1);
глОткрытьФормуИВыполнитьКоманду("Отчет.ЛицеваяКарточка#", "Печать", Параметры);
КонецЕсли;
КонецЕсли;
Иначеесли зн="ид4" Тогда
Если ПустоеЗначение(ТекущийЭлемент())=0 Тогда
Если ЭтоГруппа()=0 Тогда
Параметры = СоздатьОбъект("СписокЗначений");
Параметры.Установить("Сотрудник",ТекущийЭлемент());
Параметры.Установить("Год",ДатаГод(ДобавитьМесяц(РабочаяДата(),-12)));
Параметры.Установить("ПоПериодуДействия",1);
глОткрытьФормуИВыполнитьКоманду("Отчет.ЛицеваяКарточка#", "Печать", Параметры);
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецПроцедуры // ПечатьЛК
Версия 1.1 от 11.02.2010
1. Отчет адоптирован под отображение страховых взносов с 2010 года
Версия 1.0
Под первой версией подразумеваю отчет в том виде как он попал ко мне в руки
