Files
ADMIN/DAKOSY_Worker/DAKOSY/ATLAS/EZA/BefundVereinfachteZollanmeldung/BefundVereinfachteZollanmeldung_007.Designer.vb
2020-06-04 22:20:10 +02:00

5950 lines
229 KiB
VB.net

'' ------------------------------------------------------------------------------
'' <auto-generated>
'' Generated by Xsd2Code++. Version 5.0.0.47. www.xsd2code.com
'' <NameSpace>BefundVereinfachteZollanmeldung_007</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 BefundVereinfachteZollanmeldung_007
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code"),
System.Xml.Serialization.XmlRootAttribute("BefundVereinfachteZollanmeldung", [Namespace]:="", IsNullable:=False)>
Partial Public Class BefundVereinfachteZollanmeldungVBTyp
Inherits DatenaustauschFreierVerkehrTyp
#Region "Private fields"
Private _einzelBefundVereinfachteZollanmeldung As EinzelBefundVereinfachteZollanmeldungTyp
Private Shared sSerializer As XmlSerializer
#End Region
Public Sub New()
MyBase.New
Me._einzelBefundVereinfachteZollanmeldung = New EinzelBefundVereinfachteZollanmeldungTyp()
End Sub
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property EinzelBefundVereinfachteZollanmeldung() As EinzelBefundVereinfachteZollanmeldungTyp
Get
Return Me._einzelBefundVereinfachteZollanmeldung
End Get
Set
Me._einzelBefundVereinfachteZollanmeldung = Value
End Set
End Property
Private Shared ReadOnly Property Serializer() As XmlSerializer
Get
If (sSerializer Is Nothing) Then
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(BefundVereinfachteZollanmeldungVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current BefundVereinfachteZollanmeldungVBTyp 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 BefundVereinfachteZollanmeldungVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output BefundVereinfachteZollanmeldungVBTyp 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 BefundVereinfachteZollanmeldungVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, BefundVereinfachteZollanmeldungVBTyp)
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 BefundVereinfachteZollanmeldungVBTyp) 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 BefundVereinfachteZollanmeldungVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), BefundVereinfachteZollanmeldungVBTyp)
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 BefundVereinfachteZollanmeldungVBTyp
Return CType(Serializer.Deserialize(s), BefundVereinfachteZollanmeldungVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current BefundVereinfachteZollanmeldungVBTyp 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 BefundVereinfachteZollanmeldungVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output BefundVereinfachteZollanmeldungVBTyp 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 BefundVereinfachteZollanmeldungVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, BefundVereinfachteZollanmeldungVBTyp)
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 BefundVereinfachteZollanmeldungVBTyp) 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 BefundVereinfachteZollanmeldungVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class EinzelBefundVereinfachteZollanmeldungTyp
#Region "Private fields"
Private _objektIdentifizierung As ObjektIdentifizierungVBTyp
Private _kopfDaten As KopfdatenBefundVereinfachteZollanmeldungTyp
Private _position As List(Of PositionBefundVereinfachteZollanmeldungTyp)
Private Shared sSerializer As XmlSerializer
#End Region
Public Sub New()
MyBase.New
Me._position = New List(Of PositionBefundVereinfachteZollanmeldungTyp)()
Me._kopfDaten = New KopfdatenBefundVereinfachteZollanmeldungTyp()
Me._objektIdentifizierung = New ObjektIdentifizierungVBTyp()
End Sub
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ObjektIdentifizierung() As ObjektIdentifizierungVBTyp
Get
Return Me._objektIdentifizierung
End Get
Set
Me._objektIdentifizierung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KopfDaten() As KopfdatenBefundVereinfachteZollanmeldungTyp
Get
Return Me._kopfDaten
End Get
Set
Me._kopfDaten = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("Position", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Position() As List(Of PositionBefundVereinfachteZollanmeldungTyp)
Get
Return Me._position
End Get
Set
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(EinzelBefundVereinfachteZollanmeldungTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current EinzelBefundVereinfachteZollanmeldungTyp 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 EinzelBefundVereinfachteZollanmeldungTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output EinzelBefundVereinfachteZollanmeldungTyp 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 EinzelBefundVereinfachteZollanmeldungTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, EinzelBefundVereinfachteZollanmeldungTyp)
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 EinzelBefundVereinfachteZollanmeldungTyp) 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 EinzelBefundVereinfachteZollanmeldungTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), EinzelBefundVereinfachteZollanmeldungTyp)
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 EinzelBefundVereinfachteZollanmeldungTyp
Return CType(Serializer.Deserialize(s), EinzelBefundVereinfachteZollanmeldungTyp)
End Function
#End Region
''' <summary>
''' Serializes current EinzelBefundVereinfachteZollanmeldungTyp 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 EinzelBefundVereinfachteZollanmeldungTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output EinzelBefundVereinfachteZollanmeldungTyp 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 EinzelBefundVereinfachteZollanmeldungTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, EinzelBefundVereinfachteZollanmeldungTyp)
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 EinzelBefundVereinfachteZollanmeldungTyp) 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 EinzelBefundVereinfachteZollanmeldungTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class ObjektIdentifizierungVBTyp
#Region "Private fields"
Private _objektName 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
Me._objektName = 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
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
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
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(ObjektIdentifizierungVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current ObjektIdentifizierungVBTyp 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 ObjektIdentifizierungVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output ObjektIdentifizierungVBTyp 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 ObjektIdentifizierungVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, ObjektIdentifizierungVBTyp)
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 ObjektIdentifizierungVBTyp) 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 ObjektIdentifizierungVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), ObjektIdentifizierungVBTyp)
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 ObjektIdentifizierungVBTyp
Return CType(Serializer.Deserialize(s), ObjektIdentifizierungVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current ObjektIdentifizierungVBTyp 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 ObjektIdentifizierungVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output ObjektIdentifizierungVBTyp 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 ObjektIdentifizierungVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, ObjektIdentifizierungVBTyp)
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 ObjektIdentifizierungVBTyp) 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 ObjektIdentifizierungVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class SonderabgabenVBTyp
#Region "Private fields"
Private _sonderfalleingabeSonderabgabengruppe 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 SonderfalleingabeSonderabgabengruppe() As String
Get
Return Me._sonderfalleingabeSonderabgabengruppe
End Get
Set
Me._sonderfalleingabeSonderabgabengruppe = 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
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
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(SonderabgabenVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current SonderabgabenVBTyp 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 SonderabgabenVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output SonderabgabenVBTyp 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 SonderabgabenVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, SonderabgabenVBTyp)
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 SonderabgabenVBTyp) 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 SonderabgabenVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), SonderabgabenVBTyp)
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 SonderabgabenVBTyp
Return CType(Serializer.Deserialize(s), SonderabgabenVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current SonderabgabenVBTyp 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 SonderabgabenVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output SonderabgabenVBTyp 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 SonderabgabenVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, SonderabgabenVBTyp)
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 SonderabgabenVBTyp) 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 SonderabgabenVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class MinderungVBTyp
#Region "Private fields"
Private _minderndeAbgabengruppe As String
Private _minderungsbetrag As Decimal
Private Shared sSerializer As XmlSerializer
#End Region
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property MinderndeAbgabengruppe() As String
Get
Return Me._minderndeAbgabengruppe
End Get
Set
Me._minderndeAbgabengruppe = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Minderungsbetrag() As Decimal
Get
Return Me._minderungsbetrag
End Get
Set
Me._minderungsbetrag = Value
End Set
End Property
Private Shared ReadOnly Property Serializer() As XmlSerializer
Get
If (sSerializer Is Nothing) Then
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(MinderungVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current MinderungVBTyp 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 MinderungVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output MinderungVBTyp 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 MinderungVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, MinderungVBTyp)
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 MinderungVBTyp) 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 MinderungVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), MinderungVBTyp)
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 MinderungVBTyp
Return CType(Serializer.Deserialize(s), MinderungVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current MinderungVBTyp 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 MinderungVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output MinderungVBTyp 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 MinderungVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, MinderungVBTyp)
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 MinderungVBTyp) 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 MinderungVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class VerbrauchsteuerVBTyp
#Region "Private fields"
Private _verbrauchsteuerCode As String
Private _verbrauchssteuerMenge As Decimal
Private _verbrauchssteuerMasseinheitCode As String
Private _verbrauchssteuerMasseinheitQualifier As String
Private _gradProzent As Decimal
Private _verbrauchssteuerWertBasis As Decimal
Private Shared sSerializer As XmlSerializer
#End Region
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerbrauchsteuerCode() As String
Get
Return Me._verbrauchsteuerCode
End Get
Set
Me._verbrauchsteuerCode = 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
Me._verbrauchssteuerMenge = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerbrauchssteuerMasseinheitCode() As String
Get
Return Me._verbrauchssteuerMasseinheitCode
End Get
Set
Me._verbrauchssteuerMasseinheitCode = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerbrauchssteuerMasseinheitQualifier() As String
Get
Return Me._verbrauchssteuerMasseinheitQualifier
End Get
Set
Me._verbrauchssteuerMasseinheitQualifier = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property GradProzent() As Decimal
Get
Return Me._gradProzent
End Get
Set
Me._gradProzent = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerbrauchssteuerWertBasis() As Decimal
Get
Return Me._verbrauchssteuerWertBasis
End Get
Set
Me._verbrauchssteuerWertBasis = Value
End Set
End Property
Private Shared ReadOnly Property Serializer() As XmlSerializer
Get
If (sSerializer Is Nothing) Then
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(VerbrauchsteuerVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current VerbrauchsteuerVBTyp 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 VerbrauchsteuerVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output VerbrauchsteuerVBTyp 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 VerbrauchsteuerVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, VerbrauchsteuerVBTyp)
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 VerbrauchsteuerVBTyp) 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 VerbrauchsteuerVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), VerbrauchsteuerVBTyp)
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 VerbrauchsteuerVBTyp
Return CType(Serializer.Deserialize(s), VerbrauchsteuerVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current VerbrauchsteuerVBTyp 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 VerbrauchsteuerVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output VerbrauchsteuerVBTyp 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 VerbrauchsteuerVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, VerbrauchsteuerVBTyp)
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 VerbrauchsteuerVBTyp) 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 VerbrauchsteuerVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class GehaltsangabenVBTyp
#Region "Private fields"
Private _artCode As String
Private _gradProzent As Decimal
Private Shared sSerializer As XmlSerializer
#End Region
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ArtCode() As String
Get
Return Me._artCode
End Get
Set
Me._artCode = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property GradProzent() As Decimal
Get
Return Me._gradProzent
End Get
Set
Me._gradProzent = Value
End Set
End Property
Private Shared ReadOnly Property Serializer() As XmlSerializer
Get
If (sSerializer Is Nothing) Then
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(GehaltsangabenVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current GehaltsangabenVBTyp 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 GehaltsangabenVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output GehaltsangabenVBTyp 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 GehaltsangabenVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, GehaltsangabenVBTyp)
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 GehaltsangabenVBTyp) 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 GehaltsangabenVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), GehaltsangabenVBTyp)
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 GehaltsangabenVBTyp
Return CType(Serializer.Deserialize(s), GehaltsangabenVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current GehaltsangabenVBTyp 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 GehaltsangabenVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output GehaltsangabenVBTyp 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 GehaltsangabenVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, GehaltsangabenVBTyp)
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 GehaltsangabenVBTyp) 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 GehaltsangabenVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class PreisWertangabeVBTyp
#Region "Private fields"
Private _preisartCode As String
Private _wert As Decimal
Private Shared sSerializer As XmlSerializer
#End Region
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property PreisartCode() As String
Get
Return Me._preisartCode
End Get
Set
Me._preisartCode = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Wert() As Decimal
Get
Return Me._wert
End Get
Set
Me._wert = Value
End Set
End Property
Private Shared ReadOnly Property Serializer() As XmlSerializer
Get
If (sSerializer Is Nothing) Then
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(PreisWertangabeVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current PreisWertangabeVBTyp 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 PreisWertangabeVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output PreisWertangabeVBTyp 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 PreisWertangabeVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, PreisWertangabeVBTyp)
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 PreisWertangabeVBTyp) 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 PreisWertangabeVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), PreisWertangabeVBTyp)
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 PreisWertangabeVBTyp
Return CType(Serializer.Deserialize(s), PreisWertangabeVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current PreisWertangabeVBTyp 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 PreisWertangabeVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output PreisWertangabeVBTyp 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 PreisWertangabeVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, PreisWertangabeVBTyp)
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 PreisWertangabeVBTyp) 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 PreisWertangabeVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class WarenMengeVBTyp
#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
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
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
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(WarenMengeVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current WarenMengeVBTyp 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 WarenMengeVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output WarenMengeVBTyp 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 WarenMengeVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, WarenMengeVBTyp)
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 WarenMengeVBTyp) 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 WarenMengeVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), WarenMengeVBTyp)
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 WarenMengeVBTyp
Return CType(Serializer.Deserialize(s), WarenMengeVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current WarenMengeVBTyp 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 WarenMengeVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output WarenMengeVBTyp 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 WarenMengeVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, WarenMengeVBTyp)
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 WarenMengeVBTyp) 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 WarenMengeVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class AbzugHinzurechnungenVBTyp
#Region "Private fields"
Private _artCode As String
Private _artText As String
Private _betrag As Decimal
Private _iATAKursKz As String
Private _waehrung As String
Private _kursVereinbartKz As String
Private _kursAuslandswaehrung As Decimal
Private _kursDatum As Date
Private _prozentsatz As Decimal
Private Shared sSerializer As XmlSerializer
#End Region
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ArtCode() As String
Get
Return Me._artCode
End Get
Set
Me._artCode = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ArtText() As String
Get
Return Me._artText
End Get
Set
Me._artText = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Betrag() As Decimal
Get
Return Me._betrag
End Get
Set
Me._betrag = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property IATAKursKz() As String
Get
Return Me._iATAKursKz
End Get
Set
Me._iATAKursKz = 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
Me._waehrung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KursVereinbartKz() As String
Get
Return Me._kursVereinbartKz
End Get
Set
Me._kursVereinbartKz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KursAuslandswaehrung() As Decimal
Get
Return Me._kursAuslandswaehrung
End Get
Set
Me._kursAuslandswaehrung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")>
Public Property KursDatum() As Date
Get
Return Me._kursDatum
End Get
Set
Me._kursDatum = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Prozentsatz() As Decimal
Get
Return Me._prozentsatz
End Get
Set
Me._prozentsatz = Value
End Set
End Property
Private Shared ReadOnly Property Serializer() As XmlSerializer
Get
If (sSerializer Is Nothing) Then
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(AbzugHinzurechnungenVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current AbzugHinzurechnungenVBTyp 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 AbzugHinzurechnungenVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output AbzugHinzurechnungenVBTyp 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 AbzugHinzurechnungenVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, AbzugHinzurechnungenVBTyp)
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 AbzugHinzurechnungenVBTyp) 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 AbzugHinzurechnungenVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), AbzugHinzurechnungenVBTyp)
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 AbzugHinzurechnungenVBTyp
Return CType(Serializer.Deserialize(s), AbzugHinzurechnungenVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current AbzugHinzurechnungenVBTyp 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 AbzugHinzurechnungenVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output AbzugHinzurechnungenVBTyp 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 AbzugHinzurechnungenVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, AbzugHinzurechnungenVBTyp)
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 AbzugHinzurechnungenVBTyp) 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 AbzugHinzurechnungenVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class AbweichungVBTyp
#Region "Private fields"
Private _abweichendFestgesetztesFeld As String
Private _abweichendFestgesetztesFeldQualifikator As String
Private _qualifikatorInhalt As String
Private _abweichendeFestsetzungArt As String
Private _abweichendFestgesetztVon As String
Private _abweichendFestgesetztAuf As String
Private Shared sSerializer As XmlSerializer
#End Region
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AbweichendFestgesetztesFeld() As String
Get
Return Me._abweichendFestgesetztesFeld
End Get
Set
Me._abweichendFestgesetztesFeld = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AbweichendFestgesetztesFeldQualifikator() As String
Get
Return Me._abweichendFestgesetztesFeldQualifikator
End Get
Set
Me._abweichendFestgesetztesFeldQualifikator = 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
Me._qualifikatorInhalt = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AbweichendeFestsetzungArt() As String
Get
Return Me._abweichendeFestsetzungArt
End Get
Set
Me._abweichendeFestsetzungArt = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AbweichendFestgesetztVon() As String
Get
Return Me._abweichendFestgesetztVon
End Get
Set
Me._abweichendFestgesetztVon = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AbweichendFestgesetztAuf() As String
Get
Return Me._abweichendFestgesetztAuf
End Get
Set
Me._abweichendFestgesetztAuf = Value
End Set
End Property
Private Shared ReadOnly Property Serializer() As XmlSerializer
Get
If (sSerializer Is Nothing) Then
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(AbweichungVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current AbweichungVBTyp 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 AbweichungVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output AbweichungVBTyp 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 AbweichungVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, AbweichungVBTyp)
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 AbweichungVBTyp) 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 AbweichungVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), AbweichungVBTyp)
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 AbweichungVBTyp
Return CType(Serializer.Deserialize(s), AbweichungVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current AbweichungVBTyp 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 AbweichungVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output AbweichungVBTyp 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 AbweichungVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, AbweichungVBTyp)
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 AbweichungVBTyp) 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 AbweichungVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class UnterlageVBTyp
#Region "Private fields"
Private _art As String
Private _bereich As String
Private _nummer As String
Private _datumAusstellung As Date
Private _vorlageKz As String
Private _abschreibungsMenge As Decimal
Private _abschreibungsMengeMasseinheit As String
Private _abschreibungsMengeMasseinheitQualifier As String
Private _kzAnerkennung As String
Private _kzAbschreibung As String
Private _kzEinbehalten As String
Private _kzPeriodischeVorlage As String
Private Shared sSerializer As XmlSerializer
#End Region
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Art() As String
Get
Return Me._art
End Get
Set
Me._art = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Bereich() As String
Get
Return Me._bereich
End Get
Set
Me._bereich = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Nummer() As String
Get
Return Me._nummer
End Get
Set
Me._nummer = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")>
Public Property DatumAusstellung() As Date
Get
Return Me._datumAusstellung
End Get
Set
Me._datumAusstellung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VorlageKz() As String
Get
Return Me._vorlageKz
End Get
Set
Me._vorlageKz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AbschreibungsMenge() As Decimal
Get
Return Me._abschreibungsMenge
End Get
Set
Me._abschreibungsMenge = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AbschreibungsMengeMasseinheit() As String
Get
Return Me._abschreibungsMengeMasseinheit
End Get
Set
Me._abschreibungsMengeMasseinheit = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AbschreibungsMengeMasseinheitQualifier() As String
Get
Return Me._abschreibungsMengeMasseinheitQualifier
End Get
Set
Me._abschreibungsMengeMasseinheitQualifier = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KzAnerkennung() As String
Get
Return Me._kzAnerkennung
End Get
Set
Me._kzAnerkennung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KzAbschreibung() As String
Get
Return Me._kzAbschreibung
End Get
Set
Me._kzAbschreibung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KzEinbehalten() As String
Get
Return Me._kzEinbehalten
End Get
Set
Me._kzEinbehalten = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KzPeriodischeVorlage() As String
Get
Return Me._kzPeriodischeVorlage
End Get
Set
Me._kzPeriodischeVorlage = Value
End Set
End Property
Private Shared ReadOnly Property Serializer() As XmlSerializer
Get
If (sSerializer Is Nothing) Then
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(UnterlageVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current UnterlageVBTyp 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 UnterlageVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output UnterlageVBTyp 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 UnterlageVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, UnterlageVBTyp)
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 UnterlageVBTyp) 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 UnterlageVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), UnterlageVBTyp)
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 UnterlageVBTyp
Return CType(Serializer.Deserialize(s), UnterlageVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current UnterlageVBTyp 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 UnterlageVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output UnterlageVBTyp 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 UnterlageVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, UnterlageVBTyp)
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 UnterlageVBTyp) 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 UnterlageVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class PositionBefundVereinfachteZollanmeldungTyp
#Region "Private fields"
Private _positionsNrvZAAZ As String
Private _mitteilungAnTeilnehmerBeschau As String
Private _weitererNachweis As String
Private _mitteilungAnTeilnehmerErledigung As String
Private _positionsbefund As String
Private _unterlage As List(Of UnterlageVBTyp)
Private _ueberlassungDatum As Date
Private _weitererNachweisFrist As Date
Private _positionKzErledigung As String
Private _abweichung As List(Of AbweichungVBTyp)
Private _warenNummerEZT As String
Private _warenNummerZusatzCode As List(Of String)
Private _abgabensteuerungKz As String
Private _eUCode As List(Of String)
Private _sachbereich As String
Private _artikelNummer As String
Private _artikelpreis As Decimal
Private _positionsZusatz As String
Private _eigenmasse As Decimal
Private _ursprungslandCode As String
Private _tabakSteuerzeichenID As String
Private _statistikStatus As String
Private _artGeschaeftCode As String
Private _bestimmungsbundesland As String
Private _aHStatWert As String
Private _aHStatMenge As Decimal
Private _aHStatMengeMasseinheit As String
Private _aHStatMengeQualifier As String
Private _rohmasse As Decimal
Private _dV1Nettopreis As Decimal
Private _dV1Waehrung As String
Private _dV1KzKursNettoVereinbart As String
Private _dV1Kurs As Decimal
Private _dV1MittelbareZahlungen As Decimal
Private _dV1MittelbareZahlungenWaehrung As String
Private _dV1MittelbareZahlungenKursKz As String
Private _dV1MittelbareZahlungenKurs As Decimal
Private _ortVerbringens As String
Private _abflughafenIATACode As String
Private _luftfrachtkostenGesamt As Decimal
Private _iATAKursKz As String
Private _luftfrachtkostenGesamtWaehrung As String
Private _kursVereinbartKz As String
Private _kursBetragVereinbart As Decimal
Private _kursDatum As Date
Private _abzugHinzurechnungen As List(Of AbzugHinzurechnungenVBTyp)
Private _zollwert As Decimal
Private _warenMenge As List(Of WarenMengeVBTyp)
Private _besondereWertangabe As List(Of PreisWertangabeVBTyp)
Private _gehaltsangaben As List(Of GehaltsangabenVBTyp)
Private _veredelungWertsteigerung As Decimal
Private _kostenEUSt As Decimal
Private _verbrauchsteuer As List(Of VerbrauchsteuerVBTyp)
Private _beguenstigungBeantragtCode As String
Private _beguenstigungMenge As String
Private _beguenstigungMengeMasseinheit As String
Private _beguenstigungMengeQualifikator As String
Private _minderung As List(Of MinderungVBTyp)
Private _sonderabgaben As List(Of SonderabgabenVBTyp)
Private _kontingentNrAngewandt As List(Of String)
Private Shared sSerializer As XmlSerializer
#End Region
Public Sub New()
MyBase.New
Me._kontingentNrAngewandt = New List(Of String)()
Me._sonderabgaben = New List(Of SonderabgabenVBTyp)()
Me._minderung = New List(Of MinderungVBTyp)()
Me._verbrauchsteuer = New List(Of VerbrauchsteuerVBTyp)()
Me._gehaltsangaben = New List(Of GehaltsangabenVBTyp)()
Me._besondereWertangabe = New List(Of PreisWertangabeVBTyp)()
Me._warenMenge = New List(Of WarenMengeVBTyp)()
Me._abzugHinzurechnungen = New List(Of AbzugHinzurechnungenVBTyp)()
Me._eUCode = New List(Of String)()
Me._warenNummerZusatzCode = New List(Of String)()
Me._abweichung = New List(Of AbweichungVBTyp)()
Me._unterlage = New List(Of UnterlageVBTyp)()
End Sub
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property PositionsNrvZAAZ() As String
Get
Return Me._positionsNrvZAAZ
End Get
Set
Me._positionsNrvZAAZ = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property MitteilungAnTeilnehmerBeschau() As String
Get
Return Me._mitteilungAnTeilnehmerBeschau
End Get
Set
Me._mitteilungAnTeilnehmerBeschau = 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
Me._weitererNachweis = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property MitteilungAnTeilnehmerErledigung() As String
Get
Return Me._mitteilungAnTeilnehmerErledigung
End Get
Set
Me._mitteilungAnTeilnehmerErledigung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Positionsbefund() As String
Get
Return Me._positionsbefund
End Get
Set
Me._positionsbefund = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("Unterlage", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Unterlage() As List(Of UnterlageVBTyp)
Get
Return Me._unterlage
End Get
Set
Me._unterlage = 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
Me._ueberlassungDatum = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")>
Public Property WeitererNachweisFrist() As Date
Get
Return Me._weitererNachweisFrist
End Get
Set
Me._weitererNachweisFrist = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property PositionKzErledigung() As String
Get
Return Me._positionKzErledigung
End Get
Set
Me._positionKzErledigung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("Abweichung", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Abweichung() As List(Of AbweichungVBTyp)
Get
Return Me._abweichung
End Get
Set
Me._abweichung = 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
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
Me._warenNummerZusatzCode = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AbgabensteuerungKz() As String
Get
Return Me._abgabensteuerungKz
End Get
Set
Me._abgabensteuerungKz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("EUCode", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property EUCode() As List(Of String)
Get
Return Me._eUCode
End Get
Set
Me._eUCode = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Sachbereich() As String
Get
Return Me._sachbereich
End Get
Set
Me._sachbereich = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ArtikelNummer() As String
Get
Return Me._artikelNummer
End Get
Set
Me._artikelNummer = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Artikelpreis() As Decimal
Get
Return Me._artikelpreis
End Get
Set
Me._artikelpreis = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property PositionsZusatz() As String
Get
Return Me._positionsZusatz
End Get
Set
Me._positionsZusatz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Eigenmasse() As Decimal
Get
Return Me._eigenmasse
End Get
Set
Me._eigenmasse = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property UrsprungslandCode() As String
Get
Return Me._ursprungslandCode
End Get
Set
Me._ursprungslandCode = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property TabakSteuerzeichenID() As String
Get
Return Me._tabakSteuerzeichenID
End Get
Set
Me._tabakSteuerzeichenID = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property StatistikStatus() As String
Get
Return Me._statistikStatus
End Get
Set
Me._statistikStatus = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ArtGeschaeftCode() As String
Get
Return Me._artGeschaeftCode
End Get
Set
Me._artGeschaeftCode = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Bestimmungsbundesland() As String
Get
Return Me._bestimmungsbundesland
End Get
Set
Me._bestimmungsbundesland = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="nonNegativeInteger")>
Public Property AHStatWert() As String
Get
Return Me._aHStatWert
End Get
Set
Me._aHStatWert = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AHStatMenge() As Decimal
Get
Return Me._aHStatMenge
End Get
Set
Me._aHStatMenge = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AHStatMengeMasseinheit() As String
Get
Return Me._aHStatMengeMasseinheit
End Get
Set
Me._aHStatMengeMasseinheit = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AHStatMengeQualifier() As String
Get
Return Me._aHStatMengeQualifier
End Get
Set
Me._aHStatMengeQualifier = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Rohmasse() As Decimal
Get
Return Me._rohmasse
End Get
Set
Me._rohmasse = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DV1Nettopreis() As Decimal
Get
Return Me._dV1Nettopreis
End Get
Set
Me._dV1Nettopreis = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DV1Waehrung() As String
Get
Return Me._dV1Waehrung
End Get
Set
Me._dV1Waehrung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DV1KzKursNettoVereinbart() As String
Get
Return Me._dV1KzKursNettoVereinbart
End Get
Set
Me._dV1KzKursNettoVereinbart = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DV1Kurs() As Decimal
Get
Return Me._dV1Kurs
End Get
Set
Me._dV1Kurs = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DV1MittelbareZahlungen() As Decimal
Get
Return Me._dV1MittelbareZahlungen
End Get
Set
Me._dV1MittelbareZahlungen = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DV1MittelbareZahlungenWaehrung() As String
Get
Return Me._dV1MittelbareZahlungenWaehrung
End Get
Set
Me._dV1MittelbareZahlungenWaehrung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DV1MittelbareZahlungenKursKz() As String
Get
Return Me._dV1MittelbareZahlungenKursKz
End Get
Set
Me._dV1MittelbareZahlungenKursKz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DV1MittelbareZahlungenKurs() As Decimal
Get
Return Me._dV1MittelbareZahlungenKurs
End Get
Set
Me._dV1MittelbareZahlungenKurs = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property OrtVerbringens() As String
Get
Return Me._ortVerbringens
End Get
Set
Me._ortVerbringens = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AbflughafenIATACode() As String
Get
Return Me._abflughafenIATACode
End Get
Set
Me._abflughafenIATACode = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property LuftfrachtkostenGesamt() As Decimal
Get
Return Me._luftfrachtkostenGesamt
End Get
Set
Me._luftfrachtkostenGesamt = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property IATAKursKz() As String
Get
Return Me._iATAKursKz
End Get
Set
Me._iATAKursKz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property LuftfrachtkostenGesamtWaehrung() As String
Get
Return Me._luftfrachtkostenGesamtWaehrung
End Get
Set
Me._luftfrachtkostenGesamtWaehrung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KursVereinbartKz() As String
Get
Return Me._kursVereinbartKz
End Get
Set
Me._kursVereinbartKz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KursBetragVereinbart() As Decimal
Get
Return Me._kursBetragVereinbart
End Get
Set
Me._kursBetragVereinbart = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")>
Public Property KursDatum() As Date
Get
Return Me._kursDatum
End Get
Set
Me._kursDatum = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("AbzugHinzurechnungen", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AbzugHinzurechnungen() As List(Of AbzugHinzurechnungenVBTyp)
Get
Return Me._abzugHinzurechnungen
End Get
Set
Me._abzugHinzurechnungen = 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
Me._zollwert = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("WarenMenge", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property WarenMenge() As List(Of WarenMengeVBTyp)
Get
Return Me._warenMenge
End Get
Set
Me._warenMenge = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("BesondereWertangabe", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property BesondereWertangabe() As List(Of PreisWertangabeVBTyp)
Get
Return Me._besondereWertangabe
End Get
Set
Me._besondereWertangabe = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("Gehaltsangaben", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Gehaltsangaben() As List(Of GehaltsangabenVBTyp)
Get
Return Me._gehaltsangaben
End Get
Set
Me._gehaltsangaben = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VeredelungWertsteigerung() As Decimal
Get
Return Me._veredelungWertsteigerung
End Get
Set
Me._veredelungWertsteigerung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KostenEUSt() As Decimal
Get
Return Me._kostenEUSt
End Get
Set
Me._kostenEUSt = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("Verbrauchsteuer", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Verbrauchsteuer() As List(Of VerbrauchsteuerVBTyp)
Get
Return Me._verbrauchsteuer
End Get
Set
Me._verbrauchsteuer = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property BeguenstigungBeantragtCode() As String
Get
Return Me._beguenstigungBeantragtCode
End Get
Set
Me._beguenstigungBeantragtCode = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="nonNegativeInteger")>
Public Property BeguenstigungMenge() As String
Get
Return Me._beguenstigungMenge
End Get
Set
Me._beguenstigungMenge = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property BeguenstigungMengeMasseinheit() As String
Get
Return Me._beguenstigungMengeMasseinheit
End Get
Set
Me._beguenstigungMengeMasseinheit = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property BeguenstigungMengeQualifikator() As String
Get
Return Me._beguenstigungMengeQualifikator
End Get
Set
Me._beguenstigungMengeQualifikator = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("Minderung", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Minderung() As List(Of MinderungVBTyp)
Get
Return Me._minderung
End Get
Set
Me._minderung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("Sonderabgaben", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Sonderabgaben() As List(Of SonderabgabenVBTyp)
Get
Return Me._sonderabgaben
End Get
Set
Me._sonderabgaben = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("KontingentNrAngewandt", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KontingentNrAngewandt() As List(Of String)
Get
Return Me._kontingentNrAngewandt
End Get
Set
Me._kontingentNrAngewandt = Value
End Set
End Property
Private Shared ReadOnly Property Serializer() As XmlSerializer
Get
If (sSerializer Is Nothing) Then
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(PositionBefundVereinfachteZollanmeldungTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current PositionBefundVereinfachteZollanmeldungTyp 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 PositionBefundVereinfachteZollanmeldungTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output PositionBefundVereinfachteZollanmeldungTyp 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 PositionBefundVereinfachteZollanmeldungTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, PositionBefundVereinfachteZollanmeldungTyp)
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 PositionBefundVereinfachteZollanmeldungTyp) 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 PositionBefundVereinfachteZollanmeldungTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), PositionBefundVereinfachteZollanmeldungTyp)
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 PositionBefundVereinfachteZollanmeldungTyp
Return CType(Serializer.Deserialize(s), PositionBefundVereinfachteZollanmeldungTyp)
End Function
#End Region
''' <summary>
''' Serializes current PositionBefundVereinfachteZollanmeldungTyp 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 PositionBefundVereinfachteZollanmeldungTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output PositionBefundVereinfachteZollanmeldungTyp 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 PositionBefundVereinfachteZollanmeldungTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, PositionBefundVereinfachteZollanmeldungTyp)
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 PositionBefundVereinfachteZollanmeldungTyp) 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 PositionBefundVereinfachteZollanmeldungTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class AnmeldungVBTyp
#Region "Private fields"
Private _bereich As String
Private _art As String
Private _nummer As String
Private _datumAusstellung As Date
Private Shared sSerializer As XmlSerializer
#End Region
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Bereich() As String
Get
Return Me._bereich
End Get
Set
Me._bereich = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Art() As String
Get
Return Me._art
End Get
Set
Me._art = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Nummer() As String
Get
Return Me._nummer
End Get
Set
Me._nummer = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")>
Public Property DatumAusstellung() As Date
Get
Return Me._datumAusstellung
End Get
Set
Me._datumAusstellung = Value
End Set
End Property
Private Shared ReadOnly Property Serializer() As XmlSerializer
Get
If (sSerializer Is Nothing) Then
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(AnmeldungVBTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current AnmeldungVBTyp 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 AnmeldungVBTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output AnmeldungVBTyp 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 AnmeldungVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, AnmeldungVBTyp)
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 AnmeldungVBTyp) 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 AnmeldungVBTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), AnmeldungVBTyp)
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 AnmeldungVBTyp
Return CType(Serializer.Deserialize(s), AnmeldungVBTyp)
End Function
#End Region
''' <summary>
''' Serializes current AnmeldungVBTyp 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 AnmeldungVBTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output AnmeldungVBTyp 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 AnmeldungVBTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, AnmeldungVBTyp)
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 AnmeldungVBTyp) 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 AnmeldungVBTyp
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.3056.0"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code")>
Partial Public Class KopfdatenBefundVereinfachteZollanmeldungTyp
#Region "Private fields"
Private _sachbearbeiter As String
Private _telefonnummerBearbeiter As String
Private _kopfKzErledigung As String
Private _registriernummer As String
Private _registrierdatum As Date
Private _artAnmeldung As String
Private _datumErstellungBefund As Date
Private _befund As String
Private _kzVertretungsverhaeltnis As String
Private _wKZ As String
Private _kzRechtsbehelf As String
Private _kzGesamtschuldnerschaft As String
Private _eingangszollstelleGeaendertKz As String
Private _anmelderEORI As String
Private _anmelderNLNR As String
Private _anmelderFirmenbezeichung As String
Private _anmelderStrasseHausNr As String
Private _anmelderOrtsteil As String
Private _anmelderOrtS As String
Private _anmelderPLZS As String
Private _anmelderNationalitaet As String
Private _dienststellenschluessel As String
Private _dienststelleBezeichung As String
Private _dienststelleStrasseHausNr As String
Private _dienststelleOrtS As String
Private _dienststellePLZS As String
Private _bearbeiter As String
Private _dienststelleVorwahlTelefonNr As String
Private _vertreterEORI As String
Private _vertreterNLNR As String
Private _vertreterFirmenbezeichnung As String
Private _vertreterStrasseHausNr As String
Private _vertreterOrtsteil As String
Private _vertreterOrtS As String
Private _vertreterPLZS As String
Private _vertreterNationalitaet As String
Private _hZABezeichnung As String
Private _hZAEmailAdresse As String
Private _hZADEmailAdresse As String
Private _hZAPostfach As String
Private _hZAOrtP As String
Private _hZAPLZP As String
Private _hZAStrasseHausNr As String
Private _hZAOrtsteil As String
Private _hZAOrtS As String
Private _hZAPLZS 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 _anmelderEmpfaengerKz As String
Private _bewilligungsnummer As String
Private _versendungslandCode As String
Private _lieferbedingung As String
Private _lieferbedingungText As String
Private _lieferbedingungOrt As String
Private _lieferbedingungSchluessel As String
Private _rechnungspreis As Decimal
Private _rechnungswaehrung As String
Private _ustIdNummer As String
Private _finanzamt As String
Private _eingangszollstelle As String
Private _dV1Kz As String
Private _verkaeuferEORI As String
Private _verkaeuferFirmenbezeichnung As String
Private _verkaeuferNationalitaet As String
Private _verkaeuferStrasseHausNr As String
Private _verkaeuferPLZS As String
Private _verkaeuferOrtS As String
Private _verkaeuferOrtsteil As String
Private _kaeuferEORI As String
Private _kaeuferFirmenbezeichnung As String
Private _kaeuferNationalitaet As String
Private _kaeuferStrasseHausNr As String
Private _kaeuferPLZS As String
Private _kaeuferOrtS As String
Private _kaeuferOrtsteil As String
Private _zollwertanmelderEORI As String
Private _zollwertanmelderFirmenbezeichnung As String
Private _zollwertanmelderNationalitaet As String
Private _zollwertanmelderStrasseHausNr As String
Private _zollwertanmelderPLZS As String
Private _zollwertanmelderOrtS As String
Private _zollwertanmelderOrtsteil As String
Private _vertreterZollwertanmelderEORI As String
Private _vertreterZollwertanmelderFirmenbezeichnung As String
Private _vertreterZollwertanmelderNationalitaet As String
Private _vertreterZollwertanmelderStrasseHausNr As String
Private _vertreterZollwertanmelderPLZS As String
Private _vertreterZollwertanmelderOrtS As String
Private _vertreterZollwertanmelderOrtsteil As String
Private _vertretungsverhaeltnis As String
Private _fruehereEntscheidungen As String
Private _verbundenheit As String
Private _verbundenheitEinzelheiten As String
Private _einschraenkungenKz As String
Private _bedingungenLeistungenKz As String
Private _bedingungenLeistungenArt As String
Private _lizenzgebuehrenKz As String
Private _lizenzgebuehrenUmstand As String
Private _spezielleVereinbarungKz As String
Private _spezielleVereinbarungUmstand As String
Private _empfaengerEORI As String
Private _empfaengerNLNR As String
Private _empfaengerFirmenbezeichnung As String
Private _empfaengerNationalitaet As String
Private _empfaengerStrasseHausNr As String
Private _empfaengerPLZS As String
Private _empfaengerOrtS As String
Private _empfaengerOrtsteil As String
Private _datenuebermittlungEORI As String
Private _erwerberAndererMitgliedstaatEORI As String
Private _erwerberAndererMitgliedstaatNLNR As String
Private _erwerberFirmenbezeichnung As String
Private _erwerberNationalitaet As String
Private _erwerberStrasseHausNr As String
Private _erwerberPLZS As String
Private _erwerberOrtS As String
Private _erwerberOrtsteil As String
Private _erwerberUStIdNrAndererMitgliedstaat As String
Private _versenderAusfuehrerEORI As String
Private _versenderAusfuehrerFirmenbezeichnung As String
Private _versenderAusfuehrerNationalitaet As String
Private _versenderAusfuehrerStrasseHausNr As String
Private _versenderAusfuehrerPLZS As String
Private _versenderAusfuehrerOrtS As String
Private _versenderAusfuehrerOrtsteil As String
Private _unterlage As List(Of AnmeldungVBTyp)
Private Shared sSerializer As XmlSerializer
#End Region
Public Sub New()
MyBase.New
Me._unterlage = New List(Of AnmeldungVBTyp)()
End Sub
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Sachbearbeiter() As String
Get
Return Me._sachbearbeiter
End Get
Set
Me._sachbearbeiter = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property TelefonnummerBearbeiter() As String
Get
Return Me._telefonnummerBearbeiter
End Get
Set
Me._telefonnummerBearbeiter = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KopfKzErledigung() As String
Get
Return Me._kopfKzErledigung
End Get
Set
Me._kopfKzErledigung = 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
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
Me._registrierdatum = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ArtAnmeldung() As String
Get
Return Me._artAnmeldung
End Get
Set
Me._artAnmeldung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="date")>
Public Property DatumErstellungBefund() As Date
Get
Return Me._datumErstellungBefund
End Get
Set
Me._datumErstellungBefund = 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
Me._befund = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KzVertretungsverhaeltnis() As String
Get
Return Me._kzVertretungsverhaeltnis
End Get
Set
Me._kzVertretungsverhaeltnis = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property WKZ() As String
Get
Return Me._wKZ
End Get
Set
Me._wKZ = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KzRechtsbehelf() As String
Get
Return Me._kzRechtsbehelf
End Get
Set
Me._kzRechtsbehelf = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KzGesamtschuldnerschaft() As String
Get
Return Me._kzGesamtschuldnerschaft
End Get
Set
Me._kzGesamtschuldnerschaft = 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
Me._eingangszollstelleGeaendertKz = 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
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
Me._anmelderNLNR = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AnmelderFirmenbezeichung() As String
Get
Return Me._anmelderFirmenbezeichung
End Get
Set
Me._anmelderFirmenbezeichung = 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
Me._anmelderStrasseHausNr = 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
Me._anmelderOrtsteil = 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
Me._anmelderOrtS = 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
Me._anmelderPLZS = 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
Me._anmelderNationalitaet = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Dienststellenschluessel() As String
Get
Return Me._dienststellenschluessel
End Get
Set
Me._dienststellenschluessel = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DienststelleBezeichung() As String
Get
Return Me._dienststelleBezeichung
End Get
Set
Me._dienststelleBezeichung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DienststelleStrasseHausNr() As String
Get
Return Me._dienststelleStrasseHausNr
End Get
Set
Me._dienststelleStrasseHausNr = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DienststelleOrtS() As String
Get
Return Me._dienststelleOrtS
End Get
Set
Me._dienststelleOrtS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DienststellePLZS() As String
Get
Return Me._dienststellePLZS
End Get
Set
Me._dienststellePLZS = 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
Me._bearbeiter = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DienststelleVorwahlTelefonNr() As String
Get
Return Me._dienststelleVorwahlTelefonNr
End Get
Set
Me._dienststelleVorwahlTelefonNr = 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
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
Me._vertreterNLNR = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VertreterFirmenbezeichnung() As String
Get
Return Me._vertreterFirmenbezeichnung
End Get
Set
Me._vertreterFirmenbezeichnung = 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
Me._vertreterStrasseHausNr = 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
Me._vertreterOrtsteil = 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
Me._vertreterOrtS = 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
Me._vertreterPLZS = 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
Me._vertreterNationalitaet = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property HZABezeichnung() As String
Get
Return Me._hZABezeichnung
End Get
Set
Me._hZABezeichnung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property HZAEmailAdresse() As String
Get
Return Me._hZAEmailAdresse
End Get
Set
Me._hZAEmailAdresse = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property HZADEmailAdresse() As String
Get
Return Me._hZADEmailAdresse
End Get
Set
Me._hZADEmailAdresse = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property HZAPostfach() As String
Get
Return Me._hZAPostfach
End Get
Set
Me._hZAPostfach = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property HZAOrtP() As String
Get
Return Me._hZAOrtP
End Get
Set
Me._hZAOrtP = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property HZAPLZP() As String
Get
Return Me._hZAPLZP
End Get
Set
Me._hZAPLZP = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property HZAStrasseHausNr() As String
Get
Return Me._hZAStrasseHausNr
End Get
Set
Me._hZAStrasseHausNr = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property HZAOrtsteil() As String
Get
Return Me._hZAOrtsteil
End Get
Set
Me._hZAOrtsteil = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property HZAOrtS() As String
Get
Return Me._hZAOrtS
End Get
Set
Me._hZAOrtS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property HZAPLZS() As String
Get
Return Me._hZAPLZS
End Get
Set
Me._hZAPLZS = 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
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
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
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
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
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
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
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
Me._fRechnungOrtsteil = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property AnmelderEmpfaengerKz() As String
Get
Return Me._anmelderEmpfaengerKz
End Get
Set
Me._anmelderEmpfaengerKz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Bewilligungsnummer() As String
Get
Return Me._bewilligungsnummer
End Get
Set
Me._bewilligungsnummer = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VersendungslandCode() As String
Get
Return Me._versendungslandCode
End Get
Set
Me._versendungslandCode = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Lieferbedingung() As String
Get
Return Me._lieferbedingung
End Get
Set
Me._lieferbedingung = 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
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
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
Me._lieferbedingungSchluessel = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Rechnungspreis() As Decimal
Get
Return Me._rechnungspreis
End Get
Set
Me._rechnungspreis = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Rechnungswaehrung() As String
Get
Return Me._rechnungswaehrung
End Get
Set
Me._rechnungswaehrung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property UstIdNummer() As String
Get
Return Me._ustIdNummer
End Get
Set
Me._ustIdNummer = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Finanzamt() As String
Get
Return Me._finanzamt
End Get
Set
Me._finanzamt = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Eingangszollstelle() As String
Get
Return Me._eingangszollstelle
End Get
Set
Me._eingangszollstelle = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DV1Kz() As String
Get
Return Me._dV1Kz
End Get
Set
Me._dV1Kz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerkaeuferEORI() As String
Get
Return Me._verkaeuferEORI
End Get
Set
Me._verkaeuferEORI = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerkaeuferFirmenbezeichnung() As String
Get
Return Me._verkaeuferFirmenbezeichnung
End Get
Set
Me._verkaeuferFirmenbezeichnung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerkaeuferNationalitaet() As String
Get
Return Me._verkaeuferNationalitaet
End Get
Set
Me._verkaeuferNationalitaet = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerkaeuferStrasseHausNr() As String
Get
Return Me._verkaeuferStrasseHausNr
End Get
Set
Me._verkaeuferStrasseHausNr = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerkaeuferPLZS() As String
Get
Return Me._verkaeuferPLZS
End Get
Set
Me._verkaeuferPLZS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerkaeuferOrtS() As String
Get
Return Me._verkaeuferOrtS
End Get
Set
Me._verkaeuferOrtS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerkaeuferOrtsteil() As String
Get
Return Me._verkaeuferOrtsteil
End Get
Set
Me._verkaeuferOrtsteil = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KaeuferEORI() As String
Get
Return Me._kaeuferEORI
End Get
Set
Me._kaeuferEORI = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KaeuferFirmenbezeichnung() As String
Get
Return Me._kaeuferFirmenbezeichnung
End Get
Set
Me._kaeuferFirmenbezeichnung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KaeuferNationalitaet() As String
Get
Return Me._kaeuferNationalitaet
End Get
Set
Me._kaeuferNationalitaet = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KaeuferStrasseHausNr() As String
Get
Return Me._kaeuferStrasseHausNr
End Get
Set
Me._kaeuferStrasseHausNr = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KaeuferPLZS() As String
Get
Return Me._kaeuferPLZS
End Get
Set
Me._kaeuferPLZS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KaeuferOrtS() As String
Get
Return Me._kaeuferOrtS
End Get
Set
Me._kaeuferOrtS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property KaeuferOrtsteil() As String
Get
Return Me._kaeuferOrtsteil
End Get
Set
Me._kaeuferOrtsteil = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ZollwertanmelderEORI() As String
Get
Return Me._zollwertanmelderEORI
End Get
Set
Me._zollwertanmelderEORI = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ZollwertanmelderFirmenbezeichnung() As String
Get
Return Me._zollwertanmelderFirmenbezeichnung
End Get
Set
Me._zollwertanmelderFirmenbezeichnung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ZollwertanmelderNationalitaet() As String
Get
Return Me._zollwertanmelderNationalitaet
End Get
Set
Me._zollwertanmelderNationalitaet = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ZollwertanmelderStrasseHausNr() As String
Get
Return Me._zollwertanmelderStrasseHausNr
End Get
Set
Me._zollwertanmelderStrasseHausNr = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ZollwertanmelderPLZS() As String
Get
Return Me._zollwertanmelderPLZS
End Get
Set
Me._zollwertanmelderPLZS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ZollwertanmelderOrtS() As String
Get
Return Me._zollwertanmelderOrtS
End Get
Set
Me._zollwertanmelderOrtS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ZollwertanmelderOrtsteil() As String
Get
Return Me._zollwertanmelderOrtsteil
End Get
Set
Me._zollwertanmelderOrtsteil = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VertreterZollwertanmelderEORI() As String
Get
Return Me._vertreterZollwertanmelderEORI
End Get
Set
Me._vertreterZollwertanmelderEORI = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VertreterZollwertanmelderFirmenbezeichnung() As String
Get
Return Me._vertreterZollwertanmelderFirmenbezeichnung
End Get
Set
Me._vertreterZollwertanmelderFirmenbezeichnung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VertreterZollwertanmelderNationalitaet() As String
Get
Return Me._vertreterZollwertanmelderNationalitaet
End Get
Set
Me._vertreterZollwertanmelderNationalitaet = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VertreterZollwertanmelderStrasseHausNr() As String
Get
Return Me._vertreterZollwertanmelderStrasseHausNr
End Get
Set
Me._vertreterZollwertanmelderStrasseHausNr = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VertreterZollwertanmelderPLZS() As String
Get
Return Me._vertreterZollwertanmelderPLZS
End Get
Set
Me._vertreterZollwertanmelderPLZS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VertreterZollwertanmelderOrtS() As String
Get
Return Me._vertreterZollwertanmelderOrtS
End Get
Set
Me._vertreterZollwertanmelderOrtS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VertreterZollwertanmelderOrtsteil() As String
Get
Return Me._vertreterZollwertanmelderOrtsteil
End Get
Set
Me._vertreterZollwertanmelderOrtsteil = 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
Me._vertretungsverhaeltnis = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property FruehereEntscheidungen() As String
Get
Return Me._fruehereEntscheidungen
End Get
Set
Me._fruehereEntscheidungen = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Verbundenheit() As String
Get
Return Me._verbundenheit
End Get
Set
Me._verbundenheit = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VerbundenheitEinzelheiten() As String
Get
Return Me._verbundenheitEinzelheiten
End Get
Set
Me._verbundenheitEinzelheiten = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property EinschraenkungenKz() As String
Get
Return Me._einschraenkungenKz
End Get
Set
Me._einschraenkungenKz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property BedingungenLeistungenKz() As String
Get
Return Me._bedingungenLeistungenKz
End Get
Set
Me._bedingungenLeistungenKz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property BedingungenLeistungenArt() As String
Get
Return Me._bedingungenLeistungenArt
End Get
Set
Me._bedingungenLeistungenArt = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property LizenzgebuehrenKz() As String
Get
Return Me._lizenzgebuehrenKz
End Get
Set
Me._lizenzgebuehrenKz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property LizenzgebuehrenUmstand() As String
Get
Return Me._lizenzgebuehrenUmstand
End Get
Set
Me._lizenzgebuehrenUmstand = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property SpezielleVereinbarungKz() As String
Get
Return Me._spezielleVereinbarungKz
End Get
Set
Me._spezielleVereinbarungKz = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property SpezielleVereinbarungUmstand() As String
Get
Return Me._spezielleVereinbarungUmstand
End Get
Set
Me._spezielleVereinbarungUmstand = 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
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
Me._empfaengerNLNR = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property EmpfaengerFirmenbezeichnung() As String
Get
Return Me._empfaengerFirmenbezeichnung
End Get
Set
Me._empfaengerFirmenbezeichnung = 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
Me._empfaengerNationalitaet = 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
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
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
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
Me._empfaengerOrtsteil = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property DatenuebermittlungEORI() As String
Get
Return Me._datenuebermittlungEORI
End Get
Set
Me._datenuebermittlungEORI = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ErwerberAndererMitgliedstaatEORI() As String
Get
Return Me._erwerberAndererMitgliedstaatEORI
End Get
Set
Me._erwerberAndererMitgliedstaatEORI = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ErwerberAndererMitgliedstaatNLNR() As String
Get
Return Me._erwerberAndererMitgliedstaatNLNR
End Get
Set
Me._erwerberAndererMitgliedstaatNLNR = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ErwerberFirmenbezeichnung() As String
Get
Return Me._erwerberFirmenbezeichnung
End Get
Set
Me._erwerberFirmenbezeichnung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ErwerberNationalitaet() As String
Get
Return Me._erwerberNationalitaet
End Get
Set
Me._erwerberNationalitaet = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ErwerberStrasseHausNr() As String
Get
Return Me._erwerberStrasseHausNr
End Get
Set
Me._erwerberStrasseHausNr = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ErwerberPLZS() As String
Get
Return Me._erwerberPLZS
End Get
Set
Me._erwerberPLZS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ErwerberOrtS() As String
Get
Return Me._erwerberOrtS
End Get
Set
Me._erwerberOrtS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ErwerberOrtsteil() As String
Get
Return Me._erwerberOrtsteil
End Get
Set
Me._erwerberOrtsteil = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("ErwerberUSt-Id-NrAndererMitgliedstaat", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property ErwerberUStIdNrAndererMitgliedstaat() As String
Get
Return Me._erwerberUStIdNrAndererMitgliedstaat
End Get
Set
Me._erwerberUStIdNrAndererMitgliedstaat = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VersenderAusfuehrerEORI() As String
Get
Return Me._versenderAusfuehrerEORI
End Get
Set
Me._versenderAusfuehrerEORI = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VersenderAusfuehrerFirmenbezeichnung() As String
Get
Return Me._versenderAusfuehrerFirmenbezeichnung
End Get
Set
Me._versenderAusfuehrerFirmenbezeichnung = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VersenderAusfuehrerNationalitaet() As String
Get
Return Me._versenderAusfuehrerNationalitaet
End Get
Set
Me._versenderAusfuehrerNationalitaet = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VersenderAusfuehrerStrasseHausNr() As String
Get
Return Me._versenderAusfuehrerStrasseHausNr
End Get
Set
Me._versenderAusfuehrerStrasseHausNr = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VersenderAusfuehrerPLZS() As String
Get
Return Me._versenderAusfuehrerPLZS
End Get
Set
Me._versenderAusfuehrerPLZS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VersenderAusfuehrerOrtS() As String
Get
Return Me._versenderAusfuehrerOrtS
End Get
Set
Me._versenderAusfuehrerOrtS = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property VersenderAusfuehrerOrtsteil() As String
Get
Return Me._versenderAusfuehrerOrtsteil
End Get
Set
Me._versenderAusfuehrerOrtsteil = Value
End Set
End Property
<System.Xml.Serialization.XmlElementAttribute("Unterlage", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
Public Property Unterlage() As List(Of AnmeldungVBTyp)
Get
Return Me._unterlage
End Get
Set
Me._unterlage = Value
End Set
End Property
Private Shared ReadOnly Property Serializer() As XmlSerializer
Get
If (sSerializer Is Nothing) Then
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(KopfdatenBefundVereinfachteZollanmeldungTyp))
End If
Return sSerializer
End Get
End Property
#Region "Serialize/Deserialize"
''' <summary>
''' Serializes current KopfdatenBefundVereinfachteZollanmeldungTyp 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 KopfdatenBefundVereinfachteZollanmeldungTyp object
''' </summary>
''' <param name="input">string workflow markup to deserialize</param>
''' <param name="obj">Output KopfdatenBefundVereinfachteZollanmeldungTyp 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 KopfdatenBefundVereinfachteZollanmeldungTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, KopfdatenBefundVereinfachteZollanmeldungTyp)
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 KopfdatenBefundVereinfachteZollanmeldungTyp) 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 KopfdatenBefundVereinfachteZollanmeldungTyp
Dim stringReader As System.IO.StringReader = Nothing
Try
stringReader = New System.IO.StringReader(input)
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), KopfdatenBefundVereinfachteZollanmeldungTyp)
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 KopfdatenBefundVereinfachteZollanmeldungTyp
Return CType(Serializer.Deserialize(s), KopfdatenBefundVereinfachteZollanmeldungTyp)
End Function
#End Region
''' <summary>
''' Serializes current KopfdatenBefundVereinfachteZollanmeldungTyp 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 KopfdatenBefundVereinfachteZollanmeldungTyp object
''' </summary>
''' <param name="fileName">string xml file to load and deserialize</param>
''' <param name="obj">Output KopfdatenBefundVereinfachteZollanmeldungTyp 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 KopfdatenBefundVereinfachteZollanmeldungTyp, ByRef exception As System.Exception) As Boolean
exception = Nothing
obj = CType(Nothing, KopfdatenBefundVereinfachteZollanmeldungTyp)
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 KopfdatenBefundVereinfachteZollanmeldungTyp) 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 KopfdatenBefundVereinfachteZollanmeldungTyp
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.3056.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
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
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
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
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
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
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
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(BefundVereinfachteZollanmeldungVBTyp)),
System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.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
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