Формирование очета в свернутом варианте скд
☑
0
virtus
26.05.14
✎
11:20
Всем привет!
Может кто знает, как можно реализовать так, чтобы при формировании отчета СКД он формировался в свернутом варианте.
Есть группировка: Валюта, Партнер (Иерархия), Объект расчетов
Нужно чтоб при формировании табличный документ отображался как свернутый по объекту расчетов с возможностью нажать "+" и раскрыть объект расчетов.
Спасибо.
1
Чайник Рассела
26.05.14
✎
11:22
Пример кода - сворачивающий последний уровень группировки:
Таблица = ЭлементыФормы.Результат;
КолУровней = Таблица.КоличествоУровнейГруппировокСтрок();
Если КолУровней > 2 Тогда
Таблица.ПоказатьУровеньГруппировокСтрок(КолУровней-2);
КонецЕсли;
2
Cube
26.05.14
✎
11:25
(0) Либо постобработка результата, либо две кнопки на форму и пусть сами тыкают.
3
fisher
26.05.14
✎
11:30
Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)
СтандартнаяОбработка = Ложь;
КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, КомпоновщикНастроек.ПолучитьНастройки(), ДанныеРасшифровки);
ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
ПроцессорКомпоновки.Инициализировать(МакетКомпоновки,,ДанныеРасшифровки);
ДокументРезультат.Очистить();
ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
ПроцессорВывода.УстановитьДокумент(ДокументРезультат);
ПроцессорВывода.Вывести(ПроцессорКомпоновки);
// свернем группировки
Для ОтрицательныйИндекс = -9 По 0 Цикл
ДокументРезультат.ПоказатьУровеньГруппировокСтрок(-ОтрицательныйИндекс);
ДокументРезультат.ПоказатьУровеньГруппировокКолонок(-ОтрицательныйИндекс);
КонецЦикла;
КонецПроцедуры
4
virtus
26.05.14
✎
11:46
Спасибо большое, разобрался!
Сделал почти как fisher:
вот разница:
ДокументРезультат.ПоказатьУровеньГруппировокСтрок(1);
5
fisher
26.05.14
✎
12:54
(4) Да сам удивился, что у меня без определения количества группировок. Скопипастил когда-то на скорую руку.
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший