EDMI

Service.EDMIService/Results/ContainerResult.vb

@@ -1,18 +0,0 @@
-Imports DigitalData.Modules.Filesystem
-
-<Serializable>
-Public Class ContainerResult
-    Public ReadOnly OK As Boolean
-    Public ReadOnly ErrorMessage As String
-    Public Container As FileContainerInner
-
-    Public Sub New()
-        OK = True
-        ErrorMessage = Nothing
-    End Sub
-
-    Public Sub New(ErrorMessage As String)
-        OK = False
-        Me.ErrorMessage = ErrorMessage
-    End Sub
-End Class

Service.EDMIService/Results/DocumentResult.vb

@@ -1,31 +0,0 @@
-Imports System.Xml.Serialization
-
-<Serializable>
-Public Class DocumentResult
-    Inherits BaseResult
-
-    Public Document As DocumentObject
-    Public HasContents As Boolean = False
-    Public Contents As Byte()
-
-    Public Sub New(Document As DocumentObject)
-        MyBase.New()
-        Me.Document = Document
-    End Sub
-
-    Public Sub New(Document As DocumentObject, Contents As Byte())
-        MyBase.New()
-        Me.Document = Document
-        Me.Contents = Contents
-        Me.HasContents = True
-    End Sub
-
-    Public Sub New(ErrorMessage As String)
-        MyBase.New(ErrorMessage)
-    End Sub
-
-    Public Class DocumentObject
-        Public FileName As String
-        Public FileId As String
-    End Class
-End Class

Service.EDMIService/Results/DocumentResultOld.vb

@@ -1,26 +0,0 @@
-Imports DigitalData.Modules.Filesystem
-
-<Serializable>
-Public Class DocumentResultOld
-    Inherits BaseResult
-
-    Public Document As DocumentObject
-    Public HasContents As Boolean = False
-    Public Contents As Byte()
-
-    Public Sub New(Document As DocumentObject)
-        MyBase.New()
-        Me.Document = Document
-    End Sub
-
-    Public Sub New(Document As DocumentObject, Contents As Byte())
-        MyBase.New()
-        Me.Document = Document
-        Me.Contents = Contents
-        Me.HasContents = True
-    End Sub
-
-    Public Sub New(ErrorMessage As String)
-        MyBase.New(ErrorMessage)
-    End Sub
-End Class

Service.EDMIService/Results/IndexResult.vb

@@ -1,15 +0,0 @@
-<Serializable>
-Public Class IndexResult
-    Inherits BaseResult
-
-    Public ReadOnly IndexId As Int64
-
-    Public Sub New(IndexId As Int64)
-        MyBase.New()
-        Me.IndexId = IndexId
-    End Sub
-
-    Public Sub New(ErrorMessage As String)
-        MyBase.New(ErrorMessage)
-    End Sub
-End Class