programnaja_ustanovka_otborov_v_din.spisok [wiki.hostingcloud.com.ua]

Эта страница только для чтения. Вы можете посмотреть её исходный текст, но не можете его изменить. Сообщите администратору, если считаете, что это неправильно.

**Вариант 1**
<code>
&НаСервере
Процедура УстановитьОтборы() 
	
	//Очищаем програмные отбор
	Для Каждого ЭлементОтбора из ДинТабДокументы.Отбор.Элементы Цикл 
		Если ЭлементОтбора.Представление	=	"Программный отбор" Тогда 
			ДинТабДокументы.Отбор.Элементы.Удалить( ЭлементОтбора);
		КонецЕсли;
	КонецЦикла;
	
	//СОздаем группу
	ГруппаОтбора					=	ДинТабДокументы.Отбор.Элементы.Добавить(Тип("ГруппаЭлементовОтбораКомпоновкиДанных"));
	ГруппаОтбора.Использование		=	Истина;
	ГруппаОтбора.ТипГруппы			=	ТипГруппыЭлементовОтбораКомпоновкиДанных.ГруппаИ;
	ГруппаОтбора.Представление		=	"Программный отбор";
	
	//Добавляем Отбор по ЕДРПО
	Если СтрДлина(Объект.КодПоЕДРПОУ)=8 Тогда 
		ЭлементОтбора					=	ГруппаОтбора.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
		ЭлементОтбора.ЛевоеЗначение		=	Новый ПолеКомпоновкиДанных("ЕДРПО");
		ЭлементОтбора.ВидСравнения		=	ВидСравненияКомпоновкиДанных.Равно;
		ЭлементОтбора.ПравоеЗначение	=	Объект.КодПоЕДРПОУ;
		ЭлементОтбора.Представление		=	"Программный отбор";
		ЭлементОтбора.Использование		=	Истина;
	КонецЕсли;
	
КонецПроцедуры
</code>


**Вариант 2 (БСП)**
<code>
ОбщегоНазначенияКлиентСервер.УстановитьЭлементОтбораДинамическогоСписка(Список, "Менеджер", Менеджер, ВидСравненияКомпоновкиДанных.Равно,, ЗначениеЗаполнено(Менеджер));
</code>