Программная проверка пользователя 1С
Есть тысяча способов ограничить пользователя в 1С. Самый простой, если часть кода самописная, это «жесткая» привязка к конкретным пользователям. Например это можно сделать так:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
&НаСервере Функция ПроверитьПользователя(пользователь) рез=ложь; если пользователь=ПользователиИнформационнойБазы.ТекущийПользователь().Имя тогда рез=Истина; конецесли; возврат рез; конецфункции &НаКлиенте Процедура Моржа(Команда) если ПроверитьПользователя("Администратор")=истина или ПроверитьПользователя("Помидоров")=истина или ПроверитьПользователя("Сантаклаусов")=истина тогда Форма=ПолучитьФорму("Обработка.ОтчетПоМоржеНовыйГрибов.Форма"); ДанныеФормы=Форма.Объект; //ДанныеФормы=РеализацияТовараНаСервере(ДанныеФормы); КопироватьДанныеФормы(ДанныеФормы,Форма.Объект); Форма.Открыть(); иначе сообщить("Вам это не нужно.."); конецесли; КонецПроцедуры |