"Составил отчет, чтобы по одному коду ИМНС сосчитался НДФЛ по всем сотрудникам. Сотрудников перебирает, а вот НДФЛ не суммируется. Выводит только по первому сотруднику НДФЛ. Что здесь нетак?<br><br><br><br><br><br>Процедура Сформировать()<br><br> //Перем НДФЛ;<br><br> //НДФЛ=0;<br><br> Т=СоздатьОбъект("Таблица");<br><br> Т.ИсходнаяТаблица("Таблица");<br><br> ЖЗ=СоздатьОбъект("ЖурналРасчетов.Зарплата");<br><br> ЖЗ.ВыбратьЗаписи(ДатаНач, ДатаКон);<br><br> Спр=СоздатьОбъект("Справочник.Сотрудники");<br><br> Спр.ВыбратьЭлементы();<br><br> Пока Спр.ПолучитьЭлемент()=1 Цикл <br><br> КодИМН=Спр.КодИМНС;<br><br> Если КодИМН="1001" Тогда <br><br> ВыборСотрудника=Спр.ТекущийЭлемент();<br><br> Сообщить (КодИМН);<br><br> Сообщить (ВыборСотрудника);<br><br> <br><br> Пока ЖЗ.ПолучитьЗапись()=1 Цикл<br><br> Если ЖЗ.Объект=ВыборСотрудника Тогда<br><br> <br><br> Если ЖЗ.ВидРасч=ВидРасчета.НДФЛ Тогда<br><br> НДФЛ=НДФЛ+ЖЗ.Результат;<br><br> Сообщить (НДФЛ);<br><br> <br><br> КонецЕсли;<br><br> КонецЕсли;<br><br> <br><br> КонецЦикла; <br><br> <br><br> КонецЕсли;<br><br> <br><br> КонецЦикла;<br><br> Т.ВывестиСекцию("Секция_1");<br><br> Т.ТолькоПросмотр(1);<br><br> Т.Показать();<br><br> <br><br>КонецПроцедуры"
Сообщений: 181
Сообщений: 36
"Нарушен порядок вложенности операций цикла, я бы сделал так:<br><br><br><br>НДФЛ = 0;<br><br>ЖЗ=СоздатьОбъект("ЖурналРасчетов.Зарплата"); <br><br>Спр=СоздатьОбъект("Справочник.Сотрудники"); <br><br>Спр.ВыбратьЭлементы(); <br><br>Пока Спр.ПолучитьЭлемент()=1 Цикл <br><br> КодИМН=Спр.КодИМНС; <br><br> Если КодИМН="1001" Тогда <br><br> ВыборСотрудника=Спр.ТекущийЭлемент(); <br><br> Сообщить (КодИМН); <br><br> Сообщить (ВыборСотрудника); <br><br> Если ЖЗ.ВыбратьЗаписиПоОбъекту(ВыборСотрудника,ДатаНач, ДатаКон) = 1 Тогда <br><br> Пока ЖЗ.ПолучитьЗапись()=1 Цикл <br><br> Если ЖЗ.ВидРасч=ВидРасчета.НДФЛ Тогда <br><br> НДФЛ=НДФЛ+ЖЗ.Результат; <br><br> Сообщить (НДФЛ);<br><br> Прервать; <br><br> КонецЕсли; <br><br> КонецЦикла; <br><br> КонецЕсли; <br><br> КонецЕсли; <br><br>КонецЦикла; <br><br><br><br>Правильнее решать такие задачи при помощи запросов вида:<br><br>ТекстЗапроса =<br><br>"//({ЗАПРОС(НДФЛ)<br><br>| // Задаем интервал запроса<br><br>|Период с ДатаНач по ДатаКон;<br><br>| // Определяем внутренние переменные<br><br>|Рез = ЖурналРасчетов.Зарплата.Результат;<br><br>|Расч = ЖурналРасчетов.Зарплата.ВидРасч;<br><br>|ИМНС = ЖурналРасчетов.Зарплата.Объект.КодИМНС;<br><br>| // Назначаем группировки<br><br>|Группировка ИМНС без групп;<br><br>| // Назначаем функции<br><br>|Функция Сум = Сумма(Рез);<br><br>|Условие(Рез = ВидРасчета.НДФЛ);<br><br>|"//}}ЗАПРОС<br><br><br><br><br><br>"
Сообщений: 181
Во втором примере где запрос будет ли группироваться по кодам ИМНС? Я имею в виду по каждому ИМНС своя сумма НДФЛ (суммированная по всем сотрудникам данного кода).
Сообщений: 198
"Условие(Расч = ВидРасчета.НДФЛ); //это имелось в виду?"
Сообщений: 36
Да, совершенно верно - описочка вышла |Условие (Расч = ВидРасчета.НДФЛ).<br><br>Группироваться запрос будет по кодам ИМНС.