Revert "commit"

This commit is contained in:
2024-10-02 08:59:41 +00:00
parent 298156bc8d
commit a39d888c67
2987 changed files with 174 additions and 13775 deletions

View File

@@ -0,0 +1,6 @@
<?xml version="1.0" encoding="utf-8"?>
<DiscoveryClientResultsFile xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<Results>
<DiscoveryClientResult referenceType="System.Web.Services.Discovery.ContractReference" url="http://ec.europa.eu/taxation_customs/dds2/eos/validation/services/validation?wsdl" filename="validation.wsdl" />
</Results>
</DiscoveryClientResultsFile>

View File

@@ -0,0 +1,336 @@
'------------------------------------------------------------------------------
' <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 EORI
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Web.Services.WebServiceBindingAttribute(Name:="validationSoapBinding", [Namespace]:="http://eori.ws.eos.dds.s/")> _
Partial Public Class validation
Inherits System.Web.Services.Protocols.SoapHttpClientProtocol
Private validateEORIOperationCompleted As System.Threading.SendOrPostCallback
Private useDefaultCredentialsSetExplicitly As Boolean
'''<remarks/>
Public Sub New()
MyBase.New
Me.Url = Global.SDL.My.MySettings.Default.SDL_EORI_validation
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 validateEORICompleted As validateEORICompletedEventHandler
'''<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("", RequestNamespace:="http://eori.ws.eos.dds.s/", ResponseNamespace:="http://eori.ws.eos.dds.s/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function validateEORI(<System.Xml.Serialization.XmlElementAttribute("eori")> ByVal eori() As String) As <System.Xml.Serialization.XmlElementAttribute("return", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> eoriValidationResult
Dim results() As Object = Me.Invoke("validateEORI", New Object() {eori})
Return CType(results(0),eoriValidationResult)
End Function
'''<remarks/>
Public Overloads Sub validateEORIAsync(ByVal eori() As String)
Me.validateEORIAsync(eori, Nothing)
End Sub
'''<remarks/>
Public Overloads Sub validateEORIAsync(ByVal eori() As String, ByVal userState As Object)
If (Me.validateEORIOperationCompleted Is Nothing) Then
Me.validateEORIOperationCompleted = AddressOf Me.OnvalidateEORIOperationCompleted
End If
Me.InvokeAsync("validateEORI", New Object() {eori}, Me.validateEORIOperationCompleted, userState)
End Sub
Private Sub OnvalidateEORIOperationCompleted(ByVal arg As Object)
If (Not (Me.validateEORICompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent validateEORICompleted(Me, New validateEORICompletedEventArgs(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.9037.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://eori.ws.eos.dds.s/")> _
Partial Public Class eoriValidationResult
Private requestDateField As String
Private errorDescriptionField As String
Private resultField() As eoriResponse
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property requestDate() As String
Get
Return Me.requestDateField
End Get
Set
Me.requestDateField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property errorDescription() As String
Get
Return Me.errorDescriptionField
End Get
Set
Me.errorDescriptionField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute("result", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, IsNullable:=true)> _
Public Property result() As eoriResponse()
Get
Return Me.resultField
End Get
Set
Me.resultField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.8.9037.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://eori.ws.eos.dds.s/")> _
Partial Public Class eoriResponse
Private eoriField As String
Private statusField As Integer
Private statusDescrField As String
Private errorReasonField As String
Private nameField As String
Private addressField As String
Private streetField As String
Private postalCodeField As String
Private cityField As String
Private countryField As String
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property eori() As String
Get
Return Me.eoriField
End Get
Set
Me.eoriField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property status() As Integer
Get
Return Me.statusField
End Get
Set
Me.statusField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property statusDescr() As String
Get
Return Me.statusDescrField
End Get
Set
Me.statusDescrField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property errorReason() As String
Get
Return Me.errorReasonField
End Get
Set
Me.errorReasonField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property name() As String
Get
Return Me.nameField
End Get
Set
Me.nameField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property address() As String
Get
Return Me.addressField
End Get
Set
Me.addressField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property street() As String
Get
Return Me.streetField
End Get
Set
Me.streetField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property postalCode() As String
Get
Return Me.postalCodeField
End Get
Set
Me.postalCodeField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property city() As String
Get
Return Me.cityField
End Get
Set
Me.cityField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property country() As String
Get
Return Me.countryField
End Get
Set
Me.countryField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0")> _
Public Delegate Sub validateEORICompletedEventHandler(ByVal sender As Object, ByVal e As validateEORICompletedEventArgs)
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code")> _
Partial Public Class validateEORICompletedEventArgs
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 eoriValidationResult
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(0),eoriValidationResult)
End Get
End Property
End Class
End Namespace

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="eoriValidationResult" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>SDL.EORI.eoriValidationResult, Web References.EORI.Reference.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

View File

@@ -0,0 +1,70 @@
<?xml version="1.0" encoding="utf-8"?>
<wsdl:definitions xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/" xmlns:tns="http://eori.ws.eos.dds.s/" xmlns:ns1="http://schemas.xmlsoap.org/soap/http" name="validation" targetNamespace="http://eori.ws.eos.dds.s/" xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/">
<wsdl:types>
<xsd:schema xmlns:ns0="http://eori.ws.eos.dds.s/" targetNamespace="http://eori.ws.eos.dds.s/">
<xsd:complexType name="validateEORI">
<xsd:sequence>
<xsd:element minOccurs="0" maxOccurs="unbounded" form="qualified" name="eori" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="eoriResponse">
<xsd:sequence>
<xsd:element name="eori" type="xsd:string" />
<xsd:element name="status" type="xsd:int" />
<xsd:element name="statusDescr" type="xsd:string" />
<xsd:element minOccurs="0" name="errorReason" type="xsd:string" />
<xsd:element minOccurs="0" name="name" type="xsd:string" />
<xsd:element minOccurs="0" name="address" type="xsd:string" />
<xsd:element minOccurs="0" name="street" type="xsd:string" />
<xsd:element minOccurs="0" name="postalCode" type="xsd:string" />
<xsd:element minOccurs="0" name="city" type="xsd:string" />
<xsd:element minOccurs="0" name="country" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="validateEORIResponse">
<xsd:sequence>
<xsd:element minOccurs="0" name="return" type="ns0:eoriValidationResult" />
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="eoriValidationResult">
<xsd:sequence>
<xsd:element name="requestDate" type="xsd:string" />
<xsd:element minOccurs="0" name="errorDescription" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="unbounded" name="result" nillable="true" type="ns0:eoriResponse" />
</xsd:sequence>
</xsd:complexType>
<xsd:element name="validateEORI" type="ns0:validateEORI" />
<xsd:element name="validateEORIResponse" type="ns0:validateEORIResponse" />
</xsd:schema>
</wsdl:types>
<wsdl:message name="validateEORI">
<wsdl:part name="parameters" element="tns:validateEORI" />
</wsdl:message>
<wsdl:message name="validateEORIResponse">
<wsdl:part name="parameters" element="tns:validateEORIResponse" />
</wsdl:message>
<wsdl:portType name="EORIValidation">
<wsdl:documentation>Validates the EORI numbers provided. Validation is performed following those principles: The number of EORI numbers to validate at once is limited, maximal size of a message is limited, number of requests in a timeframe is limited, content of the message has to be validated against several threats.</wsdl:documentation>
<wsdl:operation name="validateEORI">
<wsdl:input name="validateEORI" message="tns:validateEORI" />
<wsdl:output name="validateEORIResponse" message="tns:validateEORIResponse" />
</wsdl:operation>
</wsdl:portType>
<wsdl:binding name="validationSoapBinding" type="tns:EORIValidation">
<soap:binding transport="http://schemas.xmlsoap.org/soap/http" />
<wsdl:operation name="validateEORI">
<soap:operation soapAction="" style="document" />
<wsdl:input name="validateEORI">
<soap:body use="literal" />
</wsdl:input>
<wsdl:output name="validateEORIResponse">
<soap:body use="literal" />
</wsdl:output>
</wsdl:operation>
</wsdl:binding>
<wsdl:service name="validation">
<wsdl:port name="EORIValidationImplPort" binding="tns:validationSoapBinding">
<soap:address location="http://ec.europa.eu/taxation_customs/dds2/eos/validation/services/validation" />
</wsdl:port>
</wsdl:service>
</wsdl:definitions>

View File

@@ -0,0 +1,7 @@
<?xml version="1.0" encoding="utf-8"?>
<DiscoveryClientResultsFile xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<Results>
<DiscoveryClientResult referenceType="System.Web.Services.Discovery.SchemaReference" url="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage.xsd" filename="uidAbfrage.xsd" />
<DiscoveryClientResult referenceType="System.Web.Services.Discovery.ContractReference" url="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage.wsdl" filename="uidAbfrageService.wsdl" />
</Results>
</DiscoveryClientResultsFile>

View File

@@ -0,0 +1,236 @@
'------------------------------------------------------------------------------
' <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 at.gv.bmf.finanzonline
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Web.Services.WebServiceBindingAttribute(Name:="uidAbfrageServiceBinding", [Namespace]:="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage")> _
Partial Public Class uidAbfrageService
Inherits System.Web.Services.Protocols.SoapHttpClientProtocol
Private uidAbfrageOperationCompleted As System.Threading.SendOrPostCallback
Private useDefaultCredentialsSetExplicitly As Boolean
'''<remarks/>
Public Sub New()
MyBase.New
Me.Url = Global.SDL.My.MySettings.Default.SDL_at_gv_bmf_finanzonline_uidAbfrageService
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 uidAbfrageCompleted As uidAbfrageCompletedEventHandler
'''<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("uidAbfrage", RequestElementName:="uidAbfrageServiceRequest", RequestNamespace:="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage", ResponseElementName:="uidAbfrageServiceResponse", ResponseNamespace:="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function uidAbfrage(ByVal tid As String, ByVal benid As String, ByVal id As String, ByVal uid_tn As String, ByVal uid As String, ByVal stufe As uidAbfrageServiceRequestStufe, ByRef msg As String, ByRef name As String, ByRef adrz1 As String, ByRef adrz2 As String, ByRef adrz3 As String, ByRef adrz4 As String, ByRef adrz5 As String, ByRef adrz6 As String) As <System.Xml.Serialization.XmlElementAttribute("rc")> Integer
Dim results() As Object = Me.Invoke("uidAbfrage", New Object() {tid, benid, id, uid_tn, uid, stufe})
msg = CType(results(1),String)
name = CType(results(2),String)
adrz1 = CType(results(3),String)
adrz2 = CType(results(4),String)
adrz3 = CType(results(5),String)
adrz4 = CType(results(6),String)
adrz5 = CType(results(7),String)
adrz6 = CType(results(8),String)
Return CType(results(0),Integer)
End Function
'''<remarks/>
Public Overloads Sub uidAbfrageAsync(ByVal tid As String, ByVal benid As String, ByVal id As String, ByVal uid_tn As String, ByVal uid As String, ByVal stufe As uidAbfrageServiceRequestStufe)
Me.uidAbfrageAsync(tid, benid, id, uid_tn, uid, stufe, Nothing)
End Sub
'''<remarks/>
Public Overloads Sub uidAbfrageAsync(ByVal tid As String, ByVal benid As String, ByVal id As String, ByVal uid_tn As String, ByVal uid As String, ByVal stufe As uidAbfrageServiceRequestStufe, ByVal userState As Object)
If (Me.uidAbfrageOperationCompleted Is Nothing) Then
Me.uidAbfrageOperationCompleted = AddressOf Me.OnuidAbfrageOperationCompleted
End If
Me.InvokeAsync("uidAbfrage", New Object() {tid, benid, id, uid_tn, uid, stufe}, Me.uidAbfrageOperationCompleted, userState)
End Sub
Private Sub OnuidAbfrageOperationCompleted(ByVal arg As Object)
If (Not (Me.uidAbfrageCompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent uidAbfrageCompleted(Me, New uidAbfrageCompletedEventArgs(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.9037.0"), _
System.SerializableAttribute(), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=true, [Namespace]:="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage")> _
Public Enum uidAbfrageServiceRequestStufe
'''<remarks/>
<System.Xml.Serialization.XmlEnumAttribute("1")> _
Item1
'''<remarks/>
<System.Xml.Serialization.XmlEnumAttribute("2")> _
Item2
End Enum
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0")> _
Public Delegate Sub uidAbfrageCompletedEventHandler(ByVal sender As Object, ByVal e As uidAbfrageCompletedEventArgs)
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code")> _
Partial Public Class uidAbfrageCompletedEventArgs
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 Integer
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(0),Integer)
End Get
End Property
'''<remarks/>
Public ReadOnly Property msg() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(1),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property name() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(2),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property adrz1() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(3),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property adrz2() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(4),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property adrz3() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(5),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property adrz4() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(6),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property adrz5() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(7),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property adrz6() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(8),String)
End Get
End Property
End Class
End Namespace

View File

@@ -0,0 +1,69 @@
<?xml version="1.0" encoding="utf-8"?>
<xs:schema xmlns:uid="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage" elementFormDefault="qualified" targetNamespace="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage" xmlns:xs="http://www.w3.org/2001/XMLSchema">
<xs:element name="uidAbfrageServiceRequest">
<xs:complexType>
<xs:sequence>
<xs:element name="tid">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:pattern value="[0-9A-Za-z]{8,12}" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="benid">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="12" />
<xs:minLength value="5" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="id">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:pattern value="[0-9A-Za-z]{10,24}" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="uid_tn">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:pattern value="[0-9A-Za-z]+" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="uid">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:pattern value="[0-9A-Za-z]+" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="stufe">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:length value="1" />
<xs:enumeration value="1" />
<xs:enumeration value="2" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="uidAbfrageServiceResponse">
<xs:complexType>
<xs:sequence>
<xs:element name="rc" type="xs:int" />
<xs:element minOccurs="0" name="msg" type="xs:string" />
<xs:element minOccurs="0" name="name" type="xs:string" />
<xs:element minOccurs="0" name="adrz1" type="xs:string" />
<xs:element minOccurs="0" name="adrz2" type="xs:string" />
<xs:element minOccurs="0" name="adrz3" type="xs:string" />
<xs:element minOccurs="0" name="adrz4" type="xs:string" />
<xs:element minOccurs="0" name="adrz5" type="xs:string" />
<xs:element minOccurs="0" name="adrz6" type="xs:string" />
</xs:sequence>
</xs:complexType>
</xs:element>
</xs:schema>

View File

@@ -0,0 +1,37 @@
<?xml version="1.0" encoding="utf-8"?>
<definitions xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/" xmlns:tns="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage" name="uidAbfrageService" targetNamespace="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage" xmlns="http://schemas.xmlsoap.org/wsdl/">
<types>
<xsd:schema>
<xsd:import schemaLocation="uidAbfrage.xsd" namespace="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage" />
</xsd:schema>
</types>
<message name="uidAbfrageServiceRequest">
<part name="parameters" element="tns:uidAbfrageServiceRequest" />
</message>
<message name="uidAbfrageServiceResponse">
<part name="parameters" element="tns:uidAbfrageServiceResponse" />
</message>
<portType name="uidAbfragePort">
<operation name="uidAbfrage">
<input name="uidAbfrageServiceRequest" message="tns:uidAbfrageServiceRequest" />
<output name="uidAbfrageServiceResponse" message="tns:uidAbfrageServiceResponse" />
</operation>
</portType>
<binding name="uidAbfrageServiceBinding" type="tns:uidAbfragePort">
<soap:binding transport="http://schemas.xmlsoap.org/soap/http" />
<operation name="uidAbfrage">
<soap:operation soapAction="uidAbfrage" />
<input name="uidAbfrageServiceRequest">
<soap:body use="literal" />
</input>
<output name="uidAbfrageServiceResponse">
<soap:body use="literal" />
</output>
</operation>
</binding>
<service name="uidAbfrageService">
<port name="uidAbfrage" binding="tns:uidAbfrageServiceBinding">
<soap:address location="https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage/" />
</port>
</service>
</definitions>

View File

@@ -0,0 +1,7 @@
<?xml version="1.0" encoding="utf-8"?>
<DiscoveryClientResultsFile xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<Results>
<DiscoveryClientResult referenceType="System.Web.Services.Discovery.SchemaReference" url="https://finanzonline.bmf.gv.at/fonws/ws/session.xsd" filename="session.xsd" />
<DiscoveryClientResult referenceType="System.Web.Services.Discovery.ContractReference" url="https://finanzonline.bmf.gv.at/fonws/ws/sessionService.wsdl" filename="sessionService.wsdl" />
</Results>
</DiscoveryClientResultsFile>

View File

@@ -0,0 +1,235 @@
'------------------------------------------------------------------------------
' <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 at.gv.bmf.finanzonlineLogin
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Web.Services.WebServiceBindingAttribute(Name:="sessionServiceBinding", [Namespace]:="https://finanzonline.bmf.gv.at/fon/ws/session")> _
Partial Public Class sessionService
Inherits System.Web.Services.Protocols.SoapHttpClientProtocol
Private loginOperationCompleted As System.Threading.SendOrPostCallback
Private logoutOperationCompleted As System.Threading.SendOrPostCallback
Private useDefaultCredentialsSetExplicitly As Boolean
'''<remarks/>
Public Sub New()
MyBase.New
Me.Url = Global.SDL.My.MySettings.Default.SDL_at_gv_bmf_finanzonline1_sessionService
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 loginCompleted As loginCompletedEventHandler
'''<remarks/>
Public Event logoutCompleted As logoutCompletedEventHandler
'''<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("login", RequestElementName:="loginRequest", RequestNamespace:="https://finanzonline.bmf.gv.at/fon/ws/session", ResponseNamespace:="https://finanzonline.bmf.gv.at/fon/ws/session", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function login(ByVal tid As String, ByVal benid As String, ByVal pin As String, ByVal herstellerid As String, ByRef rc As Integer, ByRef msg As String) As <System.Xml.Serialization.XmlElementAttribute("id")> String
Dim results() As Object = Me.Invoke("login", New Object() {tid, benid, pin, herstellerid})
rc = CType(results(1),Integer)
msg = CType(results(2),String)
Return CType(results(0),String)
End Function
'''<remarks/>
Public Overloads Sub loginAsync(ByVal tid As String, ByVal benid As String, ByVal pin As String, ByVal herstellerid As String)
Me.loginAsync(tid, benid, pin, herstellerid, Nothing)
End Sub
'''<remarks/>
Public Overloads Sub loginAsync(ByVal tid As String, ByVal benid As String, ByVal pin As String, ByVal herstellerid As String, ByVal userState As Object)
If (Me.loginOperationCompleted Is Nothing) Then
Me.loginOperationCompleted = AddressOf Me.OnloginOperationCompleted
End If
Me.InvokeAsync("login", New Object() {tid, benid, pin, herstellerid}, Me.loginOperationCompleted, userState)
End Sub
Private Sub OnloginOperationCompleted(ByVal arg As Object)
If (Not (Me.loginCompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent loginCompleted(Me, New loginCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
End If
End Sub
'''<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("logout", RequestElementName:="logoutRequest", RequestNamespace:="https://finanzonline.bmf.gv.at/fon/ws/session", ResponseNamespace:="https://finanzonline.bmf.gv.at/fon/ws/session", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function logout(ByVal tid As String, ByVal benid As String, ByVal id As String, ByRef msg As String) As <System.Xml.Serialization.XmlElementAttribute("rc")> Integer
Dim results() As Object = Me.Invoke("logout", New Object() {tid, benid, id})
msg = CType(results(1),String)
Return CType(results(0),Integer)
End Function
'''<remarks/>
Public Overloads Sub logoutAsync(ByVal tid As String, ByVal benid As String, ByVal id As String)
Me.logoutAsync(tid, benid, id, Nothing)
End Sub
'''<remarks/>
Public Overloads Sub logoutAsync(ByVal tid As String, ByVal benid As String, ByVal id As String, ByVal userState As Object)
If (Me.logoutOperationCompleted Is Nothing) Then
Me.logoutOperationCompleted = AddressOf Me.OnlogoutOperationCompleted
End If
Me.InvokeAsync("logout", New Object() {tid, benid, id}, Me.logoutOperationCompleted, userState)
End Sub
Private Sub OnlogoutOperationCompleted(ByVal arg As Object)
If (Not (Me.logoutCompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent logoutCompleted(Me, New logoutCompletedEventArgs(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.Web.Services", "4.8.9037.0")> _
Public Delegate Sub loginCompletedEventHandler(ByVal sender As Object, ByVal e As loginCompletedEventArgs)
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code")> _
Partial Public Class loginCompletedEventArgs
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
'''<remarks/>
Public ReadOnly Property rc() As Integer
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(1),Integer)
End Get
End Property
'''<remarks/>
Public ReadOnly Property msg() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(2),String)
End Get
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0")> _
Public Delegate Sub logoutCompletedEventHandler(ByVal sender As Object, ByVal e As logoutCompletedEventArgs)
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code")> _
Partial Public Class logoutCompletedEventArgs
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 Integer
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(0),Integer)
End Get
End Property
'''<remarks/>
Public ReadOnly Property msg() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(1),String)
End Get
End Property
End Class
End Namespace

View File

@@ -0,0 +1,83 @@
<?xml version="1.0" encoding="utf-8"?>
<xs:schema elementFormDefault="qualified" targetNamespace="https://finanzonline.bmf.gv.at/fon/ws/session" xmlns:xs="http://www.w3.org/2001/XMLSchema">
<xs:element name="loginRequest">
<xs:complexType>
<xs:sequence>
<xs:element name="tid">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:pattern value="[0-9A-Za-z]{8,12}" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="benid">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="12" />
<xs:minLength value="5" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="pin">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="12" />
<xs:minLength value="5" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="herstellerid">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:pattern value="[0-9A-Za-z]{10,24}" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="loginResponse">
<xs:complexType>
<xs:sequence>
<xs:element name="id" type="xs:string" />
<xs:element name="rc" type="xs:int" />
<xs:element minOccurs="0" name="msg" type="xs:string" />
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="logoutRequest">
<xs:complexType>
<xs:sequence>
<xs:element name="tid">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:pattern value="[0-9A-Za-z]{8,12}" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="benid">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:pattern value="[0-9A-Za-z]{5,12}" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="id">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:pattern value="[0-9A-Za-z]{10,24}" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="logoutResponse">
<xs:complexType>
<xs:sequence>
<xs:element name="rc" type="xs:int" />
<xs:element minOccurs="0" name="msg" type="xs:string" />
</xs:sequence>
</xs:complexType>
</xs:element>
</xs:schema>

View File

@@ -0,0 +1,56 @@
<?xml version="1.0" encoding="utf-8"?>
<definitions xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/" xmlns:tns="https://finanzonline.bmf.gv.at/fon/ws/session" name="sessionService" targetNamespace="https://finanzonline.bmf.gv.at/fon/ws/session" xmlns="http://schemas.xmlsoap.org/wsdl/">
<types>
<xsd:schema>
<xsd:import schemaLocation="session.xsd" namespace="https://finanzonline.bmf.gv.at/fon/ws/session" />
</xsd:schema>
</types>
<message name="logoutRequest">
<part name="parameters" element="tns:logoutRequest" />
</message>
<message name="loginRequest">
<part name="parameters" element="tns:loginRequest" />
</message>
<message name="loginResponse">
<part name="parameters" element="tns:loginResponse" />
</message>
<message name="logoutResponse">
<part name="parameters" element="tns:logoutResponse" />
</message>
<portType name="sessionServicePort">
<operation name="login">
<input name="loginRequest" message="tns:loginRequest" />
<output name="loginResponse" message="tns:loginResponse" />
</operation>
<operation name="logout">
<input name="logoutRequest" message="tns:logoutRequest" />
<output name="logoutResponse" message="tns:logoutResponse" />
</operation>
</portType>
<binding name="sessionServiceBinding" type="tns:sessionServicePort">
<soap:binding transport="http://schemas.xmlsoap.org/soap/http" />
<operation name="login">
<soap:operation soapAction="login" />
<input name="loginRequest">
<soap:body use="literal" />
</input>
<output name="loginResponse">
<soap:body use="literal" />
</output>
</operation>
<operation name="logout">
<soap:operation soapAction="logout" />
<input name="logoutRequest">
<soap:body use="literal" />
</input>
<output name="logoutResponse">
<soap:body use="literal" />
</output>
</operation>
</binding>
<service name="sessionService">
<port name="session" binding="tns:sessionServiceBinding">
<soap:address location="https://finanzonline.bmf.gv.at:443/fonws/ws/sessionService" />
</port>
</service>
</definitions>

View File

@@ -0,0 +1,6 @@
<?xml version="1.0" encoding="utf-8"?>
<DiscoveryClientResultsFile xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<Results>
<DiscoveryClientResult referenceType="System.Web.Services.Discovery.ContractReference" url="https://ec.europa.eu/taxation_customs/vies/checkVatService.wsdl" filename="checkVatService.wsdl" />
</Results>
</DiscoveryClientResultsFile>

View File

@@ -0,0 +1,474 @@
'------------------------------------------------------------------------------
' <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 eu.europa.ec
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Web.Services.WebServiceBindingAttribute(Name:="checkVatBinding", [Namespace]:="urn:ec.europa.eu:taxud:vies:services:checkVat")> _
Partial Public Class checkVatService
Inherits System.Web.Services.Protocols.SoapHttpClientProtocol
Private checkVatOperationCompleted As System.Threading.SendOrPostCallback
Private checkVatApproxOperationCompleted As System.Threading.SendOrPostCallback
Private useDefaultCredentialsSetExplicitly As Boolean
'''<remarks/>
Public Sub New()
MyBase.New
Me.Url = Global.SDL.My.MySettings.Default.SDL_eu_europa_ec_checkVatService
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 checkVatCompleted As checkVatCompletedEventHandler
'''<remarks/>
Public Event checkVatApproxCompleted As checkVatApproxCompletedEventHandler
'''<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("", RequestNamespace:="urn:ec.europa.eu:taxud:vies:services:checkVat:types", ResponseNamespace:="urn:ec.europa.eu:taxud:vies:services:checkVat:types", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function checkVat(ByRef countryCode As String, ByRef vatNumber As String, ByRef valid As Boolean, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef name As String, <System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)> ByRef address As String) As <System.Xml.Serialization.XmlElementAttribute("requestDate", DataType:="date")> Date
Dim results() As Object = Me.Invoke("checkVat", New Object() {countryCode, vatNumber})
countryCode = CType(results(1),String)
vatNumber = CType(results(2),String)
valid = CType(results(3),Boolean)
name = CType(results(4),String)
address = CType(results(5),String)
Return CType(results(0),Date)
End Function
'''<remarks/>
Public Overloads Sub checkVatAsync(ByVal countryCode As String, ByVal vatNumber As String)
Me.checkVatAsync(countryCode, vatNumber, Nothing)
End Sub
'''<remarks/>
Public Overloads Sub checkVatAsync(ByVal countryCode As String, ByVal vatNumber As String, ByVal userState As Object)
If (Me.checkVatOperationCompleted Is Nothing) Then
Me.checkVatOperationCompleted = AddressOf Me.OncheckVatOperationCompleted
End If
Me.InvokeAsync("checkVat", New Object() {countryCode, vatNumber}, Me.checkVatOperationCompleted, userState)
End Sub
Private Sub OncheckVatOperationCompleted(ByVal arg As Object)
If (Not (Me.checkVatCompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent checkVatCompleted(Me, New checkVatCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
End If
End Sub
'''<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("", RequestNamespace:="urn:ec.europa.eu:taxud:vies:services:checkVat:types", ResponseNamespace:="urn:ec.europa.eu:taxud:vies:services:checkVat:types", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function checkVatApprox( _
ByRef countryCode As String, _
ByRef vatNumber As String, _
ByRef traderName As String, _
ByRef traderCompanyType As String, _
ByRef traderStreet As String, _
ByRef traderPostcode As String, _
ByRef traderCity As String, _
ByVal requesterCountryCode As String, _
ByVal requesterVatNumber As String, _
ByRef valid As Boolean, _
ByRef traderAddress As String, _
ByRef traderNameMatch As matchCode, _
<System.Xml.Serialization.XmlIgnoreAttribute()> ByRef traderNameMatchSpecified As Boolean, _
ByRef traderCompanyTypeMatch As matchCode, _
<System.Xml.Serialization.XmlIgnoreAttribute()> ByRef traderCompanyTypeMatchSpecified As Boolean, _
ByRef traderStreetMatch As matchCode, _
<System.Xml.Serialization.XmlIgnoreAttribute()> ByRef traderStreetMatchSpecified As Boolean, _
ByRef traderPostcodeMatch As matchCode, _
<System.Xml.Serialization.XmlIgnoreAttribute()> ByRef traderPostcodeMatchSpecified As Boolean, _
ByRef traderCityMatch As matchCode, _
<System.Xml.Serialization.XmlIgnoreAttribute()> ByRef traderCityMatchSpecified As Boolean, _
ByRef requestIdentifier As String) As <System.Xml.Serialization.XmlElementAttribute("requestDate", DataType:="date")> Date
Dim results() As Object = Me.Invoke("checkVatApprox", New Object() {countryCode, vatNumber, traderName, traderCompanyType, traderStreet, traderPostcode, traderCity, requesterCountryCode, requesterVatNumber})
countryCode = CType(results(1),String)
vatNumber = CType(results(2),String)
traderName = CType(results(3),String)
traderCompanyType = CType(results(4),String)
traderStreet = CType(results(5),String)
traderPostcode = CType(results(6),String)
traderCity = CType(results(7),String)
valid = CType(results(8),Boolean)
traderAddress = CType(results(9),String)
traderNameMatch = CType(results(10),matchCode)
traderNameMatchSpecified = CType(results(11),Boolean)
traderCompanyTypeMatch = CType(results(12),matchCode)
traderCompanyTypeMatchSpecified = CType(results(13),Boolean)
traderStreetMatch = CType(results(14),matchCode)
traderStreetMatchSpecified = CType(results(15),Boolean)
traderPostcodeMatch = CType(results(16),matchCode)
traderPostcodeMatchSpecified = CType(results(17),Boolean)
traderCityMatch = CType(results(18),matchCode)
traderCityMatchSpecified = CType(results(19),Boolean)
requestIdentifier = CType(results(20),String)
Return CType(results(0),Date)
End Function
'''<remarks/>
Public Overloads Sub checkVatApproxAsync(ByVal countryCode As String, ByVal vatNumber As String, ByVal traderName As String, ByVal traderCompanyType As String, ByVal traderStreet As String, ByVal traderPostcode As String, ByVal traderCity As String, ByVal requesterCountryCode As String, ByVal requesterVatNumber As String)
Me.checkVatApproxAsync(countryCode, vatNumber, traderName, traderCompanyType, traderStreet, traderPostcode, traderCity, requesterCountryCode, requesterVatNumber, Nothing)
End Sub
'''<remarks/>
Public Overloads Sub checkVatApproxAsync(ByVal countryCode As String, ByVal vatNumber As String, ByVal traderName As String, ByVal traderCompanyType As String, ByVal traderStreet As String, ByVal traderPostcode As String, ByVal traderCity As String, ByVal requesterCountryCode As String, ByVal requesterVatNumber As String, ByVal userState As Object)
If (Me.checkVatApproxOperationCompleted Is Nothing) Then
Me.checkVatApproxOperationCompleted = AddressOf Me.OncheckVatApproxOperationCompleted
End If
Me.InvokeAsync("checkVatApprox", New Object() {countryCode, vatNumber, traderName, traderCompanyType, traderStreet, traderPostcode, traderCity, requesterCountryCode, requesterVatNumber}, Me.checkVatApproxOperationCompleted, userState)
End Sub
Private Sub OncheckVatApproxOperationCompleted(ByVal arg As Object)
If (Not (Me.checkVatApproxCompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent checkVatApproxCompleted(Me, New checkVatApproxCompletedEventArgs(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.9037.0"), _
System.SerializableAttribute(), _
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="urn:ec.europa.eu:taxud:vies:services:checkVat:types")> _
Public Enum matchCode
'''<remarks/>
<System.Xml.Serialization.XmlEnumAttribute("1")> _
Item1
'''<remarks/>
<System.Xml.Serialization.XmlEnumAttribute("2")> _
Item2
'''<remarks/>
<System.Xml.Serialization.XmlEnumAttribute("3")> _
Item3
End Enum
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0")> _
Public Delegate Sub checkVatCompletedEventHandler(ByVal sender As Object, ByVal e As checkVatCompletedEventArgs)
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code")> _
Partial Public Class checkVatCompletedEventArgs
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 Date
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(0),Date)
End Get
End Property
'''<remarks/>
Public ReadOnly Property countryCode() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(1),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property vatNumber() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(2),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property valid() As Boolean
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(3),Boolean)
End Get
End Property
'''<remarks/>
Public ReadOnly Property name() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(4),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property address() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(5),String)
End Get
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0")> _
Public Delegate Sub checkVatApproxCompletedEventHandler(ByVal sender As Object, ByVal e As checkVatApproxCompletedEventArgs)
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code")> _
Partial Public Class checkVatApproxCompletedEventArgs
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 Date
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(0),Date)
End Get
End Property
'''<remarks/>
Public ReadOnly Property countryCode() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(1),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property vatNumber() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(2),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderName() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(3),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderCompanyType() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(4),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderStreet() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(5),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderPostcode() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(6),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderCity() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(7),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property valid() As Boolean
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(8),Boolean)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderAddress() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(9),String)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderNameMatch() As matchCode
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(10),matchCode)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderNameMatchSpecified() As Boolean
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(11),Boolean)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderCompanyTypeMatch() As matchCode
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(12),matchCode)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderCompanyTypeMatchSpecified() As Boolean
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(13),Boolean)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderStreetMatch() As matchCode
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(14),matchCode)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderStreetMatchSpecified() As Boolean
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(15),Boolean)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderPostcodeMatch() As matchCode
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(16),matchCode)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderPostcodeMatchSpecified() As Boolean
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(17),Boolean)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderCityMatch() As matchCode
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(18),matchCode)
End Get
End Property
'''<remarks/>
Public ReadOnly Property traderCityMatchSpecified() As Boolean
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(19),Boolean)
End Get
End Property
'''<remarks/>
Public ReadOnly Property requestIdentifier() As String
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(20),String)
End Get
End Property
End Class
End Namespace

View File

@@ -0,0 +1,161 @@
<?xml version="1.0" encoding="utf-8"?>
<wsdl:definitions xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:impl="urn:ec.europa.eu:taxud:vies:services:checkVat" xmlns:apachesoap="http://xml.apache.org/xml-soap" xmlns:wsdlsoap="http://schemas.xmlsoap.org/wsdl/soap/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:tns1="urn:ec.europa.eu:taxud:vies:services:checkVat:types" targetNamespace="urn:ec.europa.eu:taxud:vies:services:checkVat" xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/">
<xsd:documentation>
The objective of this Internet site is to allow persons involved in the intra-Community supply of goods or of services to obtain confirmation of the validity of the VAT identification number of any specified person, in accordance to article 31 of Council Regulation (EC) No. 904/2010 of 7 October 2010. \n
Any other use and any extraction and use of the data which is not in conformity with the objective of this site is strictly forbidden.
Any retransmission of the contents of this site, whether for a commercial purpose or otherwise, as well as any more general use other than as far as is necessary to support the activity of a legitimate user (for example: to draw up their own invoices) is expressly forbidden. In addition, any copying or reproduction of the contents of this site is strictly forbidden.
The European Commission maintains this website to enhance the access by taxable persons making intra-Community supplies to verification of their customers' VAT identification numbers. Our goal is to supply instantaneous and accurate information.
However the Commission accepts no responsibility or liability whatsoever with regard to the information obtained using this site. This information:
- is obtained from Member States' databases over which the Commission services have no control and for which the Commission assumes no responsibility; it is the responsibility of the Member States to keep their databases complete, accurate and up to date;
- is not professional or legal advice (if you need specific advice, you should always consult a suitably qualified professional);
- does not in itself give a right to exempt intra-Community supplies from Value Added Tax;
- does not change any obligations imposed on taxable persons in relation to intra-Community supplies.
It is our goal to minimise disruption caused by technical errors. However some data or information on our site may have been created or structured in files or formats which are not error-free and we cannot guarantee that our service will not be interrupted or otherwise affected by such problems. The Commission accepts no responsibility with regard to such problems incurred as a result of using this site or any linked external sites.
This disclaimer is not intended to limit the liability of the Commission in contravention of any requirements laid down in applicable national law nor to exclude its liability for matters which may not be excluded under that law.
Collecting or handling personal data falls under the Data Protection Notice. This data protection declaration explains the Processing in the VIES-on-the-web Internet Website of VAT Identification Numbers for intra-Community Transaction on Goods or Services. Details of your legal rights associated with the collection, processing and use of this data are also provided: http://ec.europa.eu/dpo-register/details.htm?id=40647 .
Usage:
The countryCode input parameter must follow the pattern [A-Z]{2}
The vatNumber input parameter must follow the pattern [0-9A-Za-z\+\*\.]{2,12}
In case of problems, the returned FaultString can take the following specific values:
- INVALID_INPUT: The provided CountryCode is invalid or the VAT number is empty;
- GLOBAL_MAX_CONCURRENT_REQ: Your Request for VAT validation has not been processed; the maximum number of concurrent requests has been reached. Please re-submit your request later or contact TAXUD-VIESWEB@ec.europa.eu for further information": Your request cannot be processed due to high traffic on the web application. Please try again later;
- MS_MAX_CONCURRENT_REQ: Your Request for VAT validation has not been processed; the maximum number of concurrent requests for this Member State has been reached. Please re-submit your request later or contact TAXUD-VIESWEB@ec.europa.eu for further information": Your request cannot be processed due to high traffic towards the Member State you are trying to reach. Please try again later.
- SERVICE_UNAVAILABLE: an error was encountered either at the network level or the Web application level, try again later;
- MS_UNAVAILABLE: The application at the Member State is not replying or not available. Please refer to the Technical Information page to check the status of the requested Member State, try again later;
- TIMEOUT: The application did not receive a reply within the allocated time period, try again later.
</xsd:documentation>
<wsdl:types>
<xsd:schema xmlns="urn:ec.europa.eu:taxud:vies:services:checkVat:types" attributeFormDefault="qualified" elementFormDefault="qualified" targetNamespace="urn:ec.europa.eu:taxud:vies:services:checkVat:types">
<xsd:element name="checkVat">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="countryCode" type="xsd:string" />
<xsd:element name="vatNumber" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="checkVatResponse">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="countryCode" type="xsd:string" />
<xsd:element name="vatNumber" type="xsd:string" />
<xsd:element name="requestDate" type="xsd:date" />
<xsd:element name="valid" type="xsd:boolean" />
<xsd:element minOccurs="0" maxOccurs="1" name="name" nillable="true" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="address" nillable="true" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="checkVatApprox">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="countryCode" type="xsd:string" />
<xsd:element name="vatNumber" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderName" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderCompanyType" type="tns1:companyTypeCode" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderStreet" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderPostcode" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderCity" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="requesterCountryCode" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="requesterVatNumber" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="checkVatApproxResponse">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="countryCode" type="xsd:string" />
<xsd:element name="vatNumber" type="xsd:string" />
<xsd:element name="requestDate" type="xsd:date" />
<xsd:element name="valid" type="xsd:boolean" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderName" nillable="true" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderCompanyType" nillable="true" type="tns1:companyTypeCode" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderAddress" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderStreet" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderPostcode" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderCity" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderNameMatch" type="tns1:matchCode" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderCompanyTypeMatch" type="tns1:matchCode" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderStreetMatch" type="tns1:matchCode" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderPostcodeMatch" type="tns1:matchCode" />
<xsd:element minOccurs="0" maxOccurs="1" name="traderCityMatch" type="tns1:matchCode" />
<xsd:element name="requestIdentifier" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:simpleType name="companyTypeCode">
<xsd:restriction base="xsd:string">
<xsd:pattern value="[A-Z]{2}\-[1-9][0-9]?" />
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="matchCode">
<xsd:restriction base="xsd:string">
<xsd:enumeration value="1">
<xsd:annotation>
<xsd:documentation>VALID</xsd:documentation>
</xsd:annotation>
</xsd:enumeration>
<xsd:enumeration value="2">
<xsd:annotation>
<xsd:documentation>INVALID</xsd:documentation>
</xsd:annotation>
</xsd:enumeration>
<xsd:enumeration value="3">
<xsd:annotation>
<xsd:documentation>NOT_PROCESSED</xsd:documentation>
</xsd:annotation>
</xsd:enumeration>
</xsd:restriction>
</xsd:simpleType>
</xsd:schema>
</wsdl:types>
<wsdl:message name="checkVatRequest">
<wsdl:part name="parameters" element="tns1:checkVat" />
</wsdl:message>
<wsdl:message name="checkVatApproxResponse">
<wsdl:part name="parameters" element="tns1:checkVatApproxResponse" />
</wsdl:message>
<wsdl:message name="checkVatApproxRequest">
<wsdl:part name="parameters" element="tns1:checkVatApprox" />
</wsdl:message>
<wsdl:message name="checkVatResponse">
<wsdl:part name="parameters" element="tns1:checkVatResponse" />
</wsdl:message>
<wsdl:portType name="checkVatPortType">
<wsdl:operation name="checkVat">
<wsdl:input name="checkVatRequest" message="impl:checkVatRequest" />
<wsdl:output name="checkVatResponse" message="impl:checkVatResponse" />
</wsdl:operation>
<wsdl:operation name="checkVatApprox">
<wsdl:input name="checkVatApproxRequest" message="impl:checkVatApproxRequest" />
<wsdl:output name="checkVatApproxResponse" message="impl:checkVatApproxResponse" />
</wsdl:operation>
</wsdl:portType>
<wsdl:binding name="checkVatBinding" type="impl:checkVatPortType">
<wsdlsoap:binding transport="http://schemas.xmlsoap.org/soap/http" />
<wsdl:operation name="checkVat">
<wsdlsoap:operation soapAction="" />
<wsdl:input name="checkVatRequest">
<wsdlsoap:body use="literal" />
</wsdl:input>
<wsdl:output name="checkVatResponse">
<wsdlsoap:body use="literal" />
</wsdl:output>
</wsdl:operation>
<wsdl:operation name="checkVatApprox">
<wsdlsoap:operation soapAction="" />
<wsdl:input name="checkVatApproxRequest">
<wsdlsoap:body use="literal" />
</wsdl:input>
<wsdl:output name="checkVatApproxResponse">
<wsdlsoap:body use="literal" />
</wsdl:output>
</wsdl:operation>
</wsdl:binding>
<wsdl:service name="checkVatService">
<wsdl:port name="checkVatPort" binding="impl:checkVatBinding">
<wsdlsoap:address location="http://ec.europa.eu/taxation_customs/vies/services/checkVatService" />
</wsdl:port>
</wsdl:service>
</wsdl:definitions>

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="matchCode" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>SDL.eu.europa.ec.matchCode, Web References.eu.europa.ec.Reference.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

View File

@@ -0,0 +1,7 @@
<?xml version="1.0" encoding="utf-8"?>
<DiscoveryClientResultsFile xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<Results>
<DiscoveryClientResult referenceType="System.Web.Services.Discovery.ContractReference" url="https://ec.europa.eu/taxation_customs/dds2/eos/validation/services/validation?wsdl" filename="validation.wsdl" />
<DiscoveryClientResult referenceType="System.Web.Services.Discovery.SchemaReference" url="https://ec.europa.eu/taxation_customs/dds2/eos/validation/services/validation?xsd=1" filename="validation.xsd" />
</Results>
</DiscoveryClientResultsFile>

View File

@@ -0,0 +1,336 @@
'------------------------------------------------------------------------------
' <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 eu.europa.ec1
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Web.Services.WebServiceBindingAttribute(Name:="validationSoapBinding", [Namespace]:="http://eori.ws.eos.dds.s/")> _
Partial Public Class validation
Inherits System.Web.Services.Protocols.SoapHttpClientProtocol
Private validateEORIOperationCompleted As System.Threading.SendOrPostCallback
Private useDefaultCredentialsSetExplicitly As Boolean
'''<remarks/>
Public Sub New()
MyBase.New
Me.Url = Global.SDL.My.MySettings.Default.SDL_eu_europa_ec1_validation
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 validateEORICompleted As validateEORICompletedEventHandler
'''<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("", RequestNamespace:="http://eori.ws.eos.dds.s/", ResponseNamespace:="http://eori.ws.eos.dds.s/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function validateEORI(<System.Xml.Serialization.XmlElementAttribute("eori")> ByVal eori() As String) As <System.Xml.Serialization.XmlElementAttribute("return", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> eoriValidationResult
Dim results() As Object = Me.Invoke("validateEORI", New Object() {eori})
Return CType(results(0),eoriValidationResult)
End Function
'''<remarks/>
Public Overloads Sub validateEORIAsync(ByVal eori() As String)
Me.validateEORIAsync(eori, Nothing)
End Sub
'''<remarks/>
Public Overloads Sub validateEORIAsync(ByVal eori() As String, ByVal userState As Object)
If (Me.validateEORIOperationCompleted Is Nothing) Then
Me.validateEORIOperationCompleted = AddressOf Me.OnvalidateEORIOperationCompleted
End If
Me.InvokeAsync("validateEORI", New Object() {eori}, Me.validateEORIOperationCompleted, userState)
End Sub
Private Sub OnvalidateEORIOperationCompleted(ByVal arg As Object)
If (Not (Me.validateEORICompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent validateEORICompleted(Me, New validateEORICompletedEventArgs(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.9037.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://eori.ws.eos.dds.s/")> _
Partial Public Class eoriValidationResult
Private requestDateField As String
Private errorDescriptionField As String
Private resultField() As eoriResponse
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property requestDate() As String
Get
Return Me.requestDateField
End Get
Set
Me.requestDateField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property errorDescription() As String
Get
Return Me.errorDescriptionField
End Get
Set
Me.errorDescriptionField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute("result", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, IsNullable:=true)> _
Public Property result() As eoriResponse()
Get
Return Me.resultField
End Get
Set
Me.resultField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.8.9037.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://eori.ws.eos.dds.s/")> _
Partial Public Class eoriResponse
Private eoriField As String
Private statusField As Integer
Private statusDescrField As String
Private errorReasonField As String
Private nameField As String
Private addressField As String
Private streetField As String
Private postalCodeField As String
Private cityField As String
Private countryField As String
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property eori() As String
Get
Return Me.eoriField
End Get
Set
Me.eoriField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property status() As Integer
Get
Return Me.statusField
End Get
Set
Me.statusField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property statusDescr() As String
Get
Return Me.statusDescrField
End Get
Set
Me.statusDescrField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property errorReason() As String
Get
Return Me.errorReasonField
End Get
Set
Me.errorReasonField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property name() As String
Get
Return Me.nameField
End Get
Set
Me.nameField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property address() As String
Get
Return Me.addressField
End Get
Set
Me.addressField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property street() As String
Get
Return Me.streetField
End Get
Set
Me.streetField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property postalCode() As String
Get
Return Me.postalCodeField
End Get
Set
Me.postalCodeField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property city() As String
Get
Return Me.cityField
End Get
Set
Me.cityField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
Public Property country() As String
Get
Return Me.countryField
End Get
Set
Me.countryField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0")> _
Public Delegate Sub validateEORICompletedEventHandler(ByVal sender As Object, ByVal e As validateEORICompletedEventArgs)
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "4.8.9037.0"), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code")> _
Partial Public Class validateEORICompletedEventArgs
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 eoriValidationResult
Get
Me.RaiseExceptionIfNecessary
Return CType(Me.results(0),eoriValidationResult)
End Get
End Property
End Class
End Namespace

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="eoriValidationResult" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>SDL.eu.europa.ec1.eoriValidationResult, Web References.eu.europa.ec1.Reference.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

View File

@@ -0,0 +1,71 @@
<?xml version="1.0" encoding="utf-8"?>
<wsdl:definitions xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/" xmlns:tns="http://eori.ws.eos.dds.s/" name="validation" targetNamespace="http://eori.ws.eos.dds.s/" xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/">
<wsdl:types>
<xsd:schema xmlns:ns0="http://eori.ws.eos.dds.s/" targetNamespace="http://eori.ws.eos.dds.s/">
<xsd:include schemaLocation="https://ec.europa.eu/taxation_customs/dds2/eos/validation/services/validation?xsd=1" />
<xsd:complexType name="validateEORI">
<xsd:sequence>
<xsd:element minOccurs="0" maxOccurs="unbounded" form="qualified" name="eori" type="ns0:EORINumber" />
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="eoriResponse">
<xsd:sequence>
<xsd:element name="eori" type="xsd:string" />
<xsd:element name="status" type="xsd:int" />
<xsd:element name="statusDescr" type="xsd:string" />
<xsd:element minOccurs="0" name="errorReason" type="xsd:string" />
<xsd:element minOccurs="0" name="name" type="xsd:string" />
<xsd:element minOccurs="0" name="address" type="xsd:string" />
<xsd:element minOccurs="0" name="street" type="xsd:string" />
<xsd:element minOccurs="0" name="postalCode" type="xsd:string" />
<xsd:element minOccurs="0" name="city" type="xsd:string" />
<xsd:element minOccurs="0" name="country" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="validateEORIResponse">
<xsd:sequence>
<xsd:element minOccurs="0" name="return" type="ns0:eoriValidationResult" />
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="eoriValidationResult">
<xsd:sequence>
<xsd:element name="requestDate" type="xsd:string" />
<xsd:element minOccurs="0" name="errorDescription" type="xsd:string" />
<xsd:element minOccurs="0" maxOccurs="unbounded" name="result" nillable="true" type="ns0:eoriResponse" />
</xsd:sequence>
</xsd:complexType>
<xsd:element name="validateEORI" type="ns0:validateEORI" />
<xsd:element name="validateEORIResponse" type="ns0:validateEORIResponse" />
</xsd:schema>
</wsdl:types>
<wsdl:message name="validateEORI">
<wsdl:part name="parameters" element="tns:validateEORI" />
</wsdl:message>
<wsdl:message name="validateEORIResponse">
<wsdl:part name="parameters" element="tns:validateEORIResponse" />
</wsdl:message>
<wsdl:portType name="EORIValidation">
<wsdl:documentation>Validates the EORI numbers provided. Validation is performed following those principles: The number of EORI numbers to validate at once is limited, maximal size of a message is limited, number of requests in a timeframe is limited, content of the message has to be validated against several threats.</wsdl:documentation>
<wsdl:operation name="validateEORI">
<wsdl:input name="validateEORI" message="tns:validateEORI" />
<wsdl:output name="validateEORIResponse" message="tns:validateEORIResponse" />
</wsdl:operation>
</wsdl:portType>
<wsdl:binding name="validationSoapBinding" type="tns:EORIValidation">
<soap:binding transport="http://schemas.xmlsoap.org/soap/http" />
<wsdl:operation name="validateEORI">
<soap:operation soapAction="" style="document" />
<wsdl:input name="validateEORI">
<soap:body use="literal" />
</wsdl:input>
<wsdl:output name="validateEORIResponse">
<soap:body use="literal" />
</wsdl:output>
</wsdl:operation>
</wsdl:binding>
<wsdl:service name="validation">
<wsdl:port name="EORIValidationImplPort" binding="tns:validationSoapBinding">
<soap:address location="https://ec.europa.eu/taxation_customs/dds2/eos/validation/services/validation" />
</wsdl:port>
</wsdl:service>
</wsdl:definitions>

View File

@@ -0,0 +1,336 @@
<?xml version="1.0" encoding="utf-8"?>
<xs:schema attributeFormDefault="unqualified" elementFormDefault="qualified" version="2.0" xmlns:xs="http://www.w3.org/2001/XMLSchema">
<xs:simpleType name="SingleLineString">
<xs:annotation>
<xs:documentation>Single line string: Avoid presence of \n (new line) and \r (return) characters in thestring. Note that pattern ".*" is equivalent.</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:pattern value="[^\n\r]*" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="MonthDay">
<xs:annotation>
<xs:documentation>MM-DD format (MM=01-12 and DD=01-31)</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:pattern value="\d{2}-\d{2}" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="SimpleDate">
<xs:annotation>
<xs:documentation>Date format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:pattern value="(\d{2}-\d{2}-\d{4})*" />
<xs:pattern value="(\d{2}\/\d{2}\/\d{4})*" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="Date">
<xs:annotation>
<xs:documentation>Date format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:date">
<xs:pattern value="\d{4}-\d{2}-\d{2}" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="Time">
<xs:annotation>
<xs:documentation>Time format (hh:mm)</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:pattern value="\d{2}:\d{2}" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="Timestamp">
<xs:annotation>
<xs:documentation>Timestamp format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:dateTime">
<xs:pattern value="\d{4}-\d{2}-\d{2}T\d{2}:\d{2}:\d{2}" />
</xs:restriction>
</xs:simpleType>
<xs:complexType name="Period">
<xs:sequence>
<xs:element name="start.date" type="SimpleDate" />
<xs:element minOccurs="0" name="end.date" type="SimpleDate" />
</xs:sequence>
</xs:complexType>
<xs:simpleType name="DecimalNumber">
<xs:annotation>
<xs:documentation>Decimal number format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:pattern value="[0-9]+,[0-9]+" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="LongNumber">
<xs:annotation>
<xs:documentation>Long number format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:pattern value="[0-9]+" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="LongNumber10">
<xs:annotation>
<xs:documentation>Long number format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:maxLength value="10" />
<xs:pattern value="[0-9]+" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="LongNumber5">
<xs:annotation>
<xs:documentation>Long number format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:maxLength value="5" />
<xs:pattern value="[0-9]+" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="LongNumber3">
<xs:annotation>
<xs:documentation>Long number format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:maxLength value="3" />
<xs:pattern value="[0-9]+" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="CountryCode">
<xs:annotation>
<xs:documentation>Country code format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:pattern value="([A-Z][A-Z])*" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="EORINumber">
<xs:annotation>
<xs:documentation>EORI Number format</xs:documentation>
</xs:annotation>
<xs:restriction base="SingleLineString">
<xs:minLength value="3" />
<xs:maxLength value="17" />
<xs:pattern value="[A-Z]{2}\p{IsBasicLatin}+" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="EoriNumberType">
<xs:annotation>
<xs:documentation>EORI Number format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:maxLength value="17" />
<xs:pattern value="([A-Z][A-Z])*[^\n\r]*" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="M_SingleLineString300">
<xs:restriction base="SingleLineString">
<xs:minLength value="0" />
<xs:maxLength value="300" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="SingleLineString300">
<xs:restriction base="SingleLineString">
<xs:maxLength value="300" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="M_SingleLineString150">
<xs:restriction base="SingleLineString">
<xs:minLength value="1" />
<xs:maxLength value="150" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="SingleLineString150">
<xs:restriction base="SingleLineString">
<xs:maxLength value="150" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="SingleLineString70">
<xs:restriction base="SingleLineString">
<xs:maxLength value="70" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="M_SingleLineString70">
<xs:restriction base="SingleLineString">
<xs:minLength value="0" />
<xs:maxLength value="70" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="M_SingleLineString35">
<xs:restriction base="SingleLineString">
<xs:minLength value="0" />
<xs:maxLength value="35" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="SingleLineString35">
<xs:restriction base="SingleLineString">
<xs:maxLength value="35" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="SingleLineString30">
<xs:restriction base="SingleLineString">
<xs:maxLength value="45" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="SingleLineString9">
<xs:restriction base="SingleLineString">
<xs:maxLength value="9" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="SingleLineString8">
<xs:restriction base="SingleLineString">
<xs:minLength value="1" />
<xs:maxLength value="8" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="CertificateTypeCode">
<xs:restriction base="SingleLineString">
<xs:minLength value="4" />
<xs:maxLength value="4" />
<xs:pattern value="\p{IsBasicLatin}+" />
</xs:restriction>
</xs:simpleType>
<xs:complexType name="Country">
<xs:sequence>
<xs:element name="country.code" type="CountryCode" />
<xs:element name="country.name" type="SingleLineString30" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="CertificateType">
<xs:sequence>
<xs:element name="certificate.type.code" type="CertificateTypeCode" />
<xs:element name="certificate.type.name" type="M_SingleLineString150" />
</xs:sequence>
</xs:complexType>
<xs:simpleType name="SingleLineString87">
<xs:restriction base="SingleLineString">
<xs:minLength value="1" />
<xs:maxLength value="87" />
</xs:restriction>
</xs:simpleType>
<xs:complexType name="CertificateRef">
<xs:sequence>
<xs:element name="country" type="Country" />
<xs:element name="aeo.certificate.type" type="CertificateType" />
<xs:element name="national.number" type="SingleLineString87" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="AuthorityRef">
<xs:sequence>
<xs:element name="country.code" type="CountryCode" />
<xs:element name="identifier" type="M_SingleLineString35" />
</xs:sequence>
</xs:complexType>
<xs:simpleType name="LanguageCode">
<xs:annotation>
<xs:documentation>Language code format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:minLength value="1" />
<xs:maxLength value="2" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="SingleLineString512">
<xs:restriction base="SingleLineString">
<xs:maxLength value="512" />
</xs:restriction>
</xs:simpleType>
<xs:complexType name="CdValidityType">
<xs:sequence>
<xs:element name="status" type="SingleLineString3" />
<xs:element name="start.date" type="Date" />
<xs:element minOccurs="0" name="end.date" type="Date" />
</xs:sequence>
</xs:complexType>
<xs:simpleType name="SingleLineString3">
<xs:restriction base="SingleLineString">
<xs:maxLength value="3" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="SingleLineString10">
<xs:restriction base="SingleLineString">
<xs:maxLength value="10" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="CdNumberType">
<xs:annotation>
<xs:documentation>CD Number format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:minLength value="1" />
<xs:maxLength value="35" />
<xs:pattern value="[\P{C}]*" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="TinNumberType">
<xs:annotation>
<xs:documentation>Tin Number format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:maxLength value="17" />
<xs:pattern value="([A-Z][A-Z])*[^\n\r]*" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="RexNumberType">
<xs:annotation>
<xs:documentation>Rex Number format</xs:documentation>
</xs:annotation>
<xs:restriction base="xs:string">
<xs:maxLength value="35" />
<xs:pattern value="[A-Z][A-Z]REX[0-9A-Z]+" />
</xs:restriction>
</xs:simpleType>
<xs:complexType name="AddressType">
<xs:sequence>
<xs:element name="street.number" type="M_SingleLineString70" />
<xs:element name="city" type="M_SingleLineString35" />
<xs:element minOccurs="0" name="country.code" type="CountryCode" />
<xs:element minOccurs="0" name="country.name" type="SingleLineString30" />
<xs:element minOccurs="0" name="postal.code" type="SingleLineString9" />
<xs:element minOccurs="0" name="name" type="SingleLineString300" />
<xs:element minOccurs="0" name="email" type="CommunicationValueContentType" />
<xs:element minOccurs="0" name="fax" type="CommunicationValueContentType" />
<xs:element minOccurs="0" name="phone" type="CommunicationValueContentType" />
</xs:sequence>
</xs:complexType>
<xs:simpleType name="CommunicationValueContentType">
<xs:restriction base="xs:string">
<xs:minLength value="1" />
<xs:maxLength value="50" />
</xs:restriction>
</xs:simpleType>
<xs:complexType name="ExporterActivity">
<xs:sequence>
<xs:element name="activity.name" type="MainActivityContentType" />
<xs:element name="activity.flag" type="xs:boolean" />
</xs:sequence>
</xs:complexType>
<xs:simpleType name="MainActivityContentType">
<xs:restriction base="xs:string">
<xs:minLength value="1" />
<xs:maxLength value="10" />
<xs:pattern value="[\p{IsBasicLatin}]*" />
</xs:restriction>
</xs:simpleType>
<xs:complexType name="GoodsData">
<xs:sequence>
<xs:element name="taric.code" type="NotificationTARICCodeContentType" />
<xs:element name="description" type="LongTextContentType" />
</xs:sequence>
</xs:complexType>
<xs:simpleType name="NotificationTARICCodeContentType">
<xs:restriction base="xs:string">
<xs:minLength value="1" />
<xs:maxLength value="10" />
</xs:restriction>
</xs:simpleType>
<xs:simpleType name="LongTextContentType">
<xs:restriction base="xs:string">
<xs:minLength value="1" />
<xs:maxLength value="512" />
<xs:pattern value="[\P{C}]*" />
</xs:restriction>
</xs:simpleType>
</xs:schema>