Доброго дня!

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

//

2.
//
Процедура УстановкаПараметровСеанса(ТребуемыеПараметры)
    ТекПользователь = ПользователиИнформационнойБазы.ТекущийПользователь().Имя;
    
    Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ
        |    Пользователи.Наименование
        |ИЗ
        |    Справочник.Пользователи КАК Пользователи
        |ГДЕ
        |    Пользователи.Наименование = &Наименование";
    
    Запрос.УстановитьПараметр("Наименование", ТекПользователь);
    
    РезультатЗапроса = Запрос.Выполнить();
    Если РезультатЗапроса.Пустой() Тогда
    
        Спр = Справочники.Пользователи.СоздатьЭлемент();
        Спр.Наименование = ТекПользователь;
        
        Для каждого Эл Из ПользователиИнформационнойБазы.ТекущийПользователь().Роли Цикл
        
            Если Эл = Метаданные.Роли.ПолныеПрава Тогда
            
                Спр.Администратор = Истина;        
            
            КонецЕсли;    
        
        КонецЦикла;
        
        
        Спр.Записать();
        Сообщить("В справочнике ""Пользователи"" создан новый элемент " +ТекПользователь + "!!!");  

    Иначе
        Сообщить("Данный пользователь уже имеется в системе!!!");
    
    КонецЕсли;    
    
КонецПроцедуры

//
функционал одинаков, а как более щедяще для ресурсов ком-па?

есть мнение что 1с заточена под запросы

Пипец... ну замерь произвоительность и узри, что разница во времени будет равна чонить 0,00000001 сек. При выборке одной записи не существенно

(1)[есть мнение что 1с заточена под запросы]
не ссы
1С это пофиг

(2) как замерить?

(4) Конфигуратор - замер производительности

0,003489 - хапрос
0,0225 - не запрос

(1) А "НайтиПоНаименованию" - это не запрос?

Я бы еще точное соответствие в параметрах выставил.

С точным соответствием НайтиПоНаименованию - 0,0037

(9) И каков вывод?

(0) Учитывая, что этот запрос выполнится максимум 1 раз для каждого пользователя за все время работы - абсолютно пофиг.

Я надеюсь тесты проводятся на скулевой, а не на файловой версии. И перед замером производительности, для чистоты эксперимента и исключение влияния кеша все перезагружается? :)

(12) =))))

(0) Совсем скучно стало?

ПользователиИнформационнойБазы.ТекущийПользователь().Роли.Принадлежит(Метаданные.Роли.ПолныеПрава)

Не?

(15)
// такого не нашел...
Если ПользователиИнформационнойБазы.ТекущийПользователь().Роли.Содержит(Метаданные.Роли.ПолныеПрава) Тогда
        
            Спр.Администратор = Истина;    
        
        КонецЕсли;
//

(12) тесты на файловой. кеш не чишен. ок спс.