3781 lines
182 KiB
VB.net
3781 lines
182 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 Off
|
|
Option Explicit On
|
|
|
|
Imports System
|
|
Imports System.ComponentModel
|
|
Imports System.Diagnostics
|
|
Imports System.Web.Services
|
|
Imports System.Web.Services.Protocols
|
|
Imports System.Xml.Serialization
|
|
|
|
'
|
|
'Der Quellcode wurde automatisch mit Microsoft.VSDesigner generiert. Version 4.0.30319.42000.
|
|
'
|
|
Namespace RKSV_DE_DSFinVKService
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code"), _
|
|
System.Web.Services.WebServiceBindingAttribute(Name:="BasicHttpBinding_IDSFinVKServer", [Namespace]:="http://tempuri.org/")> _
|
|
Partial Public Class DSFinVKServer
|
|
Inherits System.Web.Services.Protocols.SoapHttpClientProtocol
|
|
|
|
Private GetMachineCodeOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private InitializeLibraryOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private CleanupLibraryOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private CreateDatabaseOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private CreateCashboxOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private GetCashboxesOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private BeginReceiptOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private UpdateReceiptOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private FinishReceiptOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private AddPositionToReceiptOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private ExportFullOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private ExportDateToDateOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private ExportNumberToNumberOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private ExportCSVFilesOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private GetAvailableTseListOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private GetDsFinVKValuesOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private GetDsFinVKValuesForTseOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private SetupTseForFirstUseTseOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private StringifyTseErrorCodeOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private GetAvailableClientsTseOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private IsClientPresentTseOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private GetTaxIdsOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private CreateCashpointClosingOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private GetLastReceiptValuesOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private GetLastReceiptQrCodeOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private GetLastReceiptQrCodeContentOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private RegisterNewClientTseOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private GetNextBON_IDOperationCompleted As System.Threading.SendOrPostCallback
|
|
|
|
Private useDefaultCredentialsSetExplicitly As Boolean
|
|
|
|
'''<remarks/>
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me.Url = Global.VERAG_PROG_ALLGEMEIN.My.MySettings.Default.VERAG_PROG_ALLGEMEIN_RKSV_DE_DSFinVKService_DSFinVKServer
|
|
If (Me.IsLocalFileSystemWebService(Me.Url) = true) Then
|
|
Me.UseDefaultCredentials = true
|
|
Me.useDefaultCredentialsSetExplicitly = false
|
|
Else
|
|
Me.useDefaultCredentialsSetExplicitly = true
|
|
End If
|
|
End Sub
|
|
|
|
Public Shadows Property Url() As String
|
|
Get
|
|
Return MyBase.Url
|
|
End Get
|
|
Set
|
|
If (((Me.IsLocalFileSystemWebService(MyBase.Url) = true) _
|
|
AndAlso (Me.useDefaultCredentialsSetExplicitly = false)) _
|
|
AndAlso (Me.IsLocalFileSystemWebService(value) = false)) Then
|
|
MyBase.UseDefaultCredentials = false
|
|
End If
|
|
MyBase.Url = value
|
|
End Set
|
|
End Property
|
|
|
|
Public Shadows Property UseDefaultCredentials() As Boolean
|
|
Get
|
|
Return MyBase.UseDefaultCredentials
|
|
End Get
|
|
Set
|
|
MyBase.UseDefaultCredentials = value
|
|
Me.useDefaultCredentialsSetExplicitly = true
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Event GetMachineCodeCompleted As GetMachineCodeCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event InitializeLibraryCompleted As InitializeLibraryCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event CleanupLibraryCompleted As CleanupLibraryCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event CreateDatabaseCompleted As CreateDatabaseCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event CreateCashboxCompleted As CreateCashboxCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event GetCashboxesCompleted As GetCashboxesCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event BeginReceiptCompleted As BeginReceiptCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event UpdateReceiptCompleted As UpdateReceiptCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event FinishReceiptCompleted As FinishReceiptCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event AddPositionToReceiptCompleted As AddPositionToReceiptCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event ExportFullCompleted As ExportFullCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event ExportDateToDateCompleted As ExportDateToDateCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event ExportNumberToNumberCompleted As ExportNumberToNumberCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event ExportCSVFilesCompleted As ExportCSVFilesCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event GetAvailableTseListCompleted As GetAvailableTseListCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event GetDsFinVKValuesCompleted As GetDsFinVKValuesCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event GetDsFinVKValuesForTseCompleted As GetDsFinVKValuesForTseCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event SetupTseForFirstUseTseCompleted As SetupTseForFirstUseTseCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event StringifyTseErrorCodeCompleted As StringifyTseErrorCodeCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event GetAvailableClientsTseCompleted As GetAvailableClientsTseCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event IsClientPresentTseCompleted As IsClientPresentTseCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event GetTaxIdsCompleted As GetTaxIdsCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event CreateCashpointClosingCompleted As CreateCashpointClosingCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event GetLastReceiptValuesCompleted As GetLastReceiptValuesCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event GetLastReceiptQrCodeCompleted As GetLastReceiptQrCodeCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event GetLastReceiptQrCodeContentCompleted As GetLastReceiptQrCodeContentCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event RegisterNewClientTseCompleted As RegisterNewClientTseCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
Public Event GetNextBON_IDCompleted As GetNextBON_IDCompletedEventHandler
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/GetMachineCode", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Function GetMachineCode(ByVal isDemoLicense As Boolean, <System.Xml.Serialization.XmlIgnoreAttribute()> ByVal isDemoLicenseSpecified As Boolean, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal clientId As String) As <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> String
|
|
Dim results() As Object = Me.Invoke("GetMachineCode", New Object() {isDemoLicense, isDemoLicenseSpecified, clientId})
|
|
Return CType(results(0),String)
|
|
End Function
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetMachineCodeAsync(ByVal isDemoLicense As Boolean, ByVal isDemoLicenseSpecified As Boolean, ByVal clientId As String)
|
|
Me.GetMachineCodeAsync(isDemoLicense, isDemoLicenseSpecified, clientId, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetMachineCodeAsync(ByVal isDemoLicense As Boolean, ByVal isDemoLicenseSpecified As Boolean, ByVal clientId As String, ByVal userState As Object)
|
|
If (Me.GetMachineCodeOperationCompleted Is Nothing) Then
|
|
Me.GetMachineCodeOperationCompleted = AddressOf Me.OnGetMachineCodeOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("GetMachineCode", New Object() {isDemoLicense, isDemoLicenseSpecified, clientId}, Me.GetMachineCodeOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnGetMachineCodeOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.GetMachineCodeCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent GetMachineCodeCompleted(Me, New GetMachineCodeCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/InitializeLibrary", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub InitializeLibrary(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal server As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal database As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal username As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal password As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, ByRef InitializeLibraryResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef InitializeLibraryResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("InitializeLibrary", New Object() {server, database, username, password, Z_KASSE_ID})
|
|
InitializeLibraryResult = CType(results(0),ErrorCode)
|
|
InitializeLibraryResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub InitializeLibraryAsync(ByVal server As String, ByVal database As String, ByVal username As String, ByVal password As String, ByVal Z_KASSE_ID As String)
|
|
Me.InitializeLibraryAsync(server, database, username, password, Z_KASSE_ID, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub InitializeLibraryAsync(ByVal server As String, ByVal database As String, ByVal username As String, ByVal password As String, ByVal Z_KASSE_ID As String, ByVal userState As Object)
|
|
If (Me.InitializeLibraryOperationCompleted Is Nothing) Then
|
|
Me.InitializeLibraryOperationCompleted = AddressOf Me.OnInitializeLibraryOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("InitializeLibrary", New Object() {server, database, username, password, Z_KASSE_ID}, Me.InitializeLibraryOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnInitializeLibraryOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.InitializeLibraryCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent InitializeLibraryCompleted(Me, New InitializeLibraryCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/CleanupLibrary", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub CleanupLibrary(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, ByRef CleanupLibraryResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef CleanupLibraryResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("CleanupLibrary", New Object() {Z_KASSE_ID})
|
|
CleanupLibraryResult = CType(results(0),ErrorCode)
|
|
CleanupLibraryResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub CleanupLibraryAsync(ByVal Z_KASSE_ID As String)
|
|
Me.CleanupLibraryAsync(Z_KASSE_ID, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub CleanupLibraryAsync(ByVal Z_KASSE_ID As String, ByVal userState As Object)
|
|
If (Me.CleanupLibraryOperationCompleted Is Nothing) Then
|
|
Me.CleanupLibraryOperationCompleted = AddressOf Me.OnCleanupLibraryOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("CleanupLibrary", New Object() {Z_KASSE_ID}, Me.CleanupLibraryOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnCleanupLibraryOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.CleanupLibraryCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent CleanupLibraryCompleted(Me, New CleanupLibraryCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/CreateDatabase", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub CreateDatabase(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal server As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal database As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal username As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal password As String, ByRef CreateDatabaseResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef CreateDatabaseResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("CreateDatabase", New Object() {server, database, username, password})
|
|
CreateDatabaseResult = CType(results(0),ErrorCode)
|
|
CreateDatabaseResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub CreateDatabaseAsync(ByVal server As String, ByVal database As String, ByVal username As String, ByVal password As String)
|
|
Me.CreateDatabaseAsync(server, database, username, password, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub CreateDatabaseAsync(ByVal server As String, ByVal database As String, ByVal username As String, ByVal password As String, ByVal userState As Object)
|
|
If (Me.CreateDatabaseOperationCompleted Is Nothing) Then
|
|
Me.CreateDatabaseOperationCompleted = AddressOf Me.OnCreateDatabaseOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("CreateDatabase", New Object() {server, database, username, password}, Me.CreateDatabaseOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnCreateDatabaseOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.CreateDatabaseCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent CreateDatabaseCompleted(Me, New CreateDatabaseCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/CreateCashbox", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub CreateCashbox(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal cashbox As Kassendaten, ByRef CreateCashboxResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef CreateCashboxResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("CreateCashbox", New Object() {cashbox})
|
|
CreateCashboxResult = CType(results(0),ErrorCode)
|
|
CreateCashboxResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub CreateCashboxAsync(ByVal cashbox As Kassendaten)
|
|
Me.CreateCashboxAsync(cashbox, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub CreateCashboxAsync(ByVal cashbox As Kassendaten, ByVal userState As Object)
|
|
If (Me.CreateCashboxOperationCompleted Is Nothing) Then
|
|
Me.CreateCashboxOperationCompleted = AddressOf Me.OnCreateCashboxOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("CreateCashbox", New Object() {cashbox}, Me.CreateCashboxOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnCreateCashboxOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.CreateCashboxCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent CreateCashboxCompleted(Me, New CreateCashboxCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/GetCashboxes", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub GetCashboxes(<System.Xml.Serialization.XmlArrayAttribute(IsNullable:=true), System.Xml.Serialization.XmlArrayItemAttribute([Namespace]:="http://schemas.datacontract.org/2004/07/DSFinVK")> ByRef cashBoxes() As Kassendaten, ByRef GetCashboxesResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef GetCashboxesResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("GetCashboxes", New Object() {cashBoxes})
|
|
cashBoxes = CType(results(0),Kassendaten())
|
|
GetCashboxesResult = CType(results(1),ErrorCode)
|
|
GetCashboxesResultSpecified = CType(results(2),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetCashboxesAsync(ByVal cashBoxes() As Kassendaten)
|
|
Me.GetCashboxesAsync(cashBoxes, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetCashboxesAsync(ByVal cashBoxes() As Kassendaten, ByVal userState As Object)
|
|
If (Me.GetCashboxesOperationCompleted Is Nothing) Then
|
|
Me.GetCashboxesOperationCompleted = AddressOf Me.OnGetCashboxesOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("GetCashboxes", New Object() {cashBoxes}, Me.GetCashboxesOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnGetCashboxesOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.GetCashboxesCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent GetCashboxesCompleted(Me, New GetCashboxesCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/BeginReceipt", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub BeginReceipt(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal cashboxName As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal bonkopfBegin As BonKopfBegin, ByRef transactionNumber As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef transactionNumberSpecified As Boolean, ByRef BeginReceiptResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef BeginReceiptResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("BeginReceipt", New Object() {cashboxName, bonkopfBegin, transactionNumber, transactionNumberSpecified})
|
|
transactionNumber = CType(results(0),Integer)
|
|
transactionNumberSpecified = CType(results(1),Boolean)
|
|
BeginReceiptResult = CType(results(2),ErrorCode)
|
|
BeginReceiptResultSpecified = CType(results(3),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub BeginReceiptAsync(ByVal cashboxName As String, ByVal bonkopfBegin As BonKopfBegin, ByVal transactionNumber As Integer, ByVal transactionNumberSpecified As Boolean)
|
|
Me.BeginReceiptAsync(cashboxName, bonkopfBegin, transactionNumber, transactionNumberSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub BeginReceiptAsync(ByVal cashboxName As String, ByVal bonkopfBegin As BonKopfBegin, ByVal transactionNumber As Integer, ByVal transactionNumberSpecified As Boolean, ByVal userState As Object)
|
|
If (Me.BeginReceiptOperationCompleted Is Nothing) Then
|
|
Me.BeginReceiptOperationCompleted = AddressOf Me.OnBeginReceiptOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("BeginReceipt", New Object() {cashboxName, bonkopfBegin, transactionNumber, transactionNumberSpecified}, Me.BeginReceiptOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnBeginReceiptOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.BeginReceiptCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent BeginReceiptCompleted(Me, New BeginReceiptCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/UpdateReceipt", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub UpdateReceipt(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal cashboxName As String, ByVal transactionNumber As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByVal transactionNumberSpecified As Boolean, ByRef UpdateReceiptResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef UpdateReceiptResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("UpdateReceipt", New Object() {cashboxName, transactionNumber, transactionNumberSpecified})
|
|
UpdateReceiptResult = CType(results(0),ErrorCode)
|
|
UpdateReceiptResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub UpdateReceiptAsync(ByVal cashboxName As String, ByVal transactionNumber As Integer, ByVal transactionNumberSpecified As Boolean)
|
|
Me.UpdateReceiptAsync(cashboxName, transactionNumber, transactionNumberSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub UpdateReceiptAsync(ByVal cashboxName As String, ByVal transactionNumber As Integer, ByVal transactionNumberSpecified As Boolean, ByVal userState As Object)
|
|
If (Me.UpdateReceiptOperationCompleted Is Nothing) Then
|
|
Me.UpdateReceiptOperationCompleted = AddressOf Me.OnUpdateReceiptOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("UpdateReceipt", New Object() {cashboxName, transactionNumber, transactionNumberSpecified}, Me.UpdateReceiptOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnUpdateReceiptOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.UpdateReceiptCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent UpdateReceiptCompleted(Me, New UpdateReceiptCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/FinishReceipt", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub FinishReceipt(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal cashboxName As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal bonkopfFinish As BonKopfFinish, ByVal transactionNumber As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByVal transactionNumberSpecified As Boolean, ByRef FinishReceiptResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef FinishReceiptResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("FinishReceipt", New Object() {cashboxName, bonkopfFinish, transactionNumber, transactionNumberSpecified})
|
|
FinishReceiptResult = CType(results(0),ErrorCode)
|
|
FinishReceiptResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub FinishReceiptAsync(ByVal cashboxName As String, ByVal bonkopfFinish As BonKopfFinish, ByVal transactionNumber As Integer, ByVal transactionNumberSpecified As Boolean)
|
|
Me.FinishReceiptAsync(cashboxName, bonkopfFinish, transactionNumber, transactionNumberSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub FinishReceiptAsync(ByVal cashboxName As String, ByVal bonkopfFinish As BonKopfFinish, ByVal transactionNumber As Integer, ByVal transactionNumberSpecified As Boolean, ByVal userState As Object)
|
|
If (Me.FinishReceiptOperationCompleted Is Nothing) Then
|
|
Me.FinishReceiptOperationCompleted = AddressOf Me.OnFinishReceiptOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("FinishReceipt", New Object() {cashboxName, bonkopfFinish, transactionNumber, transactionNumberSpecified}, Me.FinishReceiptOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnFinishReceiptOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.FinishReceiptCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent FinishReceiptCompleted(Me, New FinishReceiptCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/AddPositionToReceipt", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub AddPositionToReceipt(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal cashboxName As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal position As BonPosition, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal position_vat As BonPosition_Ust, ByVal transactionNumber As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByVal transactionNumberSpecified As Boolean, ByRef AddPositionToReceiptResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef AddPositionToReceiptResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("AddPositionToReceipt", New Object() {cashboxName, position, position_vat, transactionNumber, transactionNumberSpecified})
|
|
AddPositionToReceiptResult = CType(results(0),ErrorCode)
|
|
AddPositionToReceiptResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub AddPositionToReceiptAsync(ByVal cashboxName As String, ByVal position As BonPosition, ByVal position_vat As BonPosition_Ust, ByVal transactionNumber As Integer, ByVal transactionNumberSpecified As Boolean)
|
|
Me.AddPositionToReceiptAsync(cashboxName, position, position_vat, transactionNumber, transactionNumberSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub AddPositionToReceiptAsync(ByVal cashboxName As String, ByVal position As BonPosition, ByVal position_vat As BonPosition_Ust, ByVal transactionNumber As Integer, ByVal transactionNumberSpecified As Boolean, ByVal userState As Object)
|
|
If (Me.AddPositionToReceiptOperationCompleted Is Nothing) Then
|
|
Me.AddPositionToReceiptOperationCompleted = AddressOf Me.OnAddPositionToReceiptOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("AddPositionToReceipt", New Object() {cashboxName, position, position_vat, transactionNumber, transactionNumberSpecified}, Me.AddPositionToReceiptOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnAddPositionToReceiptOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.AddPositionToReceiptCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent AddPositionToReceiptCompleted(Me, New AddPositionToReceiptCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/ExportFull", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub ExportFull(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, ByVal Z_NR_From As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByVal Z_NR_FromSpecified As Boolean, ByVal Z_NR_To As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByVal Z_NR_ToSpecified As Boolean, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal path As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal zipFileName As String, ByRef ExportFullResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef ExportFullResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("ExportFull", New Object() {Z_KASSE_ID, Z_NR_From, Z_NR_FromSpecified, Z_NR_To, Z_NR_ToSpecified, path, zipFileName})
|
|
ExportFullResult = CType(results(0),ErrorCode)
|
|
ExportFullResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub ExportFullAsync(ByVal Z_KASSE_ID As String, ByVal Z_NR_From As Integer, ByVal Z_NR_FromSpecified As Boolean, ByVal Z_NR_To As Integer, ByVal Z_NR_ToSpecified As Boolean, ByVal path As String, ByVal zipFileName As String)
|
|
Me.ExportFullAsync(Z_KASSE_ID, Z_NR_From, Z_NR_FromSpecified, Z_NR_To, Z_NR_ToSpecified, path, zipFileName, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub ExportFullAsync(ByVal Z_KASSE_ID As String, ByVal Z_NR_From As Integer, ByVal Z_NR_FromSpecified As Boolean, ByVal Z_NR_To As Integer, ByVal Z_NR_ToSpecified As Boolean, ByVal path As String, ByVal zipFileName As String, ByVal userState As Object)
|
|
If (Me.ExportFullOperationCompleted Is Nothing) Then
|
|
Me.ExportFullOperationCompleted = AddressOf Me.OnExportFullOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("ExportFull", New Object() {Z_KASSE_ID, Z_NR_From, Z_NR_FromSpecified, Z_NR_To, Z_NR_ToSpecified, path, zipFileName}, Me.ExportFullOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnExportFullOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.ExportFullCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent ExportFullCompleted(Me, New ExportFullCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/ExportDateToDate", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub ExportDateToDate(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal cashboxName As String, ByVal dtFrom As Date, <System.Xml.Serialization.XmlIgnoreAttribute()> ByVal dtFromSpecified As Boolean, ByVal dtTo As Date, <System.Xml.Serialization.XmlIgnoreAttribute()> ByVal dtToSpecified As Boolean, ByRef ExportDateToDateResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef ExportDateToDateResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("ExportDateToDate", New Object() {cashboxName, dtFrom, dtFromSpecified, dtTo, dtToSpecified})
|
|
ExportDateToDateResult = CType(results(0),ErrorCode)
|
|
ExportDateToDateResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub ExportDateToDateAsync(ByVal cashboxName As String, ByVal dtFrom As Date, ByVal dtFromSpecified As Boolean, ByVal dtTo As Date, ByVal dtToSpecified As Boolean)
|
|
Me.ExportDateToDateAsync(cashboxName, dtFrom, dtFromSpecified, dtTo, dtToSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub ExportDateToDateAsync(ByVal cashboxName As String, ByVal dtFrom As Date, ByVal dtFromSpecified As Boolean, ByVal dtTo As Date, ByVal dtToSpecified As Boolean, ByVal userState As Object)
|
|
If (Me.ExportDateToDateOperationCompleted Is Nothing) Then
|
|
Me.ExportDateToDateOperationCompleted = AddressOf Me.OnExportDateToDateOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("ExportDateToDate", New Object() {cashboxName, dtFrom, dtFromSpecified, dtTo, dtToSpecified}, Me.ExportDateToDateOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnExportDateToDateOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.ExportDateToDateCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent ExportDateToDateCompleted(Me, New ExportDateToDateCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/ExportNumberToNumber", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub ExportNumberToNumber(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal cashboxName As String, ByVal numberFrom As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByVal numberFromSpecified As Boolean, ByVal numberTo As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByVal numberToSpecified As Boolean, ByRef ExportNumberToNumberResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef ExportNumberToNumberResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("ExportNumberToNumber", New Object() {cashboxName, numberFrom, numberFromSpecified, numberTo, numberToSpecified})
|
|
ExportNumberToNumberResult = CType(results(0),ErrorCode)
|
|
ExportNumberToNumberResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub ExportNumberToNumberAsync(ByVal cashboxName As String, ByVal numberFrom As Integer, ByVal numberFromSpecified As Boolean, ByVal numberTo As Integer, ByVal numberToSpecified As Boolean)
|
|
Me.ExportNumberToNumberAsync(cashboxName, numberFrom, numberFromSpecified, numberTo, numberToSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub ExportNumberToNumberAsync(ByVal cashboxName As String, ByVal numberFrom As Integer, ByVal numberFromSpecified As Boolean, ByVal numberTo As Integer, ByVal numberToSpecified As Boolean, ByVal userState As Object)
|
|
If (Me.ExportNumberToNumberOperationCompleted Is Nothing) Then
|
|
Me.ExportNumberToNumberOperationCompleted = AddressOf Me.OnExportNumberToNumberOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("ExportNumberToNumber", New Object() {cashboxName, numberFrom, numberFromSpecified, numberTo, numberToSpecified}, Me.ExportNumberToNumberOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnExportNumberToNumberOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.ExportNumberToNumberCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent ExportNumberToNumberCompleted(Me, New ExportNumberToNumberCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/ExportCSVFiles", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub ExportCSVFiles( _
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, _
|
|
ByVal Z_NR_From As Integer, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal Z_NR_FromSpecified As Boolean, _
|
|
ByVal Z_NR_To As Integer, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal Z_NR_ToSpecified As Boolean, _
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal path As String, _
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal zipFileName As String, _
|
|
ByVal exportCashpointclosing As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportCashpointclosingSpecified As Boolean, _
|
|
ByVal exportLocation As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportLocationSpecified As Boolean, _
|
|
ByVal exportCashregister As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportCashregisterSpecified As Boolean, _
|
|
ByVal exportSlaves As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportSlavesSpecified As Boolean, _
|
|
ByVal exportPa As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportPaSpecified As Boolean, _
|
|
ByVal exportVat As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportVatSpecified As Boolean, _
|
|
ByVal exportTse As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportTseSpecified As Boolean, _
|
|
ByVal exportBusinesscases As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportBusinesscasesSpecified As Boolean, _
|
|
ByVal exportPayment As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportPaymentSpecified As Boolean, _
|
|
ByVal exportCashPerCurrency As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportCashPerCurrencySpecified As Boolean, _
|
|
ByVal exportTransactions As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportTransactionsSpecified As Boolean, _
|
|
ByVal exportAllocationGroups As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportAllocationGroupsSpecified As Boolean, _
|
|
ByVal exportTransactionsVat As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportTransactionsVatSpecified As Boolean, _
|
|
ByVal exportDatapayment As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportDatapaymentSpecified As Boolean, _
|
|
ByVal exportLines As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportLinesSpecified As Boolean, _
|
|
ByVal exportLinesVat As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportLinesVatSpecified As Boolean, _
|
|
ByVal exportItemamounts As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportItemamountsSpecified As Boolean, _
|
|
ByVal exportSubitems As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportSubitemsSpecified As Boolean, _
|
|
ByVal exportReferences As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportReferencesSpecified As Boolean, _
|
|
ByVal exportTransactionsTse As Boolean, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByVal exportTransactionsTseSpecified As Boolean, _
|
|
ByRef ExportCSVFilesResult As ErrorCode, _
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> ByRef ExportCSVFilesResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("ExportCSVFiles", New Object() {Z_KASSE_ID, Z_NR_From, Z_NR_FromSpecified, Z_NR_To, Z_NR_ToSpecified, path, zipFileName, exportCashpointclosing, exportCashpointclosingSpecified, exportLocation, exportLocationSpecified, exportCashregister, exportCashregisterSpecified, exportSlaves, exportSlavesSpecified, exportPa, exportPaSpecified, exportVat, exportVatSpecified, exportTse, exportTseSpecified, exportBusinesscases, exportBusinesscasesSpecified, exportPayment, exportPaymentSpecified, exportCashPerCurrency, exportCashPerCurrencySpecified, exportTransactions, exportTransactionsSpecified, exportAllocationGroups, exportAllocationGroupsSpecified, exportTransactionsVat, exportTransactionsVatSpecified, exportDatapayment, exportDatapaymentSpecified, exportLines, exportLinesSpecified, exportLinesVat, exportLinesVatSpecified, exportItemamounts, exportItemamountsSpecified, exportSubitems, exportSubitemsSpecified, exportReferences, exportReferencesSpecified, exportTransactionsTse, exportTransactionsTseSpecified})
|
|
ExportCSVFilesResult = CType(results(0),ErrorCode)
|
|
ExportCSVFilesResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub ExportCSVFilesAsync( _
|
|
ByVal Z_KASSE_ID As String, _
|
|
ByVal Z_NR_From As Integer, _
|
|
ByVal Z_NR_FromSpecified As Boolean, _
|
|
ByVal Z_NR_To As Integer, _
|
|
ByVal Z_NR_ToSpecified As Boolean, _
|
|
ByVal path As String, _
|
|
ByVal zipFileName As String, _
|
|
ByVal exportCashpointclosing As Boolean, _
|
|
ByVal exportCashpointclosingSpecified As Boolean, _
|
|
ByVal exportLocation As Boolean, _
|
|
ByVal exportLocationSpecified As Boolean, _
|
|
ByVal exportCashregister As Boolean, _
|
|
ByVal exportCashregisterSpecified As Boolean, _
|
|
ByVal exportSlaves As Boolean, _
|
|
ByVal exportSlavesSpecified As Boolean, _
|
|
ByVal exportPa As Boolean, _
|
|
ByVal exportPaSpecified As Boolean, _
|
|
ByVal exportVat As Boolean, _
|
|
ByVal exportVatSpecified As Boolean, _
|
|
ByVal exportTse As Boolean, _
|
|
ByVal exportTseSpecified As Boolean, _
|
|
ByVal exportBusinesscases As Boolean, _
|
|
ByVal exportBusinesscasesSpecified As Boolean, _
|
|
ByVal exportPayment As Boolean, _
|
|
ByVal exportPaymentSpecified As Boolean, _
|
|
ByVal exportCashPerCurrency As Boolean, _
|
|
ByVal exportCashPerCurrencySpecified As Boolean, _
|
|
ByVal exportTransactions As Boolean, _
|
|
ByVal exportTransactionsSpecified As Boolean, _
|
|
ByVal exportAllocationGroups As Boolean, _
|
|
ByVal exportAllocationGroupsSpecified As Boolean, _
|
|
ByVal exportTransactionsVat As Boolean, _
|
|
ByVal exportTransactionsVatSpecified As Boolean, _
|
|
ByVal exportDatapayment As Boolean, _
|
|
ByVal exportDatapaymentSpecified As Boolean, _
|
|
ByVal exportLines As Boolean, _
|
|
ByVal exportLinesSpecified As Boolean, _
|
|
ByVal exportLinesVat As Boolean, _
|
|
ByVal exportLinesVatSpecified As Boolean, _
|
|
ByVal exportItemamounts As Boolean, _
|
|
ByVal exportItemamountsSpecified As Boolean, _
|
|
ByVal exportSubitems As Boolean, _
|
|
ByVal exportSubitemsSpecified As Boolean, _
|
|
ByVal exportReferences As Boolean, _
|
|
ByVal exportReferencesSpecified As Boolean, _
|
|
ByVal exportTransactionsTse As Boolean, _
|
|
ByVal exportTransactionsTseSpecified As Boolean)
|
|
Me.ExportCSVFilesAsync(Z_KASSE_ID, Z_NR_From, Z_NR_FromSpecified, Z_NR_To, Z_NR_ToSpecified, path, zipFileName, exportCashpointclosing, exportCashpointclosingSpecified, exportLocation, exportLocationSpecified, exportCashregister, exportCashregisterSpecified, exportSlaves, exportSlavesSpecified, exportPa, exportPaSpecified, exportVat, exportVatSpecified, exportTse, exportTseSpecified, exportBusinesscases, exportBusinesscasesSpecified, exportPayment, exportPaymentSpecified, exportCashPerCurrency, exportCashPerCurrencySpecified, exportTransactions, exportTransactionsSpecified, exportAllocationGroups, exportAllocationGroupsSpecified, exportTransactionsVat, exportTransactionsVatSpecified, exportDatapayment, exportDatapaymentSpecified, exportLines, exportLinesSpecified, exportLinesVat, exportLinesVatSpecified, exportItemamounts, exportItemamountsSpecified, exportSubitems, exportSubitemsSpecified, exportReferences, exportReferencesSpecified, exportTransactionsTse, exportTransactionsTseSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub ExportCSVFilesAsync( _
|
|
ByVal Z_KASSE_ID As String, _
|
|
ByVal Z_NR_From As Integer, _
|
|
ByVal Z_NR_FromSpecified As Boolean, _
|
|
ByVal Z_NR_To As Integer, _
|
|
ByVal Z_NR_ToSpecified As Boolean, _
|
|
ByVal path As String, _
|
|
ByVal zipFileName As String, _
|
|
ByVal exportCashpointclosing As Boolean, _
|
|
ByVal exportCashpointclosingSpecified As Boolean, _
|
|
ByVal exportLocation As Boolean, _
|
|
ByVal exportLocationSpecified As Boolean, _
|
|
ByVal exportCashregister As Boolean, _
|
|
ByVal exportCashregisterSpecified As Boolean, _
|
|
ByVal exportSlaves As Boolean, _
|
|
ByVal exportSlavesSpecified As Boolean, _
|
|
ByVal exportPa As Boolean, _
|
|
ByVal exportPaSpecified As Boolean, _
|
|
ByVal exportVat As Boolean, _
|
|
ByVal exportVatSpecified As Boolean, _
|
|
ByVal exportTse As Boolean, _
|
|
ByVal exportTseSpecified As Boolean, _
|
|
ByVal exportBusinesscases As Boolean, _
|
|
ByVal exportBusinesscasesSpecified As Boolean, _
|
|
ByVal exportPayment As Boolean, _
|
|
ByVal exportPaymentSpecified As Boolean, _
|
|
ByVal exportCashPerCurrency As Boolean, _
|
|
ByVal exportCashPerCurrencySpecified As Boolean, _
|
|
ByVal exportTransactions As Boolean, _
|
|
ByVal exportTransactionsSpecified As Boolean, _
|
|
ByVal exportAllocationGroups As Boolean, _
|
|
ByVal exportAllocationGroupsSpecified As Boolean, _
|
|
ByVal exportTransactionsVat As Boolean, _
|
|
ByVal exportTransactionsVatSpecified As Boolean, _
|
|
ByVal exportDatapayment As Boolean, _
|
|
ByVal exportDatapaymentSpecified As Boolean, _
|
|
ByVal exportLines As Boolean, _
|
|
ByVal exportLinesSpecified As Boolean, _
|
|
ByVal exportLinesVat As Boolean, _
|
|
ByVal exportLinesVatSpecified As Boolean, _
|
|
ByVal exportItemamounts As Boolean, _
|
|
ByVal exportItemamountsSpecified As Boolean, _
|
|
ByVal exportSubitems As Boolean, _
|
|
ByVal exportSubitemsSpecified As Boolean, _
|
|
ByVal exportReferences As Boolean, _
|
|
ByVal exportReferencesSpecified As Boolean, _
|
|
ByVal exportTransactionsTse As Boolean, _
|
|
ByVal exportTransactionsTseSpecified As Boolean, _
|
|
ByVal userState As Object)
|
|
If (Me.ExportCSVFilesOperationCompleted Is Nothing) Then
|
|
Me.ExportCSVFilesOperationCompleted = AddressOf Me.OnExportCSVFilesOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("ExportCSVFiles", New Object() {Z_KASSE_ID, Z_NR_From, Z_NR_FromSpecified, Z_NR_To, Z_NR_ToSpecified, path, zipFileName, exportCashpointclosing, exportCashpointclosingSpecified, exportLocation, exportLocationSpecified, exportCashregister, exportCashregisterSpecified, exportSlaves, exportSlavesSpecified, exportPa, exportPaSpecified, exportVat, exportVatSpecified, exportTse, exportTseSpecified, exportBusinesscases, exportBusinesscasesSpecified, exportPayment, exportPaymentSpecified, exportCashPerCurrency, exportCashPerCurrencySpecified, exportTransactions, exportTransactionsSpecified, exportAllocationGroups, exportAllocationGroupsSpecified, exportTransactionsVat, exportTransactionsVatSpecified, exportDatapayment, exportDatapaymentSpecified, exportLines, exportLinesSpecified, exportLinesVat, exportLinesVatSpecified, exportItemamounts, exportItemamountsSpecified, exportSubitems, exportSubitemsSpecified, exportReferences, exportReferencesSpecified, exportTransactionsTse, exportTransactionsTseSpecified}, Me.ExportCSVFilesOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnExportCSVFilesOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.ExportCSVFilesCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent ExportCSVFilesCompleted(Me, New ExportCSVFilesCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/GetAvailableTseList", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub GetAvailableTseList(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal startDriveLetter As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal endDriveLetter As String, <System.Xml.Serialization.XmlArrayAttribute(IsNullable:=true), System.Xml.Serialization.XmlArrayItemAttribute([Namespace]:="http://schemas.microsoft.com/2003/10/Serialization/Arrays")> ByRef tseDriveLetterList() As String, <System.Xml.Serialization.XmlArrayAttribute(IsNullable:=true), System.Xml.Serialization.XmlArrayItemAttribute([Namespace]:="http://schemas.microsoft.com/2003/10/Serialization/Arrays")> ByRef tseSerialList() As String, ByRef count As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef countSpecified As Boolean, ByRef GetAvailableTseListResult As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef GetAvailableTseListResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("GetAvailableTseList", New Object() {startDriveLetter, endDriveLetter, tseDriveLetterList, tseSerialList, count, countSpecified})
|
|
tseDriveLetterList = CType(results(0),String())
|
|
tseSerialList = CType(results(1),String())
|
|
count = CType(results(2),Integer)
|
|
countSpecified = CType(results(3),Boolean)
|
|
GetAvailableTseListResult = CType(results(4),Integer)
|
|
GetAvailableTseListResultSpecified = CType(results(5),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetAvailableTseListAsync(ByVal startDriveLetter As String, ByVal endDriveLetter As String, ByVal tseDriveLetterList() As String, ByVal tseSerialList() As String, ByVal count As Integer, ByVal countSpecified As Boolean)
|
|
Me.GetAvailableTseListAsync(startDriveLetter, endDriveLetter, tseDriveLetterList, tseSerialList, count, countSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetAvailableTseListAsync(ByVal startDriveLetter As String, ByVal endDriveLetter As String, ByVal tseDriveLetterList() As String, ByVal tseSerialList() As String, ByVal count As Integer, ByVal countSpecified As Boolean, ByVal userState As Object)
|
|
If (Me.GetAvailableTseListOperationCompleted Is Nothing) Then
|
|
Me.GetAvailableTseListOperationCompleted = AddressOf Me.OnGetAvailableTseListOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("GetAvailableTseList", New Object() {startDriveLetter, endDriveLetter, tseDriveLetterList, tseSerialList, count, countSpecified}, Me.GetAvailableTseListOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnGetAvailableTseListOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.GetAvailableTseListCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent GetAvailableTseListCompleted(Me, New GetAvailableTseListCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/GetDsFinVKValues", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub GetDsFinVKValues(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef tse_serial As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef tse_sig_algo As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef tse_zeitformat As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef tse_pd_encoding As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef tse_public_key As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef tse_zertifikat As String, ByRef GetDsFinVKValuesResult As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef GetDsFinVKValuesResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("GetDsFinVKValues", New Object() {Z_KASSE_ID, tse_serial, tse_sig_algo, tse_zeitformat, tse_pd_encoding, tse_public_key, tse_zertifikat})
|
|
tse_serial = CType(results(0),String)
|
|
tse_sig_algo = CType(results(1),String)
|
|
tse_zeitformat = CType(results(2),String)
|
|
tse_pd_encoding = CType(results(3),String)
|
|
tse_public_key = CType(results(4),String)
|
|
tse_zertifikat = CType(results(5),String)
|
|
GetDsFinVKValuesResult = CType(results(6),Integer)
|
|
GetDsFinVKValuesResultSpecified = CType(results(7),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetDsFinVKValuesAsync(ByVal Z_KASSE_ID As String, ByVal tse_serial As String, ByVal tse_sig_algo As String, ByVal tse_zeitformat As String, ByVal tse_pd_encoding As String, ByVal tse_public_key As String, ByVal tse_zertifikat As String)
|
|
Me.GetDsFinVKValuesAsync(Z_KASSE_ID, tse_serial, tse_sig_algo, tse_zeitformat, tse_pd_encoding, tse_public_key, tse_zertifikat, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetDsFinVKValuesAsync(ByVal Z_KASSE_ID As String, ByVal tse_serial As String, ByVal tse_sig_algo As String, ByVal tse_zeitformat As String, ByVal tse_pd_encoding As String, ByVal tse_public_key As String, ByVal tse_zertifikat As String, ByVal userState As Object)
|
|
If (Me.GetDsFinVKValuesOperationCompleted Is Nothing) Then
|
|
Me.GetDsFinVKValuesOperationCompleted = AddressOf Me.OnGetDsFinVKValuesOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("GetDsFinVKValues", New Object() {Z_KASSE_ID, tse_serial, tse_sig_algo, tse_zeitformat, tse_pd_encoding, tse_public_key, tse_zertifikat}, Me.GetDsFinVKValuesOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnGetDsFinVKValuesOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.GetDsFinVKValuesCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent GetDsFinVKValuesCompleted(Me, New GetDsFinVKValuesCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/GetDsFinVKValuesForTse", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub GetDsFinVKValuesForTse(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal driveLetter As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef tseData As TSEData, ByRef GetDsFinVKValuesForTseResult As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef GetDsFinVKValuesForTseResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("GetDsFinVKValuesForTse", New Object() {Z_KASSE_ID, driveLetter, tseData})
|
|
tseData = CType(results(0),TSEData)
|
|
GetDsFinVKValuesForTseResult = CType(results(1),Integer)
|
|
GetDsFinVKValuesForTseResultSpecified = CType(results(2),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetDsFinVKValuesForTseAsync(ByVal Z_KASSE_ID As String, ByVal driveLetter As String, ByVal tseData As TSEData)
|
|
Me.GetDsFinVKValuesForTseAsync(Z_KASSE_ID, driveLetter, tseData, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetDsFinVKValuesForTseAsync(ByVal Z_KASSE_ID As String, ByVal driveLetter As String, ByVal tseData As TSEData, ByVal userState As Object)
|
|
If (Me.GetDsFinVKValuesForTseOperationCompleted Is Nothing) Then
|
|
Me.GetDsFinVKValuesForTseOperationCompleted = AddressOf Me.OnGetDsFinVKValuesForTseOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("GetDsFinVKValuesForTse", New Object() {Z_KASSE_ID, driveLetter, tseData}, Me.GetDsFinVKValuesForTseOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnGetDsFinVKValuesForTseOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.GetDsFinVKValuesForTseCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent GetDsFinVKValuesForTseCompleted(Me, New GetDsFinVKValuesForTseCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/SetupTseForFirstUseTse", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub SetupTseForFirstUseTse(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal driveLetter As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal admin_puk As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal admin_pin As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal timeadmin_pin As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal clientId As String, ByRef SetupTseForFirstUseTseResult As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef SetupTseForFirstUseTseResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("SetupTseForFirstUseTse", New Object() {Z_KASSE_ID, driveLetter, admin_puk, admin_pin, timeadmin_pin, clientId})
|
|
SetupTseForFirstUseTseResult = CType(results(0),Integer)
|
|
SetupTseForFirstUseTseResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub SetupTseForFirstUseTseAsync(ByVal Z_KASSE_ID As String, ByVal driveLetter As String, ByVal admin_puk As String, ByVal admin_pin As String, ByVal timeadmin_pin As String, ByVal clientId As String)
|
|
Me.SetupTseForFirstUseTseAsync(Z_KASSE_ID, driveLetter, admin_puk, admin_pin, timeadmin_pin, clientId, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub SetupTseForFirstUseTseAsync(ByVal Z_KASSE_ID As String, ByVal driveLetter As String, ByVal admin_puk As String, ByVal admin_pin As String, ByVal timeadmin_pin As String, ByVal clientId As String, ByVal userState As Object)
|
|
If (Me.SetupTseForFirstUseTseOperationCompleted Is Nothing) Then
|
|
Me.SetupTseForFirstUseTseOperationCompleted = AddressOf Me.OnSetupTseForFirstUseTseOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("SetupTseForFirstUseTse", New Object() {Z_KASSE_ID, driveLetter, admin_puk, admin_pin, timeadmin_pin, clientId}, Me.SetupTseForFirstUseTseOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnSetupTseForFirstUseTseOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.SetupTseForFirstUseTseCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent SetupTseForFirstUseTseCompleted(Me, New SetupTseForFirstUseTseCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/StringifyTseErrorCode", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Function StringifyTseErrorCode(ByVal tseErrorCode As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByVal tseErrorCodeSpecified As Boolean) As <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> String
|
|
Dim results() As Object = Me.Invoke("StringifyTseErrorCode", New Object() {tseErrorCode, tseErrorCodeSpecified})
|
|
Return CType(results(0),String)
|
|
End Function
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub StringifyTseErrorCodeAsync(ByVal tseErrorCode As Integer, ByVal tseErrorCodeSpecified As Boolean)
|
|
Me.StringifyTseErrorCodeAsync(tseErrorCode, tseErrorCodeSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub StringifyTseErrorCodeAsync(ByVal tseErrorCode As Integer, ByVal tseErrorCodeSpecified As Boolean, ByVal userState As Object)
|
|
If (Me.StringifyTseErrorCodeOperationCompleted Is Nothing) Then
|
|
Me.StringifyTseErrorCodeOperationCompleted = AddressOf Me.OnStringifyTseErrorCodeOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("StringifyTseErrorCode", New Object() {tseErrorCode, tseErrorCodeSpecified}, Me.StringifyTseErrorCodeOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnStringifyTseErrorCodeOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.StringifyTseErrorCodeCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent StringifyTseErrorCodeCompleted(Me, New StringifyTseErrorCodeCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/GetAvailableClientsTse", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub GetAvailableClientsTse(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal driveLetter As String, <System.Xml.Serialization.XmlArrayAttribute(IsNullable:=true), System.Xml.Serialization.XmlArrayItemAttribute([Namespace]:="http://schemas.microsoft.com/2003/10/Serialization/Arrays")> ByRef clientIds() As String, ByRef count As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef countSpecified As Boolean, ByRef GetAvailableClientsTseResult As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef GetAvailableClientsTseResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("GetAvailableClientsTse", New Object() {Z_KASSE_ID, driveLetter, clientIds, count, countSpecified})
|
|
clientIds = CType(results(0),String())
|
|
count = CType(results(1),Integer)
|
|
countSpecified = CType(results(2),Boolean)
|
|
GetAvailableClientsTseResult = CType(results(3),Integer)
|
|
GetAvailableClientsTseResultSpecified = CType(results(4),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetAvailableClientsTseAsync(ByVal Z_KASSE_ID As String, ByVal driveLetter As String, ByVal clientIds() As String, ByVal count As Integer, ByVal countSpecified As Boolean)
|
|
Me.GetAvailableClientsTseAsync(Z_KASSE_ID, driveLetter, clientIds, count, countSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetAvailableClientsTseAsync(ByVal Z_KASSE_ID As String, ByVal driveLetter As String, ByVal clientIds() As String, ByVal count As Integer, ByVal countSpecified As Boolean, ByVal userState As Object)
|
|
If (Me.GetAvailableClientsTseOperationCompleted Is Nothing) Then
|
|
Me.GetAvailableClientsTseOperationCompleted = AddressOf Me.OnGetAvailableClientsTseOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("GetAvailableClientsTse", New Object() {Z_KASSE_ID, driveLetter, clientIds, count, countSpecified}, Me.GetAvailableClientsTseOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnGetAvailableClientsTseOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.GetAvailableClientsTseCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent GetAvailableClientsTseCompleted(Me, New GetAvailableClientsTseCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/IsClientPresentTse", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub IsClientPresentTse(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal driveLetter As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal clientId As String, ByRef result As Boolean, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef resultSpecified As Boolean, ByRef IsClientPresentTseResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef IsClientPresentTseResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("IsClientPresentTse", New Object() {Z_KASSE_ID, driveLetter, clientId, result, resultSpecified})
|
|
result = CType(results(0),Boolean)
|
|
resultSpecified = CType(results(1),Boolean)
|
|
IsClientPresentTseResult = CType(results(2),ErrorCode)
|
|
IsClientPresentTseResultSpecified = CType(results(3),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub IsClientPresentTseAsync(ByVal Z_KASSE_ID As String, ByVal driveLetter As String, ByVal clientId As String, ByVal result As Boolean, ByVal resultSpecified As Boolean)
|
|
Me.IsClientPresentTseAsync(Z_KASSE_ID, driveLetter, clientId, result, resultSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub IsClientPresentTseAsync(ByVal Z_KASSE_ID As String, ByVal driveLetter As String, ByVal clientId As String, ByVal result As Boolean, ByVal resultSpecified As Boolean, ByVal userState As Object)
|
|
If (Me.IsClientPresentTseOperationCompleted Is Nothing) Then
|
|
Me.IsClientPresentTseOperationCompleted = AddressOf Me.OnIsClientPresentTseOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("IsClientPresentTse", New Object() {Z_KASSE_ID, driveLetter, clientId, result, resultSpecified}, Me.IsClientPresentTseOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnIsClientPresentTseOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.IsClientPresentTseCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent IsClientPresentTseCompleted(Me, New IsClientPresentTseCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/GetTaxIds", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub GetTaxIds(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef taxes As Taxes, ByRef GetTaxIdsResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef GetTaxIdsResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("GetTaxIds", New Object() {Z_KASSE_ID, taxes})
|
|
taxes = CType(results(0),Taxes)
|
|
GetTaxIdsResult = CType(results(1),ErrorCode)
|
|
GetTaxIdsResultSpecified = CType(results(2),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetTaxIdsAsync(ByVal Z_KASSE_ID As String, ByVal taxes As Taxes)
|
|
Me.GetTaxIdsAsync(Z_KASSE_ID, taxes, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetTaxIdsAsync(ByVal Z_KASSE_ID As String, ByVal taxes As Taxes, ByVal userState As Object)
|
|
If (Me.GetTaxIdsOperationCompleted Is Nothing) Then
|
|
Me.GetTaxIdsOperationCompleted = AddressOf Me.OnGetTaxIdsOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("GetTaxIds", New Object() {Z_KASSE_ID, taxes}, Me.GetTaxIdsOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnGetTaxIdsOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.GetTaxIdsCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent GetTaxIdsCompleted(Me, New GetTaxIdsCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/CreateCashpointClosing", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub CreateCashpointClosing(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, ByRef CreateCashpointClosingResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef CreateCashpointClosingResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("CreateCashpointClosing", New Object() {Z_KASSE_ID})
|
|
CreateCashpointClosingResult = CType(results(0),ErrorCode)
|
|
CreateCashpointClosingResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub CreateCashpointClosingAsync(ByVal Z_KASSE_ID As String)
|
|
Me.CreateCashpointClosingAsync(Z_KASSE_ID, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub CreateCashpointClosingAsync(ByVal Z_KASSE_ID As String, ByVal userState As Object)
|
|
If (Me.CreateCashpointClosingOperationCompleted Is Nothing) Then
|
|
Me.CreateCashpointClosingOperationCompleted = AddressOf Me.OnCreateCashpointClosingOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("CreateCashpointClosing", New Object() {Z_KASSE_ID}, Me.CreateCashpointClosingOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnCreateCashpointClosingOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.CreateCashpointClosingCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent CreateCashpointClosingCompleted(Me, New CreateCashpointClosingCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/GetLastReceiptValues", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub GetLastReceiptValues(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef transactionNumber As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef serialNumber As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef signature As String, ByRef transactionStart As Date, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef transactionStartSpecified As Boolean, ByRef transactionFinish As Date, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef transactionFinishSpecified As Boolean, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef sigCounter As String, ByRef GetLastReceiptValuesResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef GetLastReceiptValuesResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("GetLastReceiptValues", New Object() {Z_KASSE_ID, transactionNumber, serialNumber, signature, transactionStart, transactionStartSpecified, transactionFinish, transactionFinishSpecified, sigCounter})
|
|
transactionNumber = CType(results(0),String)
|
|
serialNumber = CType(results(1),String)
|
|
signature = CType(results(2),String)
|
|
transactionStart = CType(results(3),Date)
|
|
transactionStartSpecified = CType(results(4),Boolean)
|
|
transactionFinish = CType(results(5),Date)
|
|
transactionFinishSpecified = CType(results(6),Boolean)
|
|
sigCounter = CType(results(7),String)
|
|
GetLastReceiptValuesResult = CType(results(8),ErrorCode)
|
|
GetLastReceiptValuesResultSpecified = CType(results(9),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetLastReceiptValuesAsync(ByVal Z_KASSE_ID As String, ByVal transactionNumber As String, ByVal serialNumber As String, ByVal signature As String, ByVal transactionStart As Date, ByVal transactionStartSpecified As Boolean, ByVal transactionFinish As Date, ByVal transactionFinishSpecified As Boolean, ByVal sigCounter As String)
|
|
Me.GetLastReceiptValuesAsync(Z_KASSE_ID, transactionNumber, serialNumber, signature, transactionStart, transactionStartSpecified, transactionFinish, transactionFinishSpecified, sigCounter, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetLastReceiptValuesAsync(ByVal Z_KASSE_ID As String, ByVal transactionNumber As String, ByVal serialNumber As String, ByVal signature As String, ByVal transactionStart As Date, ByVal transactionStartSpecified As Boolean, ByVal transactionFinish As Date, ByVal transactionFinishSpecified As Boolean, ByVal sigCounter As String, ByVal userState As Object)
|
|
If (Me.GetLastReceiptValuesOperationCompleted Is Nothing) Then
|
|
Me.GetLastReceiptValuesOperationCompleted = AddressOf Me.OnGetLastReceiptValuesOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("GetLastReceiptValues", New Object() {Z_KASSE_ID, transactionNumber, serialNumber, signature, transactionStart, transactionStartSpecified, transactionFinish, transactionFinishSpecified, sigCounter}, Me.GetLastReceiptValuesOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnGetLastReceiptValuesOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.GetLastReceiptValuesCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent GetLastReceiptValuesCompleted(Me, New GetLastReceiptValuesCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/GetLastReceiptQrCode", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub GetLastReceiptQrCode(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef qrCode As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal mimeType As String, ByRef GetLastReceiptQrCodeResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef GetLastReceiptQrCodeResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("GetLastReceiptQrCode", New Object() {Z_KASSE_ID, qrCode, mimeType})
|
|
qrCode = CType(results(0),String)
|
|
GetLastReceiptQrCodeResult = CType(results(1),ErrorCode)
|
|
GetLastReceiptQrCodeResultSpecified = CType(results(2),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetLastReceiptQrCodeAsync(ByVal Z_KASSE_ID As String, ByVal qrCode As String, ByVal mimeType As String)
|
|
Me.GetLastReceiptQrCodeAsync(Z_KASSE_ID, qrCode, mimeType, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetLastReceiptQrCodeAsync(ByVal Z_KASSE_ID As String, ByVal qrCode As String, ByVal mimeType As String, ByVal userState As Object)
|
|
If (Me.GetLastReceiptQrCodeOperationCompleted Is Nothing) Then
|
|
Me.GetLastReceiptQrCodeOperationCompleted = AddressOf Me.OnGetLastReceiptQrCodeOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("GetLastReceiptQrCode", New Object() {Z_KASSE_ID, qrCode, mimeType}, Me.GetLastReceiptQrCodeOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnGetLastReceiptQrCodeOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.GetLastReceiptQrCodeCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent GetLastReceiptQrCodeCompleted(Me, New GetLastReceiptQrCodeCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/GetLastReceiptQrCodeContent", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub GetLastReceiptQrCodeContent(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef qrCodeContent As String, ByRef GetLastReceiptQrCodeContentResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef GetLastReceiptQrCodeContentResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("GetLastReceiptQrCodeContent", New Object() {Z_KASSE_ID, qrCodeContent})
|
|
qrCodeContent = CType(results(0),String)
|
|
GetLastReceiptQrCodeContentResult = CType(results(1),ErrorCode)
|
|
GetLastReceiptQrCodeContentResultSpecified = CType(results(2),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetLastReceiptQrCodeContentAsync(ByVal Z_KASSE_ID As String, ByVal qrCodeContent As String)
|
|
Me.GetLastReceiptQrCodeContentAsync(Z_KASSE_ID, qrCodeContent, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetLastReceiptQrCodeContentAsync(ByVal Z_KASSE_ID As String, ByVal qrCodeContent As String, ByVal userState As Object)
|
|
If (Me.GetLastReceiptQrCodeContentOperationCompleted Is Nothing) Then
|
|
Me.GetLastReceiptQrCodeContentOperationCompleted = AddressOf Me.OnGetLastReceiptQrCodeContentOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("GetLastReceiptQrCodeContent", New Object() {Z_KASSE_ID, qrCodeContent}, Me.GetLastReceiptQrCodeContentOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnGetLastReceiptQrCodeContentOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.GetLastReceiptQrCodeContentCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent GetLastReceiptQrCodeContentCompleted(Me, New GetLastReceiptQrCodeContentCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/RegisterNewClientTse", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub RegisterNewClientTse(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal driveLetter As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal newClientId As String, ByRef RegisterNewClientTseResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef RegisterNewClientTseResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("RegisterNewClientTse", New Object() {Z_KASSE_ID, driveLetter, newClientId})
|
|
RegisterNewClientTseResult = CType(results(0),ErrorCode)
|
|
RegisterNewClientTseResultSpecified = CType(results(1),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub RegisterNewClientTseAsync(ByVal Z_KASSE_ID As String, ByVal driveLetter As String, ByVal newClientId As String)
|
|
Me.RegisterNewClientTseAsync(Z_KASSE_ID, driveLetter, newClientId, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub RegisterNewClientTseAsync(ByVal Z_KASSE_ID As String, ByVal driveLetter As String, ByVal newClientId As String, ByVal userState As Object)
|
|
If (Me.RegisterNewClientTseOperationCompleted Is Nothing) Then
|
|
Me.RegisterNewClientTseOperationCompleted = AddressOf Me.OnRegisterNewClientTseOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("RegisterNewClientTse", New Object() {Z_KASSE_ID, driveLetter, newClientId}, Me.RegisterNewClientTseOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnRegisterNewClientTseOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.RegisterNewClientTseCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent RegisterNewClientTseCompleted(Me, New RegisterNewClientTseCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/IDSFinVKServer/GetNextBON_ID", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
|
|
Public Sub GetNextBON_ID(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByVal Z_KASSE_ID As String, ByRef BON_ID As Integer, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef BON_IDSpecified As Boolean, ByRef GetNextBON_IDResult As ErrorCode, <System.Xml.Serialization.XmlIgnoreAttribute()> ByRef GetNextBON_IDResultSpecified As Boolean)
|
|
Dim results() As Object = Me.Invoke("GetNextBON_ID", New Object() {Z_KASSE_ID, BON_ID, BON_IDSpecified})
|
|
BON_ID = CType(results(0),Integer)
|
|
BON_IDSpecified = CType(results(1),Boolean)
|
|
GetNextBON_IDResult = CType(results(2),ErrorCode)
|
|
GetNextBON_IDResultSpecified = CType(results(3),Boolean)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetNextBON_IDAsync(ByVal Z_KASSE_ID As String, ByVal BON_ID As Integer, ByVal BON_IDSpecified As Boolean)
|
|
Me.GetNextBON_IDAsync(Z_KASSE_ID, BON_ID, BON_IDSpecified, Nothing)
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Overloads Sub GetNextBON_IDAsync(ByVal Z_KASSE_ID As String, ByVal BON_ID As Integer, ByVal BON_IDSpecified As Boolean, ByVal userState As Object)
|
|
If (Me.GetNextBON_IDOperationCompleted Is Nothing) Then
|
|
Me.GetNextBON_IDOperationCompleted = AddressOf Me.OnGetNextBON_IDOperationCompleted
|
|
End If
|
|
Me.InvokeAsync("GetNextBON_ID", New Object() {Z_KASSE_ID, BON_ID, BON_IDSpecified}, Me.GetNextBON_IDOperationCompleted, userState)
|
|
End Sub
|
|
|
|
Private Sub OnGetNextBON_IDOperationCompleted(ByVal arg As Object)
|
|
If (Not (Me.GetNextBON_IDCompletedEvent) Is Nothing) Then
|
|
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
|
|
RaiseEvent GetNextBON_IDCompleted(Me, New GetNextBON_IDCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
|
|
End If
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public Shadows Sub CancelAsync(ByVal userState As Object)
|
|
MyBase.CancelAsync(userState)
|
|
End Sub
|
|
|
|
Private Function IsLocalFileSystemWebService(ByVal url As String) As Boolean
|
|
If ((url Is Nothing) _
|
|
OrElse (url Is String.Empty)) Then
|
|
Return false
|
|
End If
|
|
Dim wsUri As System.Uri = New System.Uri(url)
|
|
If ((wsUri.Port >= 1024) _
|
|
AndAlso (String.Compare(wsUri.Host, "localHost", System.StringComparison.OrdinalIgnoreCase) = 0)) Then
|
|
Return true
|
|
End If
|
|
Return false
|
|
End Function
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.8.3761.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.datacontract.org/2004/07/DSFinVK")> _
|
|
Public Enum ErrorCode
|
|
|
|
'''<remarks/>
|
|
OK
|
|
|
|
'''<remarks/>
|
|
FAILED
|
|
|
|
'''<remarks/>
|
|
BAD_USERNAME
|
|
|
|
'''<remarks/>
|
|
BAD_PASSWORD
|
|
|
|
'''<remarks/>
|
|
TSE_NOT_FOUND
|
|
|
|
'''<remarks/>
|
|
TSE_INITIALIZATION_FAILED
|
|
|
|
'''<remarks/>
|
|
TSE_BEGIN_TRANSACTION_FAILED
|
|
|
|
'''<remarks/>
|
|
TSE_FINISH_TRANSACTION_FAILED
|
|
|
|
'''<remarks/>
|
|
ARRAY_LENGTH_NOT_EQUAL
|
|
|
|
'''<remarks/>
|
|
PARAMETER_ERROR
|
|
|
|
'''<remarks/>
|
|
DSFINVKCOM_LICENSE_NOT_VALID
|
|
|
|
'''<remarks/>
|
|
KSVCOM_LICENSE_NOT_VALID
|
|
|
|
'''<remarks/>
|
|
DATABASE_NO_CONNECTION
|
|
|
|
'''<remarks/>
|
|
DATABASE_CONNECTION_NOT_OPENED
|
|
|
|
'''<remarks/>
|
|
DATABASE_NOT_SPECIFIED
|
|
|
|
'''<remarks/>
|
|
DATABASE_OPERATION_FAILED
|
|
|
|
'''<remarks/>
|
|
CASHBOX_NAME_NOT_UNIQUE
|
|
|
|
'''<remarks/>
|
|
CASHBOX_IN_USE
|
|
|
|
'''<remarks/>
|
|
CASHBOX_NOT_FOUND
|
|
|
|
'''<remarks/>
|
|
CASHBOX_NOT_MANAGED
|
|
|
|
'''<remarks/>
|
|
CASHBOX_ALREADY_MANAGED
|
|
|
|
'''<remarks/>
|
|
ROW_HAS_INVALID_DATA
|
|
|
|
'''<remarks/>
|
|
ROW_BON_ID_NOT_FOUND
|
|
|
|
'''<remarks/>
|
|
ROW_BON_ID_ALREADY_EXISTS
|
|
|
|
'''<remarks/>
|
|
ROW_BON_ID_ALREADY_FINISHED
|
|
End Enum
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.8.3761.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code"), _
|
|
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.datacontract.org/2004/07/DSFinVK")> _
|
|
Partial Public Class Kassendaten
|
|
|
|
Private iVNRField As Integer
|
|
|
|
Private iVNRFieldSpecified As Boolean
|
|
|
|
Private kASSE_BASISWAEH_CODEField As String
|
|
|
|
Private kASSE_BRANDField As String
|
|
|
|
Private kASSE_MODELLField As String
|
|
|
|
Private kASSE_SERIENNRField As String
|
|
|
|
Private kASSE_SW_BRANDField As String
|
|
|
|
Private kASSE_SW_VERSIONField As String
|
|
|
|
Private kEINE_UST_ZUORDNUNGField As String
|
|
|
|
Private lOC_LANDField As String
|
|
|
|
Private lOC_NAMEField As String
|
|
|
|
Private lOC_ORTField As String
|
|
|
|
Private lOC_PLZField As String
|
|
|
|
Private lOC_STRASSEField As String
|
|
|
|
Private lOC_USTIDField As String
|
|
|
|
Private z_KASSE_IDField As String
|
|
|
|
Private z_NRField As Long
|
|
|
|
Private z_NRFieldSpecified As Boolean
|
|
|
|
Private licenseField As String
|
|
|
|
Private tse_bezeichnungField As String
|
|
|
|
Private tse_ivnrField As Integer
|
|
|
|
Private tse_ivnrFieldSpecified As Boolean
|
|
|
|
'''<remarks/>
|
|
Public Property IVNR() As Integer
|
|
Get
|
|
Return Me.iVNRField
|
|
End Get
|
|
Set
|
|
Me.iVNRField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property IVNRSpecified() As Boolean
|
|
Get
|
|
Return Me.iVNRFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.iVNRFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KASSE_BASISWAEH_CODE() As String
|
|
Get
|
|
Return Me.kASSE_BASISWAEH_CODEField
|
|
End Get
|
|
Set
|
|
Me.kASSE_BASISWAEH_CODEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KASSE_BRAND() As String
|
|
Get
|
|
Return Me.kASSE_BRANDField
|
|
End Get
|
|
Set
|
|
Me.kASSE_BRANDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KASSE_MODELL() As String
|
|
Get
|
|
Return Me.kASSE_MODELLField
|
|
End Get
|
|
Set
|
|
Me.kASSE_MODELLField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KASSE_SERIENNR() As String
|
|
Get
|
|
Return Me.kASSE_SERIENNRField
|
|
End Get
|
|
Set
|
|
Me.kASSE_SERIENNRField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KASSE_SW_BRAND() As String
|
|
Get
|
|
Return Me.kASSE_SW_BRANDField
|
|
End Get
|
|
Set
|
|
Me.kASSE_SW_BRANDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KASSE_SW_VERSION() As String
|
|
Get
|
|
Return Me.kASSE_SW_VERSIONField
|
|
End Get
|
|
Set
|
|
Me.kASSE_SW_VERSIONField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KEINE_UST_ZUORDNUNG() As String
|
|
Get
|
|
Return Me.kEINE_UST_ZUORDNUNGField
|
|
End Get
|
|
Set
|
|
Me.kEINE_UST_ZUORDNUNGField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property LOC_LAND() As String
|
|
Get
|
|
Return Me.lOC_LANDField
|
|
End Get
|
|
Set
|
|
Me.lOC_LANDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property LOC_NAME() As String
|
|
Get
|
|
Return Me.lOC_NAMEField
|
|
End Get
|
|
Set
|
|
Me.lOC_NAMEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property LOC_ORT() As String
|
|
Get
|
|
Return Me.lOC_ORTField
|
|
End Get
|
|
Set
|
|
Me.lOC_ORTField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property LOC_PLZ() As String
|
|
Get
|
|
Return Me.lOC_PLZField
|
|
End Get
|
|
Set
|
|
Me.lOC_PLZField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property LOC_STRASSE() As String
|
|
Get
|
|
Return Me.lOC_STRASSEField
|
|
End Get
|
|
Set
|
|
Me.lOC_STRASSEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property LOC_USTID() As String
|
|
Get
|
|
Return Me.lOC_USTIDField
|
|
End Get
|
|
Set
|
|
Me.lOC_USTIDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property Z_KASSE_ID() As String
|
|
Get
|
|
Return Me.z_KASSE_IDField
|
|
End Get
|
|
Set
|
|
Me.z_KASSE_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Property Z_NR() As Long
|
|
Get
|
|
Return Me.z_NRField
|
|
End Get
|
|
Set
|
|
Me.z_NRField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property Z_NRSpecified() As Boolean
|
|
Get
|
|
Return Me.z_NRFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.z_NRFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property license() As String
|
|
Get
|
|
Return Me.licenseField
|
|
End Get
|
|
Set
|
|
Me.licenseField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property tse_bezeichnung() As String
|
|
Get
|
|
Return Me.tse_bezeichnungField
|
|
End Get
|
|
Set
|
|
Me.tse_bezeichnungField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Property tse_ivnr() As Integer
|
|
Get
|
|
Return Me.tse_ivnrField
|
|
End Get
|
|
Set
|
|
Me.tse_ivnrField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property tse_ivnrSpecified() As Boolean
|
|
Get
|
|
Return Me.tse_ivnrFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.tse_ivnrFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.8.3761.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code"), _
|
|
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.datacontract.org/2004/07/DSFinVK")> _
|
|
Partial Public Class Taxes
|
|
|
|
Private countField As Integer
|
|
|
|
Private countFieldSpecified As Boolean
|
|
|
|
Private uST_BESCHRField() As String
|
|
|
|
Private uST_SATZField() As Decimal
|
|
|
|
Private uST_SCHLUESSELField() As Integer
|
|
|
|
'''<remarks/>
|
|
Public Property Count() As Integer
|
|
Get
|
|
Return Me.countField
|
|
End Get
|
|
Set
|
|
Me.countField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property CountSpecified() As Boolean
|
|
Get
|
|
Return Me.countFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.countFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlArrayAttribute(IsNullable:=true), _
|
|
System.Xml.Serialization.XmlArrayItemAttribute([Namespace]:="http://schemas.microsoft.com/2003/10/Serialization/Arrays")> _
|
|
Public Property UST_BESCHR() As String()
|
|
Get
|
|
Return Me.uST_BESCHRField
|
|
End Get
|
|
Set
|
|
Me.uST_BESCHRField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlArrayAttribute(IsNullable:=true), _
|
|
System.Xml.Serialization.XmlArrayItemAttribute([Namespace]:="http://schemas.microsoft.com/2003/10/Serialization/Arrays", IsNullable:=false)> _
|
|
Public Property UST_SATZ() As Decimal()
|
|
Get
|
|
Return Me.uST_SATZField
|
|
End Get
|
|
Set
|
|
Me.uST_SATZField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlArrayAttribute(IsNullable:=true), _
|
|
System.Xml.Serialization.XmlArrayItemAttribute([Namespace]:="http://schemas.microsoft.com/2003/10/Serialization/Arrays", IsNullable:=false)> _
|
|
Public Property UST_SCHLUESSEL() As Integer()
|
|
Get
|
|
Return Me.uST_SCHLUESSELField
|
|
End Get
|
|
Set
|
|
Me.uST_SCHLUESSELField = value
|
|
End Set
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.8.3761.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code"), _
|
|
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.datacontract.org/2004/07/ItgKsV")> _
|
|
Partial Public Class TSEData
|
|
|
|
Private tse_pd_encodingField As String
|
|
|
|
Private tse_public_keyField As String
|
|
|
|
Private tse_serialField As String
|
|
|
|
Private tse_sig_algoField As String
|
|
|
|
Private tse_zeitformatField As String
|
|
|
|
Private tse_zertifikatField As String
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property tse_pd_encoding() As String
|
|
Get
|
|
Return Me.tse_pd_encodingField
|
|
End Get
|
|
Set
|
|
Me.tse_pd_encodingField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property tse_public_key() As String
|
|
Get
|
|
Return Me.tse_public_keyField
|
|
End Get
|
|
Set
|
|
Me.tse_public_keyField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property tse_serial() As String
|
|
Get
|
|
Return Me.tse_serialField
|
|
End Get
|
|
Set
|
|
Me.tse_serialField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property tse_sig_algo() As String
|
|
Get
|
|
Return Me.tse_sig_algoField
|
|
End Get
|
|
Set
|
|
Me.tse_sig_algoField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property tse_zeitformat() As String
|
|
Get
|
|
Return Me.tse_zeitformatField
|
|
End Get
|
|
Set
|
|
Me.tse_zeitformatField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property tse_zertifikat() As String
|
|
Get
|
|
Return Me.tse_zertifikatField
|
|
End Get
|
|
Set
|
|
Me.tse_zertifikatField = value
|
|
End Set
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.8.3761.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code"), _
|
|
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.datacontract.org/2004/07/DSFinVK")> _
|
|
Partial Public Class BonPosition_Ust
|
|
|
|
Private bON_IDField As String
|
|
|
|
Private pOS_BRUTTOField As Decimal
|
|
|
|
Private pOS_BRUTTOFieldSpecified As Boolean
|
|
|
|
Private pOS_NETTOField As Decimal
|
|
|
|
Private pOS_NETTOFieldSpecified As Boolean
|
|
|
|
Private pOS_USTField As Decimal
|
|
|
|
Private pOS_USTFieldSpecified As Boolean
|
|
|
|
Private pOS_ZEILEField As String
|
|
|
|
Private uST_SCHLUESSELField As Integer
|
|
|
|
Private uST_SCHLUESSELFieldSpecified As Boolean
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BON_ID() As String
|
|
Get
|
|
Return Me.bON_IDField
|
|
End Get
|
|
Set
|
|
Me.bON_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Property POS_BRUTTO() As Decimal
|
|
Get
|
|
Return Me.pOS_BRUTTOField
|
|
End Get
|
|
Set
|
|
Me.pOS_BRUTTOField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property POS_BRUTTOSpecified() As Boolean
|
|
Get
|
|
Return Me.pOS_BRUTTOFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.pOS_BRUTTOFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Property POS_NETTO() As Decimal
|
|
Get
|
|
Return Me.pOS_NETTOField
|
|
End Get
|
|
Set
|
|
Me.pOS_NETTOField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property POS_NETTOSpecified() As Boolean
|
|
Get
|
|
Return Me.pOS_NETTOFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.pOS_NETTOFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Property POS_UST() As Decimal
|
|
Get
|
|
Return Me.pOS_USTField
|
|
End Get
|
|
Set
|
|
Me.pOS_USTField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property POS_USTSpecified() As Boolean
|
|
Get
|
|
Return Me.pOS_USTFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.pOS_USTFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property POS_ZEILE() As String
|
|
Get
|
|
Return Me.pOS_ZEILEField
|
|
End Get
|
|
Set
|
|
Me.pOS_ZEILEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Property UST_SCHLUESSEL() As Integer
|
|
Get
|
|
Return Me.uST_SCHLUESSELField
|
|
End Get
|
|
Set
|
|
Me.uST_SCHLUESSELField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property UST_SCHLUESSELSpecified() As Boolean
|
|
Get
|
|
Return Me.uST_SCHLUESSELFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.uST_SCHLUESSELFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.8.3761.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code"), _
|
|
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.datacontract.org/2004/07/DSFinVK")> _
|
|
Partial Public Class BonPosition
|
|
|
|
Private aGENTUR_IDField As Integer
|
|
|
|
Private aGENTUR_IDFieldSpecified As Boolean
|
|
|
|
Private aRTIKELTEXTField As String
|
|
|
|
Private aRT_NRField As String
|
|
|
|
Private bON_IDField As String
|
|
|
|
Private eINHEITField As String
|
|
|
|
Private fAKTORField As Decimal
|
|
|
|
Private fAKTORFieldSpecified As Boolean
|
|
|
|
Private gTINField As String
|
|
|
|
Private gUTSCHEIN_NRField As String
|
|
|
|
Private gV_NAMEField As String
|
|
|
|
Private gV_TYPField As String
|
|
|
|
Private iNHAUSField As String
|
|
|
|
Private mENGEField As Decimal
|
|
|
|
Private mENGEFieldSpecified As Boolean
|
|
|
|
Private pOS_TERMINAL_IDField As String
|
|
|
|
Private pOS_ZEILEField As String
|
|
|
|
Private p_STORNOField As String
|
|
|
|
Private sTK_BRField As Decimal
|
|
|
|
Private sTK_BRFieldSpecified As Boolean
|
|
|
|
Private wARENGRField As String
|
|
|
|
Private wARENGR_IDField As String
|
|
|
|
Private z_KASSE_IDField As String
|
|
|
|
'''<remarks/>
|
|
Public Property AGENTUR_ID() As Integer
|
|
Get
|
|
Return Me.aGENTUR_IDField
|
|
End Get
|
|
Set
|
|
Me.aGENTUR_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property AGENTUR_IDSpecified() As Boolean
|
|
Get
|
|
Return Me.aGENTUR_IDFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.aGENTUR_IDFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property ARTIKELTEXT() As String
|
|
Get
|
|
Return Me.aRTIKELTEXTField
|
|
End Get
|
|
Set
|
|
Me.aRTIKELTEXTField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property ART_NR() As String
|
|
Get
|
|
Return Me.aRT_NRField
|
|
End Get
|
|
Set
|
|
Me.aRT_NRField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BON_ID() As String
|
|
Get
|
|
Return Me.bON_IDField
|
|
End Get
|
|
Set
|
|
Me.bON_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property EINHEIT() As String
|
|
Get
|
|
Return Me.eINHEITField
|
|
End Get
|
|
Set
|
|
Me.eINHEITField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Property FAKTOR() As Decimal
|
|
Get
|
|
Return Me.fAKTORField
|
|
End Get
|
|
Set
|
|
Me.fAKTORField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property FAKTORSpecified() As Boolean
|
|
Get
|
|
Return Me.fAKTORFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.fAKTORFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property GTIN() As String
|
|
Get
|
|
Return Me.gTINField
|
|
End Get
|
|
Set
|
|
Me.gTINField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property GUTSCHEIN_NR() As String
|
|
Get
|
|
Return Me.gUTSCHEIN_NRField
|
|
End Get
|
|
Set
|
|
Me.gUTSCHEIN_NRField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property GV_NAME() As String
|
|
Get
|
|
Return Me.gV_NAMEField
|
|
End Get
|
|
Set
|
|
Me.gV_NAMEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property GV_TYP() As String
|
|
Get
|
|
Return Me.gV_TYPField
|
|
End Get
|
|
Set
|
|
Me.gV_TYPField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property INHAUS() As String
|
|
Get
|
|
Return Me.iNHAUSField
|
|
End Get
|
|
Set
|
|
Me.iNHAUSField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Property MENGE() As Decimal
|
|
Get
|
|
Return Me.mENGEField
|
|
End Get
|
|
Set
|
|
Me.mENGEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property MENGESpecified() As Boolean
|
|
Get
|
|
Return Me.mENGEFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.mENGEFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property POS_TERMINAL_ID() As String
|
|
Get
|
|
Return Me.pOS_TERMINAL_IDField
|
|
End Get
|
|
Set
|
|
Me.pOS_TERMINAL_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property POS_ZEILE() As String
|
|
Get
|
|
Return Me.pOS_ZEILEField
|
|
End Get
|
|
Set
|
|
Me.pOS_ZEILEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property P_STORNO() As String
|
|
Get
|
|
Return Me.p_STORNOField
|
|
End Get
|
|
Set
|
|
Me.p_STORNOField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Property STK_BR() As Decimal
|
|
Get
|
|
Return Me.sTK_BRField
|
|
End Get
|
|
Set
|
|
Me.sTK_BRField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property STK_BRSpecified() As Boolean
|
|
Get
|
|
Return Me.sTK_BRFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.sTK_BRFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property WARENGR() As String
|
|
Get
|
|
Return Me.wARENGRField
|
|
End Get
|
|
Set
|
|
Me.wARENGRField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property WARENGR_ID() As String
|
|
Get
|
|
Return Me.wARENGR_IDField
|
|
End Get
|
|
Set
|
|
Me.wARENGR_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property Z_KASSE_ID() As String
|
|
Get
|
|
Return Me.z_KASSE_IDField
|
|
End Get
|
|
Set
|
|
Me.z_KASSE_IDField = value
|
|
End Set
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.8.3761.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code"), _
|
|
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.datacontract.org/2004/07/DSFinVK")> _
|
|
Partial Public Class BonKopfFinish
|
|
|
|
Private bON_ENDEField As String
|
|
|
|
Private bON_IDField As String
|
|
|
|
Private pROCESS_TYPEField As String
|
|
|
|
Private uMS_BRUTTOField As Decimal
|
|
|
|
Private uMS_BRUTTOFieldSpecified As Boolean
|
|
|
|
Private z_KASSE_IDField As String
|
|
|
|
Private payment_currenciesField() As String
|
|
|
|
Private payment_per_currencyField() As Decimal
|
|
|
|
Private payment_typesField() As String
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BON_ENDE() As String
|
|
Get
|
|
Return Me.bON_ENDEField
|
|
End Get
|
|
Set
|
|
Me.bON_ENDEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BON_ID() As String
|
|
Get
|
|
Return Me.bON_IDField
|
|
End Get
|
|
Set
|
|
Me.bON_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property PROCESS_TYPE() As String
|
|
Get
|
|
Return Me.pROCESS_TYPEField
|
|
End Get
|
|
Set
|
|
Me.pROCESS_TYPEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Property UMS_BRUTTO() As Decimal
|
|
Get
|
|
Return Me.uMS_BRUTTOField
|
|
End Get
|
|
Set
|
|
Me.uMS_BRUTTOField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property UMS_BRUTTOSpecified() As Boolean
|
|
Get
|
|
Return Me.uMS_BRUTTOFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.uMS_BRUTTOFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property Z_KASSE_ID() As String
|
|
Get
|
|
Return Me.z_KASSE_IDField
|
|
End Get
|
|
Set
|
|
Me.z_KASSE_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlArrayAttribute(IsNullable:=true), _
|
|
System.Xml.Serialization.XmlArrayItemAttribute([Namespace]:="http://schemas.microsoft.com/2003/10/Serialization/Arrays")> _
|
|
Public Property payment_currencies() As String()
|
|
Get
|
|
Return Me.payment_currenciesField
|
|
End Get
|
|
Set
|
|
Me.payment_currenciesField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlArrayAttribute(IsNullable:=true), _
|
|
System.Xml.Serialization.XmlArrayItemAttribute([Namespace]:="http://schemas.microsoft.com/2003/10/Serialization/Arrays", IsNullable:=false)> _
|
|
Public Property payment_per_currency() As Decimal()
|
|
Get
|
|
Return Me.payment_per_currencyField
|
|
End Get
|
|
Set
|
|
Me.payment_per_currencyField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlArrayAttribute(IsNullable:=true), _
|
|
System.Xml.Serialization.XmlArrayItemAttribute([Namespace]:="http://schemas.microsoft.com/2003/10/Serialization/Arrays")> _
|
|
Public Property payment_types() As String()
|
|
Get
|
|
Return Me.payment_typesField
|
|
End Get
|
|
Set
|
|
Me.payment_typesField = value
|
|
End Set
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.8.3761.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code"), _
|
|
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.datacontract.org/2004/07/DSFinVK")> _
|
|
Partial Public Class BonKopfBegin
|
|
|
|
Private bEDIENER_IDField As String
|
|
|
|
Private bEDIENER_NAMEField As String
|
|
|
|
Private bON_IDField As String
|
|
|
|
Private bON_NAMEField As String
|
|
|
|
Private bON_NOTIZField As String
|
|
|
|
Private bON_NRField As Integer
|
|
|
|
Private bON_NRFieldSpecified As Boolean
|
|
|
|
Private bON_STARTField As String
|
|
|
|
Private bON_STORNOField As String
|
|
|
|
Private bON_TYPField As String
|
|
|
|
Private kUNDE_IDField As String
|
|
|
|
Private kUNDE_LANDField As String
|
|
|
|
Private kUNDE_NAMEField As String
|
|
|
|
Private kUNDE_ORTField As String
|
|
|
|
Private kUNDE_PLZField As String
|
|
|
|
Private kUNDE_STRASSEField As String
|
|
|
|
Private kUNDE_TYPField As String
|
|
|
|
Private kUNDE_USTIDField As String
|
|
|
|
Private tERMINAL_IDField As String
|
|
|
|
Private z_KASSE_IDField As String
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BEDIENER_ID() As String
|
|
Get
|
|
Return Me.bEDIENER_IDField
|
|
End Get
|
|
Set
|
|
Me.bEDIENER_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BEDIENER_NAME() As String
|
|
Get
|
|
Return Me.bEDIENER_NAMEField
|
|
End Get
|
|
Set
|
|
Me.bEDIENER_NAMEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BON_ID() As String
|
|
Get
|
|
Return Me.bON_IDField
|
|
End Get
|
|
Set
|
|
Me.bON_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BON_NAME() As String
|
|
Get
|
|
Return Me.bON_NAMEField
|
|
End Get
|
|
Set
|
|
Me.bON_NAMEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BON_NOTIZ() As String
|
|
Get
|
|
Return Me.bON_NOTIZField
|
|
End Get
|
|
Set
|
|
Me.bON_NOTIZField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public Property BON_NR() As Integer
|
|
Get
|
|
Return Me.bON_NRField
|
|
End Get
|
|
Set
|
|
Me.bON_NRField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlIgnoreAttribute()> _
|
|
Public Property BON_NRSpecified() As Boolean
|
|
Get
|
|
Return Me.bON_NRFieldSpecified
|
|
End Get
|
|
Set
|
|
Me.bON_NRFieldSpecified = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BON_START() As String
|
|
Get
|
|
Return Me.bON_STARTField
|
|
End Get
|
|
Set
|
|
Me.bON_STARTField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BON_STORNO() As String
|
|
Get
|
|
Return Me.bON_STORNOField
|
|
End Get
|
|
Set
|
|
Me.bON_STORNOField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property BON_TYP() As String
|
|
Get
|
|
Return Me.bON_TYPField
|
|
End Get
|
|
Set
|
|
Me.bON_TYPField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KUNDE_ID() As String
|
|
Get
|
|
Return Me.kUNDE_IDField
|
|
End Get
|
|
Set
|
|
Me.kUNDE_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KUNDE_LAND() As String
|
|
Get
|
|
Return Me.kUNDE_LANDField
|
|
End Get
|
|
Set
|
|
Me.kUNDE_LANDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KUNDE_NAME() As String
|
|
Get
|
|
Return Me.kUNDE_NAMEField
|
|
End Get
|
|
Set
|
|
Me.kUNDE_NAMEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KUNDE_ORT() As String
|
|
Get
|
|
Return Me.kUNDE_ORTField
|
|
End Get
|
|
Set
|
|
Me.kUNDE_ORTField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KUNDE_PLZ() As String
|
|
Get
|
|
Return Me.kUNDE_PLZField
|
|
End Get
|
|
Set
|
|
Me.kUNDE_PLZField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KUNDE_STRASSE() As String
|
|
Get
|
|
Return Me.kUNDE_STRASSEField
|
|
End Get
|
|
Set
|
|
Me.kUNDE_STRASSEField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KUNDE_TYP() As String
|
|
Get
|
|
Return Me.kUNDE_TYPField
|
|
End Get
|
|
Set
|
|
Me.kUNDE_TYPField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property KUNDE_USTID() As String
|
|
Get
|
|
Return Me.kUNDE_USTIDField
|
|
End Get
|
|
Set
|
|
Me.kUNDE_USTIDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property TERMINAL_ID() As String
|
|
Get
|
|
Return Me.tERMINAL_IDField
|
|
End Get
|
|
Set
|
|
Me.tERMINAL_IDField = value
|
|
End Set
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> _
|
|
Public Property Z_KASSE_ID() As String
|
|
Get
|
|
Return Me.z_KASSE_IDField
|
|
End Get
|
|
Set
|
|
Me.z_KASSE_IDField = value
|
|
End Set
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub GetMachineCodeCompletedEventHandler(ByVal sender As Object, ByVal e As GetMachineCodeCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class GetMachineCodeCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property Result() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),String)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub InitializeLibraryCompletedEventHandler(ByVal sender As Object, ByVal e As InitializeLibraryCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class InitializeLibraryCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property InitializeLibraryResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property InitializeLibraryResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub CleanupLibraryCompletedEventHandler(ByVal sender As Object, ByVal e As CleanupLibraryCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class CleanupLibraryCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property CleanupLibraryResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property CleanupLibraryResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub CreateDatabaseCompletedEventHandler(ByVal sender As Object, ByVal e As CreateDatabaseCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class CreateDatabaseCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property CreateDatabaseResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property CreateDatabaseResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub CreateCashboxCompletedEventHandler(ByVal sender As Object, ByVal e As CreateCashboxCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class CreateCashboxCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property CreateCashboxResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property CreateCashboxResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub GetCashboxesCompletedEventHandler(ByVal sender As Object, ByVal e As GetCashboxesCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class GetCashboxesCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property cashBoxes() As Kassendaten()
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),Kassendaten())
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetCashboxesResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetCashboxesResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub BeginReceiptCompletedEventHandler(ByVal sender As Object, ByVal e As BeginReceiptCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class BeginReceiptCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property transactionNumber() As Integer
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),Integer)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property transactionNumberSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property BeginReceiptResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property BeginReceiptResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(3),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub UpdateReceiptCompletedEventHandler(ByVal sender As Object, ByVal e As UpdateReceiptCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class UpdateReceiptCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property UpdateReceiptResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property UpdateReceiptResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub FinishReceiptCompletedEventHandler(ByVal sender As Object, ByVal e As FinishReceiptCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class FinishReceiptCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property FinishReceiptResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property FinishReceiptResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub AddPositionToReceiptCompletedEventHandler(ByVal sender As Object, ByVal e As AddPositionToReceiptCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class AddPositionToReceiptCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property AddPositionToReceiptResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property AddPositionToReceiptResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub ExportFullCompletedEventHandler(ByVal sender As Object, ByVal e As ExportFullCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class ExportFullCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property ExportFullResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property ExportFullResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub ExportDateToDateCompletedEventHandler(ByVal sender As Object, ByVal e As ExportDateToDateCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class ExportDateToDateCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property ExportDateToDateResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property ExportDateToDateResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub ExportNumberToNumberCompletedEventHandler(ByVal sender As Object, ByVal e As ExportNumberToNumberCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class ExportNumberToNumberCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property ExportNumberToNumberResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property ExportNumberToNumberResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub ExportCSVFilesCompletedEventHandler(ByVal sender As Object, ByVal e As ExportCSVFilesCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class ExportCSVFilesCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property ExportCSVFilesResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property ExportCSVFilesResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub GetAvailableTseListCompletedEventHandler(ByVal sender As Object, ByVal e As GetAvailableTseListCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class GetAvailableTseListCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property tseDriveLetterList() As String()
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),String())
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property tseSerialList() As String()
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),String())
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property count() As Integer
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),Integer)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property countSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(3),Boolean)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetAvailableTseListResult() As Integer
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(4),Integer)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetAvailableTseListResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(5),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub GetDsFinVKValuesCompletedEventHandler(ByVal sender As Object, ByVal e As GetDsFinVKValuesCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class GetDsFinVKValuesCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property tse_serial() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property tse_sig_algo() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property tse_zeitformat() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property tse_pd_encoding() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(3),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property tse_public_key() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(4),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property tse_zertifikat() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(5),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetDsFinVKValuesResult() As Integer
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(6),Integer)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetDsFinVKValuesResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(7),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub GetDsFinVKValuesForTseCompletedEventHandler(ByVal sender As Object, ByVal e As GetDsFinVKValuesForTseCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class GetDsFinVKValuesForTseCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property tseData() As TSEData
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),TSEData)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetDsFinVKValuesForTseResult() As Integer
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Integer)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetDsFinVKValuesForTseResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub SetupTseForFirstUseTseCompletedEventHandler(ByVal sender As Object, ByVal e As SetupTseForFirstUseTseCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class SetupTseForFirstUseTseCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property SetupTseForFirstUseTseResult() As Integer
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),Integer)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property SetupTseForFirstUseTseResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub StringifyTseErrorCodeCompletedEventHandler(ByVal sender As Object, ByVal e As StringifyTseErrorCodeCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class StringifyTseErrorCodeCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property Result() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),String)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub GetAvailableClientsTseCompletedEventHandler(ByVal sender As Object, ByVal e As GetAvailableClientsTseCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class GetAvailableClientsTseCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property clientIds() As String()
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),String())
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property count() As Integer
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Integer)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property countSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),Boolean)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetAvailableClientsTseResult() As Integer
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(3),Integer)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetAvailableClientsTseResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(4),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub IsClientPresentTseCompletedEventHandler(ByVal sender As Object, ByVal e As IsClientPresentTseCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class IsClientPresentTseCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property result() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),Boolean)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property resultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property IsClientPresentTseResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property IsClientPresentTseResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(3),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub GetTaxIdsCompletedEventHandler(ByVal sender As Object, ByVal e As GetTaxIdsCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class GetTaxIdsCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property taxes() As Taxes
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),Taxes)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetTaxIdsResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetTaxIdsResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub CreateCashpointClosingCompletedEventHandler(ByVal sender As Object, ByVal e As CreateCashpointClosingCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class CreateCashpointClosingCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property CreateCashpointClosingResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property CreateCashpointClosingResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub GetLastReceiptValuesCompletedEventHandler(ByVal sender As Object, ByVal e As GetLastReceiptValuesCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class GetLastReceiptValuesCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property transactionNumber() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property serialNumber() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property signature() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property transactionStart() As Date
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(3),Date)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property transactionStartSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(4),Boolean)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property transactionFinish() As Date
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(5),Date)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property transactionFinishSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(6),Boolean)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property sigCounter() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(7),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetLastReceiptValuesResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(8),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetLastReceiptValuesResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(9),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub GetLastReceiptQrCodeCompletedEventHandler(ByVal sender As Object, ByVal e As GetLastReceiptQrCodeCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class GetLastReceiptQrCodeCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property qrCode() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetLastReceiptQrCodeResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetLastReceiptQrCodeResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub GetLastReceiptQrCodeContentCompletedEventHandler(ByVal sender As Object, ByVal e As GetLastReceiptQrCodeContentCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class GetLastReceiptQrCodeContentCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property qrCodeContent() As String
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),String)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetLastReceiptQrCodeContentResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetLastReceiptQrCodeContentResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub RegisterNewClientTseCompletedEventHandler(ByVal sender As Object, ByVal e As RegisterNewClientTseCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class RegisterNewClientTseCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property RegisterNewClientTseResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property RegisterNewClientTseResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0")> _
|
|
Public Delegate Sub GetNextBON_IDCompletedEventHandler(ByVal sender As Object, ByVal e As GetNextBON_IDCompletedEventArgs)
|
|
|
|
'''<remarks/>
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.3761.0"), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class GetNextBON_IDCompletedEventArgs
|
|
Inherits System.ComponentModel.AsyncCompletedEventArgs
|
|
|
|
Private results() As Object
|
|
|
|
Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object)
|
|
MyBase.New(exception, cancelled, userState)
|
|
Me.results = results
|
|
End Sub
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property BON_ID() As Integer
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(0),Integer)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property BON_IDSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(1),Boolean)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetNextBON_IDResult() As ErrorCode
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(2),ErrorCode)
|
|
End Get
|
|
End Property
|
|
|
|
'''<remarks/>
|
|
Public ReadOnly Property GetNextBON_IDResultSpecified() As Boolean
|
|
Get
|
|
Me.RaiseExceptionIfNecessary
|
|
Return CType(Me.results(3),Boolean)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
End Namespace
|