0
Andreik113
07.11.22
✎
09:26
|
Есть пользователь, ему нужно добавить полные права для, например, подсистемы Склад и доставка. Возможно ли узнать все роли, которые доступны для этой подсистемы? Хочу в предприятии сделать группу доступа, профиль групп доступа и добавить подходящие роли.
|
|
2
Kassern
07.11.22
✎
10:05
|
(1) Это если не знаешь СП методов, а с ними можно без боли и пота. Например:
&НаСервере
Процедура ТестПодсистемыНаСервере()
Состав=Метаданные.Подсистемы.Склад.Состав;
Для Каждого ТекСтрока Из Состав Цикл
МассивПрав=ПолучитьПраваПоОбъектуКонфигурации(ТекСтрока);
КонецЦикла;
КонецПроцедуры
&НаСервере
Функция ПолучитьПраваПоОбъектуКонфигурации(ОбъектМетаданных)
МассивПрав=Новый Массив;
Для Каждого ТекРоль Из Метаданные.Роли Цикл
Если ПравоДоступа("Просмотр",ОбъектМетаданных,ТекРоль) Тогда
МассивПрав.Добавить(ТекРоль);
КонецЕсли;
КонецЦикла;
Возврат МассивПрав;
КонецФункции
|
|