Имя: Пароль:
1C
1С v8
v8 СКД Установить отбор из другого отчета
0 xXeNoNx
 
05.03.12
16:41
Все привет!
Проблема заключается в следующем:
Есть обработка, из нее должен вызываться отчет СКД, вот код как я это делаю:

&НаКлиенте
.....
       ПараметрыОтчета = Новый Структура("СформироватьПриОткрытии, КомпоновщикНастроек",Истина);

       Компоновщик = ПолучитьКомпоновщикНастроек();
   Компоновщик.Настройки.Отбор.Элементы[1].ПравоеЗначение = ЭтаФорма.Филиал;
   Компоновщик.Настройки.Отбор.Элементы[1].Использование = Истина;
   Компоновщик.Настройки.Отбор.Элементы[1].ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
   ПараметрыОтчета.КомпоновщикНастроек = Компоновщик;

ОткрытьФормуМодально("Отчет.РезервыТМЦ.Форма",ПараметрыОтчета);


&НаСервере
Функция ПолучитьКомпоновщикНастроек()
   Возврат Отчеты.РезервыТМЦ.Создать().КомпоновщикНастроек;
КонецФункции


в итоге отбор все равно не устанавливается..., подскажите в чем тут может быть причина
1 xXeNoNx
 
05.03.12
18:14
разобрался, мож кому поможет тож:


&НаКлиенте
Процедура РасшифроватьРезервыТМЦ(Команда)
   ОткрытьФорму("Отчет.РезервыТМЦ.Форма", ПолучитьПользовательскиеНастройкиОтчета(), ЭтаФорма);
КонецПроцедуры

&НаСервере
Функция ПолучитьПользовательскиеНастройкиОтчета()
   
   СхемаКомпоновкиДанных = Отчеты.РезервыТМЦ.ПолучитьМакет("ОсновнаяСхемаКомпоновкиДанных");
   
   Настройки = СхемаКомпоновкиДанных.НастройкиПоУмолчанию;
   Настройки.Отбор.Элементы[1].Использование = Истина;
   Настройки.Отбор.Элементы[1].ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
   Настройки.Отбор.Элементы[1].ПравоеЗначение = Филиал;
   
   Настройки.Отбор.Элементы[2].Использование = Истина;
   Настройки.Отбор.Элементы[2].ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
   Настройки.Отбор.Элементы[2].ПравоеЗначение = Организация;
   
   КомпоновщикНастроекКомпоновкиДанных = Новый КомпоновщикНастроекКомпоновкиДанных;
   КомпоновщикНастроекКомпоновкиДанных.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(СхемаКомпоновкиДанных));
   КомпоновщикНастроекКомпоновкиДанных.ЗагрузитьНастройки(Настройки);

   сткОтбор = Новый Структура("Организация, Филиал", Организация, Филиал);
   сткПараметры = Новый Структура("СформироватьПриОткрытии, ПользовательскиеНастройки", Истина, КомпоновщикНастроекКомпоновкиДанных.ПользовательскиеНастройки);
   Возврат сткПараметры;
КонецФункции
Программист всегда исправляет последнюю ошибку.