5727 lines
228 KiB
VB.net
5727 lines
228 KiB
VB.net
'' ------------------------------------------------------------------------------
|
|
'' <auto-generated>
|
|
'' Generated by Xsd2Code++. Version 4.4.0.7
|
|
'' <NameSpace>Abgabenbescheid</NameSpace><Collection>List</Collection><codeType>VisualBasic</codeType><EnableDataBinding>False</EnableDataBinding><GenerateCloneMethod>False</GenerateCloneMethod><GenerateDataContracts>False</GenerateDataContracts><DataMemberNameArg>OnlyIfDifferent</DataMemberNameArg><DataMemberOnXmlIgnore>False</DataMemberOnXmlIgnore><CodeBaseTag>Net45</CodeBaseTag><InitializeFields>All</InitializeFields><GenerateUnusedComplexTypes>True</GenerateUnusedComplexTypes><GenerateUnusedSimpleTypes>True</GenerateUnusedSimpleTypes><GenerateXMLAttributes>True</GenerateXMLAttributes><OrderXMLAttrib>False</OrderXMLAttrib><EnableLazyLoading>False</EnableLazyLoading><VirtualProp>False</VirtualProp><PascalCase>False</PascalCase><AutomaticProperties>False</AutomaticProperties><PropNameSpecified>None</PropNameSpecified><PrivateFieldName>StartWithUnderscore</PrivateFieldName><PrivateFieldNamePrefix></PrivateFieldNamePrefix><EnableRestriction>False</EnableRestriction><RestrictionMaxLenght>False</RestrictionMaxLenght><RestrictionRegEx>False</RestrictionRegEx><RestrictionRange>False</RestrictionRange><ValidateProperty>False</ValidateProperty><ClassNamePrefix></ClassNamePrefix><ClassLevel>Public</ClassLevel><PartialClass>True</PartialClass><ClassesInSeparateFiles>False</ClassesInSeparateFiles><ClassesInSeparateFilesDir></ClassesInSeparateFilesDir><TrackingChangesEnable>False</TrackingChangesEnable><GenTrackingClasses>False</GenTrackingClasses><HidePrivateFieldInIDE>False</HidePrivateFieldInIDE><EnableSummaryComment>False</EnableSummaryComment><EnableAppInfoSettings>False</EnableAppInfoSettings><EnableExternalSchemasCache>False</EnableExternalSchemasCache><EnableDebug>False</EnableDebug><EnableWarn>True</EnableWarn><ExcludeImportedTypes>True</ExcludeImportedTypes><ExpandNesteadAttributeGroup>True</ExpandNesteadAttributeGroup><CleanupCode>False</CleanupCode><EnableXmlSerialization>True</EnableXmlSerialization><SerializeMethodName>Serialize</SerializeMethodName><DeserializeMethodName>Deserialize</DeserializeMethodName><SaveToFileMethodName>SaveToFile</SaveToFileMethodName><LoadFromFileMethodName>LoadFromFile</LoadFromFileMethodName><EnableEncoding>False</EnableEncoding><EnableXMLIndent>True</EnableXMLIndent><IndentChar>Indent2Space</IndentChar><NewLineAttr>False</NewLineAttr><OmitXML>False</OmitXML><Encoder>UTF8</Encoder><Serializer>XmlSerializer</Serializer><sspNullable>False</sspNullable><sspString>False</sspString><sspCollection>False</sspCollection><sspComplexType>False</sspComplexType><sspSimpleType>False</sspSimpleType><sspEnumType>False</sspEnumType><XmlSerializerEvent>False</XmlSerializerEvent><BaseClassName>EntityBase</BaseClassName><UseBaseClass>False</UseBaseClass><GenBaseClass>False</GenBaseClass><CustomUsings></CustomUsings><AttributesToExlude></AttributesToExlude>
|
|
'' </auto-generated>
|
|
'' ------------------------------------------------------------------------------
|
|
Imports System
|
|
Imports System.Diagnostics
|
|
Imports System.Xml.Serialization
|
|
Imports System.Collections
|
|
Imports System.Xml.Schema
|
|
Imports System.ComponentModel
|
|
Imports System.IO
|
|
Imports System.Text
|
|
Imports System.Xml
|
|
Imports System.Collections.Generic
|
|
|
|
Namespace Abgabenbescheid
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code"), _
|
|
System.Xml.Serialization.XmlRootAttribute("Abgabenbescheid", [Namespace]:="", IsNullable:=False)> _
|
|
Partial Public Class AbgabenbescheidEinfuhrTAXTyp
|
|
Inherits DatenaustauschFreierVerkehrTyp
|
|
|
|
#Region "Private fields"
|
|
Private _einzelAbgabenbescheid As EinzelAbgabenbescheidTyp
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New()
|
|
Me._einzelAbgabenbescheid = New EinzelAbgabenbescheidTyp()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EinzelAbgabenbescheid() As EinzelAbgabenbescheidTyp
|
|
Get
|
|
Return Me._einzelAbgabenbescheid
|
|
End Get
|
|
Set(value As EinzelAbgabenbescheidTyp)
|
|
Me._einzelAbgabenbescheid = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(AbgabenbescheidEinfuhrTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current AbgabenbescheidEinfuhrTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an AbgabenbescheidEinfuhrTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output AbgabenbescheidEinfuhrTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As AbgabenbescheidEinfuhrTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, AbgabenbescheidEinfuhrTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As AbgabenbescheidEinfuhrTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As AbgabenbescheidEinfuhrTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), AbgabenbescheidEinfuhrTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As AbgabenbescheidEinfuhrTAXTyp
|
|
Return CType(Serializer.Deserialize(s), AbgabenbescheidEinfuhrTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current AbgabenbescheidEinfuhrTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an AbgabenbescheidEinfuhrTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output AbgabenbescheidEinfuhrTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As AbgabenbescheidEinfuhrTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, AbgabenbescheidEinfuhrTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As AbgabenbescheidEinfuhrTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As AbgabenbescheidEinfuhrTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class EinzelAbgabenbescheidTyp
|
|
|
|
#Region "Private fields"
|
|
Private _objektIdentifizierung As ObjektIdentifizierungTAXTyp
|
|
|
|
Private _kopfDaten As KopfDatenEinfuhrbescheidTyp
|
|
|
|
Private _position As List(Of PositionAbgabenbescheidEinfuhrTyp)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New()
|
|
Me._position = New List(Of PositionAbgabenbescheidEinfuhrTyp)()
|
|
Me._kopfDaten = New KopfDatenEinfuhrbescheidTyp()
|
|
Me._objektIdentifizierung = New ObjektIdentifizierungTAXTyp()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ObjektIdentifizierung() As ObjektIdentifizierungTAXTyp
|
|
Get
|
|
Return Me._objektIdentifizierung
|
|
End Get
|
|
Set(value As ObjektIdentifizierungTAXTyp)
|
|
Me._objektIdentifizierung = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property KopfDaten() As KopfDatenEinfuhrbescheidTyp
|
|
Get
|
|
Return Me._kopfDaten
|
|
End Get
|
|
Set(value As KopfDatenEinfuhrbescheidTyp)
|
|
Me._kopfDaten = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("Position", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Position() As List(Of PositionAbgabenbescheidEinfuhrTyp)
|
|
Get
|
|
Return Me._position
|
|
End Get
|
|
Set(value As List(Of PositionAbgabenbescheidEinfuhrTyp))
|
|
Me._position = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(EinzelAbgabenbescheidTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current EinzelAbgabenbescheidTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an EinzelAbgabenbescheidTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output EinzelAbgabenbescheidTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As EinzelAbgabenbescheidTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, EinzelAbgabenbescheidTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As EinzelAbgabenbescheidTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As EinzelAbgabenbescheidTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), EinzelAbgabenbescheidTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As EinzelAbgabenbescheidTyp
|
|
Return CType(Serializer.Deserialize(s), EinzelAbgabenbescheidTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current EinzelAbgabenbescheidTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an EinzelAbgabenbescheidTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output EinzelAbgabenbescheidTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As EinzelAbgabenbescheidTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, EinzelAbgabenbescheidTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As EinzelAbgabenbescheidTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As EinzelAbgabenbescheidTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class ObjektIdentifizierungTAXTyp
|
|
|
|
#Region "Private fields"
|
|
Private _objektName As String
|
|
|
|
Private _objektAlias As String
|
|
|
|
Private _eDIFACTNachrichtenNr As String
|
|
|
|
Private _zeitpunktEingang As Date
|
|
|
|
Private _shipmentReferenz As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ObjektName() As String
|
|
Get
|
|
Return Me._objektName
|
|
End Get
|
|
Set(value As String)
|
|
Me._objektName = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ObjektAlias() As String
|
|
Get
|
|
Return Me._objektAlias
|
|
End Get
|
|
Set(value As String)
|
|
Me._objektAlias = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EDIFACTNachrichtenNr() As String
|
|
Get
|
|
Return Me._eDIFACTNachrichtenNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._eDIFACTNachrichtenNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZeitpunktEingang() As Date
|
|
Get
|
|
Return Me._zeitpunktEingang
|
|
End Get
|
|
Set(value As Date)
|
|
Me._zeitpunktEingang = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ShipmentReferenz() As String
|
|
Get
|
|
Return Me._shipmentReferenz
|
|
End Get
|
|
Set(value As String)
|
|
Me._shipmentReferenz = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(ObjektIdentifizierungTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current ObjektIdentifizierungTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an ObjektIdentifizierungTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output ObjektIdentifizierungTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As ObjektIdentifizierungTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, ObjektIdentifizierungTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As ObjektIdentifizierungTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As ObjektIdentifizierungTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), ObjektIdentifizierungTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As ObjektIdentifizierungTAXTyp
|
|
Return CType(Serializer.Deserialize(s), ObjektIdentifizierungTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current ObjektIdentifizierungTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an ObjektIdentifizierungTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output ObjektIdentifizierungTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As ObjektIdentifizierungTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, ObjektIdentifizierungTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As ObjektIdentifizierungTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As ObjektIdentifizierungTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class EinzelAbgabenSatzTAXTyp
|
|
|
|
#Region "Private fields"
|
|
Private _lfdNrAbgabensatz As List(Of String)
|
|
|
|
Private _abgabensatz As List(Of Decimal)
|
|
|
|
Private _bemessungsmassstab As List(Of String)
|
|
|
|
Private _gehaltsangabenArt As List(Of String)
|
|
|
|
Private _gehaltsangabenGradProzent As List(Of Decimal)
|
|
|
|
Private _bemessungsgrundlageKz As List(Of String)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New()
|
|
Me._bemessungsgrundlageKz = New List(Of String)()
|
|
Me._gehaltsangabenGradProzent = New List(Of Decimal)()
|
|
Me._gehaltsangabenArt = New List(Of String)()
|
|
Me._bemessungsmassstab = New List(Of String)()
|
|
Me._abgabensatz = New List(Of Decimal)()
|
|
Me._lfdNrAbgabensatz = New List(Of String)()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("LfdNrAbgabensatz", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="nonNegativeInteger")> _
|
|
Public Property LfdNrAbgabensatz() As List(Of String)
|
|
Get
|
|
Return Me._lfdNrAbgabensatz
|
|
End Get
|
|
Set(value As List(Of String))
|
|
Me._lfdNrAbgabensatz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("Abgabensatz", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Abgabensatz() As List(Of Decimal)
|
|
Get
|
|
Return Me._abgabensatz
|
|
End Get
|
|
Set(value As List(Of Decimal))
|
|
Me._abgabensatz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("Bemessungsmassstab", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Bemessungsmassstab() As List(Of String)
|
|
Get
|
|
Return Me._bemessungsmassstab
|
|
End Get
|
|
Set(value As List(Of String))
|
|
Me._bemessungsmassstab = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("GehaltsangabenArt", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property GehaltsangabenArt() As List(Of String)
|
|
Get
|
|
Return Me._gehaltsangabenArt
|
|
End Get
|
|
Set(value As List(Of String))
|
|
Me._gehaltsangabenArt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("GehaltsangabenGradProzent", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property GehaltsangabenGradProzent() As List(Of Decimal)
|
|
Get
|
|
Return Me._gehaltsangabenGradProzent
|
|
End Get
|
|
Set(value As List(Of Decimal))
|
|
Me._gehaltsangabenGradProzent = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("BemessungsgrundlageKz", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property BemessungsgrundlageKz() As List(Of String)
|
|
Get
|
|
Return Me._bemessungsgrundlageKz
|
|
End Get
|
|
Set(value As List(Of String))
|
|
Me._bemessungsgrundlageKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(EinzelAbgabenSatzTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current EinzelAbgabenSatzTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an EinzelAbgabenSatzTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output EinzelAbgabenSatzTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As EinzelAbgabenSatzTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, EinzelAbgabenSatzTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As EinzelAbgabenSatzTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As EinzelAbgabenSatzTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), EinzelAbgabenSatzTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As EinzelAbgabenSatzTAXTyp
|
|
Return CType(Serializer.Deserialize(s), EinzelAbgabenSatzTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current EinzelAbgabenSatzTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an EinzelAbgabenSatzTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output EinzelAbgabenSatzTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As EinzelAbgabenSatzTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, EinzelAbgabenSatzTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As EinzelAbgabenSatzTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As EinzelAbgabenSatzTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class AbgabengruppeTAXTyp
|
|
|
|
#Region "Private fields"
|
|
Private _abgabengruppe As String
|
|
|
|
Private _abgabeArt As String
|
|
|
|
Private _berechnungshinweis As String
|
|
|
|
Private _angewandterPVMinderungsBetrag As Decimal
|
|
|
|
Private _errechneterAbgabenbetrag As Decimal
|
|
|
|
Private _abgabenbetrag As Decimal
|
|
|
|
Private _abgabensatzKontNr As String
|
|
|
|
Private _verbrauchssteuerCode As String
|
|
|
|
Private _verbrauchssteuerMenge As Decimal
|
|
|
|
Private _verbrauchssteuerMasseinheit As String
|
|
|
|
Private _verbrauchssteuerQualifikator As String
|
|
|
|
Private _verbrauchssteuerGradProzent As Decimal
|
|
|
|
Private _verbrauchssteuerWert As Decimal
|
|
|
|
Private _einzelAbgabenSatz As List(Of EinzelAbgabenSatzTAXTyp)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New()
|
|
Me._einzelAbgabenSatz = New List(Of EinzelAbgabenSatzTAXTyp)()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Abgabengruppe() As String
|
|
Get
|
|
Return Me._abgabengruppe
|
|
End Get
|
|
Set(value As String)
|
|
Me._abgabengruppe = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AbgabeArt() As String
|
|
Get
|
|
Return Me._abgabeArt
|
|
End Get
|
|
Set(value As String)
|
|
Me._abgabeArt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Berechnungshinweis() As String
|
|
Get
|
|
Return Me._berechnungshinweis
|
|
End Get
|
|
Set(value As String)
|
|
Me._berechnungshinweis = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AngewandterPVMinderungsBetrag() As Decimal
|
|
Get
|
|
Return Me._angewandterPVMinderungsBetrag
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._angewandterPVMinderungsBetrag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ErrechneterAbgabenbetrag() As Decimal
|
|
Get
|
|
Return Me._errechneterAbgabenbetrag
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._errechneterAbgabenbetrag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Abgabenbetrag() As Decimal
|
|
Get
|
|
Return Me._abgabenbetrag
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._abgabenbetrag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AbgabensatzKontNr() As String
|
|
Get
|
|
Return Me._abgabensatzKontNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._abgabensatzKontNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VerbrauchssteuerCode() As String
|
|
Get
|
|
Return Me._verbrauchssteuerCode
|
|
End Get
|
|
Set(value As String)
|
|
Me._verbrauchssteuerCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VerbrauchssteuerMenge() As Decimal
|
|
Get
|
|
Return Me._verbrauchssteuerMenge
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._verbrauchssteuerMenge = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VerbrauchssteuerMasseinheit() As String
|
|
Get
|
|
Return Me._verbrauchssteuerMasseinheit
|
|
End Get
|
|
Set(value As String)
|
|
Me._verbrauchssteuerMasseinheit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VerbrauchssteuerQualifikator() As String
|
|
Get
|
|
Return Me._verbrauchssteuerQualifikator
|
|
End Get
|
|
Set(value As String)
|
|
Me._verbrauchssteuerQualifikator = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VerbrauchssteuerGradProzent() As Decimal
|
|
Get
|
|
Return Me._verbrauchssteuerGradProzent
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._verbrauchssteuerGradProzent = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VerbrauchssteuerWert() As Decimal
|
|
Get
|
|
Return Me._verbrauchssteuerWert
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._verbrauchssteuerWert = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("EinzelAbgabenSatz", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EinzelAbgabenSatz() As List(Of EinzelAbgabenSatzTAXTyp)
|
|
Get
|
|
Return Me._einzelAbgabenSatz
|
|
End Get
|
|
Set(value As List(Of EinzelAbgabenSatzTAXTyp))
|
|
Me._einzelAbgabenSatz = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(AbgabengruppeTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current AbgabengruppeTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an AbgabengruppeTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output AbgabengruppeTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As AbgabengruppeTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, AbgabengruppeTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As AbgabengruppeTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As AbgabengruppeTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), AbgabengruppeTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As AbgabengruppeTAXTyp
|
|
Return CType(Serializer.Deserialize(s), AbgabengruppeTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current AbgabengruppeTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an AbgabengruppeTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output AbgabengruppeTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As AbgabengruppeTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, AbgabengruppeTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As AbgabengruppeTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As AbgabengruppeTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class AbweichendeFestsetzungTAXTyp
|
|
|
|
#Region "Private fields"
|
|
Private _feldname As String
|
|
|
|
Private _qualifikator As String
|
|
|
|
Private _qualifikatorInhalt As String
|
|
|
|
Private _artAbweichendeFestsetzung As String
|
|
|
|
Private _festgesetztVon As String
|
|
|
|
Private _festgesetztAuf As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Feldname() As String
|
|
Get
|
|
Return Me._feldname
|
|
End Get
|
|
Set(value As String)
|
|
Me._feldname = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Qualifikator() As String
|
|
Get
|
|
Return Me._qualifikator
|
|
End Get
|
|
Set(value As String)
|
|
Me._qualifikator = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property QualifikatorInhalt() As String
|
|
Get
|
|
Return Me._qualifikatorInhalt
|
|
End Get
|
|
Set(value As String)
|
|
Me._qualifikatorInhalt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ArtAbweichendeFestsetzung() As String
|
|
Get
|
|
Return Me._artAbweichendeFestsetzung
|
|
End Get
|
|
Set(value As String)
|
|
Me._artAbweichendeFestsetzung = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property FestgesetztVon() As String
|
|
Get
|
|
Return Me._festgesetztVon
|
|
End Get
|
|
Set(value As String)
|
|
Me._festgesetztVon = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property FestgesetztAuf() As String
|
|
Get
|
|
Return Me._festgesetztAuf
|
|
End Get
|
|
Set(value As String)
|
|
Me._festgesetztAuf = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(AbweichendeFestsetzungTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current AbweichendeFestsetzungTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an AbweichendeFestsetzungTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output AbweichendeFestsetzungTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As AbweichendeFestsetzungTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, AbweichendeFestsetzungTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As AbweichendeFestsetzungTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As AbweichendeFestsetzungTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), AbweichendeFestsetzungTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As AbweichendeFestsetzungTAXTyp
|
|
Return CType(Serializer.Deserialize(s), AbweichendeFestsetzungTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current AbweichendeFestsetzungTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an AbweichendeFestsetzungTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output AbweichendeFestsetzungTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As AbweichendeFestsetzungTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, AbweichendeFestsetzungTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As AbweichendeFestsetzungTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As AbweichendeFestsetzungTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class KontingentAngerechnetWarenMengeTAXTyp
|
|
|
|
#Region "Private fields"
|
|
Private _menge As String
|
|
|
|
Private _masseinheit As String
|
|
|
|
Private _qualifier As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Menge() As String
|
|
Get
|
|
Return Me._menge
|
|
End Get
|
|
Set(value As String)
|
|
Me._menge = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Masseinheit() As String
|
|
Get
|
|
Return Me._masseinheit
|
|
End Get
|
|
Set(value As String)
|
|
Me._masseinheit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Qualifier() As String
|
|
Get
|
|
Return Me._qualifier
|
|
End Get
|
|
Set(value As String)
|
|
Me._qualifier = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(KontingentAngerechnetWarenMengeTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current KontingentAngerechnetWarenMengeTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an KontingentAngerechnetWarenMengeTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output KontingentAngerechnetWarenMengeTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As KontingentAngerechnetWarenMengeTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, KontingentAngerechnetWarenMengeTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As KontingentAngerechnetWarenMengeTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As KontingentAngerechnetWarenMengeTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), KontingentAngerechnetWarenMengeTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As KontingentAngerechnetWarenMengeTAXTyp
|
|
Return CType(Serializer.Deserialize(s), KontingentAngerechnetWarenMengeTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current KontingentAngerechnetWarenMengeTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an KontingentAngerechnetWarenMengeTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output KontingentAngerechnetWarenMengeTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As KontingentAngerechnetWarenMengeTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, KontingentAngerechnetWarenMengeTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As KontingentAngerechnetWarenMengeTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As KontingentAngerechnetWarenMengeTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class KontingentAngerechnetTAXTyp
|
|
|
|
#Region "Private fields"
|
|
Private _kontNrAngerechnet As String
|
|
|
|
Private _zollwertAngerechnet As Decimal
|
|
|
|
Private _eUStKostenAngerechnet As Decimal
|
|
|
|
Private _beguenstMengeAngerechnet As Decimal
|
|
|
|
Private _masseinhBegMengeAng As String
|
|
|
|
Private _qualifBegMengeAng As String
|
|
|
|
Private _warenMenge As List(Of KontingentAngerechnetWarenMengeTAXTyp)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New()
|
|
Me._warenMenge = New List(Of KontingentAngerechnetWarenMengeTAXTyp)()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property KontNrAngerechnet() As String
|
|
Get
|
|
Return Me._kontNrAngerechnet
|
|
End Get
|
|
Set(value As String)
|
|
Me._kontNrAngerechnet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZollwertAngerechnet() As Decimal
|
|
Get
|
|
Return Me._zollwertAngerechnet
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._zollwertAngerechnet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EUStKostenAngerechnet() As Decimal
|
|
Get
|
|
Return Me._eUStKostenAngerechnet
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._eUStKostenAngerechnet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property BeguenstMengeAngerechnet() As Decimal
|
|
Get
|
|
Return Me._beguenstMengeAngerechnet
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._beguenstMengeAngerechnet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property MasseinhBegMengeAng() As String
|
|
Get
|
|
Return Me._masseinhBegMengeAng
|
|
End Get
|
|
Set(value As String)
|
|
Me._masseinhBegMengeAng = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property QualifBegMengeAng() As String
|
|
Get
|
|
Return Me._qualifBegMengeAng
|
|
End Get
|
|
Set(value As String)
|
|
Me._qualifBegMengeAng = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("WarenMenge", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property WarenMenge() As List(Of KontingentAngerechnetWarenMengeTAXTyp)
|
|
Get
|
|
Return Me._warenMenge
|
|
End Get
|
|
Set(value As List(Of KontingentAngerechnetWarenMengeTAXTyp))
|
|
Me._warenMenge = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(KontingentAngerechnetTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current KontingentAngerechnetTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an KontingentAngerechnetTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output KontingentAngerechnetTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As KontingentAngerechnetTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, KontingentAngerechnetTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As KontingentAngerechnetTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As KontingentAngerechnetTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), KontingentAngerechnetTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As KontingentAngerechnetTAXTyp
|
|
Return CType(Serializer.Deserialize(s), KontingentAngerechnetTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current KontingentAngerechnetTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an KontingentAngerechnetTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output KontingentAngerechnetTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As KontingentAngerechnetTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, KontingentAngerechnetTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As KontingentAngerechnetTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As KontingentAngerechnetTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class SonderfalleingabeTAXTyp
|
|
|
|
#Region "Private fields"
|
|
Private _sonderabgabenGruppe As String
|
|
|
|
Private _anwendungsart As String
|
|
|
|
Private _satzBetragFaktor As Decimal
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property SonderabgabenGruppe() As String
|
|
Get
|
|
Return Me._sonderabgabenGruppe
|
|
End Get
|
|
Set(value As String)
|
|
Me._sonderabgabenGruppe = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Anwendungsart() As String
|
|
Get
|
|
Return Me._anwendungsart
|
|
End Get
|
|
Set(value As String)
|
|
Me._anwendungsart = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property SatzBetragFaktor() As Decimal
|
|
Get
|
|
Return Me._satzBetragFaktor
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._satzBetragFaktor = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(SonderfalleingabeTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current SonderfalleingabeTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an SonderfalleingabeTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output SonderfalleingabeTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As SonderfalleingabeTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, SonderfalleingabeTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As SonderfalleingabeTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As SonderfalleingabeTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), SonderfalleingabeTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As SonderfalleingabeTAXTyp
|
|
Return CType(Serializer.Deserialize(s), SonderfalleingabeTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current SonderfalleingabeTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an SonderfalleingabeTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output SonderfalleingabeTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As SonderfalleingabeTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, SonderfalleingabeTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As SonderfalleingabeTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As SonderfalleingabeTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class AngemeldeteUnterlageTAXTyp
|
|
|
|
#Region "Private fields"
|
|
Private _unterlageArt As String
|
|
|
|
Private _unterlageBereich As String
|
|
|
|
Private _unterlageNr As String
|
|
|
|
Private _anerkennungKz As String
|
|
|
|
Private _abschreibungKz As String
|
|
|
|
Private _einbehaltenKz As String
|
|
|
|
Private _periodischeVorlageKz As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property UnterlageArt() As String
|
|
Get
|
|
Return Me._unterlageArt
|
|
End Get
|
|
Set(value As String)
|
|
Me._unterlageArt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property UnterlageBereich() As String
|
|
Get
|
|
Return Me._unterlageBereich
|
|
End Get
|
|
Set(value As String)
|
|
Me._unterlageBereich = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property UnterlageNr() As String
|
|
Get
|
|
Return Me._unterlageNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._unterlageNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnerkennungKz() As String
|
|
Get
|
|
Return Me._anerkennungKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._anerkennungKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AbschreibungKz() As String
|
|
Get
|
|
Return Me._abschreibungKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._abschreibungKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EinbehaltenKz() As String
|
|
Get
|
|
Return Me._einbehaltenKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._einbehaltenKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property PeriodischeVorlageKz() As String
|
|
Get
|
|
Return Me._periodischeVorlageKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._periodischeVorlageKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(AngemeldeteUnterlageTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current AngemeldeteUnterlageTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an AngemeldeteUnterlageTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output AngemeldeteUnterlageTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As AngemeldeteUnterlageTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, AngemeldeteUnterlageTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As AngemeldeteUnterlageTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As AngemeldeteUnterlageTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), AngemeldeteUnterlageTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As AngemeldeteUnterlageTAXTyp
|
|
Return CType(Serializer.Deserialize(s), AngemeldeteUnterlageTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current AngemeldeteUnterlageTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an AngemeldeteUnterlageTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output AngemeldeteUnterlageTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As AngemeldeteUnterlageTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, AngemeldeteUnterlageTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As AngemeldeteUnterlageTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As AngemeldeteUnterlageTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class KursAbzugHinzuTAXTyp
|
|
|
|
#Region "Private fields"
|
|
Private _artAbHinzu As String
|
|
|
|
Private _angewandterKurs As Decimal
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ArtAbHinzu() As String
|
|
Get
|
|
Return Me._artAbHinzu
|
|
End Get
|
|
Set(value As String)
|
|
Me._artAbHinzu = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AngewandterKurs() As Decimal
|
|
Get
|
|
Return Me._angewandterKurs
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._angewandterKurs = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(KursAbzugHinzuTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current KursAbzugHinzuTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an KursAbzugHinzuTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output KursAbzugHinzuTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As KursAbzugHinzuTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, KursAbzugHinzuTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As KursAbzugHinzuTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As KursAbzugHinzuTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), KursAbzugHinzuTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As KursAbzugHinzuTAXTyp
|
|
Return CType(Serializer.Deserialize(s), KursAbzugHinzuTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current KursAbzugHinzuTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an KursAbzugHinzuTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output KursAbzugHinzuTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As KursAbzugHinzuTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, KursAbzugHinzuTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As KursAbzugHinzuTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As KursAbzugHinzuTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class PositionAbgabenbescheidEinfuhrTyp
|
|
|
|
#Region "Private fields"
|
|
Private _positionsNr As String
|
|
|
|
Private _erledigungKz As String
|
|
|
|
Private _warenNummerEZT As String
|
|
|
|
Private _warenNummerZusatzCode As List(Of String)
|
|
|
|
Private _warenBezeichnung As String
|
|
|
|
Private _beschauMitteilung As String
|
|
|
|
Private _erledigungMitteilung As String
|
|
|
|
Private _ablehnungAenderung As String
|
|
|
|
Private _weitererNachweis As String
|
|
|
|
Private _gewaehrteBeguenstigung As String
|
|
|
|
Private _anordnungKz As String
|
|
|
|
Private _eUStWert As Decimal
|
|
|
|
Private _kostenFuerEUSt As Decimal
|
|
|
|
Private _zollWert As Decimal
|
|
|
|
Private _annahmeAenderung As String
|
|
|
|
Private _sicherheitsLeistungBetrag As Decimal
|
|
|
|
Private _registrierNrvZAAZ As String
|
|
|
|
Private _positionsNrInvZAAZ As String
|
|
|
|
Private _annahmeKz As String
|
|
|
|
Private _annahmeDatum As Date
|
|
|
|
Private _ueberlassungDatum As Date
|
|
|
|
Private _lagerfrist As String
|
|
|
|
Private _wiederAusfuhrFrist As Date
|
|
|
|
Private _erledigungsfrist As Date
|
|
|
|
Private _fristWeitererNachweis As Date
|
|
|
|
Private _befund As String
|
|
|
|
Private _dV1AbweichendFestgesetztKz As String
|
|
|
|
Private _sonderfalleingabeKz As String
|
|
|
|
Private _angewandterKursNettopreis As Decimal
|
|
|
|
Private _angewandterKursMittelbZahlungen As Decimal
|
|
|
|
Private _abzugHinzurechnungen As List(Of KursAbzugHinzuTAXTyp)
|
|
|
|
Private _luftFrachtGesamtProzentsatz As String
|
|
|
|
Private _luftFrachtGesamtAngewandterKurs As Decimal
|
|
|
|
Private _angemeldeteUnterlage As List(Of AngemeldeteUnterlageTAXTyp)
|
|
|
|
Private _sonderabgabenGruppe As List(Of SonderfalleingabeTAXTyp)
|
|
|
|
Private _kontNrAngewandt As List(Of String)
|
|
|
|
Private _kontingentAngerechnet As List(Of KontingentAngerechnetTAXTyp)
|
|
|
|
Private _abweichendeFestsetzung As List(Of AbweichendeFestsetzungTAXTyp)
|
|
|
|
Private _abgaben As List(Of AbgabengruppeTAXTyp)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New()
|
|
Me._abgaben = New List(Of AbgabengruppeTAXTyp)()
|
|
Me._abweichendeFestsetzung = New List(Of AbweichendeFestsetzungTAXTyp)()
|
|
Me._kontingentAngerechnet = New List(Of KontingentAngerechnetTAXTyp)()
|
|
Me._kontNrAngewandt = New List(Of String)()
|
|
Me._sonderabgabenGruppe = New List(Of SonderfalleingabeTAXTyp)()
|
|
Me._angemeldeteUnterlage = New List(Of AngemeldeteUnterlageTAXTyp)()
|
|
Me._abzugHinzurechnungen = New List(Of KursAbzugHinzuTAXTyp)()
|
|
Me._warenNummerZusatzCode = New List(Of String)()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="nonNegativeInteger")> _
|
|
Public Property PositionsNr() As String
|
|
Get
|
|
Return Me._positionsNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._positionsNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ErledigungKz() As String
|
|
Get
|
|
Return Me._erledigungKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._erledigungKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property WarenNummerEZT() As String
|
|
Get
|
|
Return Me._warenNummerEZT
|
|
End Get
|
|
Set(value As String)
|
|
Me._warenNummerEZT = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("WarenNummerZusatzCode", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property WarenNummerZusatzCode() As List(Of String)
|
|
Get
|
|
Return Me._warenNummerZusatzCode
|
|
End Get
|
|
Set(value As List(Of String))
|
|
Me._warenNummerZusatzCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property WarenBezeichnung() As String
|
|
Get
|
|
Return Me._warenBezeichnung
|
|
End Get
|
|
Set(value As String)
|
|
Me._warenBezeichnung = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property BeschauMitteilung() As String
|
|
Get
|
|
Return Me._beschauMitteilung
|
|
End Get
|
|
Set(value As String)
|
|
Me._beschauMitteilung = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ErledigungMitteilung() As String
|
|
Get
|
|
Return Me._erledigungMitteilung
|
|
End Get
|
|
Set(value As String)
|
|
Me._erledigungMitteilung = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AblehnungAenderung() As String
|
|
Get
|
|
Return Me._ablehnungAenderung
|
|
End Get
|
|
Set(value As String)
|
|
Me._ablehnungAenderung = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property WeitererNachweis() As String
|
|
Get
|
|
Return Me._weitererNachweis
|
|
End Get
|
|
Set(value As String)
|
|
Me._weitererNachweis = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property GewaehrteBeguenstigung() As String
|
|
Get
|
|
Return Me._gewaehrteBeguenstigung
|
|
End Get
|
|
Set(value As String)
|
|
Me._gewaehrteBeguenstigung = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnordnungKz() As String
|
|
Get
|
|
Return Me._anordnungKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._anordnungKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EUStWert() As Decimal
|
|
Get
|
|
Return Me._eUStWert
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._eUStWert = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property KostenFuerEUSt() As Decimal
|
|
Get
|
|
Return Me._kostenFuerEUSt
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._kostenFuerEUSt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZollWert() As Decimal
|
|
Get
|
|
Return Me._zollWert
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._zollWert = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnnahmeAenderung() As String
|
|
Get
|
|
Return Me._annahmeAenderung
|
|
End Get
|
|
Set(value As String)
|
|
Me._annahmeAenderung = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property SicherheitsLeistungBetrag() As Decimal
|
|
Get
|
|
Return Me._sicherheitsLeistungBetrag
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._sicherheitsLeistungBetrag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property RegistrierNrvZAAZ() As String
|
|
Get
|
|
Return Me._registrierNrvZAAZ
|
|
End Get
|
|
Set(value As String)
|
|
Me._registrierNrvZAAZ = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property PositionsNrInvZAAZ() As String
|
|
Get
|
|
Return Me._positionsNrInvZAAZ
|
|
End Get
|
|
Set(value As String)
|
|
Me._positionsNrInvZAAZ = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnnahmeKz() As String
|
|
Get
|
|
Return Me._annahmeKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._annahmeKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property AnnahmeDatum() As Date
|
|
Get
|
|
Return Me._annahmeDatum
|
|
End Get
|
|
Set(value As Date)
|
|
Me._annahmeDatum = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property UeberlassungDatum() As Date
|
|
Get
|
|
Return Me._ueberlassungDatum
|
|
End Get
|
|
Set(value As Date)
|
|
Me._ueberlassungDatum = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Lagerfrist() As String
|
|
Get
|
|
Return Me._lagerfrist
|
|
End Get
|
|
Set(value As String)
|
|
Me._lagerfrist = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property WiederAusfuhrFrist() As Date
|
|
Get
|
|
Return Me._wiederAusfuhrFrist
|
|
End Get
|
|
Set(value As Date)
|
|
Me._wiederAusfuhrFrist = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property Erledigungsfrist() As Date
|
|
Get
|
|
Return Me._erledigungsfrist
|
|
End Get
|
|
Set(value As Date)
|
|
Me._erledigungsfrist = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property FristWeitererNachweis() As Date
|
|
Get
|
|
Return Me._fristWeitererNachweis
|
|
End Get
|
|
Set(value As Date)
|
|
Me._fristWeitererNachweis = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Befund() As String
|
|
Get
|
|
Return Me._befund
|
|
End Get
|
|
Set(value As String)
|
|
Me._befund = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property DV1AbweichendFestgesetztKz() As String
|
|
Get
|
|
Return Me._dV1AbweichendFestgesetztKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._dV1AbweichendFestgesetztKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property SonderfalleingabeKz() As String
|
|
Get
|
|
Return Me._sonderfalleingabeKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._sonderfalleingabeKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AngewandterKursNettopreis() As Decimal
|
|
Get
|
|
Return Me._angewandterKursNettopreis
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._angewandterKursNettopreis = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AngewandterKursMittelbZahlungen() As Decimal
|
|
Get
|
|
Return Me._angewandterKursMittelbZahlungen
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._angewandterKursMittelbZahlungen = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("AbzugHinzurechnungen", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AbzugHinzurechnungen() As List(Of KursAbzugHinzuTAXTyp)
|
|
Get
|
|
Return Me._abzugHinzurechnungen
|
|
End Get
|
|
Set(value As List(Of KursAbzugHinzuTAXTyp))
|
|
Me._abzugHinzurechnungen = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="nonNegativeInteger")> _
|
|
Public Property LuftFrachtGesamtProzentsatz() As String
|
|
Get
|
|
Return Me._luftFrachtGesamtProzentsatz
|
|
End Get
|
|
Set(value As String)
|
|
Me._luftFrachtGesamtProzentsatz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LuftFrachtGesamtAngewandterKurs() As Decimal
|
|
Get
|
|
Return Me._luftFrachtGesamtAngewandterKurs
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._luftFrachtGesamtAngewandterKurs = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("AngemeldeteUnterlage", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AngemeldeteUnterlage() As List(Of AngemeldeteUnterlageTAXTyp)
|
|
Get
|
|
Return Me._angemeldeteUnterlage
|
|
End Get
|
|
Set(value As List(Of AngemeldeteUnterlageTAXTyp))
|
|
Me._angemeldeteUnterlage = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("SonderabgabenGruppe", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property SonderabgabenGruppe() As List(Of SonderfalleingabeTAXTyp)
|
|
Get
|
|
Return Me._sonderabgabenGruppe
|
|
End Get
|
|
Set(value As List(Of SonderfalleingabeTAXTyp))
|
|
Me._sonderabgabenGruppe = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("KontNrAngewandt", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property KontNrAngewandt() As List(Of String)
|
|
Get
|
|
Return Me._kontNrAngewandt
|
|
End Get
|
|
Set(value As List(Of String))
|
|
Me._kontNrAngewandt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("KontingentAngerechnet", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property KontingentAngerechnet() As List(Of KontingentAngerechnetTAXTyp)
|
|
Get
|
|
Return Me._kontingentAngerechnet
|
|
End Get
|
|
Set(value As List(Of KontingentAngerechnetTAXTyp))
|
|
Me._kontingentAngerechnet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("AbweichendeFestsetzung", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AbweichendeFestsetzung() As List(Of AbweichendeFestsetzungTAXTyp)
|
|
Get
|
|
Return Me._abweichendeFestsetzung
|
|
End Get
|
|
Set(value As List(Of AbweichendeFestsetzungTAXTyp))
|
|
Me._abweichendeFestsetzung = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("Abgaben", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Abgaben() As List(Of AbgabengruppeTAXTyp)
|
|
Get
|
|
Return Me._abgaben
|
|
End Get
|
|
Set(value As List(Of AbgabengruppeTAXTyp))
|
|
Me._abgaben = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(PositionAbgabenbescheidEinfuhrTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current PositionAbgabenbescheidEinfuhrTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an PositionAbgabenbescheidEinfuhrTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output PositionAbgabenbescheidEinfuhrTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As PositionAbgabenbescheidEinfuhrTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, PositionAbgabenbescheidEinfuhrTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As PositionAbgabenbescheidEinfuhrTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As PositionAbgabenbescheidEinfuhrTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), PositionAbgabenbescheidEinfuhrTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As PositionAbgabenbescheidEinfuhrTyp
|
|
Return CType(Serializer.Deserialize(s), PositionAbgabenbescheidEinfuhrTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current PositionAbgabenbescheidEinfuhrTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an PositionAbgabenbescheidEinfuhrTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output PositionAbgabenbescheidEinfuhrTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As PositionAbgabenbescheidEinfuhrTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, PositionAbgabenbescheidEinfuhrTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As PositionAbgabenbescheidEinfuhrTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As PositionAbgabenbescheidEinfuhrTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class SicherheitTAXTyp
|
|
|
|
#Region "Private fields"
|
|
Private _einzelbetragUnbareSicherheit As Decimal
|
|
|
|
Private _artUnbareSicherheitsleistung As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EinzelbetragUnbareSicherheit() As Decimal
|
|
Get
|
|
Return Me._einzelbetragUnbareSicherheit
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._einzelbetragUnbareSicherheit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ArtUnbareSicherheitsleistung() As String
|
|
Get
|
|
Return Me._artUnbareSicherheitsleistung
|
|
End Get
|
|
Set(value As String)
|
|
Me._artUnbareSicherheitsleistung = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(SicherheitTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current SicherheitTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an SicherheitTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output SicherheitTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As SicherheitTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, SicherheitTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As SicherheitTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As SicherheitTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), SicherheitTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As SicherheitTAXTyp
|
|
Return CType(Serializer.Deserialize(s), SicherheitTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current SicherheitTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an SicherheitTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output SicherheitTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As SicherheitTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, SicherheitTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As SicherheitTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As SicherheitTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class AbgabenNachArtKopfTAXTyp
|
|
|
|
#Region "Private fields"
|
|
Private _abgabeArt As String
|
|
|
|
Private _abgabenbetrag As Decimal
|
|
|
|
Private _zahlungsart As String
|
|
|
|
Private _aufschubnehmerName As String
|
|
|
|
Private _aufschubnehmerTIN As String
|
|
|
|
Private _artAufschubAntrag As String
|
|
|
|
Private _kennBuchstabenAufschub As String
|
|
|
|
Private _aufschubkontoNr As String
|
|
|
|
Private _faelligkeit As Date
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AbgabeArt() As String
|
|
Get
|
|
Return Me._abgabeArt
|
|
End Get
|
|
Set(value As String)
|
|
Me._abgabeArt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Abgabenbetrag() As Decimal
|
|
Get
|
|
Return Me._abgabenbetrag
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._abgabenbetrag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Zahlungsart() As String
|
|
Get
|
|
Return Me._zahlungsart
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsart = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AufschubnehmerName() As String
|
|
Get
|
|
Return Me._aufschubnehmerName
|
|
End Get
|
|
Set(value As String)
|
|
Me._aufschubnehmerName = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AufschubnehmerTIN() As String
|
|
Get
|
|
Return Me._aufschubnehmerTIN
|
|
End Get
|
|
Set(value As String)
|
|
Me._aufschubnehmerTIN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ArtAufschubAntrag() As String
|
|
Get
|
|
Return Me._artAufschubAntrag
|
|
End Get
|
|
Set(value As String)
|
|
Me._artAufschubAntrag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property KennBuchstabenAufschub() As String
|
|
Get
|
|
Return Me._kennBuchstabenAufschub
|
|
End Get
|
|
Set(value As String)
|
|
Me._kennBuchstabenAufschub = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AufschubkontoNr() As String
|
|
Get
|
|
Return Me._aufschubkontoNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._aufschubkontoNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property Faelligkeit() As Date
|
|
Get
|
|
Return Me._faelligkeit
|
|
End Get
|
|
Set(value As Date)
|
|
Me._faelligkeit = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(AbgabenNachArtKopfTAXTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current AbgabenNachArtKopfTAXTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an AbgabenNachArtKopfTAXTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output AbgabenNachArtKopfTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As AbgabenNachArtKopfTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, AbgabenNachArtKopfTAXTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As AbgabenNachArtKopfTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As AbgabenNachArtKopfTAXTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), AbgabenNachArtKopfTAXTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As AbgabenNachArtKopfTAXTyp
|
|
Return CType(Serializer.Deserialize(s), AbgabenNachArtKopfTAXTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current AbgabenNachArtKopfTAXTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an AbgabenNachArtKopfTAXTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output AbgabenNachArtKopfTAXTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As AbgabenNachArtKopfTAXTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, AbgabenNachArtKopfTAXTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As AbgabenNachArtKopfTAXTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As AbgabenNachArtKopfTAXTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class KopfDatenEinfuhrbescheidTyp
|
|
|
|
#Region "Private fields"
|
|
Private _artAnmeldung As String
|
|
|
|
Private _erledigungKopfKz As String
|
|
|
|
Private _waehrung As String
|
|
|
|
Private _gesamtabgabenBetrag As Decimal
|
|
|
|
Private _abgabenbetragZuZahlen As Decimal
|
|
|
|
Private _abgabenbetragZuErstatten As Decimal
|
|
|
|
Private _vertretungsverhaeltnis As String
|
|
|
|
Private _zahlungsaufforderungArtAufschub As String
|
|
|
|
Private _zahlungsaufforderungArtAbgaben As String
|
|
|
|
Private _zahlungsaufforderungArtSicherheit As String
|
|
|
|
Private _kleinbetragKz As String
|
|
|
|
Private _kleinbetragRechtsbehelf As String
|
|
|
|
Private _gesamtschuldnerschaftKz As String
|
|
|
|
Private _eingangszollstelleGeaendertKz As String
|
|
|
|
Private _benutzererstelltKz As String
|
|
|
|
Private _eUStKz As String
|
|
|
|
Private _ustID As String
|
|
|
|
Private _registriernummer As String
|
|
|
|
Private _registrierdatum As Date
|
|
|
|
Private _nizzaRegistrierKz As String
|
|
|
|
Private _nizzaRegistrierKzSicherheit As String
|
|
|
|
Private _abgabenNachArt As List(Of AbgabenNachArtKopfTAXTyp)
|
|
|
|
Private _gesamtsicherheitssumme As Decimal
|
|
|
|
Private _errechneteSicherheitsSumme As Decimal
|
|
|
|
Private _unbarSicherheitsbetraege As Decimal
|
|
|
|
Private _barSicherheitsbetraege As Decimal
|
|
|
|
Private _freizugebenSicherheit As Decimal
|
|
|
|
Private _auszuzahlenSicherheit As Decimal
|
|
|
|
Private _einbehaltenSicherheit As Decimal
|
|
|
|
Private _sicherheitsleistungForm As String
|
|
|
|
Private _sicherheitsleistungsVerzicht As String
|
|
|
|
Private _auszahlungsArt As String
|
|
|
|
Private _unbareSicherheiten As List(Of SicherheitTAXTyp)
|
|
|
|
Private _bescheidendeDienststelleNr As String
|
|
|
|
Private _bescheidendeDienststelleName As String
|
|
|
|
Private _bescheidendeDienststelleStrasseHausNr As String
|
|
|
|
Private _bescheidendeDienststelleOrtS As String
|
|
|
|
Private _bescheidendeDienststellePLZS As String
|
|
|
|
Private _bearbeiter As String
|
|
|
|
Private _bescheidendeDienststelleTelefonNr As String
|
|
|
|
Private _rechtsbehelfHauptzollamt As String
|
|
|
|
Private _rechtsbehelfHZAEmailAdresse As String
|
|
|
|
Private _rechtsbehelfHauptzollamtStrHausNr As String
|
|
|
|
Private _rechtsbehelfHauptzollamtPLZS As String
|
|
|
|
Private _rechtsbehelfHauptzollamtOrtS As String
|
|
|
|
Private _rechtsbehelfHauptzollamtOrtsteil As String
|
|
|
|
Private _rechtsbehelfHauptzollamtPostfach As String
|
|
|
|
Private _rechtsbehelfHauptzollamtPLZP As String
|
|
|
|
Private _rechtsbehelfHauptzollamtOrtP As String
|
|
|
|
Private _zollzahlstelle As String
|
|
|
|
Private _zollzahlstelleKreditinstitut As String
|
|
|
|
Private _zollzahlstelleStrasseHausNr As String
|
|
|
|
Private _zollzahlstellePLZS As String
|
|
|
|
Private _zollzahlstelleOrtS As String
|
|
|
|
Private _zollzahlstellePostfach As String
|
|
|
|
Private _zollzahlstellePLZP As String
|
|
|
|
Private _zollzahlstelleOrtP As String
|
|
|
|
Private _zollzahlstelleIBAN As String
|
|
|
|
Private _zollzahlstelleBIC As String
|
|
|
|
Private _anmelderEORI As String
|
|
|
|
Private _anmelderNLNR As String
|
|
|
|
Private _vorsteuerabzugKz As String
|
|
|
|
Private _anmelderName As String
|
|
|
|
Private _anmelderNationalitaet As String
|
|
|
|
Private _anmelderStrasseHausNr As String
|
|
|
|
Private _anmelderPLZS As String
|
|
|
|
Private _anmelderOrtS As String
|
|
|
|
Private _anmelderOrtsteil As String
|
|
|
|
Private _vertreterEORI As String
|
|
|
|
Private _vertreterNLNR As String
|
|
|
|
Private _vertreterName As String
|
|
|
|
Private _vertreterNationalitaet As String
|
|
|
|
Private _vertreterStrasseHausNr As String
|
|
|
|
Private _vertreterPLZS As String
|
|
|
|
Private _vertreterOrtS As String
|
|
|
|
Private _vertreterOrtsteil As String
|
|
|
|
Private _fRechnungEORI As String
|
|
|
|
Private _fRechnungNLNR As String
|
|
|
|
Private _fRechnungNationalitaet As String
|
|
|
|
Private _fRechnungName As String
|
|
|
|
Private _fRechnungStrasseHausNr As String
|
|
|
|
Private _fRechnungPLZS As String
|
|
|
|
Private _fRechnungOrtS As String
|
|
|
|
Private _fRechnungOrtsteil As String
|
|
|
|
Private _lagerhalterEORI As String
|
|
|
|
Private _lagerhalterNLNR As String
|
|
|
|
Private _lagerhalterName As String
|
|
|
|
Private _lagerhalterStrasseHausNr As String
|
|
|
|
Private _lagerhalterNationalitaet As String
|
|
|
|
Private _lagerhalterPLZ As String
|
|
|
|
Private _lagerhalterOrt As String
|
|
|
|
Private _lagerhalterOrtsteil As String
|
|
|
|
Private _empfaengerEORI As String
|
|
|
|
Private _empfaengerNLNR As String
|
|
|
|
Private _empfaengerNationalitaet As String
|
|
|
|
Private _empfaengerName As String
|
|
|
|
Private _empfaengerStrasseHausNr As String
|
|
|
|
Private _empfaengerPLZS As String
|
|
|
|
Private _empfaengerOrtS As String
|
|
|
|
Private _empfaengerOrtsteil As String
|
|
|
|
Private _zahlungsEmpfaengerEORI As String
|
|
|
|
Private _zahlungsEmpfaengerNLNR As String
|
|
|
|
Private _zahlungsEmpfaengerKreditinstitut As String
|
|
|
|
Private _zahlungsEmpfaengerName As String
|
|
|
|
Private _zahlungsEmpfaengerNationalitaet As String
|
|
|
|
Private _zahlungsEmpfaengerStrasseHausNr As String
|
|
|
|
Private _zahlungsEmpfaengerPLZS As String
|
|
|
|
Private _zahlungsEmpfaengerOrtS As String
|
|
|
|
Private _zahlungsEmpfaengerOrtsteil As String
|
|
|
|
Private _zahlungsEmpfaengerIBAN As String
|
|
|
|
Private _zahlungsEmpfaengerBIC As String
|
|
|
|
Private _erstellungsDatumBefund As Date
|
|
|
|
Private _erfassungsdatum As Date
|
|
|
|
Private _barzahlungFaelligkeit As Date
|
|
|
|
Private _sicherheitsleistungFaelligkeit As String
|
|
|
|
Private _abrechnungszeitraumBeginn As Date
|
|
|
|
Private _abrechnungszeitraumEnde As Date
|
|
|
|
Private _zollbefund As String
|
|
|
|
Private _lieferbedingungCode As String
|
|
|
|
Private _lieferbedingungText As String
|
|
|
|
Private _lieferbedingungOrt As String
|
|
|
|
Private _lieferbedingungSchluessel As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New()
|
|
Me._unbareSicherheiten = New List(Of SicherheitTAXTyp)()
|
|
Me._abgabenNachArt = New List(Of AbgabenNachArtKopfTAXTyp)()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ArtAnmeldung() As String
|
|
Get
|
|
Return Me._artAnmeldung
|
|
End Get
|
|
Set(value As String)
|
|
Me._artAnmeldung = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ErledigungKopfKz() As String
|
|
Get
|
|
Return Me._erledigungKopfKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._erledigungKopfKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Waehrung() As String
|
|
Get
|
|
Return Me._waehrung
|
|
End Get
|
|
Set(value As String)
|
|
Me._waehrung = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property GesamtabgabenBetrag() As Decimal
|
|
Get
|
|
Return Me._gesamtabgabenBetrag
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._gesamtabgabenBetrag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AbgabenbetragZuZahlen() As Decimal
|
|
Get
|
|
Return Me._abgabenbetragZuZahlen
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._abgabenbetragZuZahlen = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AbgabenbetragZuErstatten() As Decimal
|
|
Get
|
|
Return Me._abgabenbetragZuErstatten
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._abgabenbetragZuErstatten = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Vertretungsverhaeltnis() As String
|
|
Get
|
|
Return Me._vertretungsverhaeltnis
|
|
End Get
|
|
Set(value As String)
|
|
Me._vertretungsverhaeltnis = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsaufforderungArtAufschub() As String
|
|
Get
|
|
Return Me._zahlungsaufforderungArtAufschub
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsaufforderungArtAufschub = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsaufforderungArtAbgaben() As String
|
|
Get
|
|
Return Me._zahlungsaufforderungArtAbgaben
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsaufforderungArtAbgaben = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsaufforderungArtSicherheit() As String
|
|
Get
|
|
Return Me._zahlungsaufforderungArtSicherheit
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsaufforderungArtSicherheit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property KleinbetragKz() As String
|
|
Get
|
|
Return Me._kleinbetragKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._kleinbetragKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property KleinbetragRechtsbehelf() As String
|
|
Get
|
|
Return Me._kleinbetragRechtsbehelf
|
|
End Get
|
|
Set(value As String)
|
|
Me._kleinbetragRechtsbehelf = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property GesamtschuldnerschaftKz() As String
|
|
Get
|
|
Return Me._gesamtschuldnerschaftKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._gesamtschuldnerschaftKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EingangszollstelleGeaendertKz() As String
|
|
Get
|
|
Return Me._eingangszollstelleGeaendertKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._eingangszollstelleGeaendertKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property BenutzererstelltKz() As String
|
|
Get
|
|
Return Me._benutzererstelltKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._benutzererstelltKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EUStKz() As String
|
|
Get
|
|
Return Me._eUStKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._eUStKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property UstID() As String
|
|
Get
|
|
Return Me._ustID
|
|
End Get
|
|
Set(value As String)
|
|
Me._ustID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Registriernummer() As String
|
|
Get
|
|
Return Me._registriernummer
|
|
End Get
|
|
Set(value As String)
|
|
Me._registriernummer = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property Registrierdatum() As Date
|
|
Get
|
|
Return Me._registrierdatum
|
|
End Get
|
|
Set(value As Date)
|
|
Me._registrierdatum = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property NizzaRegistrierKz() As String
|
|
Get
|
|
Return Me._nizzaRegistrierKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._nizzaRegistrierKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property NizzaRegistrierKzSicherheit() As String
|
|
Get
|
|
Return Me._nizzaRegistrierKzSicherheit
|
|
End Get
|
|
Set(value As String)
|
|
Me._nizzaRegistrierKzSicherheit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("AbgabenNachArt", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AbgabenNachArt() As List(Of AbgabenNachArtKopfTAXTyp)
|
|
Get
|
|
Return Me._abgabenNachArt
|
|
End Get
|
|
Set(value As List(Of AbgabenNachArtKopfTAXTyp))
|
|
Me._abgabenNachArt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Gesamtsicherheitssumme() As Decimal
|
|
Get
|
|
Return Me._gesamtsicherheitssumme
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._gesamtsicherheitssumme = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ErrechneteSicherheitsSumme() As Decimal
|
|
Get
|
|
Return Me._errechneteSicherheitsSumme
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._errechneteSicherheitsSumme = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property UnbarSicherheitsbetraege() As Decimal
|
|
Get
|
|
Return Me._unbarSicherheitsbetraege
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._unbarSicherheitsbetraege = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property BarSicherheitsbetraege() As Decimal
|
|
Get
|
|
Return Me._barSicherheitsbetraege
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._barSicherheitsbetraege = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property FreizugebenSicherheit() As Decimal
|
|
Get
|
|
Return Me._freizugebenSicherheit
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._freizugebenSicherheit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AuszuzahlenSicherheit() As Decimal
|
|
Get
|
|
Return Me._auszuzahlenSicherheit
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._auszuzahlenSicherheit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EinbehaltenSicherheit() As Decimal
|
|
Get
|
|
Return Me._einbehaltenSicherheit
|
|
End Get
|
|
Set(value As Decimal)
|
|
Me._einbehaltenSicherheit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property SicherheitsleistungForm() As String
|
|
Get
|
|
Return Me._sicherheitsleistungForm
|
|
End Get
|
|
Set(value As String)
|
|
Me._sicherheitsleistungForm = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property SicherheitsleistungsVerzicht() As String
|
|
Get
|
|
Return Me._sicherheitsleistungsVerzicht
|
|
End Get
|
|
Set(value As String)
|
|
Me._sicherheitsleistungsVerzicht = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AuszahlungsArt() As String
|
|
Get
|
|
Return Me._auszahlungsArt
|
|
End Get
|
|
Set(value As String)
|
|
Me._auszahlungsArt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("UnbareSicherheiten", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property UnbareSicherheiten() As List(Of SicherheitTAXTyp)
|
|
Get
|
|
Return Me._unbareSicherheiten
|
|
End Get
|
|
Set(value As List(Of SicherheitTAXTyp))
|
|
Me._unbareSicherheiten = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property BescheidendeDienststelleNr() As String
|
|
Get
|
|
Return Me._bescheidendeDienststelleNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._bescheidendeDienststelleNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property BescheidendeDienststelleName() As String
|
|
Get
|
|
Return Me._bescheidendeDienststelleName
|
|
End Get
|
|
Set(value As String)
|
|
Me._bescheidendeDienststelleName = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property BescheidendeDienststelleStrasseHausNr() As String
|
|
Get
|
|
Return Me._bescheidendeDienststelleStrasseHausNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._bescheidendeDienststelleStrasseHausNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property BescheidendeDienststelleOrtS() As String
|
|
Get
|
|
Return Me._bescheidendeDienststelleOrtS
|
|
End Get
|
|
Set(value As String)
|
|
Me._bescheidendeDienststelleOrtS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property BescheidendeDienststellePLZS() As String
|
|
Get
|
|
Return Me._bescheidendeDienststellePLZS
|
|
End Get
|
|
Set(value As String)
|
|
Me._bescheidendeDienststellePLZS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Bearbeiter() As String
|
|
Get
|
|
Return Me._bearbeiter
|
|
End Get
|
|
Set(value As String)
|
|
Me._bearbeiter = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property BescheidendeDienststelleTelefonNr() As String
|
|
Get
|
|
Return Me._bescheidendeDienststelleTelefonNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._bescheidendeDienststelleTelefonNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property RechtsbehelfHauptzollamt() As String
|
|
Get
|
|
Return Me._rechtsbehelfHauptzollamt
|
|
End Get
|
|
Set(value As String)
|
|
Me._rechtsbehelfHauptzollamt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property RechtsbehelfHZAEmailAdresse() As String
|
|
Get
|
|
Return Me._rechtsbehelfHZAEmailAdresse
|
|
End Get
|
|
Set(value As String)
|
|
Me._rechtsbehelfHZAEmailAdresse = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property RechtsbehelfHauptzollamtStrHausNr() As String
|
|
Get
|
|
Return Me._rechtsbehelfHauptzollamtStrHausNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._rechtsbehelfHauptzollamtStrHausNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property RechtsbehelfHauptzollamtPLZS() As String
|
|
Get
|
|
Return Me._rechtsbehelfHauptzollamtPLZS
|
|
End Get
|
|
Set(value As String)
|
|
Me._rechtsbehelfHauptzollamtPLZS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property RechtsbehelfHauptzollamtOrtS() As String
|
|
Get
|
|
Return Me._rechtsbehelfHauptzollamtOrtS
|
|
End Get
|
|
Set(value As String)
|
|
Me._rechtsbehelfHauptzollamtOrtS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property RechtsbehelfHauptzollamtOrtsteil() As String
|
|
Get
|
|
Return Me._rechtsbehelfHauptzollamtOrtsteil
|
|
End Get
|
|
Set(value As String)
|
|
Me._rechtsbehelfHauptzollamtOrtsteil = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property RechtsbehelfHauptzollamtPostfach() As String
|
|
Get
|
|
Return Me._rechtsbehelfHauptzollamtPostfach
|
|
End Get
|
|
Set(value As String)
|
|
Me._rechtsbehelfHauptzollamtPostfach = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property RechtsbehelfHauptzollamtPLZP() As String
|
|
Get
|
|
Return Me._rechtsbehelfHauptzollamtPLZP
|
|
End Get
|
|
Set(value As String)
|
|
Me._rechtsbehelfHauptzollamtPLZP = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property RechtsbehelfHauptzollamtOrtP() As String
|
|
Get
|
|
Return Me._rechtsbehelfHauptzollamtOrtP
|
|
End Get
|
|
Set(value As String)
|
|
Me._rechtsbehelfHauptzollamtOrtP = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Zollzahlstelle() As String
|
|
Get
|
|
Return Me._zollzahlstelle
|
|
End Get
|
|
Set(value As String)
|
|
Me._zollzahlstelle = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZollzahlstelleKreditinstitut() As String
|
|
Get
|
|
Return Me._zollzahlstelleKreditinstitut
|
|
End Get
|
|
Set(value As String)
|
|
Me._zollzahlstelleKreditinstitut = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZollzahlstelleStrasseHausNr() As String
|
|
Get
|
|
Return Me._zollzahlstelleStrasseHausNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._zollzahlstelleStrasseHausNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZollzahlstellePLZS() As String
|
|
Get
|
|
Return Me._zollzahlstellePLZS
|
|
End Get
|
|
Set(value As String)
|
|
Me._zollzahlstellePLZS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZollzahlstelleOrtS() As String
|
|
Get
|
|
Return Me._zollzahlstelleOrtS
|
|
End Get
|
|
Set(value As String)
|
|
Me._zollzahlstelleOrtS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZollzahlstellePostfach() As String
|
|
Get
|
|
Return Me._zollzahlstellePostfach
|
|
End Get
|
|
Set(value As String)
|
|
Me._zollzahlstellePostfach = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZollzahlstellePLZP() As String
|
|
Get
|
|
Return Me._zollzahlstellePLZP
|
|
End Get
|
|
Set(value As String)
|
|
Me._zollzahlstellePLZP = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZollzahlstelleOrtP() As String
|
|
Get
|
|
Return Me._zollzahlstelleOrtP
|
|
End Get
|
|
Set(value As String)
|
|
Me._zollzahlstelleOrtP = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZollzahlstelleIBAN() As String
|
|
Get
|
|
Return Me._zollzahlstelleIBAN
|
|
End Get
|
|
Set(value As String)
|
|
Me._zollzahlstelleIBAN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZollzahlstelleBIC() As String
|
|
Get
|
|
Return Me._zollzahlstelleBIC
|
|
End Get
|
|
Set(value As String)
|
|
Me._zollzahlstelleBIC = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnmelderEORI() As String
|
|
Get
|
|
Return Me._anmelderEORI
|
|
End Get
|
|
Set(value As String)
|
|
Me._anmelderEORI = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnmelderNLNR() As String
|
|
Get
|
|
Return Me._anmelderNLNR
|
|
End Get
|
|
Set(value As String)
|
|
Me._anmelderNLNR = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VorsteuerabzugKz() As String
|
|
Get
|
|
Return Me._vorsteuerabzugKz
|
|
End Get
|
|
Set(value As String)
|
|
Me._vorsteuerabzugKz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnmelderName() As String
|
|
Get
|
|
Return Me._anmelderName
|
|
End Get
|
|
Set(value As String)
|
|
Me._anmelderName = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnmelderNationalitaet() As String
|
|
Get
|
|
Return Me._anmelderNationalitaet
|
|
End Get
|
|
Set(value As String)
|
|
Me._anmelderNationalitaet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnmelderStrasseHausNr() As String
|
|
Get
|
|
Return Me._anmelderStrasseHausNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._anmelderStrasseHausNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnmelderPLZS() As String
|
|
Get
|
|
Return Me._anmelderPLZS
|
|
End Get
|
|
Set(value As String)
|
|
Me._anmelderPLZS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnmelderOrtS() As String
|
|
Get
|
|
Return Me._anmelderOrtS
|
|
End Get
|
|
Set(value As String)
|
|
Me._anmelderOrtS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property AnmelderOrtsteil() As String
|
|
Get
|
|
Return Me._anmelderOrtsteil
|
|
End Get
|
|
Set(value As String)
|
|
Me._anmelderOrtsteil = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VertreterEORI() As String
|
|
Get
|
|
Return Me._vertreterEORI
|
|
End Get
|
|
Set(value As String)
|
|
Me._vertreterEORI = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VertreterNLNR() As String
|
|
Get
|
|
Return Me._vertreterNLNR
|
|
End Get
|
|
Set(value As String)
|
|
Me._vertreterNLNR = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VertreterName() As String
|
|
Get
|
|
Return Me._vertreterName
|
|
End Get
|
|
Set(value As String)
|
|
Me._vertreterName = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VertreterNationalitaet() As String
|
|
Get
|
|
Return Me._vertreterNationalitaet
|
|
End Get
|
|
Set(value As String)
|
|
Me._vertreterNationalitaet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VertreterStrasseHausNr() As String
|
|
Get
|
|
Return Me._vertreterStrasseHausNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._vertreterStrasseHausNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VertreterPLZS() As String
|
|
Get
|
|
Return Me._vertreterPLZS
|
|
End Get
|
|
Set(value As String)
|
|
Me._vertreterPLZS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VertreterOrtS() As String
|
|
Get
|
|
Return Me._vertreterOrtS
|
|
End Get
|
|
Set(value As String)
|
|
Me._vertreterOrtS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property VertreterOrtsteil() As String
|
|
Get
|
|
Return Me._vertreterOrtsteil
|
|
End Get
|
|
Set(value As String)
|
|
Me._vertreterOrtsteil = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property FRechnungEORI() As String
|
|
Get
|
|
Return Me._fRechnungEORI
|
|
End Get
|
|
Set(value As String)
|
|
Me._fRechnungEORI = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property FRechnungNLNR() As String
|
|
Get
|
|
Return Me._fRechnungNLNR
|
|
End Get
|
|
Set(value As String)
|
|
Me._fRechnungNLNR = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property FRechnungNationalitaet() As String
|
|
Get
|
|
Return Me._fRechnungNationalitaet
|
|
End Get
|
|
Set(value As String)
|
|
Me._fRechnungNationalitaet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property FRechnungName() As String
|
|
Get
|
|
Return Me._fRechnungName
|
|
End Get
|
|
Set(value As String)
|
|
Me._fRechnungName = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property FRechnungStrasseHausNr() As String
|
|
Get
|
|
Return Me._fRechnungStrasseHausNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._fRechnungStrasseHausNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property FRechnungPLZS() As String
|
|
Get
|
|
Return Me._fRechnungPLZS
|
|
End Get
|
|
Set(value As String)
|
|
Me._fRechnungPLZS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property FRechnungOrtS() As String
|
|
Get
|
|
Return Me._fRechnungOrtS
|
|
End Get
|
|
Set(value As String)
|
|
Me._fRechnungOrtS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property FRechnungOrtsteil() As String
|
|
Get
|
|
Return Me._fRechnungOrtsteil
|
|
End Get
|
|
Set(value As String)
|
|
Me._fRechnungOrtsteil = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LagerhalterEORI() As String
|
|
Get
|
|
Return Me._lagerhalterEORI
|
|
End Get
|
|
Set(value As String)
|
|
Me._lagerhalterEORI = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LagerhalterNLNR() As String
|
|
Get
|
|
Return Me._lagerhalterNLNR
|
|
End Get
|
|
Set(value As String)
|
|
Me._lagerhalterNLNR = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LagerhalterName() As String
|
|
Get
|
|
Return Me._lagerhalterName
|
|
End Get
|
|
Set(value As String)
|
|
Me._lagerhalterName = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LagerhalterStrasseHausNr() As String
|
|
Get
|
|
Return Me._lagerhalterStrasseHausNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._lagerhalterStrasseHausNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LagerhalterNationalitaet() As String
|
|
Get
|
|
Return Me._lagerhalterNationalitaet
|
|
End Get
|
|
Set(value As String)
|
|
Me._lagerhalterNationalitaet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LagerhalterPLZ() As String
|
|
Get
|
|
Return Me._lagerhalterPLZ
|
|
End Get
|
|
Set(value As String)
|
|
Me._lagerhalterPLZ = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LagerhalterOrt() As String
|
|
Get
|
|
Return Me._lagerhalterOrt
|
|
End Get
|
|
Set(value As String)
|
|
Me._lagerhalterOrt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LagerhalterOrtsteil() As String
|
|
Get
|
|
Return Me._lagerhalterOrtsteil
|
|
End Get
|
|
Set(value As String)
|
|
Me._lagerhalterOrtsteil = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EmpfaengerEORI() As String
|
|
Get
|
|
Return Me._empfaengerEORI
|
|
End Get
|
|
Set(value As String)
|
|
Me._empfaengerEORI = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EmpfaengerNLNR() As String
|
|
Get
|
|
Return Me._empfaengerNLNR
|
|
End Get
|
|
Set(value As String)
|
|
Me._empfaengerNLNR = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EmpfaengerNationalitaet() As String
|
|
Get
|
|
Return Me._empfaengerNationalitaet
|
|
End Get
|
|
Set(value As String)
|
|
Me._empfaengerNationalitaet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EmpfaengerName() As String
|
|
Get
|
|
Return Me._empfaengerName
|
|
End Get
|
|
Set(value As String)
|
|
Me._empfaengerName = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EmpfaengerStrasseHausNr() As String
|
|
Get
|
|
Return Me._empfaengerStrasseHausNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._empfaengerStrasseHausNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EmpfaengerPLZS() As String
|
|
Get
|
|
Return Me._empfaengerPLZS
|
|
End Get
|
|
Set(value As String)
|
|
Me._empfaengerPLZS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EmpfaengerOrtS() As String
|
|
Get
|
|
Return Me._empfaengerOrtS
|
|
End Get
|
|
Set(value As String)
|
|
Me._empfaengerOrtS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property EmpfaengerOrtsteil() As String
|
|
Get
|
|
Return Me._empfaengerOrtsteil
|
|
End Get
|
|
Set(value As String)
|
|
Me._empfaengerOrtsteil = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsEmpfaengerEORI() As String
|
|
Get
|
|
Return Me._zahlungsEmpfaengerEORI
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsEmpfaengerEORI = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsEmpfaengerNLNR() As String
|
|
Get
|
|
Return Me._zahlungsEmpfaengerNLNR
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsEmpfaengerNLNR = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsEmpfaengerKreditinstitut() As String
|
|
Get
|
|
Return Me._zahlungsEmpfaengerKreditinstitut
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsEmpfaengerKreditinstitut = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsEmpfaengerName() As String
|
|
Get
|
|
Return Me._zahlungsEmpfaengerName
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsEmpfaengerName = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsEmpfaengerNationalitaet() As String
|
|
Get
|
|
Return Me._zahlungsEmpfaengerNationalitaet
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsEmpfaengerNationalitaet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsEmpfaengerStrasseHausNr() As String
|
|
Get
|
|
Return Me._zahlungsEmpfaengerStrasseHausNr
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsEmpfaengerStrasseHausNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsEmpfaengerPLZS() As String
|
|
Get
|
|
Return Me._zahlungsEmpfaengerPLZS
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsEmpfaengerPLZS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsEmpfaengerOrtS() As String
|
|
Get
|
|
Return Me._zahlungsEmpfaengerOrtS
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsEmpfaengerOrtS = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsEmpfaengerOrtsteil() As String
|
|
Get
|
|
Return Me._zahlungsEmpfaengerOrtsteil
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsEmpfaengerOrtsteil = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsEmpfaengerIBAN() As String
|
|
Get
|
|
Return Me._zahlungsEmpfaengerIBAN
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsEmpfaengerIBAN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property ZahlungsEmpfaengerBIC() As String
|
|
Get
|
|
Return Me._zahlungsEmpfaengerBIC
|
|
End Get
|
|
Set(value As String)
|
|
Me._zahlungsEmpfaengerBIC = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property ErstellungsDatumBefund() As Date
|
|
Get
|
|
Return Me._erstellungsDatumBefund
|
|
End Get
|
|
Set(value As Date)
|
|
Me._erstellungsDatumBefund = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property Erfassungsdatum() As Date
|
|
Get
|
|
Return Me._erfassungsdatum
|
|
End Get
|
|
Set(value As Date)
|
|
Me._erfassungsdatum = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property BarzahlungFaelligkeit() As Date
|
|
Get
|
|
Return Me._barzahlungFaelligkeit
|
|
End Get
|
|
Set(value As Date)
|
|
Me._barzahlungFaelligkeit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property SicherheitsleistungFaelligkeit() As String
|
|
Get
|
|
Return Me._sicherheitsleistungFaelligkeit
|
|
End Get
|
|
Set(value As String)
|
|
Me._sicherheitsleistungFaelligkeit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property AbrechnungszeitraumBeginn() As Date
|
|
Get
|
|
Return Me._abrechnungszeitraumBeginn
|
|
End Get
|
|
Set(value As Date)
|
|
Me._abrechnungszeitraumBeginn = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")> _
|
|
Public Property AbrechnungszeitraumEnde() As Date
|
|
Get
|
|
Return Me._abrechnungszeitraumEnde
|
|
End Get
|
|
Set(value As Date)
|
|
Me._abrechnungszeitraumEnde = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Zollbefund() As String
|
|
Get
|
|
Return Me._zollbefund
|
|
End Get
|
|
Set(value As String)
|
|
Me._zollbefund = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LieferbedingungCode() As String
|
|
Get
|
|
Return Me._lieferbedingungCode
|
|
End Get
|
|
Set(value As String)
|
|
Me._lieferbedingungCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LieferbedingungText() As String
|
|
Get
|
|
Return Me._lieferbedingungText
|
|
End Get
|
|
Set(value As String)
|
|
Me._lieferbedingungText = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LieferbedingungOrt() As String
|
|
Get
|
|
Return Me._lieferbedingungOrt
|
|
End Get
|
|
Set(value As String)
|
|
Me._lieferbedingungOrt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property LieferbedingungSchluessel() As String
|
|
Get
|
|
Return Me._lieferbedingungSchluessel
|
|
End Get
|
|
Set(value As String)
|
|
Me._lieferbedingungSchluessel = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(KopfDatenEinfuhrbescheidTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current KopfDatenEinfuhrbescheidTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an KopfDatenEinfuhrbescheidTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output KopfDatenEinfuhrbescheidTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As KopfDatenEinfuhrbescheidTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, KopfDatenEinfuhrbescheidTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As KopfDatenEinfuhrbescheidTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As KopfDatenEinfuhrbescheidTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), KopfDatenEinfuhrbescheidTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As KopfDatenEinfuhrbescheidTyp
|
|
Return CType(Serializer.Deserialize(s), KopfDatenEinfuhrbescheidTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current KopfDatenEinfuhrbescheidTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an KopfDatenEinfuhrbescheidTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output KopfDatenEinfuhrbescheidTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As KopfDatenEinfuhrbescheidTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, KopfDatenEinfuhrbescheidTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As KopfDatenEinfuhrbescheidTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As KopfDatenEinfuhrbescheidTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class TransaktionFreierVerkehrTyp
|
|
|
|
#Region "Private fields"
|
|
Private _iOPartner As String
|
|
|
|
Private _iODivision1 As String
|
|
|
|
Private _iODivision2 As String
|
|
|
|
Private _iODivision3 As String
|
|
|
|
Private _iOReferenz As String
|
|
|
|
Private _iODatumZeit As Date
|
|
|
|
Private _version As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property IOPartner() As String
|
|
Get
|
|
Return Me._iOPartner
|
|
End Get
|
|
Set(value As String)
|
|
Me._iOPartner = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property IODivision1() As String
|
|
Get
|
|
Return Me._iODivision1
|
|
End Get
|
|
Set(value As String)
|
|
Me._iODivision1 = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property IODivision2() As String
|
|
Get
|
|
Return Me._iODivision2
|
|
End Get
|
|
Set(value As String)
|
|
Me._iODivision2 = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property IODivision3() As String
|
|
Get
|
|
Return Me._iODivision3
|
|
End Get
|
|
Set(value As String)
|
|
Me._iODivision3 = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property IOReferenz() As String
|
|
Get
|
|
Return Me._iOReferenz
|
|
End Get
|
|
Set(value As String)
|
|
Me._iOReferenz = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property IODatumZeit() As Date
|
|
Get
|
|
Return Me._iODatumZeit
|
|
End Get
|
|
Set(value As Date)
|
|
Me._iODatumZeit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="nonNegativeInteger")> _
|
|
Public Property Version() As String
|
|
Get
|
|
Return Me._version
|
|
End Get
|
|
Set(value As String)
|
|
Me._version = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(TransaktionFreierVerkehrTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current TransaktionFreierVerkehrTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an TransaktionFreierVerkehrTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output TransaktionFreierVerkehrTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As TransaktionFreierVerkehrTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, TransaktionFreierVerkehrTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As TransaktionFreierVerkehrTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As TransaktionFreierVerkehrTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), TransaktionFreierVerkehrTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As TransaktionFreierVerkehrTyp
|
|
Return CType(Serializer.Deserialize(s), TransaktionFreierVerkehrTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current TransaktionFreierVerkehrTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an TransaktionFreierVerkehrTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output TransaktionFreierVerkehrTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As TransaktionFreierVerkehrTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, TransaktionFreierVerkehrTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As TransaktionFreierVerkehrTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As TransaktionFreierVerkehrTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.Xml.Serialization.XmlIncludeAttribute(GetType(AbgabenbescheidEinfuhrTAXTyp)), _
|
|
System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.2612.0"), _
|
|
System.SerializableAttribute(), _
|
|
System.Diagnostics.DebuggerStepThroughAttribute(), _
|
|
System.ComponentModel.DesignerCategoryAttribute("code")> _
|
|
Partial Public Class DatenaustauschFreierVerkehrTyp
|
|
|
|
#Region "Private fields"
|
|
Private _transaktion As TransaktionFreierVerkehrTyp
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New()
|
|
Me._transaktion = New TransaktionFreierVerkehrTyp()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
|
|
Public Property Transaktion() As TransaktionFreierVerkehrTyp
|
|
Get
|
|
Return Me._transaktion
|
|
End Get
|
|
Set(value As TransaktionFreierVerkehrTyp)
|
|
Me._transaktion = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(DatenaustauschFreierVerkehrTyp))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current DatenaustauschFreierVerkehrTyp object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = xmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an DatenaustauschFreierVerkehrTyp object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output DatenaustauschFreierVerkehrTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As DatenaustauschFreierVerkehrTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, DatenaustauschFreierVerkehrTyp)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As DatenaustauschFreierVerkehrTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As DatenaustauschFreierVerkehrTyp
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), DatenaustauschFreierVerkehrTyp)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As DatenaustauschFreierVerkehrTyp
|
|
Return CType(Serializer.Deserialize(s), DatenaustauschFreierVerkehrTyp)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current DatenaustauschFreierVerkehrTyp object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an DatenaustauschFreierVerkehrTyp object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output DatenaustauschFreierVerkehrTyp object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As DatenaustauschFreierVerkehrTyp, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, DatenaustauschFreierVerkehrTyp)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As DatenaustauschFreierVerkehrTyp) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As DatenaustauschFreierVerkehrTyp
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
End Namespace
|