Декомпиляция условного оформления
Комментарии
В избранное
Подписаться на ответы
Сортировка:
Древо развёрнутое
Свернуть все
ЗЫ. Поспешил с выводами. Совершенно другой функционал
(0), отличная обработка! Странно, что так мало скачиваний.
Пару наблюдений:
Чтобы обработка работала после добавления в метаданные (в основную конфигурацию или в расширение) надо:
1. Как минимум надо закомментировать пару строк в модуле объекта:
1.1 В процедуре ЗаполнитьДеревоФорм закомментировать строку ЭтотОбъект.ИмяПодключеннойОбработки = ЭтотОбъект.ИспользуемоеИмяФайла;
1.2 В процедуре ПоместитьПустыеДанныеВХранилище закомментировать строку ЭтотОбъект.ИмяПодключеннойОбработки = ЭтотОбъект.ИспользуемоеИмяФайла;
2. При доработке типовых форм современных конфигураций в процедуре модуля формы УстановитьУсловноеОФормление() надо временно (на время разработки своего условного оформления) комментировать строку УсловноеОформление.Элементы.Очистить();
3. Прописать в основной конфигурации либо в расширении в модуле МодификацияКонфигурацииПереопределяемый в процедуре ПриСозданииНаСервере следующий код:
Если Параметры.Свойство("ДекомпиляцияУсловногоОформления") Тогда
Обработки.<ИмяОбработки>.Создать().ОпределитьКодУсловногоОформления(Форма);
КонецЕсли;
Ошибка:
ВидСравненияКомпоновкиДанных.ВСписке принимает не только список значений, но и массив.
В типовых я видел добавляют через массив программно, а потом обработка спотыкается об этот массив.
Решается это добавлением следующего кода в процедуру модуля объекта ОбработатьЭлементОтбора после проверки на тип значения СписокЗначений проверяем еще и на массив:
....
ИначеЕсли ТипЗнч(ЭлементОтбора.ПравоеЗначение) = Тип("Массив") Тогда
МассивЗначений = ЭлементОтбора.ПравоеЗначение;
Текст = Текст + "Массив = Новый Массив;" + Символы.ПС;
Для НомСписка = 0 По МассивЗначений.Количество()-1 Цикл
ПолученноеЗначение = ПолучитьЗначение(МассивЗначений[НомСписка]);
Текст = Текст +"Массив.Добавить(" + ПолученноеЗначение + ");" + Символы.ПС;
КонецЦикла;
Текст = Текст + "ЭлементОтбора.ПравоеЗначение = Массив;" + Символы.ПС;
....
Пару наблюдений:
Чтобы обработка работала после добавления в метаданные (в основную конфигурацию или в расширение) надо:
1. Как минимум надо закомментировать пару строк в модуле объекта:
1.1 В процедуре ЗаполнитьДеревоФорм закомментировать строку ЭтотОбъект.ИмяПодключеннойОбработки = ЭтотОбъект.ИспользуемоеИмяФайла;
1.2 В процедуре ПоместитьПустыеДанныеВХранилище закомментировать строку ЭтотОбъект.ИмяПодключеннойОбработки = ЭтотОбъект.ИспользуемоеИмяФайла;
2. При доработке типовых форм современных конфигураций в процедуре модуля формы УстановитьУсловноеОФормление() надо временно (на время разработки своего условного оформления) комментировать строку УсловноеОформление.Элементы.Очистить();
3. Прописать в основной конфигурации либо в расширении в модуле МодификацияКонфигурацииПереопределяемый в процедуре ПриСозданииНаСервере следующий код:
Если Параметры.Свойство("ДекомпиляцияУсловногоОформления") Тогда
Обработки.<ИмяОбработки>.Создать().ОпределитьКодУсловногоОформления(Форма);
КонецЕсли;
Ошибка:
ВидСравненияКомпоновкиДанных.ВСписке принимает не только список значений, но и массив.
В типовых я видел добавляют через массив программно, а потом обработка спотыкается об этот массив.
Решается это добавлением следующего кода в процедуру модуля объекта ОбработатьЭлементОтбора после проверки на тип значения СписокЗначений проверяем еще и на массив:
....
ИначеЕсли ТипЗнч(ЭлементОтбора.ПравоеЗначение) = Тип("Массив") Тогда
МассивЗначений = ЭлементОтбора.ПравоеЗначение;
Текст = Текст + "Массив = Новый Массив;" + Символы.ПС;
Для НомСписка = 0 По МассивЗначений.Количество()-1 Цикл
ПолученноеЗначение = ПолучитьЗначение(МассивЗначений[НомСписка]);
Текст = Текст +"Массив.Добавить(" + ПолученноеЗначение + ");" + Символы.ПС;
КонецЦикла;
Текст = Текст + "ЭлементОтбора.ПравоеЗначение = Массив;" + Символы.ПС;
....
(4) Спасибо за высокую оценку!
Касательно наблюдений полностью согласен, для добавления в конфигурацию нужно внести соответствующие доработки, в моём же релизе сделана ставка на запуск через внешнюю обработку, для большей автономности.
Отдельное спасибо за выявление и исправление ошибки, внёс это исправление в версии 1.0.2)
Касательно наблюдений полностью согласен, для добавления в конфигурацию нужно внести соответствующие доработки, в моём же релизе сделана ставка на запуск через внешнюю обработку, для большей автономности.
Отдельное спасибо за выявление и исправление ошибки, внёс это исправление в версии 1.0.2)