This commit is contained in:
2020-10-20 09:03:00 +02:00
parent 75b12f314d
commit 00cd158bf0
54 changed files with 11763 additions and 323 deletions

View File

@@ -318,7 +318,7 @@ Public Class KdSearchBox
SQLstr &= " AND ( "
SQLstr &= " Ordnungsbegriff LIKE '" & srch & "%' " : If IsNumeric(srch) Then SQLstr &= " OR AdressenNr LIKE '" & srch & "%' "
SQLstr &= " ) "
If srch2 <> "" Then SQLstr &= " AND ( Adressen.PLZ LIKE '" & srch2 & "%' OR Adressen.Ort LIKE '" & srch2 & "%' OR Adressen.LandKz LIKE '" & srch2 & "%' OR Adressen.Straße LIKE '" & srch2 & "%' ) "
If srch2 <> "" Then SQLstr &= " AND (Filialen.Firma LIKE '" & srch2 & "%' OR ( Adressen.PLZ LIKE '" & srch2 & "%' OR Adressen.Ort LIKE '" & srch2 & "%' OR Adressen.LandKz LIKE '" & srch2 & "%' OR Adressen.Straße LIKE '" & srch2 & "%' )) "
SQLstr &= " AND [Auswahl]='A' "
'If VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER <> "" Then
@@ -393,7 +393,7 @@ Public Class KdSearchBox
SQLstr &= " AND ( "
SQLstr &= " Ordnungsbegriff LIKE '" & srch & "%' " : If IsNumeric(srch) Then SQLstr &= " OR AdressenNr LIKE '" & srch & "%' "
SQLstr &= " ) "
If srch2 <> "" Then SQLstr &= " AND ( Adressen.PLZ LIKE '" & srch2 & "%' OR Adressen.Ort LIKE '" & srch2 & "%' OR Adressen.LandKz LIKE '" & srch2 & "%' OR Adressen.Straße LIKE '" & srch2 & "%' ) "
If srch2 <> "" Then SQLstr &= " AND (Filialen.Firma LIKE '" & srch2 & "%' OR ( Adressen.PLZ LIKE '" & srch2 & "%' OR Adressen.Ort LIKE '" & srch2 & "%' OR Adressen.LandKz LIKE '" & srch2 & "%' OR Adressen.Straße LIKE '" & srch2 & "%' )) "
SQLstr &= " AND [Auswahl]='I' "
'If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "FRONTOFFICE" Then 'Keine
' SQLstr &= " AND isnull(Kunden.[FilialenNr],0) NOT IN ('5701') "

View File

@@ -508,6 +508,17 @@ Public Class SQL
End Function
Function DLookupArray(srchField, table, where, Optional conn_art = "SDL") As List(Of String)
Dim list As New List(Of String)
Dim dt = loadDgvBySql("SELECT " & srchField & " FROM " & table & " WHERE " & where & "", conn_art)
If dt IsNot Nothing Then
For Each r As DataRow In dt.Rows
list.Add(r(srchField))
Next
End If
Return list
End Function
Public Function getValueTxtBySql(ByVal sql As String, Optional conn_art As String = "SDL", Optional List As List(Of MyListItem2) = Nothing, Optional conn As SqlConnection = Nothing, Optional defaultReturn As Object = "") As String

View File

@@ -84,6 +84,12 @@ Public Class cKundenBesonderheiten
End Try
End Sub
Public Shared Function DELETE_ALL_KD(kdb_KundenNr As Integer) As Boolean
Dim SQL As New SQL
Dim sqlstr = " DELETE FROM tblKundenBesonderheiten WHERE kdb_KundenNr=" & kdb_KundenNr
Return SQL.doSQL(sqlstr, "FMZOLL")
End Function
Public Function getUpdateCmd() As String

View File

@@ -48,6 +48,7 @@ Public Class cKundenErweitert
Property kde_Inkasso_UebergebenAm As Object = Nothing
Property kde_Inkasso_GemeldeterBetrag As Object = Nothing
Property AutoFakturierung As Boolean = False
Property Veranlagungskunde As Boolean = False
Property Anmerkungen_Warnhinweis As Object = Nothing
Property kde_VERAG_INTERFACE_ID As Object = Nothing
Property kde_BesonderheitenNeu As Boolean = False
@@ -104,6 +105,7 @@ Public Class cKundenErweitert
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_Inkasso_UebergebenAm", kde_Inkasso_UebergebenAm))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_Inkasso_GemeldeterBetrag", kde_Inkasso_GemeldeterBetrag))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("AutoFakturierung", AutoFakturierung))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Veranlagungskunde", Veranlagungskunde))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Anmerkungen_Warnhinweis", Anmerkungen_Warnhinweis))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_VERAG_INTERFACE_ID", kde_VERAG_INTERFACE_ID))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_BesonderheitenNeu", kde_BesonderheitenNeu))

View File

@@ -349,6 +349,7 @@ Public Class cRechnungsausgang
Public Function CHECK_Validation(ByRef errMsg As String) As Boolean
If Firma_ID <= 0 Then errMsg = "ERROR: Firma auswählen!" : Return False
If Rechnung_an = 0 OrElse CStr(Rechnung_an) = "" Then errMsg = "ERROR: Rechnungsempfänger auswählen!" : Return False
If SpeditionsbuchUnterNr Is Nothing Then errMsg = "ERROR: Speditionsbuch-UnterNr auswählen!" : Return False
' If Steuerschlüssel Then errMsg = "ERROR: Steuerschlüssel muss angegeben werden!" : Return False
Return True

View File

@@ -70,6 +70,17 @@ Public Class cRechnungsnummern
End Function
Public Function CHECK_RGNR() As Integer ' Prüfung, ob RgNr schon vergeben wurde --> dann +1, bis freie Nr.
Dim increased = False
While SQL.DLookup("count(*)", "Rechnungsausgang", " RechnungsNr='" & LfdRechnungsNr & "' and Firma_ID='" & SpeditionsbuchNr & "' ", "FMZOLL", 0) > 0
LfdRechnungsNr += 1
increased = True
End While
If increased Then SAVE()
Return LfdRechnungsNr
End Function
Public Function SAVE() As Boolean 'obj As Object, tablename As String, where As String) As Boolean
Dim list As List(Of VERAG_PROG_ALLGEMEIN.MyListItem2) = getParameterList()

View File

@@ -86,6 +86,9 @@ Public Class cSendungen
Property VORSYSTEM_Id As Object = Nothing
Property tblSnd_FilialeAbklaerung As Object = Nothing
Property tblSnd_AbklaerungTR As Object = Nothing
Property tblSnd_AbklaerungTR_MA As Object = Nothing
Public saveSachbearbeiter As Boolean = False
@@ -272,6 +275,8 @@ Public Class cSendungen
Me.tblSnd_FilialeAbklaerung = SQL.checkNullReturnValue(dr.Item("tblSnd_FilialeAbklaerung"), Nothing)
Me.VORSYSTEM = SQL.checkNullReturnValue(dr.Item("VORSYSTEM"), Nothing)
Me.VORSYSTEM_Id = SQL.checkNullReturnValue(dr.Item("VORSYSTEM_Id"), Nothing)
Me.tblSnd_AbklaerungTR = SQL.checkNullReturnValue(dr.Item("tblSnd_AbklaerungTR"), Nothing)
Me.tblSnd_AbklaerungTR_MA = SQL.checkNullReturnValue(dr.Item("tblSnd_AbklaerungTR_MA"), Nothing)
End If
@@ -442,6 +447,10 @@ Public Class cSendungen
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("tblSnd_FilialeAbklaerung", tblSnd_FilialeAbklaerung))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("VORSYSTEM", VORSYSTEM))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("VORSYSTEM_Id", VORSYSTEM_Id))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("tblSnd_AbklaerungTR", tblSnd_AbklaerungTR))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("tblSnd_AbklaerungTR_MA", tblSnd_AbklaerungTR_MA))
Return list

View File

@@ -178,10 +178,12 @@ Public Class cSpeditionsbuch
Property HandlingZuKassieren As Double = 0
Property FilialenNrAbklaerung As Object = Nothing
Property PersonalnummerAbklTR As Object = Nothing
Property UNTERPOS As New List(Of cSpeditionsbuchUnterPos)
Property VORKOSTEN As New List(Of cVorkosten)
Property ENDEMPFAENGER As New List(Of cEndEmpfaener)
Dim SQL As New SQL
@@ -233,7 +235,7 @@ Public Class cSpeditionsbuch
" commit tran "
If SQL.doSQLVarList(sqlstr, "FMZOLL", , list) Then
If SAVE_VORKOSTEN() Then
If SAVE_VORKOSTEN() And SAVE_ENDEMPFAENGER() Then
Return True
End If
End If
@@ -338,10 +340,12 @@ Public Class cSpeditionsbuch
Me.FilialenNrHandling = SQL.checkNullReturnValue(dr.Item("FilialenNrHandling"), Nothing)
Me.FilialenNrAbklaerung = SQL.checkNullReturnValue(dr.Item("FilialenNrAbklaerung"), Nothing)
Me.HandlingZuKassieren = SQL.checkNulDbl(dr.Item("HandlingZuKassieren"))
Me.PersonalnummerAbklTR = SQL.checkNullReturnValue(dr.Item("PersonalnummerAbklTR"), Nothing)
Me.SB_CMRNr = SQL.checkNullReturnValue(dr.Item("SB_CMRNr"), Nothing)
LOAD_VORKOSTEN()
LOAD_ENDEMPFAENGER()
Me.SB_Zeitstempel = SQL.checkNullDateNothing(dr.Item("SB_Zeitstempel"))
@@ -446,6 +450,7 @@ Public Class cSpeditionsbuch
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("FilialenNrHandling", FilialenNrHandling))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("FilialenNrAbklaerung", FilialenNrAbklaerung))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("HandlingZuKassieren", HandlingZuKassieren))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PersonalnummerAbklTR", PersonalnummerAbklTR))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("SB_CMRNr", SB_CMRNr))
@@ -555,6 +560,44 @@ Public Class cSpeditionsbuch
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
End Try
End Sub
Public Sub LOAD_ENDEMPFAENGER()
Try
Dim conn As SqlConnection = SQL.GetNewOpenConnectionFMZOLL()
'Using cmd2 As New SqlCommand("SELECT * FROM tblSpeditionsbuchUnterPos INNER JOIN [Abfertigungsarten] ON sbup_Abfertigungsart=Abfertigungsart WHERE sbup_Filiale=@sbup_Filiale AND sbup_AbfertigungsNr=@sbup_AbfertigungsNr AND sbup_UnterNr=@sbup_UnterNr ", conn)
Using cmd2 As New SqlCommand("SELECT * FROM tblSpeditionsbuchEndEmpfaenger WHERE FilialenNr=@FilialenNr AND AbfertigungsNr=@AbfertigungsNr AND UnterNr=@UnterNr ", conn)
cmd2.Parameters.AddWithValue("@FilialenNr", Me.FilialenNr)
cmd2.Parameters.AddWithValue("@AbfertigungsNr", Me.AbfertigungsNr)
cmd2.Parameters.AddWithValue("@UnterNr", Me.UnterNr)
Dim dr2 = cmd2.ExecuteReader()
Me.ENDEMPFAENGER.Clear()
While dr2.Read
Dim a As New cEndEmpfaener()
a.FilialenNr = SQL.checkNullReturnValue(dr2.Item("FilialenNr"), -1)
a.AbfertigungsNr = SQL.checkNullReturnValue(dr2.Item("AbfertigungsNr"), -1)
a.UnterNr = SQL.checkNullReturnValue(dr2.Item("UnterNr"), -1)
a.EndEmpfaengerKdNr = SQL.checkNullReturnValue(dr2.Item("EndEmpfaengerKdNr"), -1)
a.EndEmpfaenger = SQL.checkNullReturnValue(dr2.Item("EndEmpfaenger"), "")
a.UstIdKz = SQL.checkNullReturnValue(dr2.Item("UstIdKz"), Nothing)
a.UstIdNr = SQL.checkNullReturnValue(dr2.Item("UstIdNr"), Nothing)
a.Rechnungsbetrag = SQL.checkNullReturnValue(dr2.Item("Rechnungsbetrag"), Nothing)
a.RechnungsNr = SQL.checkNullReturnValue(dr2.Item("RechnungsNr"), Nothing)
' a.Abfertigungsbezeichnung = SQL.checkNullReturnValue(dr2.Item("Abfertigungsbezeichnung"), "-")
Me.ENDEMPFAENGER.Add(a)
End While
dr2.Close()
End Using
conn.Close()
'End Using
'Return Nothing
Catch ex As Exception
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
End Try
End Sub
Public Function SAVE_UNTERPOS() As Boolean 'obj As Object, tablename As String, where As String) As Boolean
' Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
SAVE_UNTERPOS = False
@@ -579,6 +622,19 @@ Public Class cSpeditionsbuch
Next
End If
' Return b
End Function
Public Function SAVE_ENDEMPFAENGER() As Boolean 'obj As Object, tablename As String, where As String) As Boolean
' Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
SAVE_ENDEMPFAENGER = False
Dim sqlstr = " DELETE FROM tblSpeditionsbuchEndEmpfaenger WHERE FilialenNr=" & Me.FilialenNr & " AND AbfertigungsNr=" & Me.AbfertigungsNr & " AND UnterNr=" & Me.UnterNr & " "
If SQL.doSQL(sqlstr, "FMZOLL") Then
SAVE_ENDEMPFAENGER = True
For Each a In ENDEMPFAENGER
If Not a.INSERT() Then SAVE_ENDEMPFAENGER = False
Next
End If
' Return b
End Function
End Class
@@ -698,4 +754,72 @@ Public Class cVorkosten
Return False
End Function
End Class
Public Class cEndEmpfaener
Property FilialenNr As Integer
Property AbfertigungsNr As Integer
Property UnterNr As Integer
Property EndEmpfaengerKdNr As Integer
Property EndEmpfaenger As Object = Nothing
Property UstIdKz As Object = Nothing
Property UstIdNr As Object = Nothing
Property Rechnungsbetrag As Object = Nothing
Property RechnungsNr As Object = Nothing
' Property Abfertigungsbezeichnung As String = "-"
Dim SQL As New SQL
Sub New()
End Sub
Sub New(FilialenNr, AbfertigungsNr, UnterNr, EndEmpfaengerKdNr, EndEmpfaenger, UstIdKz, UstIdNr, Rechnungsbetrag, RechnungsNr)
Me.FilialenNr = FilialenNr
Me.AbfertigungsNr = AbfertigungsNr
Me.UnterNr = UnterNr
Me.EndEmpfaengerKdNr = EndEmpfaengerKdNr
Me.EndEmpfaenger = EndEmpfaenger
Me.UstIdKz = UstIdKz
Me.UstIdNr = UstIdNr
Me.Rechnungsbetrag = Rechnungsbetrag
Me.RechnungsNr = RechnungsNr
End Sub
Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("FilialenNr", FilialenNr))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("AbfertigungsNr", AbfertigungsNr))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UnterNr", UnterNr))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("EndEmpfaengerKdNr", EndEmpfaengerKdNr))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("EndEmpfaenger", EndEmpfaenger))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UstIdKz", UstIdKz))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UstIdNr", UstIdNr))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Rechnungsbetrag", Rechnungsbetrag))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("RechnungsNr", RechnungsNr))
Return list
End Function
Public Function INSERT() As Boolean
Try
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
Dim str As String = ""
Dim values As String = ""
For Each i In list
If Not i.isPrimaryParam Then
str &= "[" & i.Text & "],"
values &= "@" & i.Text.Replace("-", "").Replace(" ", "") & ","
End If
Next
str = str.Substring(0, str.Length - 1) 'wg. ','
values = values.Substring(0, values.Length - 1) 'wg. ','
Return SQL.doSQLVarList(" INSERT INTO [tblSpeditionsbuchEndEmpfaenger] (" & str & ") VALUES(" & values & ") ", "FMZOLL", , list)
Catch ex As Exception
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
End Try
Return False
End Function
End Class

View File

@@ -1220,6 +1220,7 @@ Public Class cFormularManager
Public Shared Function getPDFViaSpirePDF_FromURL(URL As String, Optional targetPath As String = "") As String
Try
If targetPath = "" Then targetPath = getTMPPath_PDF()
Dim doc As New Spire.Pdf.PdfDocument '= New Spire.Pdf.PdfDocument(URL)
doc.LoadFromHTML(URL, True, True, True)
If doc IsNot Nothing Then

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,939 @@
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<xsd:schema xmlns:xsd="http://www.w3.org/2001/XMLSchema" targetNamespace="http://www.gaston-schul.com/platform/facade/customs/ags/exchange"
xmlns:b2b="http://www.gaston-schul.com/platform/facade/customs/ags/exchange"
elementFormDefault="qualified" attributeFormDefault="unqualified" xml:lang="EN" version="0.1.2">
<!-- Venetian Blind Design -->
<xsd:element name="exchangeRequest" type="b2b:exchangeRequestType">
<xsd:annotation>
<xsd:documentation>
Customs approved data for creating an export declaration.
</xsd:documentation>
</xsd:annotation>
</xsd:element>
<!-- complex types -->
<xsd:complexType name="exchangeRequestType">
<xsd:sequence>
<xsd:element name="uuid" type="b2b:uuid"/>
<xsd:element name="version" type="b2b:version"/>
<xsd:element name="requestDateTime" type="b2b:dateTime"/>
<xsd:element name="creationDateTime" type="b2b:dateTime"/>
<xsd:element name="dispatchCountry" type="b2b:countryCode"/>
<xsd:element name="destinationCountry" type="b2b:countryCode"/>
<xsd:element name="localReferenceNumber" type="b2b:string_35" minOccurs="0"/>
<xsd:element name="movementReferenceNumber" type="b2b:string_35" minOccurs="0"/>
<xsd:element name="declaration" type="b2b:declarationType"/>
<xsd:element name="goodsShipment" type="b2b:goodsShipmentType"/>
<xsd:element name="attachments" type="b2b:attachmentType" minOccurs="0" maxOccurs="99"/>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="declarationType">
<xsd:sequence>
<xsd:element name="declarationOffice" type="b2b:declarationOffice" minOccurs="0"/>
<xsd:element name="declarationCode" type="b2b:declarationCode" minOccurs="0"/>
<xsd:element name="declarationTypeCode" type="b2b:declarationTypeCode" minOccurs="0"/>
<xsd:element name="procedure" type="b2b:procedure" minOccurs="0"/>
<xsd:element name="commercialReferenceNumber" type="b2b:string_35"/>
<xsd:element name="invoiceAmount" type="b2b:priceType_18_2" minOccurs="0"/>
<xsd:element name="deductibleAmount" type="b2b:priceType_16_2" minOccurs="0"/>
<xsd:element name="transportCostsAmount" type="b2b:priceType_16_2" minOccurs="0"/>
<xsd:element name="insuranceCostsAmount" type="b2b:priceType_16_2" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="goodsShipmentType">
<xsd:sequence>
<xsd:element name="countryOfExportation" type="b2b:countryCode"/>
<xsd:element name="natureOfTransaction" type="b2b:natureOfTransaction"/>
<xsd:element name="deliveryDestination" type="b2b:countryCode"/>
<xsd:element name="consignee" type="b2b:consigneeType"/>
<xsd:element name="consignor" type="b2b:consignorType"/>
<xsd:element name="consignment" type="b2b:consignmentType"/>
<xsd:element name="exitOffice" type="b2b:exitOffice" minOccurs="0"/>
<xsd:element name="internationalCommercialTerms" type="b2b:inCoTermType"/>
<xsd:element name="portOfLoading" type="b2b:portType" minOccurs="0"/>
<xsd:element name="portOfDischarge" type="b2b:portType" minOccurs="0"/>
<xsd:element name="shippingLine" type="b2b:string_1_70" minOccurs="0"/>
<xsd:element name="goodsItem" type="b2b:goodsItemType" maxOccurs="999"/>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="consigneeType">
<xsd:sequence>
<xsd:element name="name" type="b2b:string_70" minOccurs="0"/>
<xsd:element name="address" type="b2b:addressType" minOccurs="0"/>
<xsd:element name="eoriNumber" type="b2b:token_3_17" minOccurs="0">
<xsd:annotation>
<xsd:documentation>
European Union registration and identification number for businesses
which undertake the import or export of goods into or out of the EU.
It comprises of the ISO 3166 Alpha-2 country code followed by
a code or number that is unique in the member state.
</xsd:documentation>
</xsd:annotation>
</xsd:element>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="consignorType">
<xsd:sequence>
<xsd:element name="name" type="b2b:string_70" minOccurs="0"/>
<xsd:element name="address" type="b2b:addressType" minOccurs="0"/>
<xsd:element name="eoriNumber" type="b2b:token_3_17" minOccurs="0">
<xsd:annotation>
<xsd:documentation>
European Union registration and identification number for businesses
which undertake the import or export of goods into or out of the EU.
It comprises of the ISO 3166 Alpha-2 country code followed by
a code or number that is unique in the member state.
</xsd:documentation>
</xsd:annotation>
</xsd:element>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="consignmentType">
<xsd:sequence>
<xsd:element name="borderTransportMeansType" minOccurs="0">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="modeCrossing" type="b2b:modeTransport" minOccurs="0"/>
<xsd:element name="nationalityCrossing" type="b2b:countryCode" minOccurs="0"/>
<xsd:element name="identificationCrossingBorder" type="b2b:string_35"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="departureTransportMeansType" minOccurs="0">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="modeTransport" type="b2b:modeTransport"/>
<xsd:element name="identificationDeparture" type="b2b:string_1_35"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="arrivalTransportMeansType" minOccurs="0">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="modeTransport" type="b2b:modeTransport" minOccurs="0"/>
<xsd:element name="identificationArrival" type="b2b:string_1_35" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="freightType" minOccurs="0">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="paymentMethod" type="b2b:modePaymentTransport" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="goodsLocationName" type="b2b:string_1_256" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="portType">
<xsd:sequence>
<xsd:element name="portCode" type="b2b:token_1_10"/>
<xsd:element name="portCountry" type="b2b:countryCode"/>
<xsd:element name="portLocationName" type="b2b:string_1_35" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="inCoTermType">
<xsd:sequence>
<xsd:element name="inCoTerm" type="b2b:inCoTerm"/>
<xsd:element name="inCoTermCountryRelationship" type="b2b:inCoTermCountryRelationship"/>
<xsd:element name="inCoTermPlaceCode" type="b2b:string_35" minOccurs="0"/>
<xsd:element name="inCoTermPlaceName" type="b2b:string_35"/>
<xsd:element name="inCoTermPlaceDescription" type="b2b:string_35" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="principalType">
<xsd:sequence>
<xsd:element name="nameType" minOccurs="0">
<xsd:complexType>
<xsd:simpleContent>
<xsd:extension base="b2b:string_35">
<xsd:attribute name="language" type="b2b:countryCode"/>
</xsd:extension>
</xsd:simpleContent>
</xsd:complexType>
</xsd:element>
<xsd:element name="address" type="b2b:addressType" minOccurs="0"/>
<xsd:element name="taxIdentificationNumber" type="b2b:string_1_17" minOccurs="0"/>
<xsd:element name="contactPersonType" minOccurs="0">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="contactPersonName" type="b2b:string_35" minOccurs="0"/>
<xsd:element name="contactPersonCommunicationNumber" type="b2b:string_15" minOccurs="0"/>
<xsd:element name="contactPersonEmail" type="b2b:string_70" minOccurs="0"/>
<xsd:element name="contactPersonFaxNumber" type="b2b:string_15" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="goodsItemType">
<xsd:sequence>
<xsd:element name="sequenceNumeric" type="b2b:sequenceNumeric"/>
<xsd:element name="customsValueAmount" type="b2b:priceType_16_2" minOccurs="0"/>
<xsd:element name="statisticalValueAmount" type="b2b:priceType_16_2" minOccurs="0"/>
<xsd:element name="additionalDocumentType" minOccurs="0" maxOccurs="99">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="documentCode" type="b2b:documentCode"/>
<xsd:element name="documentReference" type="b2b:string_1_35" minOccurs="0"/>
<xsd:element name="amount" type="b2b:priceType_16_2" minOccurs="0"/>
<xsd:element name="quantity" type="b2b:quantityType" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="additionalInformationType" minOccurs="0" maxOccurs="99">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="statementCode" type="b2b:statementCode"/>
<xsd:element name="statementDescription" type="b2b:string_1_512" minOccurs="0"/>
<xsd:element name="statementTypeCode" type="b2b:token_1_3"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="commodityType">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="sequenceNumeric" type="b2b:sequenceNumeric"/>
<xsd:element name="description" type="b2b:string_1_512"/>
<xsd:element name="valueAmount" type="b2b:priceType_16_2" minOccurs="0"/>
<xsd:element name="classificationType" minOccurs="0" maxOccurs="99">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="commodityCode" type="b2b:string_8_22" minOccurs="0"/>
<xsd:element name="unitedNationsDangerousGoodCode" type="b2b:unitedNationsDangerousGoodCode" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="transportEquipmentType" minOccurs="0" maxOccurs="99">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="sequenceNumeric" type="b2b:sequenceNumeric" minOccurs="0"/>
<xsd:element name="equipmentIdentificationNumberId" type="b2b:equipmentIdentificationNumberId" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="goodsMeasureType">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="grossMassMeasure" type="b2b:weightType_16_6" minOccurs="0"/>
<xsd:element name="netNetWeightMeasure" type="b2b:weightType_16_6"/>
<xsd:element name="tariffQuantity" type="b2b:decimal_16_6" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="governmentProcedureType" maxOccurs="2">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="currentCode" type="b2b:governmentProcedure" minOccurs="0"/>
<xsd:element name="previousCode" type="b2b:governmentProcedure" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="manufacturerType" minOccurs="0">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="name" type="b2b:string_1_70" minOccurs="0"/>
<xsd:element name="id" type="b2b:string_1_17" minOccurs="0"/>
<xsd:element name="address" type="b2b:addressType" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="originType" minOccurs="0">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="countryCode" type="b2b:countryCode"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="packagingType" maxOccurs="99">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="sequenceNumeric" type="b2b:sequenceNumeric"/>
<xsd:element name="MarksNumbersID" type="b2b:string_1_512" minOccurs="0"/>
<xsd:element name="packagingQuantity" type="b2b:packagingSequenceNumeric" minOccurs="0"/>
<xsd:element name="typeCode" type="b2b:packagingTypeCode"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="previousDocumentType" minOccurs="0" maxOccurs="9">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="DocTypeCode" type="b2b:prevDocTypeCode"/>
<xsd:element name="DocSortCode" type="b2b:prevDocSortCode"/>
<xsd:element name="DocNr" type="b2b:string_1_31"/>
<xsd:element name="lineNumeric" type="b2b:previousDocumentNumeric" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="refundRecipientPartyType" minOccurs="0">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="name" type="b2b:string_1_70" minOccurs="0"/>
<xsd:element name="id" type="b2b:string_1_17" minOccurs="0"/>
<xsd:element name="address" type="b2b:addressType" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="valuationAdjustmentType" minOccurs="0" maxOccurs="99">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="additionCode" type="b2b:valuationAdjustmentAdditionCode" minOccurs="0"/>
<xsd:element name="valuationAdjustmentAmount" type="b2b:priceType_16_2" minOccurs="0"/>
</xsd:sequence>
</xsd:complexType>
</xsd:element>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="attachmentType">
<xsd:sequence>
<xsd:element name="attachmentName">
<xsd:annotation>
<xsd:documentation>
Must have an extension so the user can open it with the corresponding program
</xsd:documentation>
</xsd:annotation>
<xsd:simpleType>
<xsd:restriction base="xsd:string">
<xsd:maxLength value="160"/>
</xsd:restriction>
</xsd:simpleType>
</xsd:element>
<xsd:element name="attachmentType" type="b2b:attachmentTypeCode">
<xsd:annotation>
<xsd:documentation>Example 380 for invoice,...</xsd:documentation>
</xsd:annotation>
</xsd:element>
<xsd:element name="attachmentReference" minOccurs="0">
<xsd:annotation>
<xsd:documentation>
Contains the invoice number, MRN or other reference markers
</xsd:documentation>
</xsd:annotation>
<xsd:simpleType>
<xsd:restriction base="xsd:string">
<xsd:maxLength value="35"/>
</xsd:restriction>
</xsd:simpleType>
</xsd:element>
<xsd:element name="binaryAttachmentData" type="xsd:base64Binary"/>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="addressType">
<xsd:sequence>
<xsd:element name="postalCode" type="b2b:string_15"/>
<xsd:element name="streetAndNumber" type="b2b:string_2_35"/>
<xsd:element name="city" type="b2b:string_2_35"/>
<xsd:element name="country" type="b2b:countryCode"/>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="priceType_16_2">
<xsd:simpleContent>
<xsd:extension base="b2b:decimal_16_2">
<xsd:attribute name="currency" type="b2b:currency" use="required"/>
</xsd:extension>
</xsd:simpleContent>
</xsd:complexType>
<xsd:complexType name="priceType_18_2">
<xsd:simpleContent>
<xsd:extension base="b2b:decimal_18_2">
<xsd:attribute name="currency" type="b2b:currency" use="required"/>
</xsd:extension>
</xsd:simpleContent>
</xsd:complexType>
<xsd:complexType name="weightType_16_6">
<xsd:simpleContent>
<xsd:extension base="b2b:decimal_16_6">
<xsd:attribute name="massUnit" fixed="kg" use="required"/>
</xsd:extension>
</xsd:simpleContent>
</xsd:complexType>
<xsd:complexType name="quantityType">
<xsd:simpleContent>
<xsd:extension base="b2b:quantityTypeNumeric">
<xsd:attribute name="unitCode" type="xsd:string" use="required"/>
</xsd:extension>
</xsd:simpleContent>
</xsd:complexType>
<!-- simple types -->
<xsd:simpleType name="uuid">
<xsd:annotation>
<xsd:documentation xml:lang="EN">
A universally unique type 4 identifier (UUID) is a 128-bit number used to identify a single exchange document.
The term globally unique identifier (GUID) is also used, typically in software created by Microsoft.
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:length value="36" fixed="true"/>
<xsd:pattern value="[0-9a-fA-F]{8}-[0-9a-fA-F]{4}-4[0-9a-fA-F]{3}-[8-9a-bA-B][0-9a-fA-F]{3}-[0-9a-fA-F]{12}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="version">
<xsd:annotation>
<xsd:documentation xml:lang="EN">
Version of the schema used.
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:length value="5" fixed="true"/>
<xsd:pattern value="\d.\d.\d"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="dateTime">
<xsd:annotation>
<xsd:documentation xml:lang="EN">
ISO 8601 Date and time with timezone added relative to UTC. For example, 2019-01-01T12:00:00+01:00 for UK time
Content is yyyy-mm-ddThh:mm:ssphh:mm where p is + or -. Note that the time zone is required.
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:dateTime">
<xsd:pattern value="\d{4}-\d\d-\d\dT\d\d:\d\d:\d\d[+\-]\d\d:\d\d"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="declarationCode">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-a03.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:enumeration value="CO"/>
<xsd:enumeration value="EU"/>
<xsd:enumeration value="EX"/>
<xsd:enumeration value="IM"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="declarationTypeCode">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-a04.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:enumeration value="A"/>
<xsd:enumeration value="B"/>
<xsd:enumeration value="D"/>
<xsd:enumeration value="E"/>
<xsd:enumeration value="X"/>
<xsd:enumeration value="Y"/>
<xsd:enumeration value="Z"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="procedure">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/wps/wcm/connect/bldcontenten/belastingdienst/customs/customs-processes/special-procedures/special-procedures-for-goods/special-procedures-for-goods
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:enumeration value="A"/>
<xsd:enumeration value="B"/>
<xsd:enumeration value="C"/>
<xsd:enumeration value="D"/>
<xsd:enumeration value="E"/>
<xsd:enumeration value="H"/>
<xsd:enumeration value="I"/>
<xsd:enumeration value="J"/>
<xsd:enumeration value="K"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="modeTransport">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%20sagitta%2C%20onderdeel%20algemeen-a27.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:enumeration value="AIR"/>
<xsd:enumeration value="HUMAN"/>
<xsd:enumeration value="POSTAL"/>
<xsd:enumeration value="RAIL"/>
<xsd:enumeration value="ROAD"/>
<xsd:enumeration value="SEA"/>
<xsd:enumeration value="INLAND_WATERWAYS"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="modePaymentTransport">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-116.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:enumeration value="CASH"/>
<xsd:enumeration value="CREDIT_CARD"/>
<xsd:enumeration value="CHECK"/>
<xsd:enumeration value="OTHER"/>
<xsd:enumeration value="ELECTRONIC"/>
<xsd:enumeration value="ACCOUNT_HOLDER"/>
<xsd:enumeration value="NOT_PAYED_BEFOREHAND"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="inCoTerm">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-a14.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:enumeration value="CFR"/>
<xsd:enumeration value="CIF"/>
<xsd:enumeration value="CIP"/>
<xsd:enumeration value="CPT"/>
<xsd:enumeration value="DAF"/>
<xsd:enumeration value="DAP"/>
<xsd:enumeration value="DAT"/>
<xsd:enumeration value="DDP"/>
<xsd:enumeration value="DDU"/>
<xsd:enumeration value="DEQ"/>
<xsd:enumeration value="DES"/>
<xsd:enumeration value="EXW"/>
<xsd:enumeration value="FAS"/>
<xsd:enumeration value="FCA"/>
<xsd:enumeration value="FOB"/>
<xsd:enumeration value="XXX"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="natureOfTransaction">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-a22.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:unsignedShort">
<xsd:enumeration value="1"/>
<xsd:enumeration value="2"/>
<xsd:enumeration value="3"/>
<xsd:enumeration value="4"/>
<xsd:enumeration value="5"/>
<xsd:enumeration value="6"/>
<xsd:enumeration value="7"/>
<xsd:enumeration value="8"/>
<xsd:enumeration value="9"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="inCoTermCountryRelationship">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-a89.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:unsignedShort">
<xsd:enumeration value="1"/>
<xsd:enumeration value="2"/>
<xsd:enumeration value="3"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="governmentProcedure">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-a35.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:token">
<xsd:maxLength value="2"/>
<xsd:pattern value=".{1,2}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="valuationAdjustmentAdditionCode">
<xsd:annotation>
<xsd:documentation>
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-a11.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:token">
<xsd:maxLength value="3"/>
<xsd:pattern value=".{1,3}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="attachmentTypeCode">
<xsd:annotation>
<xsd:documentation>
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-a28.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:token">
<xsd:maxLength value="3"/>
<xsd:pattern value=".{1,3}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="unitedNationsDangerousGoodCode">
<xsd:annotation>
<xsd:documentation xml:lang="EN">
UN IDs are four-digit numbers that identify dangerous goods, hazardous substances and articles
in the framework of international transport.
They are assigned by the United Nations Committee of Experts on the Transport of Dangerous Goods.
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:pattern value="\d{4}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="documentCode">
<xsd:annotation>
<xsd:documentation xml:lang="NL" >
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-t03.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:token">
<xsd:maxLength value="4"/>
<xsd:pattern value=".{1,4}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="statementCode">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-a12.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:token">
<xsd:maxLength value="17"/>
<xsd:pattern value=".{1,17}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="packagingTypeCode">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-a25.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:token">
<xsd:maxLength value="2"/>
<xsd:pattern value=".{1,2}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="exitOffice">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%2C%20onderdeel%20aangiftebehandeling-s20.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:token">
<xsd:maxLength value="17"/>
<xsd:pattern value=".{1,17}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="declarationOffice">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%20sagitta%2C%20onderdeel%20algemeen-s03.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:token">
<xsd:maxLength value="4"/>
<xsd:pattern value=".{1,4}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="prevDocTypeCode">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
X - Summiere Aangifte
Y - Oorspronkelijke Aangifte
Z - Voorafgaand Document
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:enumeration value="X"/>
<xsd:enumeration value="Y"/>
<xsd:enumeration value="Z"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="prevDocSortCode">
<xsd:annotation>
<xsd:documentation xml:lang="NL">
https://www.belastingdienst.nl/codeboek_sagitta/huidig/html/tabel-codeboek%20sagitta%2C%20onderdeel%20transit-014.html
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:token">
<xsd:maxLength value="3"/>
<xsd:pattern value=".{1,3}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="previousDocumentNumeric">
<xsd:restriction base="xsd:decimal">
<xsd:pattern value="[0-9]{1,4}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="sequenceNumeric">
<xsd:restriction base="xsd:decimal">
<xsd:pattern value="[0-9]{1,5}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="packagingSequenceNumeric">
<xsd:restriction base="xsd:decimal">
<xsd:pattern value="[0-9]{1,8}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="quantityTypeNumeric">
<xsd:restriction base="xsd:decimal">
<xsd:pattern value="[0-9]{1,16}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="equipmentIdentificationNumberId">
<xsd:annotation>
<xsd:documentation xml:lang="EN">
Placeholder for container nr, train, barge, plane etc.
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:maxLength value="17"/>
<xsd:pattern value=".{1,17}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="currency">
<xsd:annotation>
<xsd:documentation xml:lang="EN">
ISO 4217 currency code,
like GBP for pound sterling or EUR for Euro
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:length value="3" fixed="true"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="countryCode">
<xsd:annotation>
<xsd:documentation xml:lang="EN">
ISO 3166 Alpha-2 country code,
like GB for the United Kingdom of Great Britain and Northern Ireland,
and NL for the Kingdom of the Netherlands
</xsd:documentation>
</xsd:annotation>
<xsd:restriction base="xsd:string">
<xsd:length value="2" fixed="true"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="decimal_16_2">
<xsd:restriction base="xsd:decimal">
<xsd:totalDigits value="16"/>
<xsd:fractionDigits value="2"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="decimal_16_6">
<xsd:restriction base="xsd:decimal">
<xsd:totalDigits value="16"/>
<xsd:fractionDigits value="6"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="decimal_18_2">
<xsd:restriction base="xsd:decimal">
<xsd:totalDigits value="18"/>
<xsd:fractionDigits value="2"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_15">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="15"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_35">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="35"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_70">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="70"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_1_17">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="17"/>
<xsd:pattern value=".{1,17}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_8_22">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="22"/>
<xsd:pattern value=".{8,22}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_1_25">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="25"/>
<xsd:pattern value=".{1,25}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_1_31">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="31"/>
<xsd:pattern value=".{1,31}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_1_35">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="35"/>
<xsd:pattern value=".{1,35}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_2_35">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="35"/>
<xsd:pattern value=".{2,35}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_1_70">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="70"/>
<xsd:pattern value=".{1,70}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_1_256">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="256"/>
<xsd:pattern value=".{1,256}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="string_1_512">
<xsd:restriction base="xsd:string">
<xsd:maxLength value="512"/>
<xsd:pattern value=".{1,512}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="token_1_3">
<xsd:restriction base="xsd:token">
<xsd:maxLength value="3"/>
<xsd:pattern value=".{1,3}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="token_1_10">
<xsd:restriction base="xsd:token">
<xsd:maxLength value="10"/>
<xsd:pattern value=".{1,10}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:simpleType name="token_3_17">
<xsd:restriction base="xsd:token">
<xsd:maxLength value="17"/>
<xsd:pattern value=".{3,17}"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:annotation>
<xsd:appinfo>
<copyright-notice>Copyright 2020 gaston-schul.com and/or its affiliates. All rights reserved.</copyright-notice>
<author>Marcel Mullenders</author>
</xsd:appinfo>
<xsd:documentation>
End-User License Agreement (EULA) of ags customs exchange
This End-User License Agreement ("EULA") is a legal agreement between you and Gaston Schul
This EULA agreement governs your acquisition and use of our ags customs exchange software ("Software")
directly from Gaston Schul or indirectly through a Gaston Schul authorized reseller or distributor (a "Reseller").
Please read this EULA agreement carefully before completing the installation process and using the ags customs exchange software.
It provides a license to use the ags customs exchange software and contains warranty information and liability disclaimers.
If you are entering into this EULA agreement on behalf of a company or other legal entity,
you represent that you have the authority to bind such entity and its affiliates to these terms and conditions.
If you do not have such authority or if you do not agree with the terms and conditions of this EULA agreement,
do not install or use the Software, and you must not accept this EULA agreement.
This EULA agreement shall apply only to the Software supplied by Gaston Schul herewith regardless of whether other
software is referred to or described herein. The terms also apply to any Gaston Schul updates, supplements, Internet-based services,
and support services for the Software, unless other terms accompany those items on delivery. If so, those terms apply.
License Grant
Gaston Schul hereby grants you a personal, non-transferable, non-exclusive licence to use the v software on your devices
in accordance with the terms of this EULA agreement. You are permitted to load the ags customs exchange software (for example a PC, laptop, mobile or tablet)
under your control. You are responsible for ensuring your device meets the minimum requirements of the ags customs exchange software.
You are not permitted to:
Edit, alter, modify, adapt or otherwise change the whole or any part of the Software
Attempt to do any such things as to distribute or resell the Software
Allow any third party to use the Software on behalf of or for the benefit of any third party
Use the Software in any way which breaches any applicable local, national or international law
Use the Software for any purpose that Gaston Schul considers is a breach of this EULA agreement
Intellectual Property and Ownership
Gaston Schul shall at all times retain ownership of the Software as originally downloaded by you and all subsequent downloads of the Software by you.
The Software (and the copyright, and other intellectual property rights of whatever nature in the Software, including any modifications made thereto)
are and shall remain the property of Gaston Schul.
Gaston Schul reserves the right to grant licences to use the Software to third parties.
Termination
This EULA agreement is effective from the date you first use the Software and shall continue until terminated.
You may terminate it at any time.
It will also terminate immediately if you fail to comply with any term of this EULA agreement.
Upon such termination, the licenses granted by this EULA agreement will immediately terminate and you agree to stop all access and use of the Software.
The provisions that by their nature continue and survive will survive any termination of this EULA agreement.
Governing Law
This EULA agreement, and any dispute arising out of or in connection with this EULA agreement,
shall be governed by and construed in accordance with the laws of the Netherlands.
</xsd:documentation>
</xsd:annotation>
</xsd:schema>

View File

@@ -90,12 +90,13 @@ Public Class cVERAG_in_eza_FULL
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("InvoiceAmount", EZA.InvoiceAmount))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("InvoiceCurrency", EZA.InvoiceCurrency))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ContainerNr1", EZA.ContainerNr1))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ContainerNr2", EZA.ContainerNr2))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ContainerNr3", EZA.ContainerNr3))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ContainerNr4", EZA.ContainerNr4))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("FreightCostsEU", EZA.FreightCostsEU))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("FreightCostsNonEU", EZA.FreightCostsNonEU))
Return list
End Function
@@ -115,7 +116,19 @@ Public Class cVERAG_in_eza_FULL
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffExt7", POS.GoodsTariffExt7))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffExt8", POS.GoodsTariffExt8))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffExt9", POS.GoodsTariffExt9))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffExt10", POS.GoodsTariffExt10))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffYCode1", POS.GoodsTariffYCode1))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffYCode2", POS.GoodsTariffYCode2))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffYCode3", POS.GoodsTariffYCode3))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffYCode4", POS.GoodsTariffYCode4))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffYCode5", POS.GoodsTariffYCode5))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffYCode6", POS.GoodsTariffYCode6))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffYCode7", POS.GoodsTariffYCode7))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffYCode8", POS.GoodsTariffYCode8))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffYCode9", POS.GoodsTariffYCode9))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsTariffYCode10", POS.GoodsTariffYCode10))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GoodsDescription", POS.GoodsDescription))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("OriginCountryCode", POS.OriginCountryCode))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("GrossWeight", POS.GrossWeight))
@@ -167,7 +180,10 @@ Public Class cVERAG_in_eza_FULL
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("City", ADR.City))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("CountryCode", ADR.CountryCode))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PostalCode", ADR.PostalCode))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UStID", ADR.UStID))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("TaxNo", ADR.TaxNo))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ContactPerson", ADR.ContactPerson))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Telefon", ADR.Telefon))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Email", ADR.Email))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("shTrAd_ShTrId", Me.shTr_id,,,, True))
@@ -718,6 +734,9 @@ Public Class cVERAG_in_eza
Public Property ContainerNr3 As String = ""
Public Property ContainerNr4 As String = ""
Public Property FreightCostsEU As String = ""
Public Property FreightCostsNonEU As String = ""
Public Property POSITIONS As New List(Of cVERAG_in_eza_position)
Public Property DOCUMENTS As New List(Of cVERAG_in_shipment_Document)
@@ -744,7 +763,11 @@ Public Class cVERAG_in_eza_Adressen
Public Property City As String = "" ' VARCHAR (35) NULL,
Public Property CountryCode As String = "" ' VARCHAR (3) NULL,
Public Property PostalCode As String = "" ' VARCHAR (9) NULL,
Public Property UStID As String = "" ' VARCHAR (14) NULL,
Public Property UStID As String = "" 'NICHT MEHR --> TaxNo
Public Property TaxNo As String = "" ' VARCHAR (14) NULL,
Public Property ContactPerson As String = "" ' VARCHAR (14) NULL,
Public Property Telefon As String = "" ' VARCHAR (14) NULL,
Public Property Email As String = "" ' VARCHAR (14) NULL,
End Class
@@ -754,14 +777,26 @@ Public Class cVERAG_in_eza_position
Public Property GoodsTariff As Object = Nothing
Public Property GoodsTariffExt1 As Object = Nothing
Public Property GoodsTariffExt2 As Object = Nothing
Public Property GoodsTariffExt3 As Object = Nothing
Public Property GoodsTariffExt4 As Object = Nothing
Public Property GoodsTariffExt5 As Object = Nothing
Public Property GoodsTariffExt6 As Object = Nothing
Public Property GoodsTariffExt7 As Object = Nothing
Public Property GoodsTariffExt8 As Object = Nothing
Public Property GoodsTariffExt9 As Object = Nothing
Public Property GoodsTariffExt10 As String = ""
Public Property GoodsTariffExt3 As Object = Nothing 'NICHT MEHR!!!
Public Property GoodsTariffExt4 As Object = Nothing 'NICHT MEHR!!!
Public Property GoodsTariffExt5 As Object = Nothing 'NICHT MEHR!!!
Public Property GoodsTariffExt6 As Object = Nothing 'NICHT MEHR!!!
Public Property GoodsTariffExt7 As Object = Nothing 'NICHT MEHR!!!
Public Property GoodsTariffExt8 As Object = Nothing 'NICHT MEHR!!!
Public Property GoodsTariffExt9 As Object = Nothing 'NICHT MEHR!!!
Public Property GoodsTariffExt10 As String = "" 'NICHT MEHR!!!
Public Property GoodsTariffYCode1 As String = ""
Public Property GoodsTariffYCode2 As String = ""
Public Property GoodsTariffYCode3 As String = ""
Public Property GoodsTariffYCode4 As String = ""
Public Property GoodsTariffYCode5 As String = ""
Public Property GoodsTariffYCode6 As String = ""
Public Property GoodsTariffYCode7 As String = ""
Public Property GoodsTariffYCode8 As String = ""
Public Property GoodsTariffYCode9 As String = ""
Public Property GoodsTariffYCode10 As String = ""
Public Property GoodsDescription As String = ""
Public Property OriginCountryCode As String = ""
Public Property GrossWeight As Object = Nothing

View File

@@ -95,15 +95,15 @@
</Reference>
<Reference Include="Spire.License, Version=1.3.8.46, Culture=neutral, PublicKeyToken=b1144360237c8b3f, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\dll\PDF Spire\6.8.5\Spire.License.dll</HintPath>
<HintPath>..\..\..\dll\PDF Spire\6.10\Spire.License.dll</HintPath>
</Reference>
<Reference Include="Spire.Pdf, Version=6.8.2.0, Culture=neutral, PublicKeyToken=663f351905198cb3, processorArchitecture=MSIL">
<Reference Include="Spire.Pdf, Version=6.8.5.0, Culture=neutral, PublicKeyToken=663f351905198cb3, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\dll\PDF Spire\6.8.5\Spire.Pdf.dll</HintPath>
<HintPath>..\..\..\dll\PDF Spire\6.10\Spire.Pdf.dll</HintPath>
</Reference>
<Reference Include="Spire.PdfViewer.Forms, Version=5.8.2.0, Culture=neutral, PublicKeyToken=663f351905198cb3, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\dll\PDF Spire\6.8.5\Spire.PdfViewer.Forms.dll</HintPath>
<HintPath>..\..\..\dll\PDF Spire\6.10\Spire.PdfViewer.Forms.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.ComponentModel.DataAnnotations" />
@@ -467,6 +467,7 @@
<Compile Include="Schnittstellen\cJsonPost.vb" />
<Compile Include="Schnittstellen\cSyska_Interface.vb" />
<Compile Include="Schnittstellen\cTherefore.vb" />
<Compile Include="Schnittstellen\GASTON_SCHUL\agsCustomsExchange.Designer.vb" />
<Compile Include="Schnittstellen\VERAG\ATEZ\BeyannameBilgi.Designer.vb" />
<Compile Include="Schnittstellen\VERAG\IN_AVISO\cVERAG_in_TRAviso.vb" />
<Compile Include="Schnittstellen\VERAG\IN_SHIPPMENT\cVERAG_in_shippmentWHAT.vb" />
@@ -573,6 +574,9 @@
</EmbeddedResource>
</ItemGroup>
<ItemGroup>
<None Include="Schnittstellen\GASTON_SCHUL\agsCustomsExchange.xsd">
<SubType>Designer</SubType>
</None>
<None Include="Schnittstellen\VERAG\ATEZ\BeyannameBilgi.json" />
<None Include="Schnittstellen\VERAG\ATEZ\TR_EX\declarationJsonSchema.json" />
<None Include="Schnittstellen\VERAG\ATEZ\TR_EX\declarationJsonSchema.xsd">