Программное добавление условного оформления документа

1C 9 1

1С ERP УП 2 (УФ)

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