392 lines
19 KiB
VB.net
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
|