Dynamic AX 4.0 用户组权限SecurityKey

 UserId              _userId = "IT001";
 UserGroupId      _userGroupId = "ABC_1";
 DomainId          _domainId="DH";
 DataAreaId        _companyId = "CG";
 SecurityKeyset    _SecurityKeyset;
 AccessType        _newAccessType = AccessType::Edit;
 AccessType        _curAccessType;
 str                    _MenuItemName = "SalesTable";
 ;

 _SecurityKeyset = new SecurityKeyset();
 //begin user group security set
 _SecurityKeyset .loadGroupRights(_userGroupId ,_domainId);
 //获取销售单画面的访问权限
 _curAccessType = _SecurityKeyset.menuItemAccess(_MenuItemName , AccessRecordType::MenuItemDisplay);

 //给销售单画面赋权限
 _SecurityKeyset.menuItemAccess(_MenuItemName , AccessRecordType::MenuItemDisplay，_newAccessType ); //带第三个参数表示修改权限。
 //Save 权限
 xAccessRightsList::saveSecurityRights(se.packTouched(),_userGroupId , _domainId);

 //begin user group security set
 _SecurityKeyset .loadUserRights(_userId,_companyId );
 //获取用户销售单画面的访问权限
 _curAccessType = _SecurityKeyset.menuItemAccess(_MenuItemName , AccessRecordType::MenuItemDisplay);
  

若想将一个用户组的权限完全复制给另外一个用户组。

 SecurityKeyset    seSource;

 UserGroupId      groupSource,groupDest;
 DomainId          domainId = "DH";
 ;
 groupSource = "Test1";
 groupDest ="Test2";
 seSource = new SecurityKeyset();
 seSource.loadGroupRights(groupSource,domainId);

 xAccessRightsList::saveSecurityRights(seSource.pack(), groupDest, domainId );//复制到新组Test2

扩展一下，可以得到某对象所有用户组的权限，并导出到Excel，以供IT审计。这在权限检查中非常有用，节省一个个打开看的时间了。

另，在后头涉及到权限的table\AccessRightsList, 同时我们可以做一个hotfix,加一个新的table\AccessRightsListLog,记录用户对权限的修改,以便后面追查。

table\AccessRightsListLog表结构。

CREATE TABLE [dbo].[ACCESSRIGHTSLISTLOG](
    [GROUPID] [nvarchar](10) NULL,
    [DOMAINID] [nvarchar](10) NULL,
    [RECORDTYPE] [int] NULL,
    [PARENTID] [int] NULL,
    [ID] [int] NULL,
    [ELEMENTNAME] [nvarchar](40) NULL,
    [ACCESSTYPE] [int] NULL,
    [ACCESSTYPEFKEYUSE] [int] NULL,
    [MODIFIEDDATE] [datetime] NULL,
    [MODIFIEDTIME] [int] NULL,
    [MODIFIEDBY] [nvarchar](5) NULL,
    [CREATEDDATE] [datetime] NULL,
    [CREATEDTIME] [int] NULL,
    [CREATEDBY] [nvarchar](5) NULL,
    [RECVERSION] [int] NULL,
    [RECID] [bigint] NULL,
    [USERID] [nvarchar](10) NULL,
    [LOGTYPE] [nvarchar](3) NULL,
    [LOGDATE] [datetime] NULL
)

附AccessRightsList\RecordType的枚举值列表。

附AccessRightsList\AccessType的枚举值列表。