Как программно изменить права доступа на объект ?

[egorych]

Например, есть поле в таблице (или MenuItem или еще что-нибудь), нужно у группы изменить права доступа на это поле (или другой объект) из X++ .
Не подскажете, каким методом это можно сделать? А то что-то я запутался в секурных классах.

[miklenew]

Может я не понял вопрос. Зачем для этого кодить?
Программно проверить включён ли ключ можно так.

    DictSecurityKey dictSecurityKey;
    ;
    dictSecurityKey = new DictSecurityKey(id );
    if(!dictSecurityKey || (.rights() != AccessType::NoAccess)))
    {
         .....
    }

[egorych]

Ключи тут не причем ! Я имею ввиду права доступа у полю таблицы или к пункту меню для определенной группы пользователей.

[EAlex]

secSet  = SysSecurity::constructSecurityKeySet();
secSet.loadGroupRights(userGroup.id, '');

//Уровень доступа на MenuItem
//            secSet.access(_MenuItemId ,AccessType::NoAccess);        

//Уровень доступа на таблицу
//            secSet.tableAccess(_TableId,AccessType::NoAccess);        

//Сохранить
xAccessRightsList::saveSecurityRights(secSet.packTouched(), userGroup.id, '');

[kashperuk]

egorych - а зачем это могло вам понадобиться?

[egorych]

Цитата:

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

egorych - а зачем это могло вам понадобиться?

Например, делается новый пункт меню или кнопка, привязывается к существующему SecurityKey, и доступ автоматом получают все, у кого этот ключ "включен". Затем нужно пройти по всем группам и выключить кому не положено.
Хочу эту процедуру чуть-чуть упростить.

[Raven Melancholic]

Может поможет вот этот проект? Это установка прав, но идем не от группы к правам, а наоборот: выбираем пункт на который нужно установить права и переходим в список групп.

[egorych]

Цитата:

Сообщение от Raven Melancholic

Может поможет вот этот проект?

Спасибо, посмотрю.
Посмотрел, класс!!! То что я хотел делать!
Дкмаю в полезное занести нужно

[Kabardian]

Цитата:

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

Спасибо, посмотрю.
Посмотрел, класс!!! То что я хотел делать!
Дкмаю в полезное занести нужно

Kernel version: 4.0.2501.116
Application version: 4.0.2501.121
Localization version: Eastern Europe

Занес в полезное ;--).

egorych, пожалуйста, поделитесь опытом:

1. На какой версии AX использовали?
2. На какой среде? (тестовая, рабочая)
3. Были ли какие-то проблемы с использованием?

У меня возникла только одна проблема -- кракозябры при установке на полностью английскую тестовую среду. Проблема решилась сменой региональных настроек на родные ;--).

[Logger]

Цитата:

Сообщение от Raven Melancholic

Может поможет вот этот проект? Это установка прав, но идем не от группы к правам, а наоборот: выбираем пункт на который нужно установить права и переходим в список групп.

Пробежал код по диагонали - впечатлило.
А как вы его писали ?
Переложили дерево из стандартной формы прав доступа для групп на некое подобие реляционной структуры ?

Известные косяки при использовании есть ? (уж очень стремно залезать в права самим)
У вас на какой версии работало ? 3-ка ?

[Raven Melancholic]

Цитата:

А как вы его писали ?
Переложили дерево из стандартной формы прав доступа для групп на некое подобие реляционной структуры ?

Да, применил индуский поход Copy-Paste. Разрабатывалось для Ax3.0 еще когда работал в объединенных кондитерах. Там достаточно много было доработок (как самостоятельных, так и с привлечением специалистов Навикон и Норбит) Начальник отдела сопровождения Юля замучилась при появлении новой функциональности устанавливать права по группам и попросила сделать что-то, облегчающее работу. Вот, после очередного похода в Золотую воблу сил на что-то серьезное не было и в результате появилось это.Разрабатывалось для Ax3.0, но сейчас вроде работает на DAX4. Правда на DAX4 иногда при установке каскада бывает задумывается минут на 20-30. Закономерности не нашел, а следовательно не поправил.

[Logger]

Цитата:

Сообщение от Raven Melancholic

Может поможет вот этот проект? Это установка прав, но идем не от группы к правам, а наоборот: выбираем пункт на который нужно установить права и переходим в список групп.

На 2009-й кто-нить использовал это проект ?

[Bega]

Цитата:

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

На 2009-й кто-нить использовал это проект ?

Используем на тех же объединенных кондитерах на DAX2009, например, чтобы понять, какие группы имеют доступ к объекту. Функционал крайне полезный. Выложу в понедельник проект для DAX2009.

[Kabardian]

Просто поделюсь опытом, может кому-нибудь пригодится.

Дано:

• AX 4.0 SP2, версия ядра 4.0.2503.116;
• ~450 групп пользователей;
• 10 доменов.

Задача:

• отключить доступ к одному отчету у всех групп.

Выполняется очееень долго (~4-9 часов) и не всегда завершается успешно. Оптимизировать времени не было, поэтому и хотфикс не выкладываю, а лишь делюсь опытом :-).

[raz]

Цитата:

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

Выполняется очееень долго (~4-9 часов) и не всегда завершается успешно. Оптимизировать времени не было, поэтому и хотфикс не выкладываю, а лишь делюсь опытом :-).

А чего так долго? Открываем таблицу AccessRightList и удаляем там руками записи с именем MenuItem-а данного отчета (это если в компании принято давать права на объекты, а не на ключи доступа). Если права даны на ключи, то пишем job, который для групп с ключами, добавит запись с отключением доступа к отчету.
Или просто на MenuItem данного отчета вешаем другой ключ.
Или в коде отчета делаем проверку на ключ и закрываем его, если нет доступа.
Есть масса вариантов что бы потратить ~4-9 часов более разумно.

[Kabardian]

Цитата:

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

А чего так долго? Открываем таблицу AccessRightList и удаляем там руками записи с именем MenuItem-а данного отчета (это если в компании принято давать права на объекты, а не на ключи доступа). Если права даны на ключи, то пишем job, который для групп с ключами, добавит запись с отключением доступа к отчету.
Или просто на MenuItem данного отчета вешаем другой ключ.
Или в коде отчета делаем проверку на ключ и закрываем его, если нет доступа.
Есть масса вариантов что бы потратить ~4-9 часов более разумно.

Спасибо за много разных и интересных вариантов :-), но были причины:

• отчетов было много (больше 100);
• нужно было обойтись с минимумом разработки, чтобы не тратить много времени на тестирование.

Из предложенных вариантов, не вижу какого-то одного универсального, чтобы он сработал на случай, когда я не знаю как в компании принято давать права на объекты .

Используя подход описанный на Axaptapedia, написал джоб для массового отключения прав доступа к menuitem, чуть позже выложу его здесь.

[Kabardian]

Цитата:

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

Спасибо за много разных и интересных вариантов :-), но были причины:

• отчетов было много (больше 100);
• нужно было обойтись с минимумом разработки, чтобы не тратить много времени на тестирование.

Используя подход описанный на Axaptapedia, написал джоб для массового отключения прав доступа к menuitem, чуть позже выложу его здесь.

Будьте предельно осторожны с джобом по ссылке! Последствия в моем случае:

• слетели права доступа для многих групп пользователей к различным таблицам
• значительно замедлилась система

Использовал оттуда кусок кода для каждого сочетания группа + домен:

void disableMenuItems(SecurityKeySet _securitySet)
    {
        str name;
        AccessRecordType recordType;
        int idx;
        AccessType accessType;
        for (idx = 1; idx <= conLen(menuItems); idx++)
        {
            [name, recordType] = conpeek(menuItems, idx);
            accessType = _securitySet.menuItemAccess(name, recordType);
            if (accessType!= AccessType::NoAccess)
            {
                info(strFmt('%1:%2, %3', name, recordType, accessType));
                _securitySet.menuItemAccess(name, recordType, AccessType::NoAccess);
            }
        }
    }

Пока точная причина неизвестна, тем не менее решил предупредить, мало ли вдруг все-таки этот джоб виноват .

Как выясню причину, сообщу.

[Logger]

Цитата:

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

Будьте предельно осторожны с джобом по ссылке! Последствия в моем случае:

• слетели права доступа для многих групп пользователей к различным таблицам
• значительно замедлилась система

Пока точная причина неизвестна, тем не менее решил предупредить, мало ли вдруг все-таки этот джоб виноват .

Как выясню причину, сообщу.

причина в этой строке кода

xAccessRightsList::saveSecurityRights(securitySet.pack(), localGroup.Id, domain);

При ее использовании сохраняются все права для всех табличек и менюитемов. В моем случае получилось порядка 10 тысяч записей на одну группу прав. Конечно будет тормозить.
Также для большинства табличек прописывается NoAccess. Как правило приводит к тому что лукапы не работают.
Если написать так

xAccessRightsList::saveSecurityRights(securitySet.packTouched(), localGroup.Id, domain);

то все ок.

[maximka]

Цитата:

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

А чего так долго? Открываем таблицу AccessRightList и удаляем там руками записи с именем MenuItem-а данного отчета

Ага, а если у нас на родительский объект дан доступ > NoAccess, то с удивлением обнаруживаем, что отчет у пользователя не пропал.
Поэтому не советую трогать AccessRightsList руками.

[raz]

Цитата:

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

Ага, а если у нас на родительский объект дан доступ > NoAccess, то с удивлением обнаруживаем, что отчет у пользователя не пропал.
Поэтому не советую трогать AccessRightsList руками.

Читайте всё сообщение внимательно.