МассПользователей = ПользователиИнформационнойБазы.ПолучитьПользователей();
Для Каждого Стр из МассПользователей Цикл
Если Стр.Роли.Содержит(Метаданные.Роли["МенеджерПоПродажам"]) Тогда
Польз = Справочники.Пользователи.НайтиПоНаименованию(Стр.ПолноеИмя); //или Имя
Если ЗначениеЗаполнено(Польз) Тогда
Набор = РегистрыСведений.НастройкиПользователей.СоздатьНаборЗаписей();
Набор.Отбор.Пользователь.Установить(Польз);
Набор.Отбор.Настройка.Установить(ПланыВидовХарактеристик.НастройкиПользователей.НастройкаТеста);
НЗ = Набор.Добавить();
НЗ.Пользователь = Польз;
НЗ.Настройка = ПланыВидовХарактеристик.НастройкиПользователей.НастройкаТеста;
НЗ.Значение = Истина;
Набор.Записать();