![]() |
![]() |
![]() |
|
Как сделать Расшифровку в СКД програмно | ☑ | ||
---|---|---|---|---|
0
Grekos2
22.05.14
✎
13:47
|
Отчет.
Примерно такой код СХемаКомпоновкиДанных = ПолучитьМакет("СКД"); Настройки1 = СХемаКомпоновкиДанных.НастройкиПоУмолчанию; КомпоновщикНастроек1 = Новый КомпоновщикНастроекКомпоновкиДанных; КомпоновщикНастроек1.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(СхемаКомпоновкиДанных)); КомпоновщикНастроек1.ЗагрузитьНастройки(Настройки1); КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных; ДанныеРасшифровки = Новый ДанныеРасшифровкиКомпоновкиДанных; МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных,Настройки1,ДанныеРасшифровки); ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных; ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновки,,ДанныеРасшифровки); ДокументРезультат = Новый ТабличныйДокумент; ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент; ТабДок = Новый ТабличныйДокумент; ПроцессорВывода.УстановитьДокумент(ТабДок); Процессорвывода.Вывести(ПроцессорКомпоновкиДанных); ТабДок.ТолькоПросмотр=Истина; ТабДок.ОтображатьСетку=Ложь; ТабДок.Показать(); При клике по заполненной ячейке показывает какое то число. Хотелось бы , чтобы открывались элементы справочника и т.д. |
|||
1
Cube
22.05.14
✎
13:48
|
(0) Читай хрусталеву или мисту, лентяй.
|
|||
2
Grekos2
22.05.14
✎
13:49
|
(1) Мисту перечитал по вхождению ДанныеРасшифровки и ответа не нашел.
|
|||
3
Cube
22.05.14
✎
13:50
|
||||
4
Grekos2
23.05.14
✎
14:42
|
Отвечаю на свой вопрос.
Перенес ТабличныДокумент на форму. //ТабДок = Новый ТабличныйДокумент; ПроцессорВывода.УстановитьДокумент(ТабДок); В табличном документе прописал процедуру ОбработкиРасшифровки Процедура ТабДокОбработкаРасшифровки(Элемент, Расшифровка, СтандартнаяОбработка) Перем ВыполненноеДействие; СтандартнаяОбработка=Ложь; ОбработкаРасшифровки=Новый ОбработкаРасшифровкиКомпоновкиДанных(ДанныеРасшифровки,Новый ИсточникДоступныхНастроекКомпоновкиДанных(СхемаКомпоновкиДанных)); ДоступныеДействия=Новый Массив; ДоступныеДействия.Добавить(ДействиеОбработкиРасшифровкиКомпоновкиДанных.ОткрытьЗначение); Настройки=ОбработкаРасшифровки.Выполнить(Расшифровка,ВыполненноеДействие,ДоступныеДействия); КонецПроцедуры |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |