EDMIService: Add dynamic file path

This commit is contained in:
Jonathan Jenne
2021-12-09 13:31:25 +01:00
parent ebecda2506
commit 42db951c93
8 changed files with 255 additions and 161 deletions

View File

@@ -37,6 +37,10 @@ Namespace IDB
End Function
Public Function UserAttributesToDictionary(pUserAttributes As List(Of UserAttributeValue)) As Dictionary(Of String, List(Of String))
If pUserAttributes Is Nothing OrElse pUserAttributes.Count = 0 Then
Return New Dictionary(Of String, List(Of String))
End If
Return pUserAttributes.ToDictionary(
Function(attr) attr.AttributeName,
Function(attr) attr.AttributeValues)