|
v7: ЗиК 77. Проблемы с формированием пачек ПФР | ☑ | ||
---|---|---|---|---|
0
2S
08.11.14
✎
10:38
|
в части смены вида застрахованного лица.
Простой пример, январь-март сотрудник временно пребывающий (ВЖНР). Январь - 1 руб, Февраль - 1 руб, Март - 1 руб с апреля - на постоянное ПМЖ, меняем вид застрахованного лица на НР. Апрель - 1 руб, Май - 1 руб, Июнь - 1 руб. Формируем пачку ПФР за 2 квартал. В итоговую сумму ПФР не попадают суммы ВЖНР, точнее в форме расшифровке сотрудника "Выплаты и взносы" в поле "Выплаты по категориям ЗЛ" заполняется только одна строка по последнему значению вида застрахованного лица НР Всего с начала года = 3, и по месяцам по 1 рублю. Нет строки по ВЖНР, Всего с начала года = 3, по месяцам = 0 Это ошибка обработки такая или я не догоняю что-то? |
|||
1
2S
08.11.14
✎
10:59
|
deBug, шаэс, отзовитесь
|
|||
2
2S
08.11.14
✎
11:02
|
Программа правильно формирует строки, появляются две - НР и ВЖНР в таблице, при условии смены вида ЗЛ в отчетном периоде, например в мае. Но как быть, если вид ЗЛ меняется в первый день периода - 1 апреля? Сальдо в этом случае не учитывается?
|
|||
3
2S
08.11.14
✎
11:10
|
ага, причем еще заполняет и по статусу ЗР на конец месяца. Т.е. если вид меняется в середине, ЗиКа не делит этот период на два, все суммы гонит по значению на конец месяца. Нда...
|
|||
4
Мимохожий Однако
08.11.14
✎
11:21
|
Обнови ЗиК до последнего релиза, проведи ТИИ. Проверь свои расчеты на Демо-конфигурации.
|
|||
5
2S
08.11.14
✎
11:24
|
(4) 348 релиз
ТиИ не причем. Ковыряю модуль. Ест другое мнение? подтвердите расчетами |
|||
6
шаэс
08.11.14
✎
11:38
|
(1) (ух ты, первый раз меня зовут)
чуть позже что–нибудь разумное напишу, когда до компа дойду, если сами к этому моменту ответ не найдете |
|||
7
2S
08.11.14
✎
11:43
|
по активности ответов по ЗиК нас мало )
|
|||
8
Мимохожий Однако
08.11.14
✎
11:45
|
(5)Вчера был у клиента. Ситуация похожая была. При внимательном рассмотрении обнаружил в журнале расчета нулевые суммы за весь 3 квартал. Мягкий откат назад и последовательные пересчет восстановил записи и отчетность в ПФР начала работать. Какой у тебя вариант гадать неохота.
|
|||
9
2S
08.11.14
✎
11:52
|
(8) нет, суммы есть, я же написал, смена вида ЗЛ
|
|||
10
Storm911
08.11.14
✎
11:57
|
Так может и не должно быть сальдо? По этой то категории сальдо нет.
|
|||
11
2S
08.11.14
✎
12:08
|
рвет тогда с РСВ нарастающим итогом
|
|||
12
2S
09.11.14
✎
14:14
|
решение пока нашел такое, правда не тестировал, завтра бухов натравлю )
В обработке подготовки сведений пфр корректируем функцию ВзносыВыплатыРаздел6РСВ_1 блок Если ЕстьДанные=1 Тогда ВремТаблицаВыплатРаздел6РСВ_1.НоваяСтрока(); ВремТаблицаВыплатРаздел6РСВ_1.КатегорияЗЛ = КатегорияЗЛ; ВремТаблицаВыплатПоКатегории.НоваяСтрока(); ВремТаблицаВыплатПоКатегории.Месяц=0; ВремТаблицаВыплатПоКатегории.СуммаВыплат = ДанныеПоКатегории.Итог("СуммаВыплат"); ВремТаблицаВыплатПоКатегории.БазаДоПредела = ДанныеПоКатегории.Итог("БазаДоПредела"); ВремТаблицаВыплатПоКатегории.БазаДоПределаДоговры = ДанныеПоКатегории.Итог("БазаДоПределаДоговры"); ВремТаблицаВыплатПоКатегории.СуммаВыплатСверхПредела = ДанныеПоКатегории.Итог("СуммаВыплатСверхПредела"); НомМесяца = 0; Для СчМес = МесяцНачало ПО МесяцОкончания Цикл НомМесяца = НомМесяца + 1; ВремТаблицаВыплатПоКатегории.НоваяСтрока(); ВремТаблицаВыплатПоКатегории.Месяц=НомМесяца; НомСтр = ""; Если ДанныеПоКатегории.НайтиЗначение(СчМес,НомСтр,"Месяц") = 1 Тогда ВремТаблицаВыплатПоКатегории.СуммаВыплат = ДанныеПоКатегории.ПолучитьЗначение(НомСтр,"СуммаВыплат"); ВремТаблицаВыплатПоКатегории.БазаДоПредела = ДанныеПоКатегории.ПолучитьЗначение(НомСтр,"БазаДоПредела"); ВремТаблицаВыплатПоКатегории.БазаДоПределаДоговры = ДанныеПоКатегории.ПолучитьЗначение(НомСтр,"БазаДоПределаДоговры"); ВремТаблицаВыплатПоКатегории.СуммаВыплатСверхПредела = ДанныеПоКатегории.ПолучитьЗначение(НомСтр,"СуммаВыплатСверхПредела"); КонецЕсли; КонецЦикла; ВремТаблицаВыплатРаздел6РСВ_1.ТаблицаВыплатПоКатегории = ВремТаблицаВыплатПоКатегории; КонецЕсли; меняем на Если ЕстьДанные=1 Тогда ВремТаблицаВыплатРаздел6РСВ_1.НоваяСтрока(); ВремТаблицаВыплатРаздел6РСВ_1.КатегорияЗЛ = КатегорияЗЛ; ВремТаблицаВыплатПоКатегории.НоваяСтрока(); ВремТаблицаВыплатПоКатегории.Месяц=0; ВремТаблицаВыплатПоКатегории.СуммаВыплат = ДанныеПоКатегории.Итог("СуммаВыплат"); ВремТаблицаВыплатПоКатегории.БазаДоПредела = ДанныеПоКатегории.Итог("БазаДоПредела"); ВремТаблицаВыплатПоКатегории.БазаДоПределаДоговры = ДанныеПоКатегории.Итог("БазаДоПределаДоговры"); ВремТаблицаВыплатПоКатегории.СуммаВыплатСверхПредела = ДанныеПоКатегории.Итог("СуммаВыплатСверхПредела"); НомМесяца = 0; Для СчМес = МесяцНачало ПО МесяцОкончания Цикл НомМесяца = НомМесяца + 1; ВремТаблицаВыплатПоКатегории.НоваяСтрока(); ВремТаблицаВыплатПоКатегории.Месяц=НомМесяца; НомСтр = ""; Если ДанныеПоКатегории.НайтиЗначение(СчМес,НомСтр,"Месяц") = 1 Тогда ВремТаблицаВыплатПоКатегории.СуммаВыплат = ДанныеПоКатегории.ПолучитьЗначение(НомСтр,"СуммаВыплат"); ВремТаблицаВыплатПоКатегории.БазаДоПредела = ДанныеПоКатегории.ПолучитьЗначение(НомСтр,"БазаДоПредела"); ВремТаблицаВыплатПоКатегории.БазаДоПределаДоговры = ДанныеПоКатегории.ПолучитьЗначение(НомСтр,"БазаДоПределаДоговры"); ВремТаблицаВыплатПоКатегории.СуммаВыплатСверхПредела = ДанныеПоКатегории.ПолучитьЗначение(НомСтр,"СуммаВыплатСверхПредела"); КонецЕсли; КонецЦикла; //АБ( Иначе ВремТаблицаВыплатРаздел6РСВ_1.НоваяСтрока(); ВремТаблицаВыплатРаздел6РСВ_1.КатегорияЗЛ = КатегорияЗЛ; ВремТаблицаВыплатПоКатегории.НоваяСтрока(); ВремТаблицаВыплатПоКатегории.Месяц=0; ВремТаблицаВыплатПоКатегории.СуммаВыплат = ДанныеПоКатегории.Итог("СуммаВыплат"); ВремТаблицаВыплатПоКатегории.БазаДоПредела = ДанныеПоКатегории.Итог("БазаДоПредела"); ВремТаблицаВыплатПоКатегории.БазаДоПределаДоговры = ДанныеПоКатегории.Итог("БазаДоПределаДоговры"); ВремТаблицаВыплатПоКатегории.СуммаВыплатСверхПредела = ДанныеПоКатегории.Итог("СуммаВыплатСверхПредела"); НомМесяца = 0; Для СчМес = МесяцНачало ПО МесяцОкончания Цикл НомМесяца = НомМесяца + 1; ВремТаблицаВыплатПоКатегории.НоваяСтрока(); ВремТаблицаВыплатПоКатегории.Месяц=НомМесяца; НомСтр = ""; Если ДанныеПоКатегории.НайтиЗначение(СчМес,НомСтр,"Месяц") = 1 Тогда ВремТаблицаВыплатПоКатегории.СуммаВыплат = 0; ВремТаблицаВыплатПоКатегории.БазаДоПредела = 0; ВремТаблицаВыплатПоКатегории.БазаДоПределаДоговры = 0; ВремТаблицаВыплатПоКатегории.СуммаВыплатСверхПредела = 0; КонецЕсли; КонецЦикла; КонецЕсли; ВремТаблицаВыплатРаздел6РСВ_1.ТаблицаВыплатПоКатегории = ВремТаблицаВыплатПоКатегории; //) |
|||
13
шаэс
09.11.14
✎
23:17
|
(12) здорово, что остались еще пытливые умы, которым не лень ковырять зубодробительные коды от 1С. если сработает отпишитесь, может у кого-то еще такой же вопрос возникнет. чтобы знать куда отправлять
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |