|
Обороты счета с фильтром по Номенклатурной группе | ☑ | ||
---|---|---|---|---|
0
capllary
11.09.14
✎
13:12
|
Парни, подскажите как получить обороты счета с отбором по номенклатурной группе.
Пока что обороты счета получил так: Процедура Отчет(ТабДок, КонПериода, НачПериода, Организация) Экспорт Макет = ВнешнийОтчетОбъект.ПолучитьМакет("Отчет"); ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок"); ОбластьДоходы = Макет.ПолучитьОбласть("Доходы"); ПС = ПланыСчетов["Хозрасчетный"]; Счет90_01 = ПС.НайтиПоКоду("90.01"); мБухИтоги = Обработки.БухгалтерскиеИтоги.Создать(); мБухИтогиРС = Обработки.БухгалтерскиеИтоги.Создать(); мДатаКонцаПериодаПрошлогоГода = КонецМесяца(КонПериода); мДатаНачалаПериодаПрошлогоГода = НачалоМесяца(НачПериода); Итоги = "КонечныйОстатокДт, ОборотДт, ОборотКт, КорОборотДт"; мБухИтоги.РассчитатьИтоги("Хозрасчетный", Итоги, "Сумма", "Счет", мДатаНачалаПериодаПрошлогоГода, мДатаКонцаПериодаПрошлогоГода, , , , , , , ); ОбластьДоходы.Параметры.Квартал = ПредставлениеПериода(НачалоДня(НачПериода), КонецДня(КонПериода), "ФП = Истина" ); ОбластьДоходы.Параметры.Д21 = КО(Счет90_01.); ОбластьДоходы.Параметры.Д22 = КО(Счет90_01) / 1000; ОбластьДоходы.Параметры.Д23 = КО(Счет90_01) / 1000 * 18; //ОбластьДоходы.Параметры.Д21 = ""; //ОбластьДоходы.Параметры.Д21 = ""; ОбластьРасходы = Макет.ПолучитьОбласть("Расходы"); ОбластьРасходы.Параметры.Квартал = ПредставлениеПериода(НачалоДня(НачПериода), КонецДня(КонПериода), "ФП = Истина" ); ОбластьПодвал = Макет.ПолучитьОбласть("Подвал"); ТабДок.Очистить(); ТабДок.Вывести(ОбластьЗаголовок); ТабДок.Вывести(ОбластьДоходы); ТабДок.Вывести(ОбластьРасходы); ТабДок.Вывести(ОбластьПодвал); КонецПроцедуры |
|||
1
lxndr
11.09.14
✎
13:19
|
кури
мБухИтоги.ИспользоватьСубконто(...); |
|||
2
capllary
11.09.14
✎
13:29
|
(1) Спасибо, уже курю.
|
|||
3
capllary
11.09.14
✎
14:17
|
Чет не получается, и так пробовал:
мБухИтоги = Обработки.БухгалтерскиеИтоги.Создать(); мДатаКонцаПериодаПрошлогоГода = КонецМесяца(КонПериода); мДатаНачалаПериодаПрошлогоГода = НачалоМесяца(НачПериода); Итоги = "КонечныйОстатокДт, ОборотДт, ОборотКт, КорОборотДт"; СписокНоменклатурныхГрупп = Справочники.НоменклатурныеГруппы.НайтиПоКоду("000000001"); мБухИтоги.ИспользоватьСубконто(ВидыСубконто.НоменклатурныеГруппы, СписокНоменклатурныхГрупп, 2); мБухИтоги.РассчитатьИтоги("Хозрасчетный", Итоги, "Сумма", "Счет", мДатаНачалаПериодаПрошлогоГода, мДатаКонцаПериодаПрошлогоГода, , , , , , , ); И так: мБухИтоги = Обработки.БухгалтерскиеИтоги.Создать(); мДатаКонцаПериодаПрошлогоГода = КонецМесяца(КонПериода); мДатаНачалаПериодаПрошлогоГода = НачалоМесяца(НачПериода); Итоги = "КонечныйОстатокДт, ОборотДт, ОборотКт, КорОборотДт"; СписокНоменклатурныхГрупп = Справочники.НоменклатурныеГруппы.НайтиПоКоду("000000001"); мБухИтоги.РассчитатьИтоги("Хозрасчетный", Итоги, "Сумма", "Счет", мДатаНачалаПериодаПрошлогоГода, мДатаКонцаПериодаПрошлогоГода, , , ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.НоменклатурныеГруппы, , , , ); |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |