По теме из базы знаний
Найденные решения
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(1)
- Ни как!!!
только перебором пользователей ИБ с проверкой содержит Роль
примерный код
Как?
- Ни как!!!
только перебором пользователей ИБ с проверкой содержит Роль
примерный код
ПользовательИБ = ПользователиИнформационнойБазы.НайтиПоУникальномуИдентификатору(Пользователь.ИдентификаторПользователяИБ);
Если ПользовательИБ = Неопределено Тогда
Сообщить("Пользователь: " + Пользователь + " не найден среди пользователей базы!");
Возврат;
КонецЕсли;
Если ПользовательИБ.Роли.Содержит(лкРоль) Тогда
лкСтр = ДоступОбъектов.Добавить();
лкСтр.Объект = лкОписание;
лкСтр.Синоним = лкСиноним;
КонецЕсли;
Показать
(1)
Может поздно, но
есть справочник Пользователи, а есть объект ПользователиИнформационнойБазы
АДАЧА:
В РОЛЯХ выбрать ЗАПРОСОМ всех пользователей с ролью "АБВ"
Как?
Пожалуйста, напишите хоть что-нибудь, сегодня обещала сдать работу.
Конфигурация УТ 2.3 Украина.
В РОЛЯХ выбрать ЗАПРОСОМ всех пользователей с ролью "АБВ"
Как?
Пожалуйста, напишите хоть что-нибудь, сегодня обещала сдать работу.
Конфигурация УТ 2.3 Украина.
Может поздно, но
// Пользователи
ВсеПользователи = Новый ТаблицаЗначений;
ВсеПользователи.Колонки.Добавить("Пользователь");
ВсеПользователи.Колонки.Добавить("ГЗИДОсновнаяДата");
ВсеПользователи.Колонки.Добавить("ГЗИДОграничениеРегламентнойИнформацииУпр");
ВсеПользователи.Колонки.Добавить("ГЗИДОграничениеРегламентнойИнформацииРегл");
ВсеПользователиИБ = ПользователиИнформационнойБазы.ПолучитьПользователей();
Для Каждого Элт Из ВсеПользователиИБ Цикл
ПользовательПоКоду = Справочники.Пользователи.НайтиПоКоду(Элт.Имя);
Если ПользовательПоКоду <> Неопределено Тогда
НовСтр = ВсеПользователи.Добавить();
НовСтр.Пользователь = ПользовательПоКоду;
НовСтр.ГЗИДОсновнаяДата = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(ПользовательПоКоду, "ГЗИДОсновнаяДатаEpartner");
НовСтр.ГЗИДОграничениеРегламентнойИнформацииУпр = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(ПользовательПоКоду, "ГЗИДОграничениеРегламентнойИнформацииУпрEpartner");
НовСтр.ГЗИДОграничениеРегламентнойИнформацииРегл = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(ПользовательПоКоду, "ГЗИДОграничениеРегламентнойИнформацииРеглEpartner");
КонецЕсли;
КонецЦикла;
Показатьесть справочник Пользователи, а есть объект ПользователиИнформационнойБазы
(1)
С ролями побывал так
ЗАДАЧА:
В РОЛЯХ выбрать ЗАПРОСОМ всех пользователей с ролью "АБВ"
Как?
В РОЛЯХ выбрать ЗАПРОСОМ всех пользователей с ролью "АБВ"
Как?
С ролями побывал так
// Пользователи
ВсеПользователи = Новый ТаблицаЗначений;
ВсеПользователи.Колонки.Добавить("Пользователь");
ВсеПользователи.Колонки.Добавить("Роли");
ВсеПользователи.Колонки.Добавить("ОткрытьМесяцев");
ВсеПользователиИБ = ПользователиИнформационнойБазы.ПолучитьПользователей();
Для Каждого ПользовательИБ Из ВсеПользователиИБ Цикл
ПользовательПоКоду = Справочники.Пользователи.НайтиПоКоду(ПользовательИБ.Имя);
Если ПользовательПоКоду <> Неопределено Тогда
НовСтр = ВсеПользователи.Добавить();
НовСтр.Пользователь = ПользовательПоКоду;
РолиПользователяИБ = Новый СписокЗначений;
ОткрытьМесяцевПользователяИБ = Новый СписокЗначений;
Для Каждого Элт Из ПользовательИБ.Роли Цикл
ИмяРоли = СтрЗаменить(Элт.Имя, "Epartner", "");
РолиПользователяИБ.Добавить(ИмяРоли);
ИскомаяРольЗамены = Неопределено;
Если ИмяРоли = "ПолныеПрава" Тогда ИскомаяРольЗамены = Число(СтрЗаменить(ИмяРоли, "ПолныеПрава", "-12")); КонецЕсли;
Если ИмяРоли = "ПравоАдминистрирования" Тогда ИскомаяРольЗамены = Число(СтрЗаменить(ИмяРоли, "ПравоАдминистрирования", "-999")); КонецЕсли;
Если ИмяРоли = "ПравоБухгалтер" Тогда ИскомаяРольЗамены = Число(СтрЗаменить(ИмяРоли, "ПравоБухгалтер", "-12")); КонецЕсли;
Если ИмяРоли = "ПравоМенеджерПоТендерам" Тогда ИскомаяРольЗамены = Число(СтрЗаменить(ИмяРоли, "ПравоМенеджерПоТендерам", "-6")); КонецЕсли;
Если ИмяРоли = "ПравоМенеджерПоЗакупкам" Тогда ИскомаяРольЗамены = Число(СтрЗаменить(ИмяРоли, "ПравоМенеджерПоЗакупкам", "-3")); КонецЕсли;
Если ИмяРоли = "ПравоМенеджерПоПродажам" Тогда ИскомаяРольЗамены = Число(СтрЗаменить(ИмяРоли, "ПравоМенеджерПоПродажам", "-2")); КонецЕсли;
Если ИскомаяРольЗамены <> Неопределено Тогда
ОткрытьМесяцевПользователяИБ.Добавить(ИскомаяРольЗамены);
КонецЕсли;
ОткрытьМесяцевПользователяИБ.СортироватьПоЗначению(НаправлениеСортировки.Возр);
КонецЦикла;
НовСтр.Роли = РолиПользователяИБ;
НовСтр.ОткрытьМесяцев = ОткрытьМесяцевПользователяИБ;
КонецЕсли;
КонецЦикла;
Показать
Че делать???
Есть группа условно в одном подразделении:
1) Менеджер (видит свои РТУ и РТУ продавцов)
2) Продавец (видят только свои РТУ)
3) Продавец (видят только свои РТУ)
Менеджер должен видеть РТУ продавцов.
Я хотела список продавцов запросом получить.
Есть группа условно в одном подразделении:
1) Менеджер (видит свои РТУ и РТУ продавцов)
2) Продавец (видят только свои РТУ)
3) Продавец (видят только свои РТУ)
Менеджер должен видеть РТУ продавцов.
Я хотела список продавцов запросом получить.
Одному мне не понятно, что тут происходит? :)
Началось с вопроса про "как получить пользователей с определенной ролью запросом?", а превратилось все в ограничение RLS по пользователю.
Забористая трава нынче :)
Началось с вопроса про "как получить пользователей с определенной ролью запросом?", а превратилось все в ограничение RLS по пользователю.
Забористая трава нынче :)
(19) Задача не имеет прямого решения.
Другие способы по озвученным вами условиям были уже озвучены.
В конечном итоге выяснилось, что необходимо выполнить ограничения в RLS. Каким образом это связано с ролями и пользователями с ролью "АБВ" - известно только вам.
Другие способы по озвученным вами условиям были уже озвучены.
В конечном итоге выяснилось, что необходимо выполнить ограничения в RLS. Каким образом это связано с ролями и пользователями с ролью "АБВ" - известно только вам.
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот