Forum Discussion

DK_OS's avatar
DK_OS
New Contributor
5 months ago
Solved

What IMPORT should i use for the SECURITY updates for BRApi

Hi All, i am new to OneStream, i tried creating BR for Security automation. below is my entire code in OS-BR. Imports System Imports System.Collections.Generic Imports System.Data Imports Syst...
Admin
System
  • MarcusH's avatar
    MarcusH
    5 months ago

    You have requested a single security group:

    Dim allGroups As GroupInfo = BRApi.Security.Admin.GetGroup(si, "QA_Admin")

    So the error is saying that you are treating the return allGroups as a collection ie you think it contains List(Of GroupInfo) when it is a single GroupInfo. Get rid of the For loop. And as sameburn​ says MessageBox is not valid - use api.LogMessage for Finance BRs. And you then will be checking the name like this:

     If allGroups.Member.Name.StartsWith("QA_") Then

    The message is a bit pointless though except to confirm that the security group QA_Admin exists. If you want all the security groups you want something like this:

    Dim allGroups As List(Of Group) = BRApi.Security.Admin.GetGroups(si)

    Note the return is a list of Group not GroupInfo.

sameburn's avatar
sameburn
Icon for OneStream Employee rankOneStream Employee
5 months ago

Hi DK_OS​ 

It's not too clear what you are trying to achieve based on your code / description?

But the compiler is telling you that you have created a single GroupInfo object e.g for 1 security group, but you are treating it like a collection e.g > 1 security group and attempting to loop through it and retrieve properties related to Member not Group?

Also MessageBox.Show isn't valid in onestream (your second error)

If you want all Groups maybe start with something like this collection

 

 

 

 

 

 

 

 

 

 

 

You can then do something like this (please log results as you develop to demystify what you are doing, example below)

Dim objList As List(Of Group) = BRApi.Security.Admin.GetGroups(si)

For Each grp As Group In objList

	If grp.Name.StartsWith("QA_") Then
		
		api.LogMessage("Log Group Names that start with QA_", grp.Name)
	
	End If	
	
Next

Hope this helps

Sam