Имя: Пароль:
1C
1С v8
Как в 6-ндфл, программго перебрать справки из дерева Приложение 1
0 nodrama
 
14.12.21
12:04
Доброго времени суток. была тема но загнулась)) Собственно вопрос остался.
В отчете 6-ндфл с 2021 года, за год, Заполняется приложение 1. Там справки типо 2 ндфл. по сотрудникам. Списком
https://ibb.co/rQfDTzB

Нужно их перебрать программно перебрать, только из приложения 1.
Когда встаешь на любую справку сам, то там легко ТабличныйДокумент.Области задаешь нужную область редактируешь.
А как их циклом все перебрать из этого дерева "Приложение1", что бы далее уже провалиться в каждой в табдок.области и отредактировать.

Как то же можно перебрать каждый созданный табдок из приложения 1.
1 mikecool
 
14.12.21
12:32
недавно проскакивала тема, не далее недели назад
2 BaHgaJI
 
14.12.21
12:35
Тоже интересно
3 nodrama
 
14.12.21
12:35
(1) Так это моя была, там все затухло пару ответов но ни чего не решили ;)
4 nodrama
 
14.12.21
12:37
Мой слабый мозг не догадывается как перебрать все ТабЧасти из Приложение 1 циклом.
5 МихаилМ
 
14.12.21
12:38
(0)если за 12 дней с темой не разобрались - делегируйте задачу.
6 nodrama
 
14.12.21
12:38
(5) Мы ее отложили, на эти 12 дней). Да и не к спеху.. отчет сдавать только вконце января 2022
7 nodrama
 
14.12.21
13:43
Собственно шаманства
Находим наш отчет в документах Регламентированные отчеты (предварительно его сохранив конечно там).
ПолучимОтчет - //это ссылка на отчет в документах регламентированные отчеты
    
    Посмотрим=ПолучимОтчет.ДанныеОтчета.Получить();
    Для каждого СТР из Посмотрим.ДанныеМногоуровневыхРазделов.Приложение1.Строки Цикл
        Для каждого НоваяСправка из СТР.ДанныеМногострочныхЧастей.П000П1М1.Строки Цикл
            НоваяСправка.Данные.П000П1М100005=НоваяСправка.Данные.П000П1М100004;
            НоваяСправка.Данные.П000П1М100007=НоваяСправка.Данные.П000П1М100004;
                    
        КОнецЦикла;     
    КонецЦикла;

Если смотреть отладчиком то все ок. Он перебирает справки, и меняет циферки в этих полях и тд. Но после того как он пробежал все справки. То данные не сохраняются и остаются прежними в итоге
Видимо нужно как то сохранить еще но пока хз как )
8 SleepyHead
 
гуру
14.12.21
13:56
(3) Я тебе написал, как делать надо. Но ты ж хочешь в форме, а это тупиковый путь.
9 SleepyHead
 
гуру
14.12.21
13:58
Ну и проблему, которая стоит за твоим вопросом, так и не озвучил, хотя я пытался выяснить это еще  первой ветке. А озвучил бы - возможно, нашелся бы другой метод решения.
10 nodrama
 
14.12.21
13:58
(8) Почему в форме то. Я получаю ссылку на сохраненный отчет уже. из доков регламентированные отчеты.
Там есть "ДанныеОтчета" это ХранилищеЗначений или что там не помню закрыл уже конфу.
Там редактируем. далее сохраняем.
Причем тут форма то)
11 nodrama
 
14.12.21
13:59
(9) Мне надо сравнять. удержано исчислено перечислено по каждой справки из Приложения 1.
12 SleepyHead
 
гуру
14.12.21
14:07
(11) Ну так выгрузи в XML, распарси и и сравнивай. Плюсом получишь то, что сможешь анализировать отчеты не только в базе 1С.

Файл выгрузки можно и программно получить, смотри первую тему.
13 nodrama
 
14.12.21
14:16
(12) Так я могу нужные цифирки и в файле выгрузке поменять это еще легче. только в 1с то они не сохранятся.
Нужно сделать так что бы потом при открытии этого отчета бухгалтером в 1с, там были такие же циферки как во время отправки.
14 nodrama
 
14.12.21
14:18
(12) или я чего то не понимаю.

Смысл в том что пофигу где это делать. Кнопкой на форме отчета. либо сохранил его. нашел ссылку там значение поменял. либо еще как.
Главное что бы потом в этом отчете в 1с на его форме при открытии были правильные циферки уже после всех манипуляций.
15 nodrama
 
14.12.21
14:24
Вот эта часть работает же


Посмотрим=ПолучимОтчет.ДанныеОтчета.Получить();
    Для каждого СТР из Посмотрим.ДанныеМногоуровневыхРазделов.Приложение1.Строки Цикл
        Для каждого НоваяСправка из СТР.ДанныеМногострочныхЧастей.П000П1М1.Строки Цикл
            НоваяСправка.Данные.П000П1М100005=НоваяСправка.Данные.П000П1М100004;
            НоваяСправка.Данные.П000П1М100007=НоваяСправка.Данные.П000П1М100004;
                    
        КОнецЦикла;    
    КонецЦикла;

После этого в "Посмотрим". сохраняется правильная структура, все измененные в справках цифры все сохраняется. Я так понимаю это нужно как то сохранить место старых значений
Потому что после этого кода если открыть форму значения все равно старые
16 nodrama
 
14.12.21
14:31
Вопрос снят. Рабочий код кому нужен ниже. удержано и перечислено сравнивает с исчисленным. Остальные поля по аналогии можно редактировать

ПолучимОтчет - эта ссылка на документ регламентированные отчеты, на ваш отчет.

Посмотрим=ПолучимОтчет.ДанныеОтчета.Получить();

    Для каждого СТР из Посмотрим.ДанныеМногоуровневыхРазделов.Приложение1.Строки Цикл
        Для каждого НайденнаяСправка из СТР.ДанныеМногострочныхЧастей.П000П1М1.Строки Цикл
            НайденнаяСправка.Данные.П000П1М100005=НайденнаяСправка.Данные.П000П1М100004;
            НайденнаяСправка.Данные.П000П1М100007=НайденнаяСправка.Данные.П000П1М100004;          
        КОнецЦикла;     
    КонецЦикла;
    ПолучимОтчет.ДанныеОтчета =Новый ХранилищеЗначения(Посмотрим);
    
    ПолучимОтчет.Записать();
17 SleepyHead
 
гуру
14.12.21
14:32
(13) "только в 1с то они не сохранятся."

В 6-НДФл есть кнопка "Загрузить"
18 nodrama
 
14.12.21
14:45
(17) то же верно..
Способ тогда рабочий. но мне всего 2 ячейки поменять. Проще как я выше написал, просто долго тупил с этим хранилищем и где вообще там эти ячейки)
19 SleepyHead
 
гуру
14.12.21
14:56
(18) Это называется "заметать под ковер". То, что перечисленный не равен удержанному - говорит о том, что в базе не все в порядке.

А с другой стороны, я тоже не особо слежу за перечисленным, потому что сравниваю удержанный налог с выпиской по расчетам с бюджетом - она в XML, ее можно распарсить, и взять из нее уплаты, и сравнить с налогом к оплате по крайнему сроку.
20 Фантазер
 
14.12.21
18:09
Нужно программно заполнить пару регистров по НДФЛ. И 6-НДФЛ будет чистенькая в плане перечисленного НДФЛ.
Или убрать галку в настройках и перепровести все ведомости.
А шаманить именно с отчетом - глупо. Не будешь же так каждый год делать. Правда, не будешь, же? ("Энакин и Падме на пикнике")
21 SleepyHead
 
гуру
16.12.21
11:29
(20) Вот это верный ответ.

Но сейчас в ЗУП 3.1 нет возможности напечатать реестр начисленного, удержанного и перечисленного налога из приложения 1 формы 6-НДФЛ с 2021 года, чтобы убедиться, что все верно.


Написал на хотлайн вопрос, когда будет такая возможность, три дня уже молчат. Можно, конечно, отчетом "Сводная справка 2-НДФЛ" проверять, но она сверяет по регистрам, а не в приложении, а там, по идее, может быть что угодно.