Имя: Пароль:
1C
1С v8
Работа с расшифровкой отчета на УФ
,
0 patapum
 
21.12.11
10:15
Если конкретно, надо в расшифровку добавить собственный пункт действий и прописать к нему алгоритм. Скажите, если знаете, где почитать, или за какие переменные хвататься?
1 ANikV
 
21.12.11
10:20
Почитай книгу "Разработка сложных отчетов в СКД". При программном формировании можно свои пункты добавлять в расшифровку.
2 patapum
 
21.12.11
10:22
а на управляемых там все то же самое? только разобраться, какой код на клиенте, какой на сервере?
3 Mort
 
21.12.11
10:46
что уже пытался сделать? Обработку расшифровки сделал? Параметры изучил? Данные расшифровки расковырял? Нет? Отладчик в руки и вперед с песней.
4 5 Элемент
 
21.12.11
10:47
Если есть УПП под рукой, то посмотри код в УФ монитора эффективности.
5 patapum
 
21.12.11
10:49
(4) спасибо, попробую. правда, УПП свежей под рукой нету. если кто кусок кода кинет, тот добрый человек и ему спасибо!
(3) я делал на 8.1, правда давно, подзабылось уже. на 8.2 коренных отличий нет?
6 5 Элемент
 
21.12.11
10:50
или УФ отчета ПроизвольныйОтчет.
там есть то что тебе нужно
7 5 Элемент
 
21.12.11
10:50
&НаКлиенте
Процедура РезультатОбработкаРасшифровки(Элемент, Расшифровка, СтандартнаяОбработка)
   
   Перем ДействиеРасшифровки;
   Перем ПараметрДействияРасшифровки;
   
   
   СтандартнаяОбработка = Ложь;
   
   Если URLСхемы <> "" Тогда
       
       Источник = Новый ИсточникДоступныхНастроекКомпоновкиДанных(URLСхемы);
       Обработка = Новый ОбработкаРасшифровкиКомпоновкиДанных(АдресДанныхРасшифровки, Источник);
       Обработка.ВыбратьДействие(Расшифровка, ДействиеРасшифровки, ПараметрДействияРасшифровки);
       
       Если ДействиеРасшифровки = ДействиеОбработкиРасшифровкиКомпоновкиДанных.Расшифровать
           ИЛИ ДействиеРасшифровки = ДействиеОбработкиРасшифровкиКомпоновкиДанных.Отфильтровать Тогда
           
           // Открываем в новом окне
           Описание = Новый ОписаниеОбработкиРасшифровкиКомпоновкиДанных(АдресДанныхРасшифровки, Расшифровка, ПараметрДействияРасшифровки);
           
           СтруктураПараметров = Новый Структура;
           СтруктураПараметров.Вставить("ПараметрОбработкиРашифровки", Описание);
           СтруктураПараметров.Вставить("ПроизвольныйОтчет",           Отчет.ПроизвольныйОтчет);
           СтруктураПараметров.Вставить("СохраненнаяНастройка",        СохраненнаяНастройка);
           СтруктураПараметров.Вставить("ФормироватьПриОткрытии",      Истина);
           
           ОткрытьФорму("Отчет.ПроизвольныйОтчет.ФормаОбъекта", СтруктураПараметров);
           
       ИначеЕсли ДействиеРасшифровки = ДействиеОбработкиРасшифровкиКомпоновкиДанных.ОткрытьЗначение Тогда
           
           ОткрытьЗначение(ПараметрДействияРасшифровки);
           
       ИначеЕсли ДействиеРасшифровки <> ДействиеОбработкиРасшифровкиКомпоновкиДанных.Нет Тогда
           
           ВыполнитьРасшифровку(Расшифровка, АдресДанныхРасшифровки, ПараметрДействияРасшифровки);
           ОбновитьОтчет();
           
       КонецЕсли
       
   КонецЕсли;
   
КонецПроцедуры
8 patapum
 
21.12.11
10:52
5 Элемент, спасибо огромное! вооружился напильником и ушел в отладчик...