Files
Jonathan Jenne 13fe3d8cff version 1.2
2017-07-19 17:01:40 +02:00

392 lines
19 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
Namespace DPMA.Patent
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ServiceModel.ServiceContractAttribute([Namespace]:="http://ws.patent.register.dpma.de", ConfigurationName:="DPMA.Patent.DPMAregister")> _
Public Interface DPMAregister
'CODEGEN: Es wird ein Nachrichtenvertrag generiert, da Elementname user aus Namespace http://ws.patent.register.dpma.de nicht als "nillable" (nullwertfähig) gekennzeichnet ist.
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function search(ByVal request As DPMA.Patent.searchRequest) As DPMA.Patent.searchResponse
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function searchAsync(ByVal request As DPMA.Patent.searchRequest) As System.Threading.Tasks.Task(Of DPMA.Patent.searchResponse)
'CODEGEN: Es wird ein Nachrichtenvertrag generiert, da Elementname versionReturn aus Namespace http://ws.patent.register.dpma.de nicht als "nillable" (nullwertfähig) gekennzeichnet ist.
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function version(ByVal request As DPMA.Patent.versionRequest) As DPMA.Patent.versionResponse
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function versionAsync(ByVal request As DPMA.Patent.versionRequest) As System.Threading.Tasks.Task(Of DPMA.Patent.versionResponse)
'CODEGEN: Es wird ein Nachrichtenvertrag generiert, da Elementname user aus Namespace http://ws.patent.register.dpma.de nicht als "nillable" (nullwertfähig) gekennzeichnet ist.
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterInfo(ByVal request As DPMA.Patent.getRegisterInfoRequest) As DPMA.Patent.getRegisterInfoResponse
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterInfoAsync(ByVal request As DPMA.Patent.getRegisterInfoRequest) As System.Threading.Tasks.Task(Of DPMA.Patent.getRegisterInfoResponse)
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(IsWrapped:=false)> _
Partial Public Class searchRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="search", [Namespace]:="http://ws.patent.register.dpma.de", Order:=0)> _
Public Body As DPMA.Patent.searchRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Patent.searchRequestBody)
MyBase.New
Me.Body = Body
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.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.patent.register.dpma.de")> _
Partial Public Class searchRequestBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public user As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=1)> _
Public pwd As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=2)> _
Public query As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal user As String, ByVal pwd As String, ByVal query As String)
MyBase.New
Me.user = user
Me.pwd = pwd
Me.query = query
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 searchResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="searchResponse", [Namespace]:="http://ws.patent.register.dpma.de", Order:=0)> _
Public Body As DPMA.Patent.searchResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Patent.searchResponseBody)
MyBase.New
Me.Body = Body
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.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.patent.register.dpma.de")> _
Partial Public Class searchResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public searchReturn As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal searchReturn As String)
MyBase.New
Me.searchReturn = searchReturn
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 versionRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="version", [Namespace]:="http://ws.patent.register.dpma.de", Order:=0)> _
Public Body As DPMA.Patent.versionRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Patent.versionRequestBody)
MyBase.New
Me.Body = Body
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.Runtime.Serialization.DataContractAttribute()> _
Partial Public Class versionRequestBody
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(IsWrapped:=false)> _
Partial Public Class versionResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="versionResponse", [Namespace]:="http://ws.patent.register.dpma.de", Order:=0)> _
Public Body As DPMA.Patent.versionResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Patent.versionResponseBody)
MyBase.New
Me.Body = Body
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.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.patent.register.dpma.de")> _
Partial Public Class versionResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public versionReturn As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal versionReturn As String)
MyBase.New
Me.versionReturn = versionReturn
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 getRegisterInfoRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterInfo", [Namespace]:="http://ws.patent.register.dpma.de", Order:=0)> _
Public Body As DPMA.Patent.getRegisterInfoRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Patent.getRegisterInfoRequestBody)
MyBase.New
Me.Body = Body
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.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.patent.register.dpma.de")> _
Partial Public Class getRegisterInfoRequestBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public user As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=1)> _
Public pwd As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=2)> _
Public akz As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal user As String, ByVal pwd As String, ByVal akz As String)
MyBase.New
Me.user = user
Me.pwd = pwd
Me.akz = akz
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 getRegisterInfoResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterInfoResponse", [Namespace]:="http://ws.patent.register.dpma.de", Order:=0)> _
Public Body As DPMA.Patent.getRegisterInfoResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Patent.getRegisterInfoResponseBody)
MyBase.New
Me.Body = Body
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.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.patent.register.dpma.de")> _
Partial Public Class getRegisterInfoResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public getRegisterInfoReturn As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal getRegisterInfoReturn As String)
MyBase.New
Me.getRegisterInfoReturn = getRegisterInfoReturn
End Sub
End Class
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0")> _
Public Interface DPMAregisterChannel
Inherits DPMA.Patent.DPMAregister, System.ServiceModel.IClientChannel
End Interface
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0")> _
Partial Public Class DPMAregisterClient
Inherits System.ServiceModel.ClientBase(Of DPMA.Patent.DPMAregister)
Implements DPMA.Patent.DPMAregister
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
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Patent_DPMAregister_search(ByVal request As DPMA.Patent.searchRequest) As DPMA.Patent.searchResponse Implements DPMA.Patent.DPMAregister.search
Return MyBase.Channel.search(request)
End Function
Public Function search(ByVal user As String, ByVal pwd As String, ByVal query As String) As String
Dim inValue As DPMA.Patent.searchRequest = New DPMA.Patent.searchRequest()
inValue.Body = New DPMA.Patent.searchRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.query = query
Dim retVal As DPMA.Patent.searchResponse = CType(Me,DPMA.Patent.DPMAregister).search(inValue)
Return retVal.Body.searchReturn
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Patent_DPMAregister_searchAsync(ByVal request As DPMA.Patent.searchRequest) As System.Threading.Tasks.Task(Of DPMA.Patent.searchResponse) Implements DPMA.Patent.DPMAregister.searchAsync
Return MyBase.Channel.searchAsync(request)
End Function
Public Function searchAsync(ByVal user As String, ByVal pwd As String, ByVal query As String) As System.Threading.Tasks.Task(Of DPMA.Patent.searchResponse)
Dim inValue As DPMA.Patent.searchRequest = New DPMA.Patent.searchRequest()
inValue.Body = New DPMA.Patent.searchRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.query = query
Return CType(Me,DPMA.Patent.DPMAregister).searchAsync(inValue)
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Patent_DPMAregister_version(ByVal request As DPMA.Patent.versionRequest) As DPMA.Patent.versionResponse Implements DPMA.Patent.DPMAregister.version
Return MyBase.Channel.version(request)
End Function
Public Function version() As String
Dim inValue As DPMA.Patent.versionRequest = New DPMA.Patent.versionRequest()
inValue.Body = New DPMA.Patent.versionRequestBody()
Dim retVal As DPMA.Patent.versionResponse = CType(Me,DPMA.Patent.DPMAregister).version(inValue)
Return retVal.Body.versionReturn
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Patent_DPMAregister_versionAsync(ByVal request As DPMA.Patent.versionRequest) As System.Threading.Tasks.Task(Of DPMA.Patent.versionResponse) Implements DPMA.Patent.DPMAregister.versionAsync
Return MyBase.Channel.versionAsync(request)
End Function
Public Function versionAsync() As System.Threading.Tasks.Task(Of DPMA.Patent.versionResponse)
Dim inValue As DPMA.Patent.versionRequest = New DPMA.Patent.versionRequest()
inValue.Body = New DPMA.Patent.versionRequestBody()
Return CType(Me,DPMA.Patent.DPMAregister).versionAsync(inValue)
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Patent_DPMAregister_getRegisterInfo(ByVal request As DPMA.Patent.getRegisterInfoRequest) As DPMA.Patent.getRegisterInfoResponse Implements DPMA.Patent.DPMAregister.getRegisterInfo
Return MyBase.Channel.getRegisterInfo(request)
End Function
Public Function getRegisterInfo(ByVal user As String, ByVal pwd As String, ByVal akz As String) As String
Dim inValue As DPMA.Patent.getRegisterInfoRequest = New DPMA.Patent.getRegisterInfoRequest()
inValue.Body = New DPMA.Patent.getRegisterInfoRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Dim retVal As DPMA.Patent.getRegisterInfoResponse = CType(Me,DPMA.Patent.DPMAregister).getRegisterInfo(inValue)
Return retVal.Body.getRegisterInfoReturn
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Patent_DPMAregister_getRegisterInfoAsync(ByVal request As DPMA.Patent.getRegisterInfoRequest) As System.Threading.Tasks.Task(Of DPMA.Patent.getRegisterInfoResponse) Implements DPMA.Patent.DPMAregister.getRegisterInfoAsync
Return MyBase.Channel.getRegisterInfoAsync(request)
End Function
Public Function getRegisterInfoAsync(ByVal user As String, ByVal pwd As String, ByVal akz As String) As System.Threading.Tasks.Task(Of DPMA.Patent.getRegisterInfoResponse)
Dim inValue As DPMA.Patent.getRegisterInfoRequest = New DPMA.Patent.getRegisterInfoRequest()
inValue.Body = New DPMA.Patent.getRegisterInfoRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Return CType(Me,DPMA.Patent.DPMAregister).getRegisterInfoAsync(inValue)
End Function
End Class
End Namespace