новое событие
Информационный поток
Задания вакансии материалы разработки сообщения форума
Зуев Евгений
Приватное сообщение

УТ11, раскрасить таб часть документа по условию

Задание в категории песочница
Набережные Челны(Россия )
28.04.1978(46 лет)
28 |  0
20 ноября 2024 в 14:58:02 (2 дня 6 часов назад)
10200
Текст задания
Я работаю на предприятии, где стоит УТ11. Внешних привлекать не разрешают, допиливаю сам. в данный момент долблюсь - не могу раскрасить таб часть документа по условию. Задача - подключиться через Аммии Админ, раскрасить, дать краткие комментарии, советы для понимания.

В модуле формы документа такая процедурка запускается из ПриСозданииНаСервере. Не работает

Объ = РеквизитФормыВЗначение("Объект");
АлкПрод = Объ.Товары.Выгрузить().ВыгрузитьКолонку("АлкогольнаяПродукция");
Спис = Новый СписокЗначений;
Запрос = Новый Запрос("ВЫБРАТЬ
| алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.АлкогольнаяПродукция Как Ссылка
|ИЗ
| РегистрСведений.алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры КАК алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры
|ГДЕ
| алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.АлкогольнаяПродукция В(&АлкПрод)");
Запрос.УстановитьПараметр("АлкПрод",АлкПрод);
В = Запрос.Выполнить().Выбрать();
Пока В.Следующий() Цикл
Спис.Добавить(В.Ссылка);
КонецЦикла;

ЭлементОформления = ЭтаФорма.УсловноеОформление.Элементы.Добавить();
ЭлементОтбора = ЭлементОформления.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Объект.Товары.АлкогольнаяПродукция");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.ВСписке;
ЭлементОтбора.ПравоеЗначение= Спис;
ЭлементОтбора.Использование = Истина;

Эл = ЭлементОформления.Оформление.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("ЦветФона"));
Эл.Значение= WebЦвета.Коралловый;
Эл.Использование = Истина;
0
Отклики (8)