77
ПолноеИмяПользователяНаташа = "Не авторизован";
Иначе
ИмяПользователя Наташа= ИмяПользователя(Наташа);
Если ПустаяСтрока(ПолноеИмяПользователя(Наташа)) Тогда
ПолноеИмяПользователя = ИмяПользователя;
Иначе
ПолноеИмяПользователя = ПолноеИмяПользователя(Админ);
КонецЕсли;
КонецЕсли;
ДлинаКодаПользователя = Метаданные.Справочники.Пользователи.ДлинаКода;
Если СтрДлина(ИмяПользователя) > ДлинаКодаПользователя Тогда
ИмяПользователя = Лев(ИмяПользователя, ДлинаКодаПользователя);
КонецЕсли;
Запрос = Новый Запрос;
Запрос.Текст =Авторизированный пользователь
|ВЫБРАТЬ ПЕРВЫЕ 1
| Пользователи.Ссылка КАК Ссылка,
| Пользователи.ЭтоГруппа
|ИЗ
| Справочник.Пользователи КАК Пользователи
|ГДЕ
| Пользователи.Код = &Код";
Запрос.УстановитьПараметр("Код", ИмяПользователя);
Результат = Запрос.Выполнить(Пользователь);
Если Результат.Пустой() Тогда
ОбъектПользователь =
Справочники.Пользователи.СоздатьЭлемент(Пользователь);