По теме из базы знаний
- Периодическая смена паролей пользователей базы 1С
- Некоторые особенности работы с настройками прав доступа пользователей в типовых конфигурациях на управляемом приложении
- Пользовательские макеты для внешних печатных форм (обработок)
- Программное заполнение пользовательских параметров и отборов СКД
- Пользовательские настройки системы компоновки данных
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Например, здесь :-)
см. еще ИмяПользователя(), ПолноеИмяПользователя(), НазваниеНабораПрав(<?>), КаталогПользователя()
Перем глПользователь Экспорт;
//---------------------------------------------------------------------------
Процедура ПриНачалеРаботыСистемы() Экспорт
СпрПользователи=СоздатьОбъект("Справочник.Пользователи");
// этот справочник должен быть объявлен в МетаДанных
// установка текущего пользователя
Если ПустоеЗначение(ИмяПользователя())=0 Тогда
Если СпрПользователи.НайтиПоКоду(ИмяПользователя())=0 Тогда
СпрПользователи.Новый();
СпрПользователи.Код=ИмяПользователя();
СпрПользователи.Наименование=ПолноеИмяПользователя();
КонецЕсли;
СпрПользователи.Записать();
глПользователь=_СпрПользователи.ТекущийЭлемент();
Иначе
глПользователь=ПолучитьПустоеЗначение("Справочник.Пользователи");
Предупреждение("Пользователь системы не определен!");
КонецЕсли;
КонецПроцедуры
Показатьсм. еще ИмяПользователя(), ПолноеИмяПользователя(), НазваниеНабораПрав(<?>), КаталогПользователя()
(5) Так ее можно сделать, эту переменную.
А справочник "Пользователи" есть. А если нет, так тоже можно сделать :-)
Вот кусок из Бух для Украины
А справочник "Пользователи" есть. А если нет, так тоже можно сделать :-)
Вот кусок из Бух для Украины
// ===============================
Процедура ПриНачалеРаботыСистемы()
// механизм авторства
Спр = СоздатьОбъект("Справочник.Пользователи");
Спр.НайтиПоНаименованию(ИмяПользователя(), 1);
Пользователь = Спр.ТекущийЭлемент();
Если Пользователь.Выбран() = 0 Тогда
Спр.Новый();
Спр.Наименование = ИмяПользователя();
Спр.Записать();
Пользователь = Спр.ТекущийЭлемент();
КонецЕсли;
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот