Skip to main content
Veteran
Jun 23, 2023 8:23 AM UTC

How to change an entity member description defaut and other cultures from a BR?

Hello,

I am using 2 cultures on a server.
I need to make some changes of entity properties from a BR.
I know how to do it for properties like ALLLOWADJ
I can not find a way to change all the descriptions from the BR : I mean the Default + English + French.
Any help appreciated.
Thanks
PS: I did read that 🙂 https://community.onestream.com/topic/show?tid=2958&fid=8

3 replies

ChristianW
Employee - Advisor
Employee - Advisor
Jun 23, 2023 9:43 AM UTC

Hi Nicolas

This is an extract from one of my projects, the snippet shows how to change the languages for a member. It is untested, but it the concept should work:

 

Dim languageName As String = "en-US"
Dim oDimpk As DimPk = BRApi.Finance.Dim.GetDimPk(si, "Your dimension")
Dim oMemberToUpdate As MemberInfo = BRApi.Finance.Metadata.GetMember(si, oDimpk.DimTypeId, "Name of your member", True,, New MemberDisplayOptions(True, CultureInfo.CurrentCulture.Name, True,True,True, True, True, False))
Dim newDescription As String = "Hello World"
Dim testCulture As MemberDescription = Nothing

If oMemberToUpdate.Descriptions.TryGetValue(languageName, testCulture) Then
	testCulture.Description = newDescription
Else
	Dim testCulturePk As New MemberDescriptionPk(oDimpk.DimTypeId, oMemberToUpdate.Member.MemberId, languageName)
	testCulture = New MemberDescription(testCulturePk, newDescription)
	oMemberToUpdate.Descriptions.Add(languageName, testCulture)
End If
brapi.Finance.MemberAdmin.SaveMemberInfo(si, oMemberToUpdate, False, False, True, TriStateBool.FalseValue)

 

Cheers

Christian

ChristianW
Employee - Advisor
Employee - Advisor
Jun 23, 2023 9:51 AM UTC

And this is the code snippet for description, you need to use the WritableMember object:

Dim oDimpk As DimPk = BRApi.Finance.Dim.GetDimPk(si, "Your dimension")
Dim newDescription As String = "Hello World"
Dim oMember As WritableMember = BRApi.Finance.Members.ReadWritableMemberNoCache(si, oDimpk.DimTypeId, "Name of your member")								
Dim oMemberToUpdate As MemberInfo = BRApi.Finance.Metadata.GetMember(si, oDimpk.DimTypeId, "Name of your member", True,, New MemberDisplayOptions(True, True, True,True,True, True, True, False))

oMember.Description = newDescription
Dim lstDesc As List(Of MemberDescription) = Nothing
brapi.Finance.MemberAdmin.SaveMemberInfo(si, True, oMember, False, Nothing, False, lstDesc, TriStateBool.FalseValue)

 

Veteran
Jun 26, 2023 6:58 PM UTC

Thank you ChristianW ! I will test that this week.