added AD group support to notifications system
This commit is contained in:
@ -666,7 +666,6 @@ Service SearchIndex(TableName, ColumnName, SearchValue, UpdateIndex)
|
||||
|
||||
ServiceKeyID := '*' : TableName : '*' : ColumnName : '*' : SearchValue
|
||||
ServiceKeyID = SRP_Encode(ServiceKeyID, 'BASE64')
|
||||
* KeyIDList = Memory_Services('GetValue', ServiceKeyID, True$, 5)
|
||||
KeyIDList = ''
|
||||
|
||||
If TableName NE '' AND ColumnName NE '' AND SearchValue NE '' then
|
||||
@ -674,7 +673,7 @@ Service SearchIndex(TableName, ColumnName, SearchValue, UpdateIndex)
|
||||
DictTableHandle = Database_Services('GetTableHandle', 'DICT.' : TableName)
|
||||
If Error_Services('NoError') then
|
||||
Set_Status(0)
|
||||
If UpdateIndex then Update_Index(TableName, ColumnName 0)
|
||||
If UpdateIndex then Update_Index(TableName, ColumnName, False$, True$)
|
||||
Set_Status(0)
|
||||
Flag = ''
|
||||
Btree.Extract(ColumnName : @VM : SearchValue : @FM, Tablename, DictTableHandle, KeyIDList, 'S', Flag)
|
||||
@ -1045,3 +1044,4 @@ end service
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user