'------------------------------------------------------------------------------
'
' 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.
'
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Imports System
Imports System.Runtime.Serialization
Namespace EDMIServiceReference
Partial Public Class BaseResponse
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private ErrorDetailsField As String
Private ErrorMessageField As String
Private OKField As Boolean
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
Public Property ErrorDetails() As String
Get
Return Me.ErrorDetailsField
End Get
Set
If (Object.ReferenceEquals(Me.ErrorDetailsField, Value) <> True) Then
Me.ErrorDetailsField = Value
Me.RaisePropertyChanged("ErrorDetails")
End If
End Set
End Property
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
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
Partial Public Class TableResult
Inherits EDMIServiceReference.BaseResponse
Private TableField As System.Data.DataTable
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
Partial Public Class ScalarResult
Inherits EDMIServiceReference.BaseResponse
Private ScalarField As Object
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
Partial Public Class NonQueryResult
Inherits EDMIServiceReference.BaseResponse
End Class
Partial Public Class GetDatatableResponse
Inherits EDMIServiceReference.BaseResponse
Private TableField As System.Data.DataTable
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
Partial Public Class GetScalarValueResponse
Inherits EDMIServiceReference.BaseResponse
Private ScalarField As Object
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
Partial Public Class ExecuteNonQueryResponse
Inherits EDMIServiceReference.BaseResponse
Private ResultField As Boolean
Public Property Result() As Boolean
Get
Return Me.ResultField
End Get
Set
If (Me.ResultField.Equals(Value) <> True) Then
Me.ResultField = Value
Me.RaisePropertyChanged("Result")
End If
End Set
End Property
End Class
Partial Public Class NewFileResponse
Inherits EDMIServiceReference.BaseResponse
Private ObjectIdField As Long
Public Property ObjectId() As Long
Get
Return Me.ObjectIdField
End Get
Set
If (Me.ObjectIdField.Equals(Value) <> True) Then
Me.ObjectIdField = Value
Me.RaisePropertyChanged("ObjectId")
End If
End Set
End Property
End Class
Partial Public Class UpdateFileResponse
Inherits EDMIServiceReference.BaseResponse
Private ObjectIdField As Long
Public Property ObjectId() As Long
Get
Return Me.ObjectIdField
End Get
Set
If (Me.ObjectIdField.Equals(Value) <> True) Then
Me.ObjectIdField = Value
Me.RaisePropertyChanged("ObjectId")
End If
End Set
End Property
End Class
Partial Public Class SetAttributeValueResponse
Inherits EDMIServiceReference.BaseResponse
Private ObjectIdField As Long
Public Property ObjectId() As Long
Get
Return Me.ObjectIdField
End Get
Set
If (Me.ObjectIdField.Equals(Value) <> True) Then
Me.ObjectIdField = Value
Me.RaisePropertyChanged("ObjectId")
End If
End Set
End Property
End Class
Partial Public Class GetAttributeValueResponse
Inherits EDMIServiceReference.BaseResponse
Private ObjectIdField As Long
Private ValueField As Object
Public Property ObjectId() As Long
Get
Return Me.ObjectIdField
End Get
Set
If (Me.ObjectIdField.Equals(Value) <> True) Then
Me.ObjectIdField = Value
Me.RaisePropertyChanged("ObjectId")
End If
End Set
End Property
Public Property Value() As Object
Get
Return Me.ValueField
End Get
Set
If (Object.ReferenceEquals(Me.ValueField, Value) <> True) Then
Me.ValueField = Value
Me.RaisePropertyChanged("Value")
End If
End Set
End Property
End Class
Partial Public Class GetFileObjectResponse
Inherits EDMIServiceReference.BaseResponse
Private FileObjectField As EDMIServiceReference.FileObject
Public Property FileObject() As EDMIServiceReference.FileObject
Get
Return Me.FileObjectField
End Get
Set
If (Object.ReferenceEquals(Me.FileObjectField, Value) <> True) Then
Me.FileObjectField = Value
Me.RaisePropertyChanged("FileObject")
End If
End Set
End Property
End Class
Partial Public Class CheckInOutFileResponse
Inherits EDMIServiceReference.BaseResponse
Private ObjectIdField As Long
Public Property ObjectId() As Long
Get
Return Me.ObjectIdField
End Get
Set
If (Me.ObjectIdField.Equals(Value) <> True) Then
Me.ObjectIdField = Value
Me.RaisePropertyChanged("ObjectId")
End If
End Set
End Property
End Class
Partial Public Class ImportFileResponse
Inherits EDMIServiceReference.BaseResponse
Private ObjectIdField As Long
Public Property ObjectId() As Long
Get
Return Me.ObjectIdField
End Get
Set
If (Me.ObjectIdField.Equals(Value) <> True) Then
Me.ObjectIdField = Value
Me.RaisePropertyChanged("ObjectId")
End If
End Set
End Property
End Class
Partial Public Class Globix_ImportFileResponse
Inherits EDMIServiceReference.BaseResponse
Private ObjectIdField As Long
Public Property ObjectId() As Long
Get
Return Me.ObjectIdField
End Get
Set
If (Me.ObjectIdField.Equals(Value) <> True) Then
Me.ObjectIdField = Value
Me.RaisePropertyChanged("ObjectId")
End If
End Set
End Property
End Class
Partial Public Class GetClientConfigResponse
Inherits EDMIServiceReference.BaseResponse
Private ClientConfigField As EDMIServiceReference.GlobalStateClientConfiguration
Public Property ClientConfig() As EDMIServiceReference.GlobalStateClientConfiguration
Get
Return Me.ClientConfigField
End Get
Set
If (Object.ReferenceEquals(Me.ClientConfigField, Value) <> True) Then
Me.ClientConfigField = Value
Me.RaisePropertyChanged("ClientConfig")
End If
End Set
End Property
End Class
Partial Public Class ServiceStatusResponse
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private ActiveSessionCountField As Integer
Private ActiveUsersField As System.Collections.Generic.List(Of String)
Private ActiveSessionsField As System.Collections.Generic.Dictionary(Of String, String)
Private TimestampField As Date
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
Public Property ActiveSessionCount() As Integer
Get
Return Me.ActiveSessionCountField
End Get
Set
If (Me.ActiveSessionCountField.Equals(Value) <> True) Then
Me.ActiveSessionCountField = Value
Me.RaisePropertyChanged("ActiveSessionCount")
End If
End Set
End Property
Public Property ActiveUsers() As System.Collections.Generic.List(Of String)
Get
Return Me.ActiveUsersField
End Get
Set
If (Object.ReferenceEquals(Me.ActiveUsersField, Value) <> True) Then
Me.ActiveUsersField = Value
Me.RaisePropertyChanged("ActiveUsers")
End If
End Set
End Property
Public Property ActiveSessions() As System.Collections.Generic.Dictionary(Of String, String)
Get
Return Me.ActiveSessionsField
End Get
Set
If (Object.ReferenceEquals(Me.ActiveSessionsField, Value) <> True) Then
Me.ActiveSessionsField = Value
Me.RaisePropertyChanged("ActiveSessions")
End If
End Set
End Property
Public Property Timestamp() As Date
Get
Return Me.TimestampField
End Get
Set
If (Me.TimestampField.Equals(Value) <> True) Then
Me.TimestampField = Value
Me.RaisePropertyChanged("Timestamp")
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
Partial Public Class GlobalStateClientConfiguration
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private ConnectionStringECMField As String
Private ConnectionStringIDBField As String
Private DocumentTypesField() As EDMIServiceReference.GlobalStateDoctype
Private ForceDirectDatabaseAccessField As Boolean
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
Public Property ConnectionStringECM() As String
Get
Return Me.ConnectionStringECMField
End Get
Set
If (Object.ReferenceEquals(Me.ConnectionStringECMField, Value) <> True) Then
Me.ConnectionStringECMField = Value
Me.RaisePropertyChanged("ConnectionStringECM")
End If
End Set
End Property
Public Property ConnectionStringIDB() As String
Get
Return Me.ConnectionStringIDBField
End Get
Set
If (Object.ReferenceEquals(Me.ConnectionStringIDBField, Value) <> True) Then
Me.ConnectionStringIDBField = Value
Me.RaisePropertyChanged("ConnectionStringIDB")
End If
End Set
End Property
Public Property DocumentTypes() As EDMIServiceReference.GlobalStateDoctype()
Get
Return Me.DocumentTypesField
End Get
Set
If (Object.ReferenceEquals(Me.DocumentTypesField, Value) <> True) Then
Me.DocumentTypesField = Value
Me.RaisePropertyChanged("DocumentTypes")
End If
End Set
End Property
Public Property ForceDirectDatabaseAccess() As Boolean
Get
Return Me.ForceDirectDatabaseAccessField
End Get
Set
If (Me.ForceDirectDatabaseAccessField.Equals(Value) <> True) Then
Me.ForceDirectDatabaseAccessField = Value
Me.RaisePropertyChanged("ForceDirectDatabaseAccess")
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
Partial Public Class GlobalStateDoctype
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private FileChangedActionField As String
Private NameField As String
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
Public Property FileChangedAction() As String
Get
Return Me.FileChangedActionField
End Get
Set
If (Object.ReferenceEquals(Me.FileChangedActionField, Value) <> True) Then
Me.FileChangedActionField = Value
Me.RaisePropertyChanged("FileChangedAction")
End If
End Set
End Property
Public Property Name() As String
Get
Return Me.NameField
End Get
Set
If (Object.ReferenceEquals(Me.NameField, Value) <> True) Then
Me.NameField = Value
Me.RaisePropertyChanged("Name")
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
Partial Public Class UnexpectedErrorFault
Inherits EDMIServiceReference.BaseFault
End Class
Partial Public Class BaseFault
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private ErrorMessageField As String
Private InnerExceptionField As System.Exception
Private IsRecoverableField As Boolean
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
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
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
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
Partial Public Class DataTableDoesNotExistFault
Inherits EDMIServiceReference.BaseFault
End Class
Partial Public Class ObjectDoesNotExistFault
Inherits EDMIServiceReference.BaseFault
End Class
Partial Public Class GetDatatableRequest
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private ConnectionIdField As Integer
Private DatabaseTypeField As EDMIServiceReference.DatabaseType
Private NamedDatabaseField As EDMIServiceReference.DatabaseName
Private SqlCommandField As String
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
Public Property ConnectionId() As Integer
Get
Return Me.ConnectionIdField
End Get
Set
If (Me.ConnectionIdField.Equals(Value) <> True) Then
Me.ConnectionIdField = Value
Me.RaisePropertyChanged("ConnectionId")
End If
End Set
End Property
Public Property DatabaseType() As EDMIServiceReference.DatabaseType
Get
Return Me.DatabaseTypeField
End Get
Set
If (Me.DatabaseTypeField.Equals(Value) <> True) Then
Me.DatabaseTypeField = Value
Me.RaisePropertyChanged("DatabaseType")
End If
End Set
End Property
Public Property NamedDatabase() As EDMIServiceReference.DatabaseName
Get
Return Me.NamedDatabaseField
End Get
Set
If (Me.NamedDatabaseField.Equals(Value) <> True) Then
Me.NamedDatabaseField = Value
Me.RaisePropertyChanged("NamedDatabase")
End If
End Set
End Property
Public Property SqlCommand() As String
Get
Return Me.SqlCommandField
End Get
Set
If (Object.ReferenceEquals(Me.SqlCommandField, Value) <> True) Then
Me.SqlCommandField = Value
Me.RaisePropertyChanged("SqlCommand")
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
Public Enum DatabaseType As Integer
MSSQL = 0
Oracle = 1
ODBC = 2
End Enum
Public Enum DatabaseName As Integer
None = 0
ECM = 1
IDB = 2
End Enum
Partial Public Class GetScalarValueRequest
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private ConnectionIdField As Integer
Private DatabaseTypeField As EDMIServiceReference.DatabaseType
Private NamedDatabaseField As EDMIServiceReference.DatabaseName
Private SqlCommandField As String
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
Public Property ConnectionId() As Integer
Get
Return Me.ConnectionIdField
End Get
Set
If (Me.ConnectionIdField.Equals(Value) <> True) Then
Me.ConnectionIdField = Value
Me.RaisePropertyChanged("ConnectionId")
End If
End Set
End Property
Public Property DatabaseType() As EDMIServiceReference.DatabaseType
Get
Return Me.DatabaseTypeField
End Get
Set
If (Me.DatabaseTypeField.Equals(Value) <> True) Then
Me.DatabaseTypeField = Value
Me.RaisePropertyChanged("DatabaseType")
End If
End Set
End Property
Public Property NamedDatabase() As EDMIServiceReference.DatabaseName
Get
Return Me.NamedDatabaseField
End Get
Set
If (Me.NamedDatabaseField.Equals(Value) <> True) Then
Me.NamedDatabaseField = Value
Me.RaisePropertyChanged("NamedDatabase")
End If
End Set
End Property
Public Property SqlCommand() As String
Get
Return Me.SqlCommandField
End Get
Set
If (Object.ReferenceEquals(Me.SqlCommandField, Value) <> True) Then
Me.SqlCommandField = Value
Me.RaisePropertyChanged("SqlCommand")
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
Partial Public Class ExecuteNonQueryRequest
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private ConnectionIdField As Integer
Private DatabaseTypeField As EDMIServiceReference.DatabaseType
Private NamedDatabaseField As EDMIServiceReference.DatabaseName
Private SqlCommandField As String
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
Public Property ConnectionId() As Integer
Get
Return Me.ConnectionIdField
End Get
Set
If (Me.ConnectionIdField.Equals(Value) <> True) Then
Me.ConnectionIdField = Value
Me.RaisePropertyChanged("ConnectionId")
End If
End Set
End Property
Public Property DatabaseType() As EDMIServiceReference.DatabaseType
Get
Return Me.DatabaseTypeField
End Get
Set
If (Me.DatabaseTypeField.Equals(Value) <> True) Then
Me.DatabaseTypeField = Value
Me.RaisePropertyChanged("DatabaseType")
End If
End Set
End Property
Public Property NamedDatabase() As EDMIServiceReference.DatabaseName
Get
Return Me.NamedDatabaseField
End Get
Set
If (Me.NamedDatabaseField.Equals(Value) <> True) Then
Me.NamedDatabaseField = Value
Me.RaisePropertyChanged("NamedDatabase")
End If
End Set
End Property
Public Property SqlCommand() As String
Get
Return Me.SqlCommandField
End Get
Set
If (Object.ReferenceEquals(Me.SqlCommandField, Value) <> True) Then
Me.SqlCommandField = Value
Me.RaisePropertyChanged("SqlCommand")
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
Partial Public Class NewFileRequest
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private FileField As EDMIServiceReference.FileProperties
Private IDBDoctypeIdField As Long
Private KindTypeField As String
Private StoreNameField As String
Private UserField As EDMIServiceReference.UserState
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
Public Property File() As EDMIServiceReference.FileProperties
Get
Return Me.FileField
End Get
Set
If (Object.ReferenceEquals(Me.FileField, Value) <> True) Then
Me.FileField = Value
Me.RaisePropertyChanged("File")
End If
End Set
End Property
Public Property IDBDoctypeId() As Long
Get
Return Me.IDBDoctypeIdField
End Get
Set
If (Me.IDBDoctypeIdField.Equals(Value) <> True) Then
Me.IDBDoctypeIdField = Value
Me.RaisePropertyChanged("IDBDoctypeId")
End If
End Set
End Property
Public Property KindType() As String
Get
Return Me.KindTypeField
End Get
Set
If (Object.ReferenceEquals(Me.KindTypeField, Value) <> True) Then
Me.KindTypeField = Value
Me.RaisePropertyChanged("KindType")
End If
End Set
End Property
Public Property StoreName() As String
Get
Return Me.StoreNameField
End Get
Set
If (Object.ReferenceEquals(Me.StoreNameField, Value) <> True) Then
Me.StoreNameField = Value
Me.RaisePropertyChanged("StoreName")
End If
End Set
End Property
Public Property User() As EDMIServiceReference.UserState
Get
Return Me.UserField
End Get
Set
If (Object.ReferenceEquals(Me.UserField, Value) <> True) Then
Me.UserField = Value
Me.RaisePropertyChanged("User")
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
Partial Public Class FileProperties
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private FileChangedAtField As String
Private FileChecksumField As String
Private FileContentsField() As Byte
Private FileCreatedAtField As String
Private FileImportedAtField As Date
Private FileInfoRawField As System.IO.FileInfo
Private FileNameField As String
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
Public Property FileChangedAt() As String
Get
Return Me.FileChangedAtField
End Get
Set
If (Object.ReferenceEquals(Me.FileChangedAtField, Value) <> True) Then
Me.FileChangedAtField = Value
Me.RaisePropertyChanged("FileChangedAt")
End If
End Set
End Property
Public Property FileChecksum() As String
Get
Return Me.FileChecksumField
End Get
Set
If (Object.ReferenceEquals(Me.FileChecksumField, Value) <> True) Then
Me.FileChecksumField = Value
Me.RaisePropertyChanged("FileChecksum")
End If
End Set
End Property
Public Property FileContents() As Byte()
Get
Return Me.FileContentsField
End Get
Set
If (Object.ReferenceEquals(Me.FileContentsField, Value) <> True) Then
Me.FileContentsField = Value
Me.RaisePropertyChanged("FileContents")
End If
End Set
End Property
Public Property FileCreatedAt() As String
Get
Return Me.FileCreatedAtField
End Get
Set
If (Object.ReferenceEquals(Me.FileCreatedAtField, Value) <> True) Then
Me.FileCreatedAtField = Value
Me.RaisePropertyChanged("FileCreatedAt")
End If
End Set
End Property
Public Property FileImportedAt() As Date
Get
Return Me.FileImportedAtField
End Get
Set
If (Me.FileImportedAtField.Equals(Value) <> True) Then
Me.FileImportedAtField = Value
Me.RaisePropertyChanged("FileImportedAt")
End If
End Set
End Property
Public Property FileInfoRaw() As System.IO.FileInfo
Get
Return Me.FileInfoRawField
End Get
Set
If (Object.ReferenceEquals(Me.FileInfoRawField, Value) <> True) Then
Me.FileInfoRawField = Value
Me.RaisePropertyChanged("FileInfoRaw")
End If
End Set
End Property
Public Property FileName() As String
Get
Return Me.FileNameField
End Get
Set
If (Object.ReferenceEquals(Me.FileNameField, Value) <> True) Then
Me.FileNameField = Value
Me.RaisePropertyChanged("FileName")
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
Partial Public Class UserAttributeValue
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private ControlNameField As String
Private IdField As Integer
Private NameField As String
Private ValuesField() As String
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
Public Property ControlName() As String
Get
Return Me.ControlNameField
End Get
Set
If (Object.ReferenceEquals(Me.ControlNameField, Value) <> True) Then
Me.ControlNameField = Value
Me.RaisePropertyChanged("ControlName")
End If
End Set
End Property
Public Property Id() As Integer
Get
Return Me.IdField
End Get
Set
If (Me.IdField.Equals(Value) <> True) Then
Me.IdField = Value
Me.RaisePropertyChanged("Id")
End If
End Set
End Property
Public Property Name() As String
Get
Return Me.NameField
End Get
Set
If (Object.ReferenceEquals(Me.NameField, Value) <> True) Then
Me.NameField = Value
Me.RaisePropertyChanged("Name")
End If
End Set
End Property
Public Property Values() As String()
Get
Return Me.ValuesField
End Get
Set
If (Object.ReferenceEquals(Me.ValuesField, Value) <> True) Then
Me.ValuesField = Value
Me.RaisePropertyChanged("Values")
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
Partial Public Class UserState
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private DateFormatField As String
Private EmailField As String
Private GivenNameField As String
Private HideBasicConfigField As Boolean
Private IsAdminField As Boolean
Private LanguageField As String
Private LanguageIdField As Integer
Private MachineNameField As String
Private ShortNameField As String
Private SurnameField As String
Private UserIdField As Integer
Private UserNameField As String
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
Public Property DateFormat() As String
Get
Return Me.DateFormatField
End Get
Set
If (Object.ReferenceEquals(Me.DateFormatField, Value) <> True) Then
Me.DateFormatField = Value
Me.RaisePropertyChanged("DateFormat")
End If
End Set
End Property
Public Property Email() As String
Get
Return Me.EmailField
End Get
Set
If (Object.ReferenceEquals(Me.EmailField, Value) <> True) Then
Me.EmailField = Value
Me.RaisePropertyChanged("Email")
End If
End Set
End Property
Public Property GivenName() As String
Get
Return Me.GivenNameField
End Get
Set
If (Object.ReferenceEquals(Me.GivenNameField, Value) <> True) Then
Me.GivenNameField = Value
Me.RaisePropertyChanged("GivenName")
End If
End Set
End Property
Public Property HideBasicConfig() As Boolean
Get
Return Me.HideBasicConfigField
End Get
Set
If (Me.HideBasicConfigField.Equals(Value) <> True) Then
Me.HideBasicConfigField = Value
Me.RaisePropertyChanged("HideBasicConfig")
End If
End Set
End Property
Public Property IsAdmin() As Boolean
Get
Return Me.IsAdminField
End Get
Set
If (Me.IsAdminField.Equals(Value) <> True) Then
Me.IsAdminField = Value
Me.RaisePropertyChanged("IsAdmin")
End If
End Set
End Property
Public Property Language() As String
Get
Return Me.LanguageField
End Get
Set
If (Object.ReferenceEquals(Me.LanguageField, Value) <> True) Then
Me.LanguageField = Value
Me.RaisePropertyChanged("Language")
End If
End Set
End Property
Public Property LanguageId() As Integer
Get
Return Me.LanguageIdField
End Get
Set
If (Me.LanguageIdField.Equals(Value) <> True) Then
Me.LanguageIdField = Value
Me.RaisePropertyChanged("LanguageId")
End If
End Set
End Property
Public Property MachineName() As String
Get
Return Me.MachineNameField
End Get
Set
If (Object.ReferenceEquals(Me.MachineNameField, Value) <> True) Then
Me.MachineNameField = Value
Me.RaisePropertyChanged("MachineName")
End If
End Set
End Property
Public Property ShortName() As String
Get
Return Me.ShortNameField
End Get
Set
If (Object.ReferenceEquals(Me.ShortNameField, Value) <> True) Then
Me.ShortNameField = Value
Me.RaisePropertyChanged("ShortName")
End If
End Set
End Property
Public Property Surname() As String
Get
Return Me.SurnameField
End Get
Set
If (Object.ReferenceEquals(Me.SurnameField, Value) <> True) Then
Me.SurnameField = Value
Me.RaisePropertyChanged("Surname")
End If
End Set
End Property
Public Property UserId() As Integer
Get
Return Me.UserIdField
End Get
Set
If (Me.UserIdField.Equals(Value) <> True) Then
Me.UserIdField = Value
Me.RaisePropertyChanged("UserId")
End If
End Set
End Property
Public Property UserName() As String
Get
Return Me.UserNameField
End Get
Set
If (Object.ReferenceEquals(Me.UserNameField, Value) <> True) Then
Me.UserNameField = Value
Me.RaisePropertyChanged("UserName")
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
Partial Public Class UpdateFileRequest
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private CreateNewVersionField As Boolean
Private FileField As EDMIServiceReference.FileProperties
Private ObjectIdField As Long
Private UserField As EDMIServiceReference.UserState
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
Public Property CreateNewVersion() As Boolean
Get
Return Me.CreateNewVersionField
End Get
Set
If (Me.CreateNewVersionField.Equals(Value) <> True) Then
Me.CreateNewVersionField = Value
Me.RaisePropertyChanged("CreateNewVersion")
End If
End Set
End Property
Public Property File() As EDMIServiceReference.FileProperties
Get
Return Me.FileField
End Get
Set
If (Object.ReferenceEquals(Me.FileField, Value) <> True) Then
Me.FileField = Value
Me.RaisePropertyChanged("File")
End If
End Set
End Property
Public Property ObjectId() As Long
Get
Return Me.ObjectIdField
End Get
Set
If (Me.ObjectIdField.Equals(Value) <> True) Then
Me.ObjectIdField = Value
Me.RaisePropertyChanged("ObjectId")
End If
End Set
End Property
Public Property User() As EDMIServiceReference.UserState
Get
Return Me.UserField
End Get
Set
If (Object.ReferenceEquals(Me.UserField, Value) <> True) Then
Me.UserField = Value
Me.RaisePropertyChanged("User")
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
Partial Public Class SetAttributeValueRequest
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private AttributeNameField As String
Private AttributeValueField As String
Private LanguageField As String
Private ObjectIdField As Long
Private WhoField As String
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
Public Property AttributeName() As String
Get
Return Me.AttributeNameField
End Get
Set
If (Object.ReferenceEquals(Me.AttributeNameField, Value) <> True) Then
Me.AttributeNameField = Value
Me.RaisePropertyChanged("AttributeName")
End If
End Set
End Property
Public Property AttributeValue() As String
Get
Return Me.AttributeValueField
End Get
Set
If (Object.ReferenceEquals(Me.AttributeValueField, Value) <> True) Then
Me.AttributeValueField = Value
Me.RaisePropertyChanged("AttributeValue")
End If
End Set
End Property
Public Property Language() As String
Get
Return Me.LanguageField
End Get
Set
If (Object.ReferenceEquals(Me.LanguageField, Value) <> True) Then
Me.LanguageField = Value
Me.RaisePropertyChanged("Language")
End If
End Set
End Property
Public Property ObjectId() As Long
Get
Return Me.ObjectIdField
End Get
Set
If (Me.ObjectIdField.Equals(Value) <> True) Then
Me.ObjectIdField = Value
Me.RaisePropertyChanged("ObjectId")
End If
End Set
End Property
Public Property Who() As String
Get
Return Me.WhoField
End Get
Set
If (Object.ReferenceEquals(Me.WhoField, Value) <> True) Then
Me.WhoField = Value
Me.RaisePropertyChanged("Who")
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
Partial Public Class GetAttributeValueRequest
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private AttributeNameField As String
Private ObjectIdField As Long
Private UserField As EDMIServiceReference.UserState
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
Public Property AttributeName() As String
Get
Return Me.AttributeNameField
End Get
Set
If (Object.ReferenceEquals(Me.AttributeNameField, Value) <> True) Then
Me.AttributeNameField = Value
Me.RaisePropertyChanged("AttributeName")
End If
End Set
End Property
Public Property ObjectId() As Long
Get
Return Me.ObjectIdField
End Get
Set
If (Me.ObjectIdField.Equals(Value) <> True) Then
Me.ObjectIdField = Value
Me.RaisePropertyChanged("ObjectId")
End If
End Set
End Property
Public Property User() As EDMIServiceReference.UserState
Get
Return Me.UserField
End Get
Set
If (Object.ReferenceEquals(Me.UserField, Value) <> True) Then
Me.UserField = Value
Me.RaisePropertyChanged("User")
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
Partial Public Class GetFileObjectRequest
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private LoadFileContentsField As Boolean
Private ObjectIdField As Long
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
Public Property LoadFileContents() As Boolean
Get
Return Me.LoadFileContentsField
End Get
Set
If (Me.LoadFileContentsField.Equals(Value) <> True) Then
Me.LoadFileContentsField = Value
Me.RaisePropertyChanged("LoadFileContents")
End If
End Set
End Property
Public Property ObjectId() As Long
Get
Return Me.ObjectIdField
End Get
Set
If (Me.ObjectIdField.Equals(Value) <> True) Then
Me.ObjectIdField = Value
Me.RaisePropertyChanged("ObjectId")
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
Partial Public Class FileObject
Inherits Object
Implements System.Runtime.Serialization.IExtensibleDataObject, System.ComponentModel.INotifyPropertyChanged
Private extensionDataField As System.Runtime.Serialization.ExtensionDataObject
Private _AccessRightsField As String
Private _FileContentsField() As Byte
Private _FileExtensionField As String
Private _FileHashField As String
Private _FilePathField As String
Private _FileSizeField As Long
Private _ObjectIdField As Long
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
Public Property _AccessRights() As String
Get
Return Me._AccessRightsField
End Get
Set
If (Object.ReferenceEquals(Me._AccessRightsField, Value) <> True) Then
Me._AccessRightsField = Value
Me.RaisePropertyChanged("_AccessRights")
End If
End Set
End Property
Public Property _FileContents() As Byte()
Get
Return Me._FileContentsField
End Get
Set
If (Object.ReferenceEquals(Me._FileContentsField, Value) <> True) Then
Me._FileContentsField = Value
Me.RaisePropertyChanged("_FileContents")
End If
End Set
End Property
Public Property _FileExtension() As String
Get
Return Me._FileExtensionField
End Get
Set
If (Object.ReferenceEquals(Me._FileExtensionField, Value) <> True) Then
Me._FileExtensionField = Value
Me.RaisePropertyChanged("_FileExtension")
End If
End Set
End Property
Public Property _FileHash() As String
Get
Return Me._FileHashField
End Get
Set
If (Object.ReferenceEquals(Me._FileHashField, Value) <> True) Then
Me._FileHashField = Value
Me.RaisePropertyChanged("_FileHash")
End If
End Set
End Property
Public Property _FilePath() As String
Get
Return Me._FilePathField
End Get
Set
If (Object.ReferenceEquals(Me._FilePathField, Value) <> True) Then
Me._FilePathField = Value
Me.RaisePropertyChanged("_FilePath")
End If
End Set
End Property
Public Property _FileSize() As Long
Get
Return Me._FileSizeField
End Get
Set
If (Me._FileSizeField.Equals(Value) <> True) Then
Me._FileSizeField = Value
Me.RaisePropertyChanged("_FileSize")
End If
End Set
End Property
Public Property _ObjectId() As Long
Get
Return Me._ObjectIdField
End Get
Set
If (Me._ObjectIdField.Equals(Value) <> True) Then
Me._ObjectIdField = Value
Me.RaisePropertyChanged("_ObjectId")
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