Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
19 апр 2024, 11:22

Запрос к бухгалтерским итогам по месяцам

Автор damir-it, 22 июл 2016, 08:00

0 Пользователей и 1 гость просматривают эту тему.

damir-it

Привет Всем
Столкнулся с такой задачей, нужно было составить запрос к бухгалтерским итогам по Сотрудникам, вот код:

   Налог = глПолучитьНалог("ПФизЗП");
   Таб = СоздатьОбъект("Таблица");
   Таб.ИсходнаяТаблица("Таблица");
   Таб.ВывестиСекцию("Шапка");
   Би = СоздатьОбъект("БухгалтерскиеИтоги");

   Би.ИспользоватьСубконто(ВидыСубконто.Сотрудники);
   Би.ВыполнитьЗапрос(НачДата,КонДата,Налог.Счет,глПолучитьНалог("ПФизЗП").Счет,,3,7);
   Би.ВыбратьСубконто();
   Номер = 0;
   ИтогПлат = 0;
   ИтогДоход = 0;
   
   Пока Би.ПолучитьСубконто() = 1 Цикл
      Фамилия = ""; Имя = ""; Отчество = "";
   
      ФИО(Би.Субконто(),Фамилия,Имя,Отчество);
   
      Номер = Номер+1;       
      Если Би.ПолучитьКорСчет(,глПолучитьНалог("ПодНал").Счет) = 1 Тогда
         ОбПлат = Би.КорКО();     
      Иначе
         ОбПлат = 0;
      КонецЕсли;
      ДобрПлат = Би.КО(); 
   
      Таб.ВывестиСекцию("Строка");
   
      ИтогПлат = ИтогПлат+Би.КО();
      
      ИтогДоход = ИтогДоход+Доход;
   КонецЦикла;

   Таб.ВывестиСекцию("Подвал");
   Таб.ПовторятьПриПечатиСтроки(8,8);
   Таб.Опции(0,0,0,0);
   Таб.Показать("Реестр ИНПС");
КонецПроцедуры 

все работает как надо и в таблице в колонке с формулой ДобрПлат выгружаются суммированные итоги по месяцам, возникла необходимость выгружать в соседнюю колонку этиже данные только за один текущий месяц, как это можно реализовать подскажите пожалуйста
с Уважением Дамир 

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск