'' ------------------------------------------------------------------------------
''  <auto-generated>
''    Generated by Xsd2Code++. Version 6.0.0.0. www.xsd2code.com
''    {"TargetFramework":"Net48","NameSpace":"StornierungBescheid_003","Language":"VisualBasic","Properties":{},"XmlAttribute":{"Enabled":true},"ClassParams":{},"Serialization":{"ShouldSerialize":{},"AdditionalSerializers":{},"XmlSerializerEvent":{},"XmlOutput":{},"JsonOutput":{},"Enabled":true},"Miscellaneous":{}}
''  </auto-generated>
'' ------------------------------------------------------------------------------
#Disable Warning
Imports System
Imports System.Diagnostics
Imports System.Xml.Serialization
Imports System.Runtime.Serialization
Imports System.Collections
Imports System.Xml.Schema
Imports System.ComponentModel
Imports System.Xml
Imports System.IO
Imports System.Text
Imports System.Collections.Generic

Namespace StornierungBescheid_003

    <System.CodeDom.Compiler.GeneratedCode("System.Xml", "4.8.9037.0"),
     System.Serializable,
     DebuggerStepThrough,
     DesignerCategoryAttribute("code"),
     XmlRoot("StornierungBescheid", [Namespace]:="", IsNullable:=False)>
    Partial Public Class StornierungBescheidREVTyp
        Inherits DatenaustauschFreierVerkehrTyp

#Region "Private fields"
        Private _einzelStornierungBescheid As EinzelStornierungBescheidTyp

        Private Shared _serializerXml As XmlSerializer
#End Region

        Public Sub New()
            MyBase.New
            Me._einzelStornierungBescheid = New EinzelStornierungBescheidTyp()
        End Sub

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property EinzelStornierungBescheid() As EinzelStornierungBescheidTyp
            Get
                Return Me._einzelStornierungBescheid
            End Get
            Set
                Me._einzelStornierungBescheid = Value
            End Set
        End Property

        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(StornierungBescheidREVTyp))
                End If
                Return _serializerXml
            End Get
        End Property

#Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize StornierungBescheidREVTyp object
        ''' </summary>
        ''' <returns>XML value</returns>
        Public Overridable Function Serialize() As String
            Dim streamReader As StreamReader = Nothing
            Dim memoryStream As MemoryStream = Nothing
            Try
                memoryStream = New MemoryStream()
                Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
                Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
                SerializerXml.Serialize(xmlWriter, Me)
                memoryStream.Seek(0, SeekOrigin.Begin)
                streamReader = New 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 StornierungBescheidREVTyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output StornierungBescheidREVTyp 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 StornierungBescheidREVTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, StornierungBescheidREVTyp)
            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 StornierungBescheidREVTyp) 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 StornierungBescheidREVTyp
            Dim stringReader As StringReader = Nothing
            Try
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)), StornierungBescheidREVTyp)
            Finally
                If (Not (stringReader) Is Nothing) Then
                    stringReader.Dispose()
                End If
            End Try
        End Function

        Public Overloads Shared Function Deserialize(ByVal s As Stream) As StornierungBescheidREVTyp
            Return CType(SerializerXml.Deserialize(s), StornierungBescheidREVTyp)
        End Function
#End Region

        ''' <summary>
        ''' Serializes current StornierungBescheidREVTyp 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 StreamWriter = Nothing
            Try
                Dim dataString As String = Serialize()
                Dim outputFile As FileInfo = New FileInfo(fileName)
                streamWriter = outputFile.CreateText
                streamWriter.WriteLine(dataString)
                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 StornierungBescheidREVTyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output StornierungBescheidREVTyp 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 StornierungBescheidREVTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, StornierungBescheidREVTyp)
            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 StornierungBescheidREVTyp) 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 StornierungBescheidREVTyp
            Dim file As FileStream = Nothing
            Dim sr As StreamReader = Nothing
            Try
                file = New FileStream(fileName, FileMode.Open, FileAccess.Read)
                sr = New StreamReader(file)
                Dim dataString As String = sr.ReadToEnd
                sr.Close()
                file.Close()
                Return Deserialize(dataString)
            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.GeneratedCode("System.Xml", "4.8.9037.0"),
     System.Serializable,
     DebuggerStepThrough,
     DesignerCategoryAttribute("code")>
    Partial Public Class EinzelStornierungBescheidTyp

#Region "Private fields"
        Private _objektIdentifizierung As ObjektIdentifizierungREVTyp

        Private _kopfDaten As KopfDatenStornierungBescheidTyp

        Private Shared _serializerXml As XmlSerializer
#End Region

        Public Sub New()
            MyBase.New
            Me._kopfDaten = New KopfDatenStornierungBescheidTyp()
            Me._objektIdentifizierung = New ObjektIdentifizierungREVTyp()
        End Sub

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ObjektIdentifizierung() As ObjektIdentifizierungREVTyp
            Get
                Return Me._objektIdentifizierung
            End Get
            Set
                Me._objektIdentifizierung = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property KopfDaten() As KopfDatenStornierungBescheidTyp
            Get
                Return Me._kopfDaten
            End Get
            Set
                Me._kopfDaten = Value
            End Set
        End Property

        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(EinzelStornierungBescheidTyp))
                End If
                Return _serializerXml
            End Get
        End Property

#Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize EinzelStornierungBescheidTyp object
        ''' </summary>
        ''' <returns>XML value</returns>
        Public Overridable Function Serialize() As String
            Dim streamReader As StreamReader = Nothing
            Dim memoryStream As MemoryStream = Nothing
            Try
                memoryStream = New MemoryStream()
                Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
                Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
                SerializerXml.Serialize(xmlWriter, Me)
                memoryStream.Seek(0, SeekOrigin.Begin)
                streamReader = New 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 EinzelStornierungBescheidTyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output EinzelStornierungBescheidTyp 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 EinzelStornierungBescheidTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, EinzelStornierungBescheidTyp)
            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 EinzelStornierungBescheidTyp) 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 EinzelStornierungBescheidTyp
            Dim stringReader As StringReader = Nothing
            Try
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)), EinzelStornierungBescheidTyp)
            Finally
                If (Not (stringReader) Is Nothing) Then
                    stringReader.Dispose()
                End If
            End Try
        End Function

        Public Overloads Shared Function Deserialize(ByVal s As Stream) As EinzelStornierungBescheidTyp
            Return CType(SerializerXml.Deserialize(s), EinzelStornierungBescheidTyp)
        End Function
#End Region

        ''' <summary>
        ''' Serializes current EinzelStornierungBescheidTyp 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 StreamWriter = Nothing
            Try
                Dim dataString As String = Serialize()
                Dim outputFile As FileInfo = New FileInfo(fileName)
                streamWriter = outputFile.CreateText
                streamWriter.WriteLine(dataString)
                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 EinzelStornierungBescheidTyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output EinzelStornierungBescheidTyp 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 EinzelStornierungBescheidTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, EinzelStornierungBescheidTyp)
            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 EinzelStornierungBescheidTyp) 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 EinzelStornierungBescheidTyp
            Dim file As FileStream = Nothing
            Dim sr As StreamReader = Nothing
            Try
                file = New FileStream(fileName, FileMode.Open, FileAccess.Read)
                sr = New StreamReader(file)
                Dim dataString As String = sr.ReadToEnd
                sr.Close()
                file.Close()
                Return Deserialize(dataString)
            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.GeneratedCode("System.Xml", "4.8.9037.0"),
     System.Serializable,
     DebuggerStepThrough,
     DesignerCategoryAttribute("code")>
    Partial Public Class ObjektIdentifizierungREVTyp

#Region "Private fields"
        Private _objektName As String

        Private _objektAlias As String

        Private _eDIFACTNachrichtenNr As String

        Private _zeitpunktEingang As Date

        Private _shipmentReferenz As String

        Private Shared _serializerXml As XmlSerializer
#End Region

        <XmlElement(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

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ObjektAlias() As String
            Get
                Return Me._objektAlias
            End Get
            Set
                Me._objektAlias = Value
            End Set
        End Property

        <XmlElement(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

        <XmlElement(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

        <XmlElement(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 SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(ObjektIdentifizierungREVTyp))
                End If
                Return _serializerXml
            End Get
        End Property

#Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize ObjektIdentifizierungREVTyp object
        ''' </summary>
        ''' <returns>XML value</returns>
        Public Overridable Function Serialize() As String
            Dim streamReader As StreamReader = Nothing
            Dim memoryStream As MemoryStream = Nothing
            Try
                memoryStream = New MemoryStream()
                Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
                Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
                SerializerXml.Serialize(xmlWriter, Me)
                memoryStream.Seek(0, SeekOrigin.Begin)
                streamReader = New 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 ObjektIdentifizierungREVTyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output ObjektIdentifizierungREVTyp 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 ObjektIdentifizierungREVTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ObjektIdentifizierungREVTyp)
            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 ObjektIdentifizierungREVTyp) 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 ObjektIdentifizierungREVTyp
            Dim stringReader As StringReader = Nothing
            Try
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)), ObjektIdentifizierungREVTyp)
            Finally
                If (Not (stringReader) Is Nothing) Then
                    stringReader.Dispose()
                End If
            End Try
        End Function

        Public Overloads Shared Function Deserialize(ByVal s As Stream) As ObjektIdentifizierungREVTyp
            Return CType(SerializerXml.Deserialize(s), ObjektIdentifizierungREVTyp)
        End Function
#End Region

        ''' <summary>
        ''' Serializes current ObjektIdentifizierungREVTyp 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 StreamWriter = Nothing
            Try
                Dim dataString As String = Serialize()
                Dim outputFile As FileInfo = New FileInfo(fileName)
                streamWriter = outputFile.CreateText
                streamWriter.WriteLine(dataString)
                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 ObjektIdentifizierungREVTyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output ObjektIdentifizierungREVTyp 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 ObjektIdentifizierungREVTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ObjektIdentifizierungREVTyp)
            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 ObjektIdentifizierungREVTyp) 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 ObjektIdentifizierungREVTyp
            Dim file As FileStream = Nothing
            Dim sr As StreamReader = Nothing
            Try
                file = New FileStream(fileName, FileMode.Open, FileAccess.Read)
                sr = New StreamReader(file)
                Dim dataString As String = sr.ReadToEnd
                sr.Close()
                file.Close()
                Return Deserialize(dataString)
            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.GeneratedCode("System.Xml", "4.8.9037.0"),
     System.Serializable,
     DebuggerStepThrough,
     DesignerCategoryAttribute("code")>
    Partial Public Class ApplicationInternalDataAdditionalDetailsDataType

#Region "Private fields"
        Private _key As String

        Private _value As String

        Private Shared _serializerXml As XmlSerializer
#End Region

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property Key() As String
            Get
                Return Me._key
            End Get
            Set
                Me._key = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property Value() As String
            Get
                Return Me._value
            End Get
            Set
                Me._value = Value
            End Set
        End Property

        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(ApplicationInternalDataAdditionalDetailsDataType))
                End If
                Return _serializerXml
            End Get
        End Property

#Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize ApplicationInternalDataAdditionalDetailsDataType object
        ''' </summary>
        ''' <returns>XML value</returns>
        Public Overridable Function Serialize() As String
            Dim streamReader As StreamReader = Nothing
            Dim memoryStream As MemoryStream = Nothing
            Try
                memoryStream = New MemoryStream()
                Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
                Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
                SerializerXml.Serialize(xmlWriter, Me)
                memoryStream.Seek(0, SeekOrigin.Begin)
                streamReader = New 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 ApplicationInternalDataAdditionalDetailsDataType object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output ApplicationInternalDataAdditionalDetailsDataType 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 ApplicationInternalDataAdditionalDetailsDataType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ApplicationInternalDataAdditionalDetailsDataType)
            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 ApplicationInternalDataAdditionalDetailsDataType) 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 ApplicationInternalDataAdditionalDetailsDataType
            Dim stringReader As StringReader = Nothing
            Try
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)), ApplicationInternalDataAdditionalDetailsDataType)
            Finally
                If (Not (stringReader) Is Nothing) Then
                    stringReader.Dispose()
                End If
            End Try
        End Function

        Public Overloads Shared Function Deserialize(ByVal s As Stream) As ApplicationInternalDataAdditionalDetailsDataType
            Return CType(SerializerXml.Deserialize(s), ApplicationInternalDataAdditionalDetailsDataType)
        End Function
#End Region

        ''' <summary>
        ''' Serializes current ApplicationInternalDataAdditionalDetailsDataType 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 StreamWriter = Nothing
            Try
                Dim dataString As String = Serialize()
                Dim outputFile As FileInfo = New FileInfo(fileName)
                streamWriter = outputFile.CreateText
                streamWriter.WriteLine(dataString)
                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 ApplicationInternalDataAdditionalDetailsDataType object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output ApplicationInternalDataAdditionalDetailsDataType 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 ApplicationInternalDataAdditionalDetailsDataType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ApplicationInternalDataAdditionalDetailsDataType)
            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 ApplicationInternalDataAdditionalDetailsDataType) 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 ApplicationInternalDataAdditionalDetailsDataType
            Dim file As FileStream = Nothing
            Dim sr As StreamReader = Nothing
            Try
                file = New FileStream(fileName, FileMode.Open, FileAccess.Read)
                sr = New StreamReader(file)
                Dim dataString As String = sr.ReadToEnd
                sr.Close()
                file.Close()
                Return Deserialize(dataString)
            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.GeneratedCode("System.Xml", "4.8.9037.0"),
     System.Serializable,
     DebuggerStepThrough,
     DesignerCategoryAttribute("code")>
    Partial Public Class ApplicationInternalDataType

#Region "Private fields"
        Private _additionalDetails As List(Of ApplicationInternalDataAdditionalDetailsDataType)

        Private Shared _serializerXml As XmlSerializer
#End Region

        Public Sub New()
            MyBase.New
            Me._additionalDetails = New List(Of ApplicationInternalDataAdditionalDetailsDataType)()
        End Sub

        <XmlArray(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified),
         XmlArrayItem("Data", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, IsNullable:=False)>
        Public Property AdditionalDetails() As List(Of ApplicationInternalDataAdditionalDetailsDataType)
            Get
                Return Me._additionalDetails
            End Get
            Set
                Me._additionalDetails = Value
            End Set
        End Property

        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(ApplicationInternalDataType))
                End If
                Return _serializerXml
            End Get
        End Property

#Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize ApplicationInternalDataType object
        ''' </summary>
        ''' <returns>XML value</returns>
        Public Overridable Function Serialize() As String
            Dim streamReader As StreamReader = Nothing
            Dim memoryStream As MemoryStream = Nothing
            Try
                memoryStream = New MemoryStream()
                Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
                Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
                SerializerXml.Serialize(xmlWriter, Me)
                memoryStream.Seek(0, SeekOrigin.Begin)
                streamReader = New 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 ApplicationInternalDataType object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output ApplicationInternalDataType 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 ApplicationInternalDataType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ApplicationInternalDataType)
            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 ApplicationInternalDataType) 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 ApplicationInternalDataType
            Dim stringReader As StringReader = Nothing
            Try
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)), ApplicationInternalDataType)
            Finally
                If (Not (stringReader) Is Nothing) Then
                    stringReader.Dispose()
                End If
            End Try
        End Function

        Public Overloads Shared Function Deserialize(ByVal s As Stream) As ApplicationInternalDataType
            Return CType(SerializerXml.Deserialize(s), ApplicationInternalDataType)
        End Function
#End Region

        ''' <summary>
        ''' Serializes current ApplicationInternalDataType 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 StreamWriter = Nothing
            Try
                Dim dataString As String = Serialize()
                Dim outputFile As FileInfo = New FileInfo(fileName)
                streamWriter = outputFile.CreateText
                streamWriter.WriteLine(dataString)
                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 ApplicationInternalDataType object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output ApplicationInternalDataType 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 ApplicationInternalDataType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ApplicationInternalDataType)
            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 ApplicationInternalDataType) 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 ApplicationInternalDataType
            Dim file As FileStream = Nothing
            Dim sr As StreamReader = Nothing
            Try
                file = New FileStream(fileName, FileMode.Open, FileAccess.Read)
                sr = New StreamReader(file)
                Dim dataString As String = sr.ReadToEnd
                sr.Close()
                file.Close()
                Return Deserialize(dataString)
            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.GeneratedCode("System.Xml", "4.8.9037.0"),
     System.Serializable,
     DebuggerStepThrough,
     DesignerCategoryAttribute("code")>
    Partial Public Class AbgabeREVTyp

#Region "Private fields"
        Private _abgabeArt As String

        Private _abgabeArtAbgabenbetrag As Decimal

        Private Shared _serializerXml As XmlSerializer
#End Region

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property AbgabeArt() As String
            Get
                Return Me._abgabeArt
            End Get
            Set
                Me._abgabeArt = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property AbgabeArtAbgabenbetrag() As Decimal
            Get
                Return Me._abgabeArtAbgabenbetrag
            End Get
            Set
                Me._abgabeArtAbgabenbetrag = Value
            End Set
        End Property

        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(AbgabeREVTyp))
                End If
                Return _serializerXml
            End Get
        End Property

#Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize AbgabeREVTyp object
        ''' </summary>
        ''' <returns>XML value</returns>
        Public Overridable Function Serialize() As String
            Dim streamReader As StreamReader = Nothing
            Dim memoryStream As MemoryStream = Nothing
            Try
                memoryStream = New MemoryStream()
                Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
                Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
                SerializerXml.Serialize(xmlWriter, Me)
                memoryStream.Seek(0, SeekOrigin.Begin)
                streamReader = New 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 AbgabeREVTyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output AbgabeREVTyp 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 AbgabeREVTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, AbgabeREVTyp)
            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 AbgabeREVTyp) 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 AbgabeREVTyp
            Dim stringReader As StringReader = Nothing
            Try
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)), AbgabeREVTyp)
            Finally
                If (Not (stringReader) Is Nothing) Then
                    stringReader.Dispose()
                End If
            End Try
        End Function

        Public Overloads Shared Function Deserialize(ByVal s As Stream) As AbgabeREVTyp
            Return CType(SerializerXml.Deserialize(s), AbgabeREVTyp)
        End Function
#End Region

        ''' <summary>
        ''' Serializes current AbgabeREVTyp 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 StreamWriter = Nothing
            Try
                Dim dataString As String = Serialize()
                Dim outputFile As FileInfo = New FileInfo(fileName)
                streamWriter = outputFile.CreateText
                streamWriter.WriteLine(dataString)
                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 AbgabeREVTyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output AbgabeREVTyp 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 AbgabeREVTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, AbgabeREVTyp)
            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 AbgabeREVTyp) 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 AbgabeREVTyp
            Dim file As FileStream = Nothing
            Dim sr As StreamReader = Nothing
            Try
                file = New FileStream(fileName, FileMode.Open, FileAccess.Read)
                sr = New StreamReader(file)
                Dim dataString As String = sr.ReadToEnd
                sr.Close()
                file.Close()
                Return Deserialize(dataString)
            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.GeneratedCode("System.Xml", "4.8.9037.0"),
     System.Serializable,
     DebuggerStepThrough,
     DesignerCategoryAttribute("code")>
    Partial Public Class KopfDatenStornierungBescheidTyp

#Region "Private fields"
        Private _zollBearbeiter As String

        Private _stornierteRegistrierNr As String

        Private _veralteteWeitereStornierteRegistrierNr As String

        Private _waehrungKz As String

        Private _registrierNrNeu As String

        Private _veralteteWeitereRegistrierNrNeu As String

        Private _stornierungstexte As String

        Private _stornierungGrund As String

        Private _dienststelleBezeichnung As String

        Private _dienststelleTelefonNr As String

        Private _dienststelleStrasseHausNr As String

        Private _dienststellePLZS As String

        Private _dienststelleOrtS As String

        Private _dienststelleOrtsteil As String

        Private _dienststellePostfach As String

        Private _dienststellePLZP As String

        Private _dienststelleOrtP As String

        Private _registrierKz As String

        Private _gesamtbetrag As Decimal

        Private _abgabe As List(Of AbgabeREVTyp)

        Private _sicherheitsregistrierKz As String

        Private _zuLeistendeBarsicherheitBetrag As Decimal

        Private _zollzahlstelleBezeichnung As String

        Private _zollzahlstelleTelefonNr As String

        Private _zollzahlstelleStrasseHausNr As String

        Private _zollzahlstellePLZS As String

        Private _zollzahlstelleOrtS As String

        Private _zollzahlstelleOrtsteil As String

        Private _zollzahlstellePostfach As String

        Private _zollzahlstellePLZP As String

        Private _zollzahlstelleOrtP As String

        Private _applicationInternalData As ApplicationInternalDataType

        Private Shared _serializerXml As XmlSerializer
#End Region

        Public Sub New()
            MyBase.New
            Me._applicationInternalData = New ApplicationInternalDataType()
            Me._abgabe = New List(Of AbgabeREVTyp)()
        End Sub

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ZollBearbeiter() As String
            Get
                Return Me._zollBearbeiter
            End Get
            Set
                Me._zollBearbeiter = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property StornierteRegistrierNr() As String
            Get
                Return Me._stornierteRegistrierNr
            End Get
            Set
                Me._stornierteRegistrierNr = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property VeralteteWeitereStornierteRegistrierNr() As String
            Get
                Return Me._veralteteWeitereStornierteRegistrierNr
            End Get
            Set
                Me._veralteteWeitereStornierteRegistrierNr = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property WaehrungKz() As String
            Get
                Return Me._waehrungKz
            End Get
            Set
                Me._waehrungKz = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property RegistrierNrNeu() As String
            Get
                Return Me._registrierNrNeu
            End Get
            Set
                Me._registrierNrNeu = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property VeralteteWeitereRegistrierNrNeu() As String
            Get
                Return Me._veralteteWeitereRegistrierNrNeu
            End Get
            Set
                Me._veralteteWeitereRegistrierNrNeu = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified, DataType:="nonNegativeInteger")>
        Public Property Stornierungstexte() As String
            Get
                Return Me._stornierungstexte
            End Get
            Set
                Me._stornierungstexte = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property StornierungGrund() As String
            Get
                Return Me._stornierungGrund
            End Get
            Set
                Me._stornierungGrund = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property DienststelleBezeichnung() As String
            Get
                Return Me._dienststelleBezeichnung
            End Get
            Set
                Me._dienststelleBezeichnung = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property DienststelleTelefonNr() As String
            Get
                Return Me._dienststelleTelefonNr
            End Get
            Set
                Me._dienststelleTelefonNr = Value
            End Set
        End Property

        <XmlElement(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

        <XmlElement(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

        <XmlElement(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

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property DienststelleOrtsteil() As String
            Get
                Return Me._dienststelleOrtsteil
            End Get
            Set
                Me._dienststelleOrtsteil = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property DienststellePostfach() As String
            Get
                Return Me._dienststellePostfach
            End Get
            Set
                Me._dienststellePostfach = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property DienststellePLZP() As String
            Get
                Return Me._dienststellePLZP
            End Get
            Set
                Me._dienststellePLZP = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property DienststelleOrtP() As String
            Get
                Return Me._dienststelleOrtP
            End Get
            Set
                Me._dienststelleOrtP = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property RegistrierKz() As String
            Get
                Return Me._registrierKz
            End Get
            Set
                Me._registrierKz = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property Gesamtbetrag() As Decimal
            Get
                Return Me._gesamtbetrag
            End Get
            Set
                Me._gesamtbetrag = Value
            End Set
        End Property

        <XmlElement("Abgabe", Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property Abgabe() As List(Of AbgabeREVTyp)
            Get
                Return Me._abgabe
            End Get
            Set
                Me._abgabe = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property SicherheitsregistrierKz() As String
            Get
                Return Me._sicherheitsregistrierKz
            End Get
            Set
                Me._sicherheitsregistrierKz = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ZuLeistendeBarsicherheitBetrag() As Decimal
            Get
                Return Me._zuLeistendeBarsicherheitBetrag
            End Get
            Set
                Me._zuLeistendeBarsicherheitBetrag = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ZollzahlstelleBezeichnung() As String
            Get
                Return Me._zollzahlstelleBezeichnung
            End Get
            Set
                Me._zollzahlstelleBezeichnung = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ZollzahlstelleTelefonNr() As String
            Get
                Return Me._zollzahlstelleTelefonNr
            End Get
            Set
                Me._zollzahlstelleTelefonNr = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ZollzahlstelleStrasseHausNr() As String
            Get
                Return Me._zollzahlstelleStrasseHausNr
            End Get
            Set
                Me._zollzahlstelleStrasseHausNr = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ZollzahlstellePLZS() As String
            Get
                Return Me._zollzahlstellePLZS
            End Get
            Set
                Me._zollzahlstellePLZS = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ZollzahlstelleOrtS() As String
            Get
                Return Me._zollzahlstelleOrtS
            End Get
            Set
                Me._zollzahlstelleOrtS = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ZollzahlstelleOrtsteil() As String
            Get
                Return Me._zollzahlstelleOrtsteil
            End Get
            Set
                Me._zollzahlstelleOrtsteil = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ZollzahlstellePostfach() As String
            Get
                Return Me._zollzahlstellePostfach
            End Get
            Set
                Me._zollzahlstellePostfach = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ZollzahlstellePLZP() As String
            Get
                Return Me._zollzahlstellePLZP
            End Get
            Set
                Me._zollzahlstellePLZP = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ZollzahlstelleOrtP() As String
            Get
                Return Me._zollzahlstelleOrtP
            End Get
            Set
                Me._zollzahlstelleOrtP = Value
            End Set
        End Property

        <XmlElement(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)>
        Public Property ApplicationInternalData() As ApplicationInternalDataType
            Get
                Return Me._applicationInternalData
            End Get
            Set
                Me._applicationInternalData = Value
            End Set
        End Property

        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(KopfDatenStornierungBescheidTyp))
                End If
                Return _serializerXml
            End Get
        End Property

#Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize KopfDatenStornierungBescheidTyp object
        ''' </summary>
        ''' <returns>XML value</returns>
        Public Overridable Function Serialize() As String
            Dim streamReader As StreamReader = Nothing
            Dim memoryStream As MemoryStream = Nothing
            Try
                memoryStream = New MemoryStream()
                Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
                Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
                SerializerXml.Serialize(xmlWriter, Me)
                memoryStream.Seek(0, SeekOrigin.Begin)
                streamReader = New 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 KopfDatenStornierungBescheidTyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output KopfDatenStornierungBescheidTyp 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 KopfDatenStornierungBescheidTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, KopfDatenStornierungBescheidTyp)
            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 KopfDatenStornierungBescheidTyp) 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 KopfDatenStornierungBescheidTyp
            Dim stringReader As StringReader = Nothing
            Try
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)), KopfDatenStornierungBescheidTyp)
            Finally
                If (Not (stringReader) Is Nothing) Then
                    stringReader.Dispose()
                End If
            End Try
        End Function

        Public Overloads Shared Function Deserialize(ByVal s As Stream) As KopfDatenStornierungBescheidTyp
            Return CType(SerializerXml.Deserialize(s), KopfDatenStornierungBescheidTyp)
        End Function
#End Region

        ''' <summary>
        ''' Serializes current KopfDatenStornierungBescheidTyp 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 StreamWriter = Nothing
            Try
                Dim dataString As String = Serialize()
                Dim outputFile As FileInfo = New FileInfo(fileName)
                streamWriter = outputFile.CreateText
                streamWriter.WriteLine(dataString)
                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 KopfDatenStornierungBescheidTyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output KopfDatenStornierungBescheidTyp 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 KopfDatenStornierungBescheidTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, KopfDatenStornierungBescheidTyp)
            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 KopfDatenStornierungBescheidTyp) 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 KopfDatenStornierungBescheidTyp
            Dim file As FileStream = Nothing
            Dim sr As StreamReader = Nothing
            Try
                file = New FileStream(fileName, FileMode.Open, FileAccess.Read)
                sr = New StreamReader(file)
                Dim dataString As String = sr.ReadToEnd
                sr.Close()
                file.Close()
                Return Deserialize(dataString)
            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.GeneratedCode("System.Xml", "4.8.9037.0"),
     System.Serializable,
     DebuggerStepThrough,
     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 _serializerXml As XmlSerializer
#End Region

        <XmlElement(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

        <XmlElement(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

        <XmlElement(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

        <XmlElement(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

        <XmlElement(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

        <XmlElement(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

        <XmlElement(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 SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(TransaktionFreierVerkehrTyp))
                End If
                Return _serializerXml
            End Get
        End Property

#Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize TransaktionFreierVerkehrTyp object
        ''' </summary>
        ''' <returns>XML value</returns>
        Public Overridable Function Serialize() As String
            Dim streamReader As StreamReader = Nothing
            Dim memoryStream As MemoryStream = Nothing
            Try
                memoryStream = New MemoryStream()
                Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
                Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
                SerializerXml.Serialize(xmlWriter, Me)
                memoryStream.Seek(0, SeekOrigin.Begin)
                streamReader = New 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 TransaktionFreierVerkehrTyp object
        ''' </summary>
        ''' <param name="input">string 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 StringReader = Nothing
            Try
                stringReader = New StringReader(input)
                Return CType(SerializerXml.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 Stream) As TransaktionFreierVerkehrTyp
            Return CType(SerializerXml.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 StreamWriter = Nothing
            Try
                Dim dataString As String = Serialize()
                Dim outputFile As FileInfo = New FileInfo(fileName)
                streamWriter = outputFile.CreateText
                streamWriter.WriteLine(dataString)
                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">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 FileStream = Nothing
            Dim sr As StreamReader = Nothing
            Try
                file = New FileStream(fileName, FileMode.Open, FileAccess.Read)
                sr = New StreamReader(file)
                Dim dataString As String = sr.ReadToEnd
                sr.Close()
                file.Close()
                Return Deserialize(dataString)
            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

    <XmlIncludeAttribute(GetType(StornierungBescheidREVTyp)),
     System.CodeDom.Compiler.GeneratedCode("System.Xml", "4.8.9037.0"),
     System.Serializable,
     DebuggerStepThrough,
     DesignerCategoryAttribute("code")>
    Partial Public Class DatenaustauschFreierVerkehrTyp

#Region "Private fields"
        Private _transaktion As TransaktionFreierVerkehrTyp

        Private Shared _serializerXml As XmlSerializer
#End Region

        Public Sub New()
            MyBase.New
            Me._transaktion = New TransaktionFreierVerkehrTyp()
        End Sub

        <XmlElement(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 SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(DatenaustauschFreierVerkehrTyp))
                End If
                Return _serializerXml
            End Get
        End Property

#Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize DatenaustauschFreierVerkehrTyp object
        ''' </summary>
        ''' <returns>XML value</returns>
        Public Overridable Function Serialize() As String
            Dim streamReader As StreamReader = Nothing
            Dim memoryStream As MemoryStream = Nothing
            Try
                memoryStream = New MemoryStream()
                Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
                Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
                SerializerXml.Serialize(xmlWriter, Me)
                memoryStream.Seek(0, SeekOrigin.Begin)
                streamReader = New 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 DatenaustauschFreierVerkehrTyp object
        ''' </summary>
        ''' <param name="input">string 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 StringReader = Nothing
            Try
                stringReader = New StringReader(input)
                Return CType(SerializerXml.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 Stream) As DatenaustauschFreierVerkehrTyp
            Return CType(SerializerXml.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 StreamWriter = Nothing
            Try
                Dim dataString As String = Serialize()
                Dim outputFile As FileInfo = New FileInfo(fileName)
                streamWriter = outputFile.CreateText
                streamWriter.WriteLine(dataString)
                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">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 FileStream = Nothing
            Dim sr As StreamReader = Nothing
            Try
                file = New FileStream(fileName, FileMode.Open, FileAccess.Read)
                sr = New StreamReader(file)
                Dim dataString As String = sr.ReadToEnd
                sr.Close()
                file.Close()
                Return Deserialize(dataString)
            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
#Enable Warning
