Расчетная ведомость с налогами, свод начислений с налогами (с 2010г.)

(4) Какие базы имеются ввиду?

(9) Проверял на ЗиКе ... все суммы на месте и НС тоже ... у Вас какая конфа?

(9) Проверю еще раз... не вопрос... :)

(9) Проверю еще раз... не вопрос... :)

(14) Базу добавлю чуть позже.. хотелось бы знать какие расчеты вылезли в минус в своде..за оценку спасибо..!!

(20) Возможно..но мне кажется будет правильнее вывести ЕНВД отдельной строкой...я подумаю..спасибо!!

(24) Скачайте новую версию..

(24) Ошибку исправил..

(28) Дело в том что Вы пытаетесь запустить в ЗиКе отчет для комплексной ... скачайте другой отчет..

(29) внесены изменения по пределу базы страховых взносов

(35) Для зарплаты другой отчет скачайте и пользуйтесь

(37) Думал об этом...доработаю..

(38) Постараюсь сделать..

(39) Абсолютно верно..просто не успел поправить...

(47)

В файле RaschetnVedomostjsNalogamis2010.ert (у меня скачан 11.02 в 13:30)

строки с 1015 по 1018:

ВходитВБазу=Расчет.ВходитВГруппу(ГруппаРасчетов.ОблагаетсяСтраховымиВзносами);
Если ВходитВБазу=1 Тогда
БазаСВ=БазаСВ+Запрос.Сумма;
КонецЕсли;

меняем на:

//{ Конст 11.02
ВходитВБазу=глВходитВБазу(Расчет,ВидРасчета.ПФРНакопительнаяЧастьс2010)+глВходитВБазу(Расчет,ВидРасчета.ПФРСтраховаяЧастьс2010);
Если СписМатПом.НайтиЗначение(Расчет)>0 тогда // работаем с матпомощью
а=0;
Если МатПом.НайтиЗначение(Сотрудник,а,"Сотрудник")>0 Тогда
БазаСВ=БазаСВ+Макс(0,Запрос.Сумма - МатПом.ПолучитьЗначение(а,"Скидка"));
МатПом.УстановитьЗначение(а,"Скидка",Макс(0,МатПом.ПолучитьЗначение(а,"Скидка")-Запрос.Сумма))
КонецЕсли;
ИначеЕсли ВходитВБазу>0 Тогда
БазаСВ=БазаСВ+Запрос.Сумма;
КонецЕсли;
//} Конст 11.02



перед строкой 960:
//Римма

добавляем:

//{ Конст 11.02
ДляМатПом=СоздатьОбъект("СписокЗначений");
МатПом.НоваяКолонка("СуммаСНГ");
МатПом.Выгрузить(ДляМатПом,,,"Сотрудник");
Если НачалоПериода<>НачГода(НачалоПериода) Тогда
Запрос2 = СоздатьОбъект("Запрос");
Дата1=НачГода(НачалоПериода);
Дата2=НачалоПериода-1;
ТекстЗапроса2 =
"//{{ЗАПРОС(Свод)
|Период с Дата1 по Дата2;
|ОсновнойЭлемент = ЖурналРасчетов.Зарплата.Объект.ОсновнойЭлемент;
|Расчет = ЖурналРасчетов.Зарплата.ВидРасч;
|Результат = ЖурналРасчетов.Зарплата.Результат;
|Регистрация = ЖурналРасчетов.Зарплата.ДатаОкончания;
|Функция МатПом = Сумма(Результат) когда (Регистрация<=Дата2);
|Группировка ОсновнойЭлемент упорядочить по ОсновнойЭлемент.Код Без Групп;
|Условие(Расчет в СписМатПом);
|Условие(Результат<>0);
|Условие(Сотрудник в ДляМатПом);
|"//}}ЗАПРОС
;
Если Запрос2.Выполнить(ТекстЗапроса2)=0 Тогда
Возврат
КонецЕсли;
Запрос2.вНачалоВыборки();
Пока Запрос2.Группировка(1)=1 Цикл
МатПом.НоваяСтрока();
МатПом.Сотрудник=Запрос2.ОсновнойЭлемент;
МатПом.СуммаСНГ=Запрос2.МатПом;
КонецЦикла;
КонецЕсли;
МатПом.Свернуть("Сотрудник","Сумма,СуммаСНГ");
СпрВычетов = СоздатьОбъект("Справочник.СтраховыеВзносыСкидкиКДоходам");
Если СпрВычетов.НайтиПоКоду("Матпомощь",0) = 1 Тогда
СкидкаМатпомощь = СпрВычетов.ГодоваяСкидка.Получить(НачалоПериода);
Иначе
СкидкаМатпомощь = 4000;
КонецЕсли;
ТМП=СоздатьОбъект("ТаблицаЗначений");
МатПом.Выгрузить(ТМП);
ТМП.Свернуть("Сотрудник","СуммаСНГ");
ТМП.ВыбратьСтроки();
Пока ТМп.получитьСтроку()=1 Цикл
Если ПустоеЗначение(ТМП.СуммаСНГ)=1 Тогда
ТМп.СуммаСНГ=0;
КонецЕсли;
ТМП.СуммаСНГ=Макс(0,СкидкаМатпомощь-ТМП.СуммаСНГ); // остаток скидок матпомощи на начало периода отчета
КонецЦикла;
МатПом.НоваяКолонка("Скидка","Число",10,2);
МатПом.ВыбратьСтроки();
Пока МатПом.ПолучитьСтроку()=1 Цикл
а=0;
ТМП.НайтиЗначение(МатПом.Сотрудник,а,"Сотрудник");
МатПом.Скидка=Мин(МатПом.Сумма,ТМП.ПолучитьЗначение(а,"СуммаСНГ")); // Скидка по текущему виду расчета за текущий период
ТМП.УстановитьЗначение(а,"СуммаСНГ",Мин(0,ТМП.ПолучитьЗначение(а,"СуммаСНГ")-МатПом.Скидка)); // остаток скидок
КонецЦикла;
МатПом.Свернуть("Сотрудник","Сумма,Скидка");
//} Конст 11.02



перед строкой 881:
ВсегоНачислено=ВсегоНачислено+Запрос.СуммаПоВР;

добавляем:

//{ Конст 11.02
Если СписМатПом.НайтиЗначение(Расчет)>0 Тогда
МатПом.НоваяСтрока();
МатПом.Сотрудник=Сотрудник;
МатПом.Сумма=Запрос.СуммаПоВР;
КонецЕсли;
//} Конст 11.02



после строки 475:
иначе //выбрана обычная расчетная ведомость

добавляем:

//{ Конст 11.02
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Без итогов;
|МатПом = Справочник.ВидыРасчетов.Расчет;
|ТипДоходаДляСтраховыхВзносов = Справочник.ВидыРасчетов.ТипДоходаДляСтраховыхВзносов;
|Группировка МатПом;
|Условие(ТипДоходаДляСтраховыхВзносов=Перечисление.ТипыДоходовДляСтраховыхВзносов.МатПомощь);
|"//}}ЗАПРОС
;
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
СписокМатПом=СоздатьОбъект("ТаблицаЗначений");
Запрос.Выгрузить(СписокМатПом);
СписМатПом=СоздатьОбъект("СписокЗначений");
СписокМатПом.Выгрузить(СписМатПом);
МатПом=СоздатьОбъект("ТаблицаЗначений"); // таблица для накопления матпомощи
МатПом.НоваяКолонка("Сотрудник","Справочник.Сотрудники");
МатПом.НоваяКолонка("Сумма","Число",10,2);
//} Конст 11.02

(51) Справочники - Расчет зарплаты - Виды расчетов - Страховые взносы - Накопительная пенсия - База
Добавить Компенсация отпуска при увольнении в Состав облагаемой базы

(55) постараюсь сделать

(58) странно..а какая у Вас конфигурация....ЗиК??

(61) да знаю...поправлю..сейчас немного не до того...работы дофига...

(61) очень актуально

(67) Поподробней про несколько периодов, плиз!!!

(72) а юрлицо пробовали выбирать?

(76) Вам нужно скачать 2 файла которые не для комплексной...
скопировать их в каталог ExtForms базы данных..
затем открыть "Сервис" "Дополнительные возможности"..
нажать кнопку "Изменить".."Внести в список"..
выбрать отчеты по одному и указать для них в предложенном окне название текстовое..

(76) если совсем не получится тел.89267342810..
помогу ..чем могу.. :)

(80) постараюсь добавить..

(86) safia-med, посмотрю сегодня... я думал он уже потерял актуальность..))