Имя: Пароль:
1C
1С v8
Как сделать Расшифровку в СКД програмно
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
Отвечаю на свой вопрос.
Перенес ТабличныДокумент на форму.

//ТабДок = Новый ТабличныйДокумент;

ПроцессорВывода.УстановитьДокумент(ТабДок);

В табличном документе прописал процедуру ОбработкиРасшифровки

   Процедура ТабДокОбработкаРасшифровки(Элемент, Расшифровка, СтандартнаяОбработка)
   Перем ВыполненноеДействие;
   СтандартнаяОбработка=Ложь;
   ОбработкаРасшифровки=Новый ОбработкаРасшифровкиКомпоновкиДанных(ДанныеРасшифровки,Новый ИсточникДоступныхНастроекКомпоновкиДанных(СхемаКомпоновкиДанных));
   ДоступныеДействия=Новый Массив;      
   ДоступныеДействия.Добавить(ДействиеОбработкиРасшифровкиКомпоновкиДанных.ОткрытьЗначение);
   Настройки=ОбработкаРасшифровки.Выполнить(Расшифровка,ВыполненноеДействие,ДоступныеДействия);
КонецПроцедуры
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой