1С 8.3 Установить условное оформление документа
Данные > Примеры кода 1С > 1С 8.3 Документы
Перейти в раздел примеры кода 1С 8.3:
Программно установить условное оформление документа в 1С 8.3:
// Вызывать процедуру из модуля формы "ПриОткрытии"
// Предназначена для создания и настройки условного оформления документа
&НаСервере
Процедура УстановитьУсловноеОформлениеДокумента()
// Создание элемента условного оформления
ЭлементыОформления = УсловноеОформление.Элементы.Добавить();
ЭлементыОформления.Использование = Истина;
ЭлементыОформления.Оформление.УстановитьЗначениеПараметра("Доступность", Ложь);
// Создание условия для элемента оформления
Отбор = ЭлементыОформления.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
Отбор.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Объект.Реквизит");
Отбор.ПравоеЗначение = Истина;
Отбор.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
Отбор.Использование = Истина;
// Настройка оформляемого поля
Поля = ЭлементыОформления.Поля.Элементы.Добавить();
Поля.Поле = Новый ПолеКомпоновкиДанных("ТЧДокумента");
КонецПроцедуры
// Предназначена для создания и настройки условного оформления документа
&НаСервере
Процедура УстановитьУсловноеОформлениеДокумента()
// Создание элемента условного оформления
ЭлементыОформления = УсловноеОформление.Элементы.Добавить();
ЭлементыОформления.Использование = Истина;
ЭлементыОформления.Оформление.УстановитьЗначениеПараметра("Доступность", Ложь);
// Создание условия для элемента оформления
Отбор = ЭлементыОформления.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
Отбор.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Объект.Реквизит");
Отбор.ПравоеЗначение = Истина;
Отбор.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
Отбор.Использование = Истина;
// Настройка оформляемого поля
Поля = ЭлементыОформления.Поля.Элементы.Добавить();
Поля.Поле = Новый ПолеКомпоновкиДанных("ТЧДокумента");
КонецПроцедуры
0
комментарии
____________________
Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник