EDMI: final changes to Client
This commit is contained in:
@@ -581,10 +581,7 @@ Public Class EDMIService
|
||||
|
||||
Public Function ImportFileIntoFileObject(Data As ImportFileIntoFileObjectRequest) As ImportFileIntoFileObjectResponse Implements IEDMIService.ImportFileIntoFileObject
|
||||
Try
|
||||
Dim oObjectStore = GlobalState.ObjectStores.
|
||||
Where(Function(o) o.Title = Data.ObjectStoreType).
|
||||
FirstOrDefault()
|
||||
|
||||
Dim oObjectStore = GlobalState.GetObjectStore(Data.ObjectStoreType)
|
||||
If oObjectStore Is Nothing Then
|
||||
Throw New KeyNotFoundException($"ObjectStore [{Data.ObjectStoreType}] was not found.")
|
||||
End If
|
||||
|
||||
@@ -43,6 +43,12 @@ Public Class GlobalState
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Function GetObjectStore(Name As String) As ObjectStore
|
||||
Return ObjectStores.
|
||||
Where(Function(o) o.Title.ToUpper = Name.ToUpper).
|
||||
FirstOrDefault()
|
||||
End Function
|
||||
|
||||
Class ObjectStore
|
||||
Public Id As Long
|
||||
Public Title As String
|
||||
|
||||
Reference in New Issue
Block a user