Forum Discussion
Krishna
2 years agoValued Contributor
Entity Security using extender rule
Hi - Has anyone created entity readdatagroup using the below function Dim objGroup As Group = Group.CreateEntityReadDataGroup() Any help would be appreciated
- 2 years ago
I found the solution and the below is the code sample for updating the Entity Security Group. The below update the Display Group for an entity
'Assign the Display Group Dim objWritableMember As WritableMember = BRApi.Finance.Members.ReadWritableMemberNoCache(si, dimTypeId.Entity, EntityName) objWritableMember.ReadDataGroupUniqueID2 = BRApi.Security.Admin.GetGroup(si,ReadDataGroup2).Group.UniqueID BRapi.Finance.MemberAdmin.SaveMemberInfo(si,True,objWritableMember,False,Nothing,False,Nothing,TriStateBool.FalseValue)
Nikpowar97
4 months agoContributor
Dim ExGrpDict As New Dictionary(Of Guid,String)
For Each ExGrp As ExclusionGroup In BRApi.Security.Admin.GetExclusionGroups(si)
ExGrpDict.Add(ExGrp.UniqueID,ExGrp.Name)
Next
If ExGrpDict.ContainsKey(BrApi.Finance.Members.ReadWritableMemberNoCache(siSource, dimTypeId.Entity,Mem.Member.Name).ReadDataGroupUniqueID) Then
newRow("ReadDataGroup") = ExGrpDict(BrApi.Finance.Members.ReadWritableMemberNoCache(siSource,dimTypeId.Entity,Mem.Member.Name).ReadDataGroupUniqueID)
Else
newRow("ReadDataGroup") = BRApi.Security.Admin.GetGroupInfoEx(siSource,BrApi.Finance.Members.ReadWritableMemberNoCache(siSource, dimTypeId.Entity,Mem.Member.Name).ReadDataGroupUniqueID).GroupInfo.Group.Name
End IfI used another approach to achieve this as
BRApi.Security.Admin.GetGroupInfoEx(siSource,BrApi.Finance.Members.ReadWritableMemberNoCache(siSource, dimTypeId.Entity,Mem.Member.Name).ReadDataGroupUniqueID).GroupInfo.Group.Name
as the line as not giving me the Exclusion group name and was throwing and Error: Object reference not set to an instance of an object.
Regards,
Nik