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