851 lines
56 KiB
VB.net
851 lines
56 KiB
VB.net
'------------------------------------------------------------------------------
|
|
' <auto-generated>
|
|
' Dieser Code wurde von einem Tool generiert.
|
|
' Laufzeitversion:4.0.30319.42000
|
|
'
|
|
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
|
' der Code erneut generiert wird.
|
|
' </auto-generated>
|
|
'------------------------------------------------------------------------------
|
|
|
|
Option Strict On
|
|
Option Explicit On
|
|
|
|
Imports System
|
|
Imports System.Runtime.Serialization
|
|
|
|
Namespace EDMIServiceReference
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.Runtime.Serialization", "4.0.0.0"), _
|
|
System.Runtime.Serialization.DataContractAttribute(Name:="BaseResult", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Messages"& _
|
|
""), _
|
|
System.SerializableAttribute(), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.ScalarResult)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.NonQueryResult)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.TableResult))> _
|
|
Partial Public Class BaseResult
|
|
Inherits Object
|
|
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
|
|
|
|
<System.NonSerializedAttribute()> _
|
|
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
|
|
|
|
<System.Runtime.Serialization.OptionalFieldAttribute()> _
|
|
Private ErrorMessageField As String
|
|
|
|
<System.Runtime.Serialization.OptionalFieldAttribute()> _
|
|
Private OKField As Boolean
|
|
|
|
<Global.System.ComponentModel.BrowsableAttribute(false)> _
|
|
Public Property ExtensionData() As System.Runtime.Serialization.ExtensionDataObject Implements System.Runtime.Serialization.IExtensibleDataObject.ExtensionData
|
|
Get
|
|
Return Me.extensionDataField
|
|
End Get
|
|
Set
|
|
Me.extensionDataField = value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Runtime.Serialization.DataMemberAttribute()> _
|
|
Public Property ErrorMessage() As String
|
|
Get
|
|
Return Me.ErrorMessageField
|
|
End Get
|
|
Set
|
|
If (Object.ReferenceEquals(Me.ErrorMessageField, value) <> true) Then
|
|
Me.ErrorMessageField = value
|
|
Me.RaisePropertyChanged("ErrorMessage")
|
|
End If
|
|
End Set
|
|
End Property
|
|
|
|
<System.Runtime.Serialization.DataMemberAttribute()> _
|
|
Public Property OK() As Boolean
|
|
Get
|
|
Return Me.OKField
|
|
End Get
|
|
Set
|
|
If (Me.OKField.Equals(value) <> true) Then
|
|
Me.OKField = value
|
|
Me.RaisePropertyChanged("OK")
|
|
End If
|
|
End Set
|
|
End Property
|
|
|
|
Public Event PropertyChanged As System.ComponentModel.PropertyChangedEventHandler Implements System.ComponentModel.INotifyPropertyChanged.PropertyChanged
|
|
|
|
Protected Sub RaisePropertyChanged(ByVal propertyName As String)
|
|
Dim propertyChanged As System.ComponentModel.PropertyChangedEventHandler = Me.PropertyChangedEvent
|
|
If (Not (propertyChanged) Is Nothing) Then
|
|
propertyChanged(Me, New System.ComponentModel.PropertyChangedEventArgs(propertyName))
|
|
End If
|
|
End Sub
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.Runtime.Serialization", "4.0.0.0"), _
|
|
System.Runtime.Serialization.DataContractAttribute(Name:="ScalarResult", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Messages"& _
|
|
""), _
|
|
System.SerializableAttribute(), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.TableResult)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.BaseResult)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.NonQueryResult)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(System.DBNull)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(System.Exception)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.BaseFault)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.DataTableDoesNotExistFault)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.ObjectDoesNotExistFault)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.RightsAccessRight))> _
|
|
Partial Public Class ScalarResult
|
|
Inherits EDMIServiceReference.BaseResult
|
|
|
|
<System.Runtime.Serialization.OptionalFieldAttribute()> _
|
|
Private ScalarField As Object
|
|
|
|
<System.Runtime.Serialization.DataMemberAttribute()> _
|
|
Public Property Scalar() As Object
|
|
Get
|
|
Return Me.ScalarField
|
|
End Get
|
|
Set
|
|
If (Object.ReferenceEquals(Me.ScalarField, value) <> true) Then
|
|
Me.ScalarField = value
|
|
Me.RaisePropertyChanged("Scalar")
|
|
End If
|
|
End Set
|
|
End Property
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.Runtime.Serialization", "4.0.0.0"), _
|
|
System.Runtime.Serialization.DataContractAttribute(Name:="NonQueryResult", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Messages"& _
|
|
""), _
|
|
System.SerializableAttribute()> _
|
|
Partial Public Class NonQueryResult
|
|
Inherits EDMIServiceReference.BaseResult
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.Runtime.Serialization", "4.0.0.0"), _
|
|
System.Runtime.Serialization.DataContractAttribute(Name:="TableResult", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Messages"& _
|
|
""), _
|
|
System.SerializableAttribute()> _
|
|
Partial Public Class TableResult
|
|
Inherits EDMIServiceReference.BaseResult
|
|
|
|
<System.Runtime.Serialization.OptionalFieldAttribute()> _
|
|
Private TableField As System.Data.DataTable
|
|
|
|
<System.Runtime.Serialization.DataMemberAttribute()> _
|
|
Public Property Table() As System.Data.DataTable
|
|
Get
|
|
Return Me.TableField
|
|
End Get
|
|
Set
|
|
If (Object.ReferenceEquals(Me.TableField, value) <> true) Then
|
|
Me.TableField = value
|
|
Me.RaisePropertyChanged("Table")
|
|
End If
|
|
End Set
|
|
End Property
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.Runtime.Serialization", "4.0.0.0"), _
|
|
System.Runtime.Serialization.DataContractAttribute(Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns"), _
|
|
System.SerializableAttribute()> _
|
|
Partial Public Class UnexpectedErrorFault
|
|
Inherits EDMIServiceReference.BaseFault
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.Runtime.Serialization", "4.0.0.0"), _
|
|
System.Runtime.Serialization.DataContractAttribute(Name:="BaseFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns"), _
|
|
System.SerializableAttribute(), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.DataTableDoesNotExistFault)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.ObjectDoesNotExistFault)), _
|
|
System.Runtime.Serialization.KnownTypeAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault))> _
|
|
Partial Public Class BaseFault
|
|
Inherits Object
|
|
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
|
|
|
|
<System.NonSerializedAttribute()> _
|
|
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
|
|
|
|
<System.Runtime.Serialization.OptionalFieldAttribute()> _
|
|
Private ErrorMessageField As String
|
|
|
|
<System.Runtime.Serialization.OptionalFieldAttribute()> _
|
|
Private InnerExceptionField As System.Exception
|
|
|
|
<System.Runtime.Serialization.OptionalFieldAttribute()> _
|
|
Private IsRecoverableField As Boolean
|
|
|
|
<Global.System.ComponentModel.BrowsableAttribute(false)> _
|
|
Public Property ExtensionData() As System.Runtime.Serialization.ExtensionDataObject Implements System.Runtime.Serialization.IExtensibleDataObject.ExtensionData
|
|
Get
|
|
Return Me.extensionDataField
|
|
End Get
|
|
Set
|
|
Me.extensionDataField = value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Runtime.Serialization.DataMemberAttribute()> _
|
|
Public Property ErrorMessage() As String
|
|
Get
|
|
Return Me.ErrorMessageField
|
|
End Get
|
|
Set
|
|
If (Object.ReferenceEquals(Me.ErrorMessageField, value) <> true) Then
|
|
Me.ErrorMessageField = value
|
|
Me.RaisePropertyChanged("ErrorMessage")
|
|
End If
|
|
End Set
|
|
End Property
|
|
|
|
<System.Runtime.Serialization.DataMemberAttribute()> _
|
|
Public Property InnerException() As System.Exception
|
|
Get
|
|
Return Me.InnerExceptionField
|
|
End Get
|
|
Set
|
|
If (Object.ReferenceEquals(Me.InnerExceptionField, value) <> true) Then
|
|
Me.InnerExceptionField = value
|
|
Me.RaisePropertyChanged("InnerException")
|
|
End If
|
|
End Set
|
|
End Property
|
|
|
|
<System.Runtime.Serialization.DataMemberAttribute()> _
|
|
Public Property IsRecoverable() As Boolean
|
|
Get
|
|
Return Me.IsRecoverableField
|
|
End Get
|
|
Set
|
|
If (Me.IsRecoverableField.Equals(value) <> true) Then
|
|
Me.IsRecoverableField = value
|
|
Me.RaisePropertyChanged("IsRecoverable")
|
|
End If
|
|
End Set
|
|
End Property
|
|
|
|
Public Event PropertyChanged As System.ComponentModel.PropertyChangedEventHandler Implements System.ComponentModel.INotifyPropertyChanged.PropertyChanged
|
|
|
|
Protected Sub RaisePropertyChanged(ByVal propertyName As String)
|
|
Dim propertyChanged As System.ComponentModel.PropertyChangedEventHandler = Me.PropertyChangedEvent
|
|
If (Not (propertyChanged) Is Nothing) Then
|
|
propertyChanged(Me, New System.ComponentModel.PropertyChangedEventArgs(propertyName))
|
|
End If
|
|
End Sub
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.Runtime.Serialization", "4.0.0.0"), _
|
|
System.Runtime.Serialization.DataContractAttribute(Name:="DataTableDoesNotExistFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns"), _
|
|
System.SerializableAttribute()> _
|
|
Partial Public Class DataTableDoesNotExistFault
|
|
Inherits EDMIServiceReference.BaseFault
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.Runtime.Serialization", "4.0.0.0"), _
|
|
System.Runtime.Serialization.DataContractAttribute(Name:="ObjectDoesNotExistFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns"), _
|
|
System.SerializableAttribute()> _
|
|
Partial Public Class ObjectDoesNotExistFault
|
|
Inherits EDMIServiceReference.BaseFault
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Runtime.Serialization", "4.0.0.0"), _
|
|
System.Runtime.Serialization.DataContractAttribute(Name:="Rights.AccessRight", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Modules.EDMI.API")> _
|
|
Public Enum RightsAccessRight As Integer
|
|
|
|
<System.Runtime.Serialization.EnumMemberAttribute()> _
|
|
VIEW_ONLY = 1
|
|
|
|
<System.Runtime.Serialization.EnumMemberAttribute()> _
|
|
VIEW_EXPORT = 2
|
|
|
|
<System.Runtime.Serialization.EnumMemberAttribute()> _
|
|
FULL = 4
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
|
|
System.ServiceModel.ServiceContractAttribute([Namespace]:="http://DigitalData.Services.EDMIService", ConfigurationName:="EDMIServiceReference.IEDMIService")> _
|
|
Public Interface IEDMIService
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/Heartbeat", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/HeartbeatResponse")> _
|
|
Function Heartbeat() As Boolean
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/Heartbeat", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/HeartbeatResponse")> _
|
|
Function HeartbeatAsync() As System.Threading.Tasks.Task(Of Boolean)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatableFromCache", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatableFromCacheResp"& _
|
|
"onse"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatableFromCacheUnex"& _
|
|
"pectedErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.DataTableDoesNotExistFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatableFromCacheData"& _
|
|
"TableDoesNotExistFaultFault", Name:="DataTableDoesNotExistFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ReturnDatatableFromCache(ByVal Name As String, ByVal FilterExpression As String, ByVal SortByColumn As String) As EDMIServiceReference.TableResult
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatableFromCache", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatableFromCacheResp"& _
|
|
"onse")> _
|
|
Function ReturnDatatableFromCacheAsync(ByVal Name As String, ByVal FilterExpression As String, ByVal SortByColumn As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.TableResult)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_Firebird", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_FirebirdResp"& _
|
|
"onse"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_FirebirdUnex"& _
|
|
"pectedErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ReturnDatatable_Firebird(ByVal SQL As String) As EDMIServiceReference.TableResult
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_Firebird", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_FirebirdResp"& _
|
|
"onse")> _
|
|
Function ReturnDatatable_FirebirdAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.TableResult)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_Firebird", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_FirebirdRespons"& _
|
|
"e"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_FirebirdUnexpec"& _
|
|
"tedErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ReturnScalar_Firebird(ByVal SQL As String) As EDMIServiceReference.ScalarResult
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_Firebird", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_FirebirdRespons"& _
|
|
"e")> _
|
|
Function ReturnScalar_FirebirdAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.ScalarResult)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_Firebird", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_FirebirdResp"& _
|
|
"onse"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_FirebirdUnex"& _
|
|
"pectedErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ExecuteNonQuery_Firebird(ByVal SQL As String) As EDMIServiceReference.NonQueryResult
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_Firebird", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_FirebirdResp"& _
|
|
"onse")> _
|
|
Function ExecuteNonQuery_FirebirdAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.NonQueryResult)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_MSSQL_IDB", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_MSSQL_IDBRes"& _
|
|
"ponse"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_MSSQL_IDBUne"& _
|
|
"xpectedErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ReturnDatatable_MSSQL_IDB(ByVal SQL As String) As EDMIServiceReference.TableResult
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_MSSQL_IDB", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_MSSQL_IDBRes"& _
|
|
"ponse")> _
|
|
Function ReturnDatatable_MSSQL_IDBAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.TableResult)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_MSSQL_IDB", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_MSSQL_IDBRespon"& _
|
|
"se"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_MSSQL_IDBUnexpe"& _
|
|
"ctedErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ReturnScalar_MSSQL_IDB(ByVal SQL As String) As EDMIServiceReference.ScalarResult
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_MSSQL_IDB", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_MSSQL_IDBRespon"& _
|
|
"se")> _
|
|
Function ReturnScalar_MSSQL_IDBAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.ScalarResult)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_MSSQL_IDB", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_MSSQL_IDBRes"& _
|
|
"ponse"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_MSSQL_IDBUne"& _
|
|
"xpectedErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ExecuteNonQuery_MSSQL_IDB(ByVal SQL As String) As EDMIServiceReference.NonQueryResult
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_MSSQL_IDB", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_MSSQL_IDBRes"& _
|
|
"ponse")> _
|
|
Function ExecuteNonQuery_MSSQL_IDBAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.NonQueryResult)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_MSSQL_ECM", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_MSSQL_ECMRes"& _
|
|
"ponse"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_MSSQL_ECMUne"& _
|
|
"xpectedErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ReturnDatatable_MSSQL_ECM(ByVal SQL As String) As EDMIServiceReference.TableResult
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_MSSQL_ECM", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnDatatable_MSSQL_ECMRes"& _
|
|
"ponse")> _
|
|
Function ReturnDatatable_MSSQL_ECMAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.TableResult)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_MSSQL_ECM", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_MSSQL_ECMRespon"& _
|
|
"se"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_MSSQL_ECMUnexpe"& _
|
|
"ctedErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ReturnScalar_MSSQL_ECM(ByVal SQL As String) As EDMIServiceReference.ScalarResult
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_MSSQL_ECM", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ReturnScalar_MSSQL_ECMRespon"& _
|
|
"se")> _
|
|
Function ReturnScalar_MSSQL_ECMAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.ScalarResult)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_MSSQL_ECM", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_MSSQL_ECMRes"& _
|
|
"ponse"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_MSSQL_ECMUne"& _
|
|
"xpectedErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ExecuteNonQuery_MSSQL_ECM(ByVal SQL As String) As EDMIServiceReference.NonQueryResult
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_MSSQL_ECM", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ExecuteNonQuery_MSSQL_ECMRes"& _
|
|
"ponse")> _
|
|
Function ExecuteNonQuery_MSSQL_ECMAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.NonQueryResult)
|
|
|
|
'CODEGEN: Der Nachrichtenvertrag wird generiert, da der Wrappername (DocumentImportRequest) von Nachricht "DocumentImportRequest" nicht mit dem Standardwert (ImportFile) übereinstimmt.
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ImportFile", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ImportFileResponse"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ImportFileUnexpectedErrorFau"& _
|
|
"ltFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ImportFile(ByVal request As EDMIServiceReference.DocumentImportRequest) As EDMIServiceReference.DocumentImportResponse
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ImportFile", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ImportFileResponse")> _
|
|
Function ImportFileAsync(ByVal request As EDMIServiceReference.DocumentImportRequest) As System.Threading.Tasks.Task(Of EDMIServiceReference.DocumentImportResponse)
|
|
|
|
'CODEGEN: Der Nachrichtenvertrag wird generiert, da der Wrappername (DocumentStreamRequest) von Nachricht "DocumentStreamRequest" nicht mit dem Standardwert (GetFileByObjectId) übereinstimmt.
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/GetFileByObjectId", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/GetFileByObjectIdResponse"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.ObjectDoesNotExistFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/GetFileByObjectIdObjectDoesN"& _
|
|
"otExistFaultFault", Name:="ObjectDoesNotExistFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/GetFileByObjectIdUnexpectedE"& _
|
|
"rrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function GetFileByObjectId(ByVal request As EDMIServiceReference.DocumentStreamRequest) As EDMIServiceReference.DocumentStreamResponse
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/GetFileByObjectId", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/GetFileByObjectIdResponse")> _
|
|
Function GetFileByObjectIdAsync(ByVal request As EDMIServiceReference.DocumentStreamRequest) As System.Threading.Tasks.Task(Of EDMIServiceReference.DocumentStreamResponse)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/GetFileInfoByObjectId", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/GetFileInfoByObjectIdRespons"& _
|
|
"e"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/GetFileInfoByObjectIdUnexpec"& _
|
|
"tedErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function GetFileInfoByObjectId(ByVal request As EDMIServiceReference.DocumentInfoRequest) As EDMIServiceReference.DocumentInfoResponse
|
|
|
|
'CODEGEN: Der Nachrichtenvertrag wird generiert, da der Vorgang mehrere Rückgabewerte aufweist.
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/GetFileInfoByObjectId", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/GetFileInfoByObjectIdRespons"& _
|
|
"e")> _
|
|
Function GetFileInfoByObjectIdAsync(ByVal request As EDMIServiceReference.DocumentInfoRequest) As System.Threading.Tasks.Task(Of EDMIServiceReference.DocumentInfoResponse)
|
|
|
|
'CODEGEN: Der Nachrichtenvertrag wird generiert, da der Vorgang ListFilesForUser weder in RPC noch in einem Dokument eingeschlossen ist.
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ListFilesForUser", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ListFilesForUserResponse"), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/ListFilesForUserUnexpectedEr"& _
|
|
"rorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function ListFilesForUser(ByVal request As EDMIServiceReference.ListFilesForUserRequest) As EDMIServiceReference.DocumentListResponse
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/ListFilesForUser", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/ListFilesForUserResponse")> _
|
|
Function ListFilesForUserAsync(ByVal request As EDMIServiceReference.ListFilesForUserRequest) As System.Threading.Tasks.Task(Of EDMIServiceReference.DocumentListResponse)
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/New_FileStore_Object", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/New_FileStore_ObjectResponse"& _
|
|
""), _
|
|
System.ServiceModel.FaultContractAttribute(GetType(EDMIServiceReference.UnexpectedErrorFault), Action:="http://DigitalData.Services.EDMIService/IEDMIService/New_FileStore_ObjectUnexpect"& _
|
|
"edErrorFaultFault", Name:="UnexpectedErrorFault", [Namespace]:="http://schemas.datacontract.org/2004/07/DigitalData.Services.EDMIService.Exceptio"& _
|
|
"ns")> _
|
|
Function New_FileStore_Object(ByVal IDB_OBJ_ID As Long, ByVal pStoreType As String, ByVal pDate As String) As String
|
|
|
|
<System.ServiceModel.OperationContractAttribute(Action:="http://DigitalData.Services.EDMIService/IEDMIService/New_FileStore_Object", ReplyAction:="http://DigitalData.Services.EDMIService/IEDMIService/New_FileStore_ObjectResponse"& _
|
|
"")> _
|
|
Function New_FileStore_ObjectAsync(ByVal IDB_OBJ_ID As Long, ByVal pStoreType As String, ByVal pDate As String) As System.Threading.Tasks.Task(Of String)
|
|
End Interface
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
|
|
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
|
|
System.ServiceModel.MessageContractAttribute(WrapperName:="DocumentImportRequest", WrapperNamespace:="http://DigitalData.Services.EDMIService", IsWrapped:=true)> _
|
|
Partial Public Class DocumentImportRequest
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=0)> _
|
|
Public Contents() As Byte
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=1)> _
|
|
Public DocumentType As String
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=2)> _
|
|
Public FileName As String
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=3)> _
|
|
Public ObjectStoreId As Long
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=4)> _
|
|
Public RetentionDays As Long
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
End Sub
|
|
|
|
Public Sub New(ByVal Contents() As Byte, ByVal DocumentType As String, ByVal FileName As String, ByVal ObjectStoreId As Long, ByVal RetentionDays As Long)
|
|
MyBase.New
|
|
Me.Contents = Contents
|
|
Me.DocumentType = DocumentType
|
|
Me.FileName = FileName
|
|
Me.ObjectStoreId = ObjectStoreId
|
|
Me.RetentionDays = RetentionDays
|
|
End Sub
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
|
|
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
|
|
System.ServiceModel.MessageContractAttribute(WrapperName:="DocumentImportResponse", WrapperNamespace:="http://DigitalData.Services.EDMIService", IsWrapped:=true)> _
|
|
Partial Public Class DocumentImportResponse
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=0)> _
|
|
Public ObjectId As Long
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
End Sub
|
|
|
|
Public Sub New(ByVal ObjectId As Long)
|
|
MyBase.New
|
|
Me.ObjectId = ObjectId
|
|
End Sub
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
|
|
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
|
|
System.ServiceModel.MessageContractAttribute(WrapperName:="DocumentStreamRequest", WrapperNamespace:="http://DigitalData.Services.EDMIService", IsWrapped:=true)> _
|
|
Partial Public Class DocumentStreamRequest
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=0)> _
|
|
Public ObjectId As Long
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
End Sub
|
|
|
|
Public Sub New(ByVal ObjectId As Long)
|
|
MyBase.New
|
|
Me.ObjectId = ObjectId
|
|
End Sub
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
|
|
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
|
|
System.ServiceModel.MessageContractAttribute(WrapperName:="DocumentStreamResponse", WrapperNamespace:="http://DigitalData.Services.EDMIService", IsWrapped:=true)> _
|
|
Partial Public Class DocumentStreamResponse
|
|
|
|
<System.ServiceModel.MessageHeaderAttribute([Namespace]:="http://DigitalData.Services.EDMIService")> _
|
|
Public FileName As String
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=0)> _
|
|
Public FileContents As System.IO.Stream
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
End Sub
|
|
|
|
Public Sub New(ByVal FileName As String, ByVal FileContents As System.IO.Stream)
|
|
MyBase.New
|
|
Me.FileName = FileName
|
|
Me.FileContents = FileContents
|
|
End Sub
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
|
|
System.ServiceModel.MessageContractAttribute(WrapperName:="DocumentInfoRequest", WrapperNamespace:="http://DigitalData.Services.EDMIService", IsWrapped:=true)> _
|
|
Partial Public Class DocumentInfoRequest
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=0)> _
|
|
Public ObjectId As Long
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=1)> _
|
|
Public UserId As Long
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
End Sub
|
|
|
|
Public Sub New(ByVal ObjectId As Long, ByVal UserId As Long)
|
|
MyBase.New
|
|
Me.ObjectId = ObjectId
|
|
Me.UserId = UserId
|
|
End Sub
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
|
|
System.ServiceModel.MessageContractAttribute(WrapperName:="DocumentInfoResponse", WrapperNamespace:="http://DigitalData.Services.EDMIService", IsWrapped:=true)> _
|
|
Partial Public Class DocumentInfoResponse
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=0)> _
|
|
Public FileRight As EDMIServiceReference.RightsAccessRight
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=1)> _
|
|
Public FullPath As String
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
End Sub
|
|
|
|
Public Sub New(ByVal FileRight As EDMIServiceReference.RightsAccessRight, ByVal FullPath As String)
|
|
MyBase.New
|
|
Me.FileRight = FileRight
|
|
Me.FullPath = FullPath
|
|
End Sub
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
|
|
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
|
|
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
|
|
Partial Public Class ListFilesForUserRequest
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
End Sub
|
|
End Class
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
|
|
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
|
|
System.ServiceModel.MessageContractAttribute(WrapperName:="DocumentListResponse", WrapperNamespace:="http://DigitalData.Services.EDMIService", IsWrapped:=true)> _
|
|
Partial Public Class DocumentListResponse
|
|
|
|
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="http://DigitalData.Services.EDMIService", Order:=0)> _
|
|
Public Datatable As System.Data.DataTable
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
End Sub
|
|
|
|
Public Sub New(ByVal Datatable As System.Data.DataTable)
|
|
MyBase.New
|
|
Me.Datatable = Datatable
|
|
End Sub
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0")> _
|
|
Public Interface IEDMIServiceChannel
|
|
Inherits EDMIServiceReference.IEDMIService, System.ServiceModel.IClientChannel
|
|
End Interface
|
|
|
|
<System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0")> _
|
|
Partial Public Class EDMIServiceClient
|
|
Inherits System.ServiceModel.ClientBase(Of EDMIServiceReference.IEDMIService)
|
|
Implements EDMIServiceReference.IEDMIService
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
End Sub
|
|
|
|
Public Sub New(ByVal endpointConfigurationName As String)
|
|
MyBase.New(endpointConfigurationName)
|
|
End Sub
|
|
|
|
Public Sub New(ByVal endpointConfigurationName As String, ByVal remoteAddress As String)
|
|
MyBase.New(endpointConfigurationName, remoteAddress)
|
|
End Sub
|
|
|
|
Public Sub New(ByVal endpointConfigurationName As String, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
|
|
MyBase.New(endpointConfigurationName, remoteAddress)
|
|
End Sub
|
|
|
|
Public Sub New(ByVal binding As System.ServiceModel.Channels.Binding, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
|
|
MyBase.New(binding, remoteAddress)
|
|
End Sub
|
|
|
|
Public Function Heartbeat() As Boolean Implements EDMIServiceReference.IEDMIService.Heartbeat
|
|
Return MyBase.Channel.Heartbeat
|
|
End Function
|
|
|
|
Public Function HeartbeatAsync() As System.Threading.Tasks.Task(Of Boolean) Implements EDMIServiceReference.IEDMIService.HeartbeatAsync
|
|
Return MyBase.Channel.HeartbeatAsync
|
|
End Function
|
|
|
|
Public Function ReturnDatatableFromCache(ByVal Name As String, ByVal FilterExpression As String, ByVal SortByColumn As String) As EDMIServiceReference.TableResult Implements EDMIServiceReference.IEDMIService.ReturnDatatableFromCache
|
|
Return MyBase.Channel.ReturnDatatableFromCache(Name, FilterExpression, SortByColumn)
|
|
End Function
|
|
|
|
Public Function ReturnDatatableFromCacheAsync(ByVal Name As String, ByVal FilterExpression As String, ByVal SortByColumn As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.TableResult) Implements EDMIServiceReference.IEDMIService.ReturnDatatableFromCacheAsync
|
|
Return MyBase.Channel.ReturnDatatableFromCacheAsync(Name, FilterExpression, SortByColumn)
|
|
End Function
|
|
|
|
Public Function ReturnDatatable_Firebird(ByVal SQL As String) As EDMIServiceReference.TableResult Implements EDMIServiceReference.IEDMIService.ReturnDatatable_Firebird
|
|
Return MyBase.Channel.ReturnDatatable_Firebird(SQL)
|
|
End Function
|
|
|
|
Public Function ReturnDatatable_FirebirdAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.TableResult) Implements EDMIServiceReference.IEDMIService.ReturnDatatable_FirebirdAsync
|
|
Return MyBase.Channel.ReturnDatatable_FirebirdAsync(SQL)
|
|
End Function
|
|
|
|
Public Function ReturnScalar_Firebird(ByVal SQL As String) As EDMIServiceReference.ScalarResult Implements EDMIServiceReference.IEDMIService.ReturnScalar_Firebird
|
|
Return MyBase.Channel.ReturnScalar_Firebird(SQL)
|
|
End Function
|
|
|
|
Public Function ReturnScalar_FirebirdAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.ScalarResult) Implements EDMIServiceReference.IEDMIService.ReturnScalar_FirebirdAsync
|
|
Return MyBase.Channel.ReturnScalar_FirebirdAsync(SQL)
|
|
End Function
|
|
|
|
Public Function ExecuteNonQuery_Firebird(ByVal SQL As String) As EDMIServiceReference.NonQueryResult Implements EDMIServiceReference.IEDMIService.ExecuteNonQuery_Firebird
|
|
Return MyBase.Channel.ExecuteNonQuery_Firebird(SQL)
|
|
End Function
|
|
|
|
Public Function ExecuteNonQuery_FirebirdAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.NonQueryResult) Implements EDMIServiceReference.IEDMIService.ExecuteNonQuery_FirebirdAsync
|
|
Return MyBase.Channel.ExecuteNonQuery_FirebirdAsync(SQL)
|
|
End Function
|
|
|
|
Public Function ReturnDatatable_MSSQL_IDB(ByVal SQL As String) As EDMIServiceReference.TableResult Implements EDMIServiceReference.IEDMIService.ReturnDatatable_MSSQL_IDB
|
|
Return MyBase.Channel.ReturnDatatable_MSSQL_IDB(SQL)
|
|
End Function
|
|
|
|
Public Function ReturnDatatable_MSSQL_IDBAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.TableResult) Implements EDMIServiceReference.IEDMIService.ReturnDatatable_MSSQL_IDBAsync
|
|
Return MyBase.Channel.ReturnDatatable_MSSQL_IDBAsync(SQL)
|
|
End Function
|
|
|
|
Public Function ReturnScalar_MSSQL_IDB(ByVal SQL As String) As EDMIServiceReference.ScalarResult Implements EDMIServiceReference.IEDMIService.ReturnScalar_MSSQL_IDB
|
|
Return MyBase.Channel.ReturnScalar_MSSQL_IDB(SQL)
|
|
End Function
|
|
|
|
Public Function ReturnScalar_MSSQL_IDBAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.ScalarResult) Implements EDMIServiceReference.IEDMIService.ReturnScalar_MSSQL_IDBAsync
|
|
Return MyBase.Channel.ReturnScalar_MSSQL_IDBAsync(SQL)
|
|
End Function
|
|
|
|
Public Function ExecuteNonQuery_MSSQL_IDB(ByVal SQL As String) As EDMIServiceReference.NonQueryResult Implements EDMIServiceReference.IEDMIService.ExecuteNonQuery_MSSQL_IDB
|
|
Return MyBase.Channel.ExecuteNonQuery_MSSQL_IDB(SQL)
|
|
End Function
|
|
|
|
Public Function ExecuteNonQuery_MSSQL_IDBAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.NonQueryResult) Implements EDMIServiceReference.IEDMIService.ExecuteNonQuery_MSSQL_IDBAsync
|
|
Return MyBase.Channel.ExecuteNonQuery_MSSQL_IDBAsync(SQL)
|
|
End Function
|
|
|
|
Public Function ReturnDatatable_MSSQL_ECM(ByVal SQL As String) As EDMIServiceReference.TableResult Implements EDMIServiceReference.IEDMIService.ReturnDatatable_MSSQL_ECM
|
|
Return MyBase.Channel.ReturnDatatable_MSSQL_ECM(SQL)
|
|
End Function
|
|
|
|
Public Function ReturnDatatable_MSSQL_ECMAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.TableResult) Implements EDMIServiceReference.IEDMIService.ReturnDatatable_MSSQL_ECMAsync
|
|
Return MyBase.Channel.ReturnDatatable_MSSQL_ECMAsync(SQL)
|
|
End Function
|
|
|
|
Public Function ReturnScalar_MSSQL_ECM(ByVal SQL As String) As EDMIServiceReference.ScalarResult Implements EDMIServiceReference.IEDMIService.ReturnScalar_MSSQL_ECM
|
|
Return MyBase.Channel.ReturnScalar_MSSQL_ECM(SQL)
|
|
End Function
|
|
|
|
Public Function ReturnScalar_MSSQL_ECMAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.ScalarResult) Implements EDMIServiceReference.IEDMIService.ReturnScalar_MSSQL_ECMAsync
|
|
Return MyBase.Channel.ReturnScalar_MSSQL_ECMAsync(SQL)
|
|
End Function
|
|
|
|
Public Function ExecuteNonQuery_MSSQL_ECM(ByVal SQL As String) As EDMIServiceReference.NonQueryResult Implements EDMIServiceReference.IEDMIService.ExecuteNonQuery_MSSQL_ECM
|
|
Return MyBase.Channel.ExecuteNonQuery_MSSQL_ECM(SQL)
|
|
End Function
|
|
|
|
Public Function ExecuteNonQuery_MSSQL_ECMAsync(ByVal SQL As String) As System.Threading.Tasks.Task(Of EDMIServiceReference.NonQueryResult) Implements EDMIServiceReference.IEDMIService.ExecuteNonQuery_MSSQL_ECMAsync
|
|
Return MyBase.Channel.ExecuteNonQuery_MSSQL_ECMAsync(SQL)
|
|
End Function
|
|
|
|
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Function EDMIServiceReference_IEDMIService_ImportFile(ByVal request As EDMIServiceReference.DocumentImportRequest) As EDMIServiceReference.DocumentImportResponse Implements EDMIServiceReference.IEDMIService.ImportFile
|
|
Return MyBase.Channel.ImportFile(request)
|
|
End Function
|
|
|
|
Public Function ImportFile(ByVal Contents() As Byte, ByVal DocumentType As String, ByVal FileName As String, ByVal ObjectStoreId As Long, ByVal RetentionDays As Long) As Long
|
|
Dim inValue As EDMIServiceReference.DocumentImportRequest = New EDMIServiceReference.DocumentImportRequest()
|
|
inValue.Contents = Contents
|
|
inValue.DocumentType = DocumentType
|
|
inValue.FileName = FileName
|
|
inValue.ObjectStoreId = ObjectStoreId
|
|
inValue.RetentionDays = RetentionDays
|
|
Dim retVal As EDMIServiceReference.DocumentImportResponse = CType(Me,EDMIServiceReference.IEDMIService).ImportFile(inValue)
|
|
Return retVal.ObjectId
|
|
End Function
|
|
|
|
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Function EDMIServiceReference_IEDMIService_ImportFileAsync(ByVal request As EDMIServiceReference.DocumentImportRequest) As System.Threading.Tasks.Task(Of EDMIServiceReference.DocumentImportResponse) Implements EDMIServiceReference.IEDMIService.ImportFileAsync
|
|
Return MyBase.Channel.ImportFileAsync(request)
|
|
End Function
|
|
|
|
Public Function ImportFileAsync(ByVal Contents() As Byte, ByVal DocumentType As String, ByVal FileName As String, ByVal ObjectStoreId As Long, ByVal RetentionDays As Long) As System.Threading.Tasks.Task(Of EDMIServiceReference.DocumentImportResponse)
|
|
Dim inValue As EDMIServiceReference.DocumentImportRequest = New EDMIServiceReference.DocumentImportRequest()
|
|
inValue.Contents = Contents
|
|
inValue.DocumentType = DocumentType
|
|
inValue.FileName = FileName
|
|
inValue.ObjectStoreId = ObjectStoreId
|
|
inValue.RetentionDays = RetentionDays
|
|
Return CType(Me,EDMIServiceReference.IEDMIService).ImportFileAsync(inValue)
|
|
End Function
|
|
|
|
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Function EDMIServiceReference_IEDMIService_GetFileByObjectId(ByVal request As EDMIServiceReference.DocumentStreamRequest) As EDMIServiceReference.DocumentStreamResponse Implements EDMIServiceReference.IEDMIService.GetFileByObjectId
|
|
Return MyBase.Channel.GetFileByObjectId(request)
|
|
End Function
|
|
|
|
Public Function GetFileByObjectId(ByVal ObjectId As Long, <System.Runtime.InteropServices.OutAttribute()> ByRef FileContents As System.IO.Stream) As String
|
|
Dim inValue As EDMIServiceReference.DocumentStreamRequest = New EDMIServiceReference.DocumentStreamRequest()
|
|
inValue.ObjectId = ObjectId
|
|
Dim retVal As EDMIServiceReference.DocumentStreamResponse = CType(Me,EDMIServiceReference.IEDMIService).GetFileByObjectId(inValue)
|
|
FileContents = retVal.FileContents
|
|
Return retVal.FileName
|
|
End Function
|
|
|
|
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Function EDMIServiceReference_IEDMIService_GetFileByObjectIdAsync(ByVal request As EDMIServiceReference.DocumentStreamRequest) As System.Threading.Tasks.Task(Of EDMIServiceReference.DocumentStreamResponse) Implements EDMIServiceReference.IEDMIService.GetFileByObjectIdAsync
|
|
Return MyBase.Channel.GetFileByObjectIdAsync(request)
|
|
End Function
|
|
|
|
Public Function GetFileByObjectIdAsync(ByVal ObjectId As Long) As System.Threading.Tasks.Task(Of EDMIServiceReference.DocumentStreamResponse)
|
|
Dim inValue As EDMIServiceReference.DocumentStreamRequest = New EDMIServiceReference.DocumentStreamRequest()
|
|
inValue.ObjectId = ObjectId
|
|
Return CType(Me,EDMIServiceReference.IEDMIService).GetFileByObjectIdAsync(inValue)
|
|
End Function
|
|
|
|
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Function EDMIServiceReference_IEDMIService_GetFileInfoByObjectId(ByVal request As EDMIServiceReference.DocumentInfoRequest) As EDMIServiceReference.DocumentInfoResponse Implements EDMIServiceReference.IEDMIService.GetFileInfoByObjectId
|
|
Return MyBase.Channel.GetFileInfoByObjectId(request)
|
|
End Function
|
|
|
|
Public Function GetFileInfoByObjectId(ByVal ObjectId As Long, ByVal UserId As Long, <System.Runtime.InteropServices.OutAttribute()> ByRef FullPath As String) As EDMIServiceReference.RightsAccessRight
|
|
Dim inValue As EDMIServiceReference.DocumentInfoRequest = New EDMIServiceReference.DocumentInfoRequest()
|
|
inValue.ObjectId = ObjectId
|
|
inValue.UserId = UserId
|
|
Dim retVal As EDMIServiceReference.DocumentInfoResponse = CType(Me,EDMIServiceReference.IEDMIService).GetFileInfoByObjectId(inValue)
|
|
FullPath = retVal.FullPath
|
|
Return retVal.FileRight
|
|
End Function
|
|
|
|
Public Function GetFileInfoByObjectIdAsync(ByVal request As EDMIServiceReference.DocumentInfoRequest) As System.Threading.Tasks.Task(Of EDMIServiceReference.DocumentInfoResponse) Implements EDMIServiceReference.IEDMIService.GetFileInfoByObjectIdAsync
|
|
Return MyBase.Channel.GetFileInfoByObjectIdAsync(request)
|
|
End Function
|
|
|
|
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Function EDMIServiceReference_IEDMIService_ListFilesForUser(ByVal request As EDMIServiceReference.ListFilesForUserRequest) As EDMIServiceReference.DocumentListResponse Implements EDMIServiceReference.IEDMIService.ListFilesForUser
|
|
Return MyBase.Channel.ListFilesForUser(request)
|
|
End Function
|
|
|
|
Public Function ListFilesForUser() As System.Data.DataTable
|
|
Dim inValue As EDMIServiceReference.ListFilesForUserRequest = New EDMIServiceReference.ListFilesForUserRequest()
|
|
Dim retVal As EDMIServiceReference.DocumentListResponse = CType(Me,EDMIServiceReference.IEDMIService).ListFilesForUser(inValue)
|
|
Return retVal.Datatable
|
|
End Function
|
|
|
|
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Function EDMIServiceReference_IEDMIService_ListFilesForUserAsync(ByVal request As EDMIServiceReference.ListFilesForUserRequest) As System.Threading.Tasks.Task(Of EDMIServiceReference.DocumentListResponse) Implements EDMIServiceReference.IEDMIService.ListFilesForUserAsync
|
|
Return MyBase.Channel.ListFilesForUserAsync(request)
|
|
End Function
|
|
|
|
Public Function ListFilesForUserAsync() As System.Threading.Tasks.Task(Of EDMIServiceReference.DocumentListResponse)
|
|
Dim inValue As EDMIServiceReference.ListFilesForUserRequest = New EDMIServiceReference.ListFilesForUserRequest()
|
|
Return CType(Me,EDMIServiceReference.IEDMIService).ListFilesForUserAsync(inValue)
|
|
End Function
|
|
|
|
Public Function New_FileStore_Object(ByVal IDB_OBJ_ID As Long, ByVal pStoreType As String, ByVal pDate As String) As String Implements EDMIServiceReference.IEDMIService.New_FileStore_Object
|
|
Return MyBase.Channel.New_FileStore_Object(IDB_OBJ_ID, pStoreType, pDate)
|
|
End Function
|
|
|
|
Public Function New_FileStore_ObjectAsync(ByVal IDB_OBJ_ID As Long, ByVal pStoreType As String, ByVal pDate As String) As System.Threading.Tasks.Task(Of String) Implements EDMIServiceReference.IEDMIService.New_FileStore_ObjectAsync
|
|
Return MyBase.Channel.New_FileStore_ObjectAsync(IDB_OBJ_ID, pStoreType, pDate)
|
|
End Function
|
|
End Class
|
|
End Namespace
|