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

Get AD Groups Improvement - Added in several methods to get and retrieve AD Groups.

Browse Source
This commit is contained in:
Infineon\Ouellette
2024-09-26 11:19:27 -07:00
committed by Ouellette Jonathan (IT FI MES)
parent ae4bfcbfe1
commit 0dd19af900
2 changed files with 284 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
LSL2/STPROC/PM_SERVICES.txt
View File

@ -620,7 +620,7 @@ Service GetPMNotificationRecipients(PMSID)
ADNotificationGroups = XLATE('PM_SPEC', PMSID, PM_SPEC_AD_NOTIFICATION_GROUPS$, 'X')
IF ADNotificationGroups NE '' then
for each ADGroup in ADNotificationGroups using @VM
GroupMemberList = Active_Directory_Services('GetADGroupMembers', ADGroup, 'INFINEON')
GroupMemberList = Active_Directory_Services('GetADGroupMembersByGroupName', ADGroup, 'INFINEON')
for each GroupMember in GroupMemberList using @FM
ADUsername = LCASE(GroupMember<1,1>)
ADToLSLUserMap = Database_Services('ReadDataRow', 'APP_INFO', 'AD_TO_LSL_USER_MAP')
@ -934,9 +934,3 @@ Service CompleteScrubberPM(ScrubberID)
end
end service