Автоматизация бухгалтерского учета
Разработки для оптимизации управления и новейшие отчеты и обработки программ
1C-admin 21.07.2014 9 Comments
Зарплата, Учет и отчетность
← Previous post
Next post →
интересный вариант отчета, спасибо
Спасибо)))
Огромное СПАСИБО!!! Покажу своим бухгалтерам, а то просили что-то подобное,вот будет им счастье!!!!!
Разработчик!!! При выборе подразделения не производится сортировка по этому подразделению, а выводятся все сотрудника предприятия.
Счас выложу строчки
Запрос = СоздатьОбъект(«Запрос»); ТекстЗапроса = «//{{ЗАПРОС(Сформировать) |Период с (НачМесяца(ВыбНачПериода)) по (КонМесяца(ВыбКонПериода)); |Обрабатывать НеПомеченныеНаУдаление; |Объект = ЖурналРасчетов.Зарплата.Объект; |Подр = ЖурналРасчетов.Зарплата.Объект.Подразделение; |ВидРасч = ЖурналРасчетов.Зарплата.ВидРасч; |Результат = ЖурналРасчетов.Зарплата.Результат; |ПериодДействия = ЖурналРасчетов.Зарплата.ПериодРегистрации; |Функция СуммаПоВР = Сумма(Результат); |Функция РезультатСумма = Сумма(Результат) когда(ВидРасч.ВходитВГруппу(ГруппаРасчетов.ВсеНачисления)=1); |Функция Выплаты = Сумма(Результат) когда(ВидРасч = ВидРасчета.ВыплатаЗарплаты ); |Функция РезультатСумма1 = Сумма(Результат) когда(ВидРасч=ВидРасчета.ПроизвольноеУдержание04); |Функция Результат1 = Сумма(Результат) ; // |Группировка Объект упорядочить по Объект.Наименование без групп; |Группировка ПериодДействия; |Группировка ВидРасч упорядочить по ВидРасч.Очередность; |Условие(Подр в ВыбранноеПодразделение); |Условие(Объект в Сотрудники); |»//}}ЗАПРОС ; // Если ошибка в запросе, то выход из процедуры Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда Возврат; КонецЕсли;
Выделенные строчки — то что было добавлено.
Да кстати еще недоработка При нажатии кнопки Заполнить и установки флага на «Прочие,получающие доход(Догорники)» — то данные сотрудники не выбираются.
Спасибо за комментарии. Откорректировал отчет.
Ваш адрес email не будет опубликован. Обязательные поля помечены *
интересный вариант отчета, спасибо
Спасибо)))
Огромное СПАСИБО!!!
Покажу своим бухгалтерам, а то просили что-то подобное,вот будет им счастье!!!!!
Разработчик!!!
При выборе подразделения не производится сортировка по этому подразделению, а выводятся все сотрудника предприятия.
Счас выложу строчки
Запрос = СоздатьОбъект(«Запрос»);
ТекстЗапроса =
«//{{ЗАПРОС(Сформировать)
|Период с (НачМесяца(ВыбНачПериода)) по (КонМесяца(ВыбКонПериода));
|Обрабатывать НеПомеченныеНаУдаление;
|Объект = ЖурналРасчетов.Зарплата.Объект;
|Подр = ЖурналРасчетов.Зарплата.Объект.Подразделение;
|ВидРасч = ЖурналРасчетов.Зарплата.ВидРасч;
|Результат = ЖурналРасчетов.Зарплата.Результат;
|ПериодДействия = ЖурналРасчетов.Зарплата.ПериодРегистрации;
|Функция СуммаПоВР = Сумма(Результат);
|Функция РезультатСумма = Сумма(Результат) когда(ВидРасч.ВходитВГруппу(ГруппаРасчетов.ВсеНачисления)=1);
|Функция Выплаты = Сумма(Результат) когда(ВидРасч = ВидРасчета.ВыплатаЗарплаты );
|Функция РезультатСумма1 = Сумма(Результат) когда(ВидРасч=ВидРасчета.ПроизвольноеУдержание04);
|Функция Результат1 = Сумма(Результат) ; //
|Группировка Объект упорядочить по Объект.Наименование без групп;
|Группировка ПериодДействия;
|Группировка ВидРасч упорядочить по ВидРасч.Очередность;
|Условие(Подр в ВыбранноеПодразделение);
|Условие(Объект в Сотрудники);
|»//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
Выделенные строчки — то что было добавлено.
Да кстати еще недоработка
При нажатии кнопки Заполнить и установки флага на «Прочие,получающие доход(Догорники)» — то данные сотрудники не выбираются.
Спасибо за комментарии. Откорректировал отчет.
интересный вариант отчета, спасибо