Странное что-то твориться.
Есть обработка на УФ. Решили построить диаграмму Ганта. Строим рекурсивно дерево элементов из другого дерева.
Все бы хорошо, но вот вылетает с ошибкой... Ошибка и код ниже.
{ВнешняяОбработка.УниверсальныйАРМ.Форма.Форма.Форма(37)}: Ошибка при вызове метода контекста (ЗаполнениеДереваДиаграммы)
ЗаполнениеДереваДиаграммы();
по причине:
Ошибка передачи данных между клиентом и сервером. Значение недопустимого типа.
по причине:
Ошибка преобразования данных XDTO:
Запись значения свойства 'param':
форма: Элемент
имя: {}param
по причине:
Ошибка отображения типов:
Отсутствует отображение для типа 'ДанныеФормыКоллекцияЭлементовДерева'
&НаКлиенте
Процедура ЗаказПриИзменении(Элемент)
ЗаполнениеДереваДиаграммы();
КонецПроцедуры
&НаСервере
Процедура ЗаполнениеДереваДиаграммы (Дер="Верх", ТочкаГ = Неопределено)
Если Дер = "Верх" Тогда
ДГ.Очистить();
Дер = ДеревоСЧ.ПолучитьЭлементы();
СерияОбеспечение = ДГ.УстановитьСерию("Обеспечение");
СерияОбеспечение.Цвет = WebЦвета.БледноСиреневый;
СерияИзготовление = ДГ.УстановитьСерию("Изготовление");
СерияИзготовление.Цвет = WebЦвета.СинийСоСтальнымОттенком;
СерияОТК = ДГ.УстановитьСерию("ОТК");
СерияОТК.Цвет = WebЦвета.Желтый;
СерияВП = ДГ.УстановитьСерию("ВП");
СерияВП.Цвет = WebЦвета.Зеленый;
ДГ.ОбластьЛегенды.Расположение = РасположениеЛегендыДиаграммы.Нет;
ДГ.ПоддержкаМасштаба = ПоддержкаМасштабаДиаграммыГанта.ВсеДанные;
ДГ.ОбластьПостроения.Расположение = РасположениеОбластиПостроенияДиаграммы.СвободноеМесто;
Флаг = Истина;
Иначе
Флаг = Ложь;
КонецЕсли;
Для каждого Стр Из Дер Цикл
Если Флаг = Истина Тогда
Точка = ДГ.Точки.Добавить();
Точка.Текст = Стр.ДСЕ+" "+Стр.Наименование;
Иначе
Точка = ТочкаГ.Точки.Добавить();
Точка.Текст = Стр.ДСЕ+" "+Стр.Наименование;
КонецЕсли;
ЗаполнениеДереваДиаграммы (Стр.ПолучитьЭлементы(), Точка);
КонецЦикла;
КонецПроцедуры