Имя: Пароль:
1C
1С v8
ПриКомпоновкеРезультата - программно обработать результат
0 Sasha_H
 
20.12.13
23:27
Для чего я делаю это программно? Мне надо будет определенные области результата выводить с разрывом строки. Но сейчас проблема в другом, результат выходит, но вот беда не работают быстрые отборы.

"Водитель Равно """" И
Складская группа В группе из списка ""<Пустое значение>"""

но в быстрых отборах явно указал конкретный отбор. Подскажите что необходимо еще добавить в код?

Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)
    
    СтандартнаяОбработка = Ложь;
    
    Настройки = КомпоновщикНастроек.Настройки;
    
    КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
    МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, Настройки);
    
    ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
    ПроцессорКомпоновки.Инициализировать(МакетКомпоновки);
    
    ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
    ПроцессорВывода.УстановитьДокумент(ДокументРезультат);
    ПроцессорВывода.Вывести(ПроцессорКомпоновки);
    
КонецПроцедуры
1 Sasha_H
 
20.12.13
23:36
(0) Платформа 1С 8.3
2 Alex S D
 
20.12.13
23:37
гугли по мисте...
3 Sasha_H
 
21.12.13
00:02
(2) молодец, поставь галочку за ответ
4 Sasha_H
 
21.12.13
00:17
апну, неуж-то никто не вкурсе как мне пользовательские настройки отработать в данной процедуре?
5 sixis
 
21.12.13
00:17
Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)
    
    СтандартнаяОбработка = Ложь;
    //+
    КомпоновщикНастроек.ЗагрузитьНастройки(КомпоновщикНастроек.ПолучитьНастройки());
    //-
    Настройки = КомпоновщикНастроек.Настройки;
    
    КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
    МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, Настройки);
    
    ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
    ПроцессорКомпоновки.Инициализировать(МакетКомпоновки);
    
    ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
    ПроцессорВывода.УстановитьДокумент(ДокументРезультат);
    ПроцессорВывода.Вывести(ПроцессорКомпоновки);        
    
КонецПроцедуры
6 sixis
 
21.12.13
00:19
Хотя даже просто это
    Настройки = КомпоновщикНастроек.Настройки;
заменить на это
    Настройки = КомпоновщикНастроек.ПолучитьНастройки()
7 Sasha_H
 
21.12.13
00:22
(6) странно и пробовал такое и не срабатывало. А теперь еще раз сделал и сработало - полтергейц ;)

Спасибо, что не бросили колегу в трудную минуту.
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан