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

7
LSL2/STPROC/NOTES_SERVICES.txt
View File

@ -56,6 +56,7 @@ $Insert LSL_USERS_EQUATES
$Insert EMAIL_BOX_EQUATES
$Insert NOTES_QUEUE_EQUATES
$Insert NOTIFICATION_EQUATES
$Insert SEC_GROUPS_EQUATES
Declare function Database_Services, obj_Notes_Sent, Get_Status, Error_Services, Obj_Tables, Datetime, SRP_Datetime
Declare function SRP_Array, Environment_Services, Logging_Services, RTI_CreateGuid, LSL_Users_Services
@ -375,7 +376,11 @@ Service SendNotes()
end
end
If RowExists('SEC_GROUPS', GroupID) then
! Todo: Add SEC_GROUPS support
GroupRec = Database_Services('ReadDataRow', 'SEC_GROUPS', GroupID)
If Error_Services('NoError') then
GroupUsers = GroupRec<SEC_GROUPS_USER$>
SecGroupRecipients = GroupUsers
end
end
GroupRecipients = SRP_Array('Join', NotifyGroupRecipients, GroupRecipients, 'OR', @VM)
GroupRecipients = SRP_Array('Join', SecGroupRecipients, GroupRecipients, 'OR', @VM)