|
КомпоновщикНастройкиОтбор , заполняю программно, пробую на клиенте, поле пустое. Где ошибк
| ☑ |
0
SkillUp
06.03.19
✎
10:52
|
КомпоновщикНастройкиОтбор , заполняю программно, пробую на клиенте, поле пустое. Где ошибка? При нажатии на кнопку
Конфигурация -на УФ.
Процедура №1:
&НаКлиенте
Процедура ПриОткрытии(Отказ)
// Настроить компоновщик
ИнициализироватьНастройкиКомпоновщика();
ТекПользователь = ОбщегоНазначенияВызовСервера.ПолучитьЗначениеПарметраСеанса("ТекущийПользователь");
текНастройки = ОбщегоНазначенияВызовСервера.ХранилищеОбщихНастроекЗагрузить("ЗаданиеАктуализатору.УдалитьПоФильтру.НастройкиКомпоновщика",,,,СокрЛП(ТекПользователь));
Если ЗначениеЗаполнено(текНастройки) Тогда
Компоновщик.ЗагрузитьНастройки(текНастройки.Получить());
КонецЕсли;
КонецПроцедуры
Процедура№2:
&НаСервере
Процедура ИнициализироватьНастройкиКомпоновщика()
МассивКлиентов = Новый Массив;
для каждого стрСп из спКлиентов цикл
МассивКлиентов.Добавить(стрСп.Значение);
КонецЦикла;
Макет=ПолучитьОбщийМакет("ДополнительныйФильтрВЗадании");
//Макет.Параметры["Рейтинг"].Значение = Объект.РейтингДляПечати;
//Макет.Параметры["Страна"].Значение = Объект.Страна;
Макет.Параметры["ПМ_Период"].Значение = ПМ_Период;
Макет.Параметры["СписокКлиентов"].Значение = МассивКлиентов;
АдресСхемы = ПоместитьВоВременноеХранилище(Макет,УникальныйИдентификатор);
Компоновщик.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(АдресСхемы,Новый Структура("СписокКлиентов",МассивКлиентов)));
Компоновщик.ЗагрузитьНастройки(Макет.НастройкиПоУмолчанию);
//Компоновщик.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(Макет));
//ПРейтинг = Компоновщик.Настройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("Рейтинг"));
//ПРейтинг.Значение = Объект.РейтингДляПечати; ПРейтинг.Использование = Истина;
ППериод = Компоновщик.Настройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("ПМ_Период"));
ППериод.Значение = ПМ_Период;
ППериод.Использование = Истина;
ПСписокКлиентов = Компоновщик.Настройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("СписокКлиентов"));
ПСписокКлиентов.Значение = МассивКлиентов;
ПСписокКлиентов.Использование = Истина;
//ПМакетыДляПечати = Компоновщик.Настройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("МакетыДляПечати"));
//ПМакетыДляПечати.Значение = ПолучитьСписокМакетов(); ПМакетыДляПечати.Использование = Истина;
КонецПроцедуры
|
|
1
SkillUp
06.03.19
✎
11:00
|
Все разобрался, пардон...
|
|
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.