AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

EDMIService: Update for Annette GmbH

Browse Source
This commit is contained in:
Jonathan Jenne
2021-11-25 15:55:45 +01:00
parent 6df72b07ad
commit 8846a5bf1c
10 changed files with 268 additions and 250 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Service.EDMIService/Helpers/AccessRightResult.vb
View File

@@ -6,7 +6,7 @@ Namespace Messages
<DataContract>
<Serializable>
Public Class AccessRightResult
Inherits BaseResult
Inherits BaseResponse
<DataMember>
Public Property Right As AccessRight = AccessRight.VIEW_ONLY

2
Service.EDMIService/Helpers/BaseResult.vb → Service.EDMIService/Helpers/BaseResponse.vb
View File

@@ -4,7 +4,7 @@ Namespace Messages
<Serializable>
<DataContract>
<KnownType(GetType(DBNull))>
Public MustInherit Class BaseResult
Public MustInherit Class BaseResponse
<DataMember>
Public Property OK As Boolean
<DataMember>

6
Service.EDMIService/Helpers/DatabaseResult.vb
View File

@@ -6,7 +6,7 @@ Namespace Messages
<DataContract>
<KnownType(GetType(DBNull))>
Public Class TableResult
Inherits BaseResult
Inherits BaseResponse
<DataMember>
Public Property Table As DataTable
@@ -25,7 +25,7 @@ Namespace Messages
<DataContract>
<KnownType(GetType(DBNull))>
Public Class ScalarResult
Inherits BaseResult
Inherits BaseResponse
<DataMember>
Public Property Scalar As Object
@@ -44,7 +44,7 @@ Namespace Messages
<DataContract>
<KnownType(GetType(DBNull))>
Public Class NonQueryResult
Inherits BaseResult
Inherits BaseResponse
Public Sub New()
MyBase.New()

58
Service.EDMIService/Helpers/Messages.vb
View File

@@ -26,64 +26,6 @@ Namespace Messages
Public ObjectId As Long
End Class
#End Region
#Region "FileImport 2021"
<MessageContract>
Public Class ImportFileIntoFileObjectRequest
<MessageBodyMember>
Public Contents() As Byte
<MessageBodyMember>
Public Who As String
<MessageBodyMember>
Public FilePath As String
<MessageBodyMember>
Public ObjectId As Long
<MessageBodyMember>
Public ObjectStoreType As String
End Class
<MessageContract>
Public Class ImportFileIntoFileObjectResponse
<MessageBodyMember>
Public Result As Boolean
End Class
<MessageContract>
Public Class NewObjectIdRequest
<MessageBodyMember>
Public KindType As String
<MessageBodyMember>
Public Who As String
<MessageBodyMember>
Public BusinessEntity As String
End Class
<MessageContract>
Public Class NewObjectIdResponse
<MessageBodyMember>
Public ObjectId As Long
End Class
<MessageContract>
Public Class NewFileObjectRequest
<MessageBodyMember>
Public ObjectId As Long
<MessageBodyMember>
Public StoreType As String
<MessageBodyMember>
Public DateImported As Date
<MessageBodyMember>
Public Extension As String
<MessageBodyMember>
Public KeepExtension As Boolean
End Class
<MessageContract>
Public Class NewFileObjectResponse
<MessageBodyMember>
Public FileObjectPath As String
End Class
#End Region
#Region "DocumentStream"
<MessageContract>