Выбор отчетов в зависимости от роли пользователя

@acelysX · Регистрация: 21.06.2023

Author24 — интернет-сервис помощи студентам

Как сделать привязку пользователя к определенному отчету, чтобы при выборе пользователя выводились те отчеты, которые доступны ему, а не которые доступны вприницпе?
В ролях уже к пользователям привязаны отчеты, но все равно отображает весь список

1C

Процедура ПриОткрытииНаСервере()
    СписокОтчетов = Новый СписокЗначений;
    Для каждого Отчет Из Метаданные.Отчеты Цикл
            ЭлементСписка = СписокОтчетов.Добавить(Отчет);
    КонецЦикла;   
    ВыбранныйЭлемент = СписокОтчетов.ВыбратьЭлемент("Выберите отчет", СписокОтчетов[0]);
    Если ВыбранныйЭлемент <> Неопределено Тогда
        Отчеты[ВыбранныйЭлемент.Значение.Имя].ПолучитьФорму().Открыть();
    КонецЕсли;
КонецПроцедуры
Процедура ВыборПользователя()
    ФРМ = Справочники.Пользователи.ПолучитьФормуВыбора();
    Результат = ФРМ.ОткрытьМодально();
    Если Результат = Неопределено Тогда
        Возврат;
    КонецЕсли;
КонецПроцедуры

@delphi_Int · 21.06.2023, 11:57

Можно сделать так: либо в табличную часть отчета, либо в дополнительные реквизиты записать доступные роли циклом (РольДоступна()) этого отчета обработкой, а после кодом

1C

Для Каждого Строка из ПользователиИнформационнойБазы.ПолучитьПользователей() Цикл
    Если Строка.Роли.Содержит(Метаданные.Роли.ПолныеПрава) Тогда
        Сообщить(Строка);
    КонецЕсли
КонецЦикла

получать роли пол-ля и если есть одна и та же роль - отчет доступен

@acelysX · 21.06.2023, 14:32 **[ТС]**

delphi_Int, это в выбор пользователя написать?

Добавлено через 23 минуты
delphi_Int, можешь расписать чего конкретно сделать, пожалуйста

@delphi_Int · 21.06.2023, 14:52

Если право есть, то и форма будет доступна

@delphi_Int · 21.06.2023, 14:53

так гораздо проще. Сделай в попытке и на продакшн

@acelysX · 21.06.2023, 15:00 **[ТС]**

delphi_Int, чет я ниче не понял, мне в предприятии надо, чтобы при выборе пользователя, выводились те отчеты, которые ему доступны

@delphi_Int · 21.06.2023, 15:31

1C

Для каждого Отчет Из Метаданные.Отчеты Цикл
        ЭлементСписка = Отчет.ОсновнаяФорма.Родитель();
        Сообщить(ЭлементСписка);
    КонецЦикла;

то что выводит, на то есть права. Если нет то нет

Добавлено через 44 секунды
запустил под манагером у которого ограничены права сильно. Вывел то на что есть право

Добавлено через 5 минут
а в твоем случаи выводит все - тоже под менеджером проверил

@acelysX · 21.06.2023, 15:37 **[ТС]**

delphi_Int, я так понял, последний код вместо цикла для каждого вставлять?

@delphi_Int · 21.06.2023, 15:38

Да да

@acelysX · 21.06.2023, 15:39 **[ТС]**

delphi_Int, пишет: значение не является значением объектного типа (родитель)*

@delphi_Int · 21.06.2023, 15:40

Ну это уже твои манипуляции...там дальше сам

@acelysX · 21.06.2023, 15:43 **[ТС]**

delphi_Int, вот код

1C

Процедура ПриОткрытииНаСервере()
    СписокОтчетов = Новый СписокЗначений;
    Для каждого Отчет Из Метаданные.Отчеты Цикл
        ЭлементСписка = Отчет.ОсновнаяФорма.Родитель();
    КонецЦикла;   
    ВыбранныйЭлемент = СписокОтчетов.ВыбратьЭлемент("Выберите отчет", СписокОтчетов[0]);
    Если ВыбранныйЭлемент <> Неопределено Тогда
        Отчеты[ВыбранныйЭлемент.Значение.Имя].ПолучитьФорму().Открыть();
    КонецЕсли;
КонецПроцедуры 
 
Процедура ВыборПользователя()
    ФРМ = Справочники.Пользователи.ПолучитьФормуВыбора();
    Результат = ФРМ.ОткрытьМодально();
    Если Результат = Неопределено Тогда
        Возврат;
    КонецЕсли;
КонецПроцедуры

@Yulunga · 21.06.2023, 19:52

ну так что такое за функция - родитель() ?
расскажи

Добавлено через 5 минут

Сообщение от acelysX

Процедура ВыборПользователя()
ФРМ = Справочники.Пользователи.ПолучитьФормуВыбора();
Результат = ФРМ.ОткрытьМодально();
Если Результат = Неопределено Тогда
Возврат;
КонецЕсли;
КонецПроцедуры

а здесь какая сермяжная правда сокрыта?
если результат равно неопределено тогда возврат
если нет - то конец процедуры и, собсно, возврат

@acelysX · 22.06.2023, 09:59 **[ТС]**

Yulunga, я ее допилил с помощью РольДоступна и убрал возврат, пишет ошибку, но ещё нужно ограничить список отчетов для пользователя, как это сделать?

@polax · 22.06.2023, 11:59

acelysX, Конфигурация

Сообщение от acelysX

В ролях уже к пользователям привязаны отчеты, но все равно отображает весь список

Значит есть роль(и), которая дает право на отчеты. Принцип ограничений в 1С: Если хоть одна присвоенная роль разрешает, игнорируются все остальные роли с ограничениями. Найди и отбери эту роль у всех пользователей

@acelysX 0 / 0 / 0 Регистрация: 21.06.2023 Сообщений: 11
	21.06.2023, 15:39 [ТС]	10
	delphi_Int, пишет: значение не является значением объектного типа (родитель)* 0

@Yulunga Модератор 2296 / 839 / 244 Регистрация: 22.04.2013 Сообщений: 6,155 Записей в блоге: 1
	21.06.2023, 19:52	13
	ну так что такое за функция - родитель() ? расскажи Добавлено через 5 минут Сообщение от acelysX Процедура ВыборПользователя() ФРМ = Справочники.Пользователи.ПолучитьФормуВыбора(); Результат = ФРМ.ОткрытьМодально(); Если Результат = Неопределено Тогда Возврат; КонецЕсли; КонецПроцедуры а здесь какая сермяжная правда сокрыта? если результат равно неопределено тогда возврат если нет - то конец процедуры и, собсно, возврат 0

@acelysX 0 / 0 / 0 Регистрация: 21.06.2023 Сообщений: 11
	21.06.2023, 14:32 [ТС]	3
	delphi_Int, это в выбор пользователя написать? Добавлено через 23 минуты delphi_Int, можешь расписать чего конкретно сделать, пожалуйста 0

@delphi_Int null 57 / 51 / 13 Регистрация: 06.11.2012 Сообщений: 431
	21.06.2023, 14:52	4
	Если право есть, то и форма будет доступна Миниатюры 0

@delphi_Int null 57 / 51 / 13 Регистрация: 06.11.2012 Сообщений: 431
	21.06.2023, 14:53	5
	так гораздо проще. Сделай в попытке и на продакшн 0

@acelysX 0 / 0 / 0 Регистрация: 21.06.2023 Сообщений: 11
	21.06.2023, 15:00 [ТС]	6
	delphi_Int, чет я ниче не понял, мне в предприятии надо, чтобы при выборе пользователя, выводились те отчеты, которые ему доступны 0

@acelysX 0 / 0 / 0 Регистрация: 21.06.2023 Сообщений: 11
	21.06.2023, 15:37 [ТС]	8
	delphi_Int, я так понял, последний код вместо цикла для каждого вставлять? 0

@delphi_Int null 57 / 51 / 13 Регистрация: 06.11.2012 Сообщений: 431
	21.06.2023, 15:38	9
	Да да 0

@delphi_Int null 57 / 51 / 13 Регистрация: 06.11.2012 Сообщений: 431
	21.06.2023, 15:40	11
	Ну это уже твои манипуляции...там дальше сам 0

@acelysX 0 / 0 / 0 Регистрация: 21.06.2023 Сообщений: 11
	22.06.2023, 09:59 [ТС]	14
	Yulunga, я ее допилил с помощью РольДоступна и убрал возврат, пишет ошибку, но ещё нужно ограничить список отчетов для пользователя, как это сделать? 0

@polax 3031 / 1584 / 576 Регистрация: 16.01.2015 Сообщений: 6,735
	22.06.2023, 11:59	15
	acelysX, Конфигурация Сообщение от acelysX В ролях уже к пользователям привязаны отчеты, но все равно отображает весь список Значит есть роль(и), которая дает право на отчеты. Принцип ограничений в 1С: Если хоть одна присвоенная роль разрешает, игнорируются все остальные роли с ограничениями. Найди и отбери эту роль у всех пользователей 0