Files
2017-03-26 20:00:03 +02:00

586 lines
29 KiB
VB.net

'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.18051
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace MNBArfolyamService
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ServiceModel.ServiceContractAttribute([Namespace]:="http://www.mnb.hu/webservices/", ConfigurationName:="MNBArfolyamService.MNBArfolyamServiceSoap")> _
Public Interface MNBArfolyamServiceSoap
'CODEGEN: Generating message contract since element name GetInfoResult from namespace http://www.mnb.hu/webservices/ is not marked nillable
<System.ServiceModel.OperationContractAttribute(Action:="http://www.mnb.hu/webservices/GetInfo", ReplyAction:="*")> _
Function GetInfo(ByVal request As MNBArfolyamService.GetInfoRequest) As MNBArfolyamService.GetInfoResponse
'CODEGEN: Generating message contract since element name GetCurrentExchangeRatesResult from namespace http://www.mnb.hu/webservices/ is not marked nillable
<System.ServiceModel.OperationContractAttribute(Action:="http://www.mnb.hu/webservices/GetCurrentExchangeRates", ReplyAction:="*")> _
Function GetCurrentExchangeRates(ByVal request As MNBArfolyamService.GetCurrentExchangeRatesRequest) As MNBArfolyamService.GetCurrentExchangeRatesResponse
'CODEGEN: Generating message contract since element name startDate from namespace http://www.mnb.hu/webservices/ is not marked nillable
<System.ServiceModel.OperationContractAttribute(Action:="http://www.mnb.hu/webservices/GetExchangeRates", ReplyAction:="*")> _
Function GetExchangeRates(ByVal request As MNBArfolyamService.GetExchangeRatesRequest) As MNBArfolyamService.GetExchangeRatesResponse
'CODEGEN: Generating message contract since element name GetDateIntervalResult from namespace http://www.mnb.hu/webservices/ is not marked nillable
<System.ServiceModel.OperationContractAttribute(Action:="http://www.mnb.hu/webservices/GetDateInterval", ReplyAction:="*")> _
Function GetDateInterval(ByVal request As MNBArfolyamService.GetDateIntervalRequest) As MNBArfolyamService.GetDateIntervalResponse
'CODEGEN: Generating message contract since element name GetCurrenciesResult from namespace http://www.mnb.hu/webservices/ is not marked nillable
<System.ServiceModel.OperationContractAttribute(Action:="http://www.mnb.hu/webservices/GetCurrencies", ReplyAction:="*")> _
Function GetCurrencies(ByVal request As MNBArfolyamService.GetCurrenciesRequest) As MNBArfolyamService.GetCurrenciesResponse
'CODEGEN: Generating message contract since element name currencyNames from namespace http://www.mnb.hu/webservices/ is not marked nillable
<System.ServiceModel.OperationContractAttribute(Action:="http://www.mnb.hu/webservices/GetCurrencyUnits", ReplyAction:="*")> _
Function GetCurrencyUnits(ByVal request As MNBArfolyamService.GetCurrencyUnitsRequest) As MNBArfolyamService.GetCurrencyUnitsResponse
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 GetInfoRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetInfo", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetInfoRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetInfoRequestBody)
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 GetInfoRequestBody
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 GetInfoResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetInfoResponse", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetInfoResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetInfoResponseBody)
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://www.mnb.hu/webservices/")> _
Partial Public Class GetInfoResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public GetInfoResult As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal GetInfoResult As String)
MyBase.New
Me.GetInfoResult = GetInfoResult
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 GetCurrentExchangeRatesRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetCurrentExchangeRates", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetCurrentExchangeRatesRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetCurrentExchangeRatesRequestBody)
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 GetCurrentExchangeRatesRequestBody
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 GetCurrentExchangeRatesResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetCurrentExchangeRatesResponse", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetCurrentExchangeRatesResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetCurrentExchangeRatesResponseBody)
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://www.mnb.hu/webservices/")> _
Partial Public Class GetCurrentExchangeRatesResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public GetCurrentExchangeRatesResult As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal GetCurrentExchangeRatesResult As String)
MyBase.New
Me.GetCurrentExchangeRatesResult = GetCurrentExchangeRatesResult
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 GetExchangeRatesRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetExchangeRates", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetExchangeRatesRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetExchangeRatesRequestBody)
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://www.mnb.hu/webservices/")> _
Partial Public Class GetExchangeRatesRequestBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public startDate As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=1)> _
Public endDate As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=2)> _
Public currencyNames As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal startDate As String, ByVal endDate As String, ByVal currencyNames As String)
MyBase.New
Me.startDate = startDate
Me.endDate = endDate
Me.currencyNames = currencyNames
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 GetExchangeRatesResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetExchangeRatesResponse", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetExchangeRatesResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetExchangeRatesResponseBody)
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://www.mnb.hu/webservices/")> _
Partial Public Class GetExchangeRatesResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public GetExchangeRatesResult As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal GetExchangeRatesResult As String)
MyBase.New
Me.GetExchangeRatesResult = GetExchangeRatesResult
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 GetDateIntervalRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetDateInterval", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetDateIntervalRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetDateIntervalRequestBody)
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 GetDateIntervalRequestBody
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 GetDateIntervalResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetDateIntervalResponse", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetDateIntervalResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetDateIntervalResponseBody)
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://www.mnb.hu/webservices/")> _
Partial Public Class GetDateIntervalResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public GetDateIntervalResult As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal GetDateIntervalResult As String)
MyBase.New
Me.GetDateIntervalResult = GetDateIntervalResult
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 GetCurrenciesRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetCurrencies", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetCurrenciesRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetCurrenciesRequestBody)
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 GetCurrenciesRequestBody
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 GetCurrenciesResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetCurrenciesResponse", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetCurrenciesResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetCurrenciesResponseBody)
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://www.mnb.hu/webservices/")> _
Partial Public Class GetCurrenciesResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public GetCurrenciesResult As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal GetCurrenciesResult As String)
MyBase.New
Me.GetCurrenciesResult = GetCurrenciesResult
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 GetCurrencyUnitsRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetCurrencyUnits", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetCurrencyUnitsRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetCurrencyUnitsRequestBody)
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://www.mnb.hu/webservices/")> _
Partial Public Class GetCurrencyUnitsRequestBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public currencyNames As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal currencyNames As String)
MyBase.New
Me.currencyNames = currencyNames
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 GetCurrencyUnitsResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="GetCurrencyUnitsResponse", [Namespace]:="http://www.mnb.hu/webservices/", Order:=0)> _
Public Body As MNBArfolyamService.GetCurrencyUnitsResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As MNBArfolyamService.GetCurrencyUnitsResponseBody)
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://www.mnb.hu/webservices/")> _
Partial Public Class GetCurrencyUnitsResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public GetCurrencyUnitsResult As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal GetCurrencyUnitsResult As String)
MyBase.New
Me.GetCurrencyUnitsResult = GetCurrencyUnitsResult
End Sub
End Class
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0")> _
Public Interface MNBArfolyamServiceSoapChannel
Inherits MNBArfolyamService.MNBArfolyamServiceSoap, System.ServiceModel.IClientChannel
End Interface
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0")> _
Partial Public Class MNBArfolyamServiceSoapClient
Inherits System.ServiceModel.ClientBase(Of MNBArfolyamService.MNBArfolyamServiceSoap)
Implements MNBArfolyamService.MNBArfolyamServiceSoap
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 MNBArfolyamService_MNBArfolyamServiceSoap_GetInfo(ByVal request As MNBArfolyamService.GetInfoRequest) As MNBArfolyamService.GetInfoResponse Implements MNBArfolyamService.MNBArfolyamServiceSoap.GetInfo
Return MyBase.Channel.GetInfo(request)
End Function
Public Function GetInfo() As String
Dim inValue As MNBArfolyamService.GetInfoRequest = New MNBArfolyamService.GetInfoRequest()
inValue.Body = New MNBArfolyamService.GetInfoRequestBody()
Dim retVal As MNBArfolyamService.GetInfoResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetInfo(inValue)
Return retVal.Body.GetInfoResult
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function MNBArfolyamService_MNBArfolyamServiceSoap_GetCurrentExchangeRates(ByVal request As MNBArfolyamService.GetCurrentExchangeRatesRequest) As MNBArfolyamService.GetCurrentExchangeRatesResponse Implements MNBArfolyamService.MNBArfolyamServiceSoap.GetCurrentExchangeRates
Return MyBase.Channel.GetCurrentExchangeRates(request)
End Function
Public Function GetCurrentExchangeRates() As String
Dim inValue As MNBArfolyamService.GetCurrentExchangeRatesRequest = New MNBArfolyamService.GetCurrentExchangeRatesRequest()
inValue.Body = New MNBArfolyamService.GetCurrentExchangeRatesRequestBody()
Dim retVal As MNBArfolyamService.GetCurrentExchangeRatesResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetCurrentExchangeRates(inValue)
Return retVal.Body.GetCurrentExchangeRatesResult
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function MNBArfolyamService_MNBArfolyamServiceSoap_GetExchangeRates(ByVal request As MNBArfolyamService.GetExchangeRatesRequest) As MNBArfolyamService.GetExchangeRatesResponse Implements MNBArfolyamService.MNBArfolyamServiceSoap.GetExchangeRates
Return MyBase.Channel.GetExchangeRates(request)
End Function
Public Function GetExchangeRates(ByVal startDate As String, ByVal endDate As String, ByVal currencyNames As String) As String
Dim inValue As MNBArfolyamService.GetExchangeRatesRequest = New MNBArfolyamService.GetExchangeRatesRequest()
inValue.Body = New MNBArfolyamService.GetExchangeRatesRequestBody()
inValue.Body.startDate = startDate
inValue.Body.endDate = endDate
inValue.Body.currencyNames = currencyNames
Dim retVal As MNBArfolyamService.GetExchangeRatesResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetExchangeRates(inValue)
Return retVal.Body.GetExchangeRatesResult
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function MNBArfolyamService_MNBArfolyamServiceSoap_GetDateInterval(ByVal request As MNBArfolyamService.GetDateIntervalRequest) As MNBArfolyamService.GetDateIntervalResponse Implements MNBArfolyamService.MNBArfolyamServiceSoap.GetDateInterval
Return MyBase.Channel.GetDateInterval(request)
End Function
Public Function GetDateInterval() As String
Dim inValue As MNBArfolyamService.GetDateIntervalRequest = New MNBArfolyamService.GetDateIntervalRequest()
inValue.Body = New MNBArfolyamService.GetDateIntervalRequestBody()
Dim retVal As MNBArfolyamService.GetDateIntervalResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetDateInterval(inValue)
Return retVal.Body.GetDateIntervalResult
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function MNBArfolyamService_MNBArfolyamServiceSoap_GetCurrencies(ByVal request As MNBArfolyamService.GetCurrenciesRequest) As MNBArfolyamService.GetCurrenciesResponse Implements MNBArfolyamService.MNBArfolyamServiceSoap.GetCurrencies
Return MyBase.Channel.GetCurrencies(request)
End Function
Public Function GetCurrencies() As String
Dim inValue As MNBArfolyamService.GetCurrenciesRequest = New MNBArfolyamService.GetCurrenciesRequest()
inValue.Body = New MNBArfolyamService.GetCurrenciesRequestBody()
Dim retVal As MNBArfolyamService.GetCurrenciesResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetCurrencies(inValue)
Return retVal.Body.GetCurrenciesResult
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function MNBArfolyamService_MNBArfolyamServiceSoap_GetCurrencyUnits(ByVal request As MNBArfolyamService.GetCurrencyUnitsRequest) As MNBArfolyamService.GetCurrencyUnitsResponse Implements MNBArfolyamService.MNBArfolyamServiceSoap.GetCurrencyUnits
Return MyBase.Channel.GetCurrencyUnits(request)
End Function
Public Function GetCurrencyUnits(ByVal currencyNames As String) As String
Dim inValue As MNBArfolyamService.GetCurrencyUnitsRequest = New MNBArfolyamService.GetCurrencyUnitsRequest()
inValue.Body = New MNBArfolyamService.GetCurrencyUnitsRequestBody()
inValue.Body.currencyNames = currencyNames
Dim retVal As MNBArfolyamService.GetCurrencyUnitsResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetCurrencyUnits(inValue)
Return retVal.Body.GetCurrencyUnitsResult
End Function
End Class
End Namespace