phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added active directory support to security groups

Browse Source
This commit is contained in:
Infineon\StieberD
2024-11-01 17:59:22 -07:00
parent 2fa803e3a1
commit 2ad0386055
25 changed files with 7835 additions and 6559 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
LSL2/STPROC/NDW_ACTIVE_DIRECTORY_GROUPS_EVENTS.txt
View File

@ -52,7 +52,8 @@ Return EventFlow or 1
Event WINDOW.CREATE(CreateParam)
SelGroups = CreateParam
SelGroups = Field(CreateParam, @RM, 1, 1)
GroupType = Field(CreateParam, @RM, 2, 1)
Def = ""
Def<MCOL$> = -2
Def<MROW$> = -2
@ -60,9 +61,10 @@ Event WINDOW.CREATE(CreateParam)
Def<MTYPE$> = "U"
MsgUp = Msg(@window, Def) ;* display the processing message
ADGroupData = Active_Directory_Services('GetADGroupsByString', 'MES-Mesa*', 'INFINEON')
ADGroupData<-1> = Active_Directory_Services('GetADGroupsByString', 'IFX-IRF-Mesa*', 'INFINEON')
ADGroupData<-1> = Active_Directory_Services('GetADGroupsByString', 'KLU-Mesa*', 'INFINEON')
ADGroupData = Active_Directory_Services('GetADGroupsByString', 'MES-Mesa*', 'INFINEON', '', GroupType)
ADGroupData<-1> = Active_Directory_Services('GetADGroupsByString', 'IFX-IRF-Mesa*', 'INFINEON', '', GroupType)
ADGroupData<-1> = Active_Directory_Services('GetADGroupsByString', 'KLU-Mesa*', 'INFINEON', '', GroupType)
ADGroupData<-1> = Active_Directory_Services('GetADGroupsByString', 'MES-APP*', 'INFINEON', '', GroupType)
ADGroupData = SRP_Array('Clean', ADGroupData, 'TrimAndMakeUnique', @FM)
NumRows = DCount(ADGroupData, @FM)
@ -149,3 +151,4 @@ Event EDT_AD_GROUPS.ROWSELCHANGED(SelRow, SelState)
end event