IPB

Здравствуйте, гость ( Вход | Регистрация )

 
Ответить в эту темуОткрыть новую тему
> добавление доступных полей выбора, добавление доступных полей выбора
fungrunger
сообщение Aug 4 2011, 11:16
Сообщение #1


Пользователь
**

Группа: Пользователи
Сообщений: 42
Регистрация: 29-August 08
Пользователь №: 16174



Всем Добрый день. Столкнулся с такой проблемой.
Делаю отчет на СКД. В качестве набора данных есть внешний объект. Поля не описаны, т.к. формируются динамически.
Затем в процедуре модуля ПриКомпоновкеРезультата формирую этот внешний источник - добавляю его поля в схему,
инициализирую и пологал, что эти поля попадут в доступные - а вновь добавленные поля не попадают в доступные поля выбора (т.е. пользователь не сможет их выбрать).
Коллекция доступна только на чтение - как мне сделать чтобы новые поля схемы появились в доступных? Поможитя кто чем может. Платформа 8.2.14.519 Вот код
CODE
Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)

СтандартнаяОбработка = Ложь;

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

ТабСвойствОЗ = ПолучитьТабСвойствОЗ();

Для Каждого стрСвОз Из ТабСвойствОЗ Цикл

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

КонецЦикла;

ВидыОпераций_Выбранные = ПолучитьТабЗначенийСвойствОЗ(ПоляВнешнегоИсточника,ТабСвойствОЗ);

ВнешниеНаборыДанных = Новый Структура();
ВнешниеНаборыДанных.Вставить("ВидыОпераций_Выбранные", ВидыОпераций_Выбранные);

КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, НастройкиСКД, ДанныеРасшифровки);

ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных;
ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновки, ВнешниеНаборыДанных, ДанныеРасшифровки);

ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
ПроцессорВывода.УстановитьДокумент(ДокументРезультат);
ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных);

КонецПроцедуры
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
fungrunger
сообщение Aug 5 2011, 15:07
Сообщение #2


Пользователь
**

Группа: Пользователи
Сообщений: 42
Регистрация: 29-August 08
Пользователь №: 16174



товарищи!!!! Неужто никто не делал, никто не знает. Не бросьте в беде - второй день мучаюсь. Если что - то в вопросе непонятно - то спрашивайте, пожалуйста. Не дайте умереть человеку ph34r.gif
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения

Ответить в эту темуОткрыть новую тему

 



RSS Текстовая версия Сейчас: 23rd September 2020 - 19:03