'------------------------------------------------------------------------------ ' ' This code was generated by a tool. ' Runtime Version:4.0.30319.42000 ' ' Changes to this file may cause incorrect behavior and will be lost if ' the code is regenerated. ' '------------------------------------------------------------------------------ Option Strict On Option Explicit On Namespace MNBArfolyamService _ Public Interface MNBArfolyamServiceSoap 'CODEGEN: Generating message contract since the operation GetCurrencies is neither RPC nor document wrapped. _ Function GetCurrencies(ByVal request As MNBArfolyamService.GetCurrenciesRequest) As MNBArfolyamService.GetCurrenciesResponse 'CODEGEN: Generating message contract since the operation GetCurrencyUnits is neither RPC nor document wrapped. _ Function GetCurrencyUnits(ByVal request As MNBArfolyamService.GetCurrencyUnitsRequest) As MNBArfolyamService.GetCurrencyUnitsResponse 'CODEGEN: Generating message contract since the operation GetCurrentExchangeRates is neither RPC nor document wrapped. _ Function GetCurrentExchangeRates(ByVal request As MNBArfolyamService.GetCurrentExchangeRatesRequest) As MNBArfolyamService.GetCurrentExchangeRatesResponse 'CODEGEN: Generating message contract since the operation GetDateInterval is neither RPC nor document wrapped. _ Function GetDateInterval(ByVal request As MNBArfolyamService.GetDateIntervalRequest) As MNBArfolyamService.GetDateIntervalResponse 'CODEGEN: Generating message contract since the operation GetExchangeRates is neither RPC nor document wrapped. _ Function GetExchangeRates(ByVal request As MNBArfolyamService.GetExchangeRatesRequest) As MNBArfolyamService.GetExchangeRatesResponse 'CODEGEN: Generating message contract since the operation GetInfo is neither RPC nor document wrapped. _ Function GetInfo(ByVal request As MNBArfolyamService.GetInfoRequest) As MNBArfolyamService.GetInfoResponse End Interface _ Partial Public Class GetCurrenciesRequest _ Public GetCurrencies As SISBusiness.[Module].MNBArfolyamService.GetCurrenciesRequestBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetCurrencies As SISBusiness.[Module].MNBArfolyamService.GetCurrenciesRequestBody) MyBase.New Me.GetCurrencies = GetCurrencies End Sub End Class _ Partial Public Class GetCurrenciesResponse _ Public GetCurrenciesResponse1 As SISBusiness.[Module].MNBArfolyamService.GetCurrenciesResponseBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetCurrenciesResponse1 As SISBusiness.[Module].MNBArfolyamService.GetCurrenciesResponseBody) MyBase.New Me.GetCurrenciesResponse1 = GetCurrenciesResponse1 End Sub End Class _ Partial Public Class GetCurrencyUnitsRequest _ Public GetCurrencyUnits As SISBusiness.[Module].MNBArfolyamService.GetCurrencyUnitsRequestBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetCurrencyUnits As SISBusiness.[Module].MNBArfolyamService.GetCurrencyUnitsRequestBody) MyBase.New Me.GetCurrencyUnits = GetCurrencyUnits End Sub End Class _ Partial Public Class GetCurrencyUnitsResponse _ Public GetCurrencyUnitsResponse1 As SISBusiness.[Module].MNBArfolyamService.GetCurrencyUnitsResponseBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetCurrencyUnitsResponse1 As SISBusiness.[Module].MNBArfolyamService.GetCurrencyUnitsResponseBody) MyBase.New Me.GetCurrencyUnitsResponse1 = GetCurrencyUnitsResponse1 End Sub End Class _ Partial Public Class GetCurrentExchangeRatesRequest _ Public GetCurrentExchangeRates As SISBusiness.[Module].MNBArfolyamService.GetCurrentExchangeRatesRequestBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetCurrentExchangeRates As SISBusiness.[Module].MNBArfolyamService.GetCurrentExchangeRatesRequestBody) MyBase.New Me.GetCurrentExchangeRates = GetCurrentExchangeRates End Sub End Class _ Partial Public Class GetCurrentExchangeRatesResponse _ Public GetCurrentExchangeRatesResponse1 As SISBusiness.[Module].MNBArfolyamService.GetCurrentExchangeRatesResponseBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetCurrentExchangeRatesResponse1 As SISBusiness.[Module].MNBArfolyamService.GetCurrentExchangeRatesResponseBody) MyBase.New Me.GetCurrentExchangeRatesResponse1 = GetCurrentExchangeRatesResponse1 End Sub End Class _ Partial Public Class GetDateIntervalRequest _ Public GetDateInterval As SISBusiness.[Module].MNBArfolyamService.GetDateIntervalRequestBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetDateInterval As SISBusiness.[Module].MNBArfolyamService.GetDateIntervalRequestBody) MyBase.New Me.GetDateInterval = GetDateInterval End Sub End Class _ Partial Public Class GetDateIntervalResponse _ Public GetDateIntervalResponse1 As SISBusiness.[Module].MNBArfolyamService.GetDateIntervalResponseBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetDateIntervalResponse1 As SISBusiness.[Module].MNBArfolyamService.GetDateIntervalResponseBody) MyBase.New Me.GetDateIntervalResponse1 = GetDateIntervalResponse1 End Sub End Class _ Partial Public Class GetExchangeRatesRequest _ Public GetExchangeRates As SISBusiness.[Module].MNBArfolyamService.GetExchangeRatesRequestBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetExchangeRates As SISBusiness.[Module].MNBArfolyamService.GetExchangeRatesRequestBody) MyBase.New Me.GetExchangeRates = GetExchangeRates End Sub End Class _ Partial Public Class GetExchangeRatesResponse _ Public GetExchangeRatesResponse1 As SISBusiness.[Module].MNBArfolyamService.GetExchangeRatesResponseBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetExchangeRatesResponse1 As SISBusiness.[Module].MNBArfolyamService.GetExchangeRatesResponseBody) MyBase.New Me.GetExchangeRatesResponse1 = GetExchangeRatesResponse1 End Sub End Class _ Partial Public Class GetInfoRequest _ Public GetInfo As SISBusiness.[Module].MNBArfolyamService.GetInfoRequestBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetInfo As SISBusiness.[Module].MNBArfolyamService.GetInfoRequestBody) MyBase.New Me.GetInfo = GetInfo End Sub End Class _ Partial Public Class GetInfoResponse _ Public GetInfoResponse1 As SISBusiness.[Module].MNBArfolyamService.GetInfoResponseBody Public Sub New() MyBase.New End Sub Public Sub New(ByVal GetInfoResponse1 As SISBusiness.[Module].MNBArfolyamService.GetInfoResponseBody) MyBase.New Me.GetInfoResponse1 = GetInfoResponse1 End Sub End Class _ Public Interface MNBArfolyamServiceSoapChannel Inherits MNBArfolyamService.MNBArfolyamServiceSoap, System.ServiceModel.IClientChannel End Interface _ 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 _ 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(ByVal GetCurrencies1 As SISBusiness.[Module].MNBArfolyamService.GetCurrenciesRequestBody) As SISBusiness.[Module].MNBArfolyamService.GetCurrenciesResponseBody Dim inValue As MNBArfolyamService.GetCurrenciesRequest = New MNBArfolyamService.GetCurrenciesRequest() inValue.GetCurrencies = GetCurrencies1 Dim retVal As MNBArfolyamService.GetCurrenciesResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetCurrencies(inValue) Return retVal.GetCurrenciesResponse1 End Function _ 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 GetCurrencyUnits1 As SISBusiness.[Module].MNBArfolyamService.GetCurrencyUnitsRequestBody) As SISBusiness.[Module].MNBArfolyamService.GetCurrencyUnitsResponseBody Dim inValue As MNBArfolyamService.GetCurrencyUnitsRequest = New MNBArfolyamService.GetCurrencyUnitsRequest() inValue.GetCurrencyUnits = GetCurrencyUnits1 Dim retVal As MNBArfolyamService.GetCurrencyUnitsResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetCurrencyUnits(inValue) Return retVal.GetCurrencyUnitsResponse1 End Function _ 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(ByVal GetCurrentExchangeRates1 As SISBusiness.[Module].MNBArfolyamService.GetCurrentExchangeRatesRequestBody) As SISBusiness.[Module].MNBArfolyamService.GetCurrentExchangeRatesResponseBody Dim inValue As MNBArfolyamService.GetCurrentExchangeRatesRequest = New MNBArfolyamService.GetCurrentExchangeRatesRequest() inValue.GetCurrentExchangeRates = GetCurrentExchangeRates1 Dim retVal As MNBArfolyamService.GetCurrentExchangeRatesResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetCurrentExchangeRates(inValue) Return retVal.GetCurrentExchangeRatesResponse1 End Function _ 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(ByVal GetDateInterval1 As SISBusiness.[Module].MNBArfolyamService.GetDateIntervalRequestBody) As SISBusiness.[Module].MNBArfolyamService.GetDateIntervalResponseBody Dim inValue As MNBArfolyamService.GetDateIntervalRequest = New MNBArfolyamService.GetDateIntervalRequest() inValue.GetDateInterval = GetDateInterval1 Dim retVal As MNBArfolyamService.GetDateIntervalResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetDateInterval(inValue) Return retVal.GetDateIntervalResponse1 End Function _ 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 GetExchangeRates1 As SISBusiness.[Module].MNBArfolyamService.GetExchangeRatesRequestBody) As SISBusiness.[Module].MNBArfolyamService.GetExchangeRatesResponseBody Dim inValue As MNBArfolyamService.GetExchangeRatesRequest = New MNBArfolyamService.GetExchangeRatesRequest() inValue.GetExchangeRates = GetExchangeRates1 Dim retVal As MNBArfolyamService.GetExchangeRatesResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetExchangeRates(inValue) Return retVal.GetExchangeRatesResponse1 End Function _ 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(ByVal GetInfo1 As SISBusiness.[Module].MNBArfolyamService.GetInfoRequestBody) As SISBusiness.[Module].MNBArfolyamService.GetInfoResponseBody Dim inValue As MNBArfolyamService.GetInfoRequest = New MNBArfolyamService.GetInfoRequest() inValue.GetInfo = GetInfo1 Dim retVal As MNBArfolyamService.GetInfoResponse = CType(Me,MNBArfolyamService.MNBArfolyamServiceSoap).GetInfo(inValue) Return retVal.GetInfoResponse1 End Function End Class End Namespace