ADMIN/DAKOSY_Worker/DAKOSY/ATLAS/NCTS/UngueltigkeitSicherheit/UngueltigkeitSicherheitenNCTSDE_004.Designer.vb

'' ------------------------------------------------------------------------------
''  <auto-generated>
''    Generated by Xsd2Code++. Version 6.0.0.0. www.xsd2code.com
''    {"TargetFramework":"Net45","NameSpace":"UngueltigkeitSicherheitenNCTSDE_004","Language":"VisualBasic","CollectionBase":"","ExcludeImportedTypes":true,"ExpandNestedAttributeGroup":true,"GenerateUnusedComplexType":true,"GenerateUnusedSimpleType":true,"Properties":{},"ClassParams":{"GenerateInSeparateFilesDirectory":""},"Serialization":{"ShouldSerialize":{},"AdditionalSerializers":{},"XmlSerializerEvent":{},"XmlOutput":{"Formating":true},"JsonOutput":{},"Enabled":true,"DefaultEncoder":"ASCII"},"Miscellaneous":{"EnableWarning":true}}
''  </auto-generated>
'' ------------------------------------------------------------------------------
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 UngueltigkeitSicherheitenNCTSDE_004
    
    <DebuggerStepThrough>  _
    Partial Public Class UngueltigkeitSicherheitenMITyp
        Inherits DatenaustauschNCTSTyp
        
        #Region "Private fields"
        Private _einzelUngueltigkeitSicherheiten As EinzelUngueltigkeitSicherheitenTyp
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Sub New()
            MyBase.New
            Me._einzelUngueltigkeitSicherheiten = New EinzelUngueltigkeitSicherheitenTyp()
        End Sub
        
        Public Property EinzelUngueltigkeitSicherheiten() As EinzelUngueltigkeitSicherheitenTyp
            Get
                Return Me._einzelUngueltigkeitSicherheiten
            End Get
            Set
                Me._einzelUngueltigkeitSicherheiten = value
            End Set
        End Property
        
        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(UngueltigkeitSicherheitenMITyp))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize UngueltigkeitSicherheitenMITyp 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 UngueltigkeitSicherheitenMITyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output UngueltigkeitSicherheitenMITyp 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 UngueltigkeitSicherheitenMITyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, UngueltigkeitSicherheitenMITyp)
            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 UngueltigkeitSicherheitenMITyp) 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 UngueltigkeitSicherheitenMITyp
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),UngueltigkeitSicherheitenMITyp)
            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 UngueltigkeitSicherheitenMITyp
            Return CType(SerializerXml.Deserialize(s),UngueltigkeitSicherheitenMITyp)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current UngueltigkeitSicherheitenMITyp 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 Overloads Overridable 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 Overloads Overridable 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 UngueltigkeitSicherheitenMITyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output UngueltigkeitSicherheitenMITyp 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 UngueltigkeitSicherheitenMITyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, UngueltigkeitSicherheitenMITyp)
            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 UngueltigkeitSicherheitenMITyp) 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 UngueltigkeitSicherheitenMITyp
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class EinzelUngueltigkeitSicherheitenTyp
        
        #Region "Private fields"
        Private _objektIdentifizierung As ObjektIdentifizierungMITyp
        
        Private _kopfDaten As KopfDatenUngueltigkeitSicherheitenTyp
        
        Private _transitOperation As TransitOperationMIType
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Sub New()
            MyBase.New
            Me._transitOperation = New TransitOperationMIType()
            Me._kopfDaten = New KopfDatenUngueltigkeitSicherheitenTyp()
            Me._objektIdentifizierung = New ObjektIdentifizierungMITyp()
        End Sub
        
        Public Property ObjektIdentifizierung() As ObjektIdentifizierungMITyp
            Get
                Return Me._objektIdentifizierung
            End Get
            Set
                Me._objektIdentifizierung = value
            End Set
        End Property
        
        Public Property KopfDaten() As KopfDatenUngueltigkeitSicherheitenTyp
            Get
                Return Me._kopfDaten
            End Get
            Set
                Me._kopfDaten = value
            End Set
        End Property
        
        Public Property TransitOperation() As TransitOperationMIType
            Get
                Return Me._transitOperation
            End Get
            Set
                Me._transitOperation = value
            End Set
        End Property
        
        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(EinzelUngueltigkeitSicherheitenTyp))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize EinzelUngueltigkeitSicherheitenTyp 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 EinzelUngueltigkeitSicherheitenTyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output EinzelUngueltigkeitSicherheitenTyp 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 EinzelUngueltigkeitSicherheitenTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, EinzelUngueltigkeitSicherheitenTyp)
            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 EinzelUngueltigkeitSicherheitenTyp) 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 EinzelUngueltigkeitSicherheitenTyp
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),EinzelUngueltigkeitSicherheitenTyp)
            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 EinzelUngueltigkeitSicherheitenTyp
            Return CType(SerializerXml.Deserialize(s),EinzelUngueltigkeitSicherheitenTyp)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current EinzelUngueltigkeitSicherheitenTyp 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 Overloads Overridable 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 Overloads Overridable 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 EinzelUngueltigkeitSicherheitenTyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output EinzelUngueltigkeitSicherheitenTyp 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 EinzelUngueltigkeitSicherheitenTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, EinzelUngueltigkeitSicherheitenTyp)
            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 EinzelUngueltigkeitSicherheitenTyp) 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 EinzelUngueltigkeitSicherheitenTyp
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class ObjektIdentifizierungMITyp
        
        #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
        
        Public Property ObjektName() As String
            Get
                Return Me._objektName
            End Get
            Set
                Me._objektName = value
            End Set
        End Property
        
        Public Property ObjektAlias() As String
            Get
                Return Me._objektAlias
            End Get
            Set
                Me._objektAlias = value
            End Set
        End Property
        
        Public Property EDIFACTNachrichtenNr() As String
            Get
                Return Me._eDIFACTNachrichtenNr
            End Get
            Set
                Me._eDIFACTNachrichtenNr = value
            End Set
        End Property
        
        Public Property ZeitpunktEingang() As Date
            Get
                Return Me._zeitpunktEingang
            End Get
            Set
                Me._zeitpunktEingang = value
            End Set
        End Property
        
        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(ObjektIdentifizierungMITyp))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize ObjektIdentifizierungMITyp 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 ObjektIdentifizierungMITyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output ObjektIdentifizierungMITyp 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 ObjektIdentifizierungMITyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ObjektIdentifizierungMITyp)
            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 ObjektIdentifizierungMITyp) 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 ObjektIdentifizierungMITyp
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),ObjektIdentifizierungMITyp)
            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 ObjektIdentifizierungMITyp
            Return CType(SerializerXml.Deserialize(s),ObjektIdentifizierungMITyp)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current ObjektIdentifizierungMITyp 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 Overloads Overridable 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 Overloads Overridable 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 ObjektIdentifizierungMITyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output ObjektIdentifizierungMITyp 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 ObjektIdentifizierungMITyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ObjektIdentifizierungMITyp)
            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 ObjektIdentifizierungMITyp) 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 ObjektIdentifizierungMITyp
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class ApplicationInternalDataAdditionalDetailsDataType
        
        #Region "Private fields"
        Private _key As String
        
        Private _value As String
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Property Key() As String
            Get
                Return Me._key
            End Get
            Set
                Me._key = value
            End Set
        End Property
        
        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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 Overloads Overridable 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 Overloads Overridable 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
    
    <DebuggerStepThrough>  _
    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
        
        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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 Overloads Overridable 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 Overloads Overridable 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
    
    <DebuggerStepThrough>  _
    Partial Public Class ErrorMIType
        
        #Region "Private fields"
        Private _errorCode As String
        
        Private _errorText As String
        
        Private _errorPointer As String
        
        Private _originalAttributeValue As String
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Property ErrorCode() As String
            Get
                Return Me._errorCode
            End Get
            Set
                Me._errorCode = value
            End Set
        End Property
        
        Public Property ErrorText() As String
            Get
                Return Me._errorText
            End Get
            Set
                Me._errorText = value
            End Set
        End Property
        
        Public Property ErrorPointer() As String
            Get
                Return Me._errorPointer
            End Get
            Set
                Me._errorPointer = value
            End Set
        End Property
        
        Public Property OriginalAttributeValue() As String
            Get
                Return Me._originalAttributeValue
            End Get
            Set
                Me._originalAttributeValue = value
            End Set
        End Property
        
        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(ErrorMIType))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize ErrorMIType 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 ErrorMIType object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output ErrorMIType 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 ErrorMIType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ErrorMIType)
            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 ErrorMIType) 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 ErrorMIType
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),ErrorMIType)
            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 ErrorMIType
            Return CType(SerializerXml.Deserialize(s),ErrorMIType)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current ErrorMIType 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 Overloads Overridable 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 Overloads Overridable 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 ErrorMIType object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output ErrorMIType 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 ErrorMIType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ErrorMIType)
            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 ErrorMIType) 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 ErrorMIType
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class RepresentativeMIType
        
        #Region "Private fields"
        Private _identificationNumber As String
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Property IdentificationNumber() As String
            Get
                Return Me._identificationNumber
            End Get
            Set
                Me._identificationNumber = value
            End Set
        End Property
        
        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(RepresentativeMIType))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize RepresentativeMIType 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 RepresentativeMIType object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output RepresentativeMIType 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 RepresentativeMIType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, RepresentativeMIType)
            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 RepresentativeMIType) 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 RepresentativeMIType
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),RepresentativeMIType)
            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 RepresentativeMIType
            Return CType(SerializerXml.Deserialize(s),RepresentativeMIType)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current RepresentativeMIType 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 Overloads Overridable 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 Overloads Overridable 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 RepresentativeMIType object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output RepresentativeMIType 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 RepresentativeMIType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, RepresentativeMIType)
            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 RepresentativeMIType) 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 RepresentativeMIType
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class HolderOfTheTransitProcedureMIType
        
        #Region "Private fields"
        Private _identificationNumber As String
        
        Private _name As String
        
        Private _streetAndNumber As String
        
        Private _city As String
        
        Private _postcode As String
        
        Private _country As String
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Property IdentificationNumber() As String
            Get
                Return Me._identificationNumber
            End Get
            Set
                Me._identificationNumber = value
            End Set
        End Property
        
        Public Property Name() As String
            Get
                Return Me._name
            End Get
            Set
                Me._name = value
            End Set
        End Property
        
        Public Property StreetAndNumber() As String
            Get
                Return Me._streetAndNumber
            End Get
            Set
                Me._streetAndNumber = value
            End Set
        End Property
        
        Public Property City() As String
            Get
                Return Me._city
            End Get
            Set
                Me._city = value
            End Set
        End Property
        
        Public Property Postcode() As String
            Get
                Return Me._postcode
            End Get
            Set
                Me._postcode = value
            End Set
        End Property
        
        Public Property Country() As String
            Get
                Return Me._country
            End Get
            Set
                Me._country = value
            End Set
        End Property
        
        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(HolderOfTheTransitProcedureMIType))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize HolderOfTheTransitProcedureMIType 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 HolderOfTheTransitProcedureMIType object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output HolderOfTheTransitProcedureMIType 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 HolderOfTheTransitProcedureMIType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, HolderOfTheTransitProcedureMIType)
            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 HolderOfTheTransitProcedureMIType) 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 HolderOfTheTransitProcedureMIType
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),HolderOfTheTransitProcedureMIType)
            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 HolderOfTheTransitProcedureMIType
            Return CType(SerializerXml.Deserialize(s),HolderOfTheTransitProcedureMIType)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current HolderOfTheTransitProcedureMIType 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 Overloads Overridable 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 Overloads Overridable 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 HolderOfTheTransitProcedureMIType object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output HolderOfTheTransitProcedureMIType 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 HolderOfTheTransitProcedureMIType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, HolderOfTheTransitProcedureMIType)
            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 HolderOfTheTransitProcedureMIType) 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 HolderOfTheTransitProcedureMIType
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class TransitOperationMIType
        
        #Region "Private fields"
        Private _departureStatus As String
        
        Private _rejectionCode As String
        
        Private _mRN As String
        
        Private _cancellationDecisionDateAndTime As Date
        
        Private _customsOfficeOfDeparture As String
        
        Private _holderOfTheTransitProcedure As HolderOfTheTransitProcedureMIType
        
        Private _representative As RepresentativeMIType
        
        Private _reason As String
        
        Private _error As List(Of ErrorMIType)
        
        Private _applicationInternalData As ApplicationInternalDataType
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Sub New()
            MyBase.New
            Me._applicationInternalData = New ApplicationInternalDataType()
            Me._error = New List(Of ErrorMIType)()
            Me._representative = New RepresentativeMIType()
            Me._holderOfTheTransitProcedure = New HolderOfTheTransitProcedureMIType()
        End Sub
        
        Public Property DepartureStatus() As String
            Get
                Return Me._departureStatus
            End Get
            Set
                Me._departureStatus = value
            End Set
        End Property
        
        Public Property RejectionCode() As String
            Get
                Return Me._rejectionCode
            End Get
            Set
                Me._rejectionCode = value
            End Set
        End Property
        
        Public Property MRN() As String
            Get
                Return Me._mRN
            End Get
            Set
                Me._mRN = value
            End Set
        End Property
        
        Public Property CancellationDecisionDateAndTime() As Date
            Get
                Return Me._cancellationDecisionDateAndTime
            End Get
            Set
                Me._cancellationDecisionDateAndTime = value
            End Set
        End Property
        
        Public Property CustomsOfficeOfDeparture() As String
            Get
                Return Me._customsOfficeOfDeparture
            End Get
            Set
                Me._customsOfficeOfDeparture = value
            End Set
        End Property
        
        Public Property HolderOfTheTransitProcedure() As HolderOfTheTransitProcedureMIType
            Get
                Return Me._holderOfTheTransitProcedure
            End Get
            Set
                Me._holderOfTheTransitProcedure = value
            End Set
        End Property
        
        Public Property Representative() As RepresentativeMIType
            Get
                Return Me._representative
            End Get
            Set
                Me._representative = value
            End Set
        End Property
        
        Public Property Reason() As String
            Get
                Return Me._reason
            End Get
            Set
                Me._reason = value
            End Set
        End Property
        
        Public Property [Error]() As List(Of ErrorMIType)
            Get
                Return Me._error
            End Get
            Set
                Me._error = value
            End Set
        End Property
        
        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(TransitOperationMIType))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize TransitOperationMIType 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 TransitOperationMIType object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output TransitOperationMIType 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 TransitOperationMIType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, TransitOperationMIType)
            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 TransitOperationMIType) 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 TransitOperationMIType
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),TransitOperationMIType)
            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 TransitOperationMIType
            Return CType(SerializerXml.Deserialize(s),TransitOperationMIType)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current TransitOperationMIType 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 Overloads Overridable 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 Overloads Overridable 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 TransitOperationMIType object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output TransitOperationMIType 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 TransitOperationMIType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, TransitOperationMIType)
            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 TransitOperationMIType) 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 TransitOperationMIType
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class FehlermeldungMITyp
        
        #Region "Private fields"
        Private _code As String
        
        Private _text As String
        
        Private _zeiger As String
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Property Code() As String
            Get
                Return Me._code
            End Get
            Set
                Me._code = value
            End Set
        End Property
        
        Public Property Text() As String
            Get
                Return Me._text
            End Get
            Set
                Me._text = value
            End Set
        End Property
        
        Public Property Zeiger() As String
            Get
                Return Me._zeiger
            End Get
            Set
                Me._zeiger = value
            End Set
        End Property
        
        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(FehlermeldungMITyp))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize FehlermeldungMITyp 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 FehlermeldungMITyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output FehlermeldungMITyp 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 FehlermeldungMITyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, FehlermeldungMITyp)
            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 FehlermeldungMITyp) 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 FehlermeldungMITyp
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),FehlermeldungMITyp)
            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 FehlermeldungMITyp
            Return CType(SerializerXml.Deserialize(s),FehlermeldungMITyp)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current FehlermeldungMITyp 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 Overloads Overridable 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 Overloads Overridable 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 FehlermeldungMITyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output FehlermeldungMITyp 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 FehlermeldungMITyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, FehlermeldungMITyp)
            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 FehlermeldungMITyp) 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 FehlermeldungMITyp
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class SicherheitMITyp
        
        #Region "Private fields"
        Private _gRN As String
        
        Private _codeUngueltigkeit As String
        
        Private _textUngueltigkeit As String
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Property GRN() As String
            Get
                Return Me._gRN
            End Get
            Set
                Me._gRN = value
            End Set
        End Property
        
        Public Property CodeUngueltigkeit() As String
            Get
                Return Me._codeUngueltigkeit
            End Get
            Set
                Me._codeUngueltigkeit = value
            End Set
        End Property
        
        Public Property TextUngueltigkeit() As String
            Get
                Return Me._textUngueltigkeit
            End Get
            Set
                Me._textUngueltigkeit = value
            End Set
        End Property
        
        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(SicherheitMITyp))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize SicherheitMITyp 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 SicherheitMITyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output SicherheitMITyp 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 SicherheitMITyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, SicherheitMITyp)
            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 SicherheitMITyp) 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 SicherheitMITyp
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),SicherheitMITyp)
            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 SicherheitMITyp
            Return CType(SerializerXml.Deserialize(s),SicherheitMITyp)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current SicherheitMITyp 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 Overloads Overridable 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 Overloads Overridable 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 SicherheitMITyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output SicherheitMITyp 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 SicherheitMITyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, SicherheitMITyp)
            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 SicherheitMITyp) 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 SicherheitMITyp
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class HauptverpflichteterAnsprechpartnerMITyp
        
        #Region "Private fields"
        Private _sachbearbeiter As String
        
        Private _stellung As String
        
        Private _telefonnummer As String
        
        Private _telefaxnummer As String
        
        Private _emailAdresse As String
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Property Sachbearbeiter() As String
            Get
                Return Me._sachbearbeiter
            End Get
            Set
                Me._sachbearbeiter = value
            End Set
        End Property
        
        Public Property Stellung() As String
            Get
                Return Me._stellung
            End Get
            Set
                Me._stellung = value
            End Set
        End Property
        
        Public Property Telefonnummer() As String
            Get
                Return Me._telefonnummer
            End Get
            Set
                Me._telefonnummer = value
            End Set
        End Property
        
        Public Property Telefaxnummer() As String
            Get
                Return Me._telefaxnummer
            End Get
            Set
                Me._telefaxnummer = value
            End Set
        End Property
        
        Public Property EmailAdresse() As String
            Get
                Return Me._emailAdresse
            End Get
            Set
                Me._emailAdresse = value
            End Set
        End Property
        
        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(HauptverpflichteterAnsprechpartnerMITyp))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize HauptverpflichteterAnsprechpartnerMITyp 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 HauptverpflichteterAnsprechpartnerMITyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output HauptverpflichteterAnsprechpartnerMITyp 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 HauptverpflichteterAnsprechpartnerMITyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, HauptverpflichteterAnsprechpartnerMITyp)
            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 HauptverpflichteterAnsprechpartnerMITyp) 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 HauptverpflichteterAnsprechpartnerMITyp
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),HauptverpflichteterAnsprechpartnerMITyp)
            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 HauptverpflichteterAnsprechpartnerMITyp
            Return CType(SerializerXml.Deserialize(s),HauptverpflichteterAnsprechpartnerMITyp)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current HauptverpflichteterAnsprechpartnerMITyp 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 Overloads Overridable 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 Overloads Overridable 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 HauptverpflichteterAnsprechpartnerMITyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output HauptverpflichteterAnsprechpartnerMITyp 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 HauptverpflichteterAnsprechpartnerMITyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, HauptverpflichteterAnsprechpartnerMITyp)
            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 HauptverpflichteterAnsprechpartnerMITyp) 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 HauptverpflichteterAnsprechpartnerMITyp
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class KopfDatenUngueltigkeitSicherheitenTyp
        
        #Region "Private fields"
        Private _arbeitsnummer As String
        
        Private _zeitpunktUngueltigkeitUnwirksamkeit As Date
        
        Private _hauptverpflichteterEORI As String
        
        Private _hauptverpflichteterNLNR As String
        
        Private _hauptverpflichteterIDCarnet As String
        
        Private _hauptverpflichteterName As String
        
        Private _hauptverpflichteterStrasseHausnummer As String
        
        Private _hauptverpflichteterLand As String
        
        Private _hauptverpflichteterPLZ As String
        
        Private _hauptverpflichteterOrt As String
        
        Private _hauptverpflichteterAnsprechpartner As HauptverpflichteterAnsprechpartnerMITyp
        
        Private _grund As String
        
        Private _sicherheit As List(Of SicherheitMITyp)
        
        Private _fehlermeldung As List(Of FehlermeldungMITyp)
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Sub New()
            MyBase.New
            Me._fehlermeldung = New List(Of FehlermeldungMITyp)()
            Me._sicherheit = New List(Of SicherheitMITyp)()
            Me._hauptverpflichteterAnsprechpartner = New HauptverpflichteterAnsprechpartnerMITyp()
        End Sub
        
        Public Property Arbeitsnummer() As String
            Get
                Return Me._arbeitsnummer
            End Get
            Set
                Me._arbeitsnummer = value
            End Set
        End Property
        
        Public Property ZeitpunktUngueltigkeitUnwirksamkeit() As Date
            Get
                Return Me._zeitpunktUngueltigkeitUnwirksamkeit
            End Get
            Set
                Me._zeitpunktUngueltigkeitUnwirksamkeit = value
            End Set
        End Property
        
        Public Property HauptverpflichteterEORI() As String
            Get
                Return Me._hauptverpflichteterEORI
            End Get
            Set
                Me._hauptverpflichteterEORI = value
            End Set
        End Property
        
        Public Property HauptverpflichteterNLNR() As String
            Get
                Return Me._hauptverpflichteterNLNR
            End Get
            Set
                Me._hauptverpflichteterNLNR = value
            End Set
        End Property
        
        Public Property HauptverpflichteterIDCarnet() As String
            Get
                Return Me._hauptverpflichteterIDCarnet
            End Get
            Set
                Me._hauptverpflichteterIDCarnet = value
            End Set
        End Property
        
        Public Property HauptverpflichteterName() As String
            Get
                Return Me._hauptverpflichteterName
            End Get
            Set
                Me._hauptverpflichteterName = value
            End Set
        End Property
        
        Public Property HauptverpflichteterStrasseHausnummer() As String
            Get
                Return Me._hauptverpflichteterStrasseHausnummer
            End Get
            Set
                Me._hauptverpflichteterStrasseHausnummer = value
            End Set
        End Property
        
        Public Property HauptverpflichteterLand() As String
            Get
                Return Me._hauptverpflichteterLand
            End Get
            Set
                Me._hauptverpflichteterLand = value
            End Set
        End Property
        
        Public Property HauptverpflichteterPLZ() As String
            Get
                Return Me._hauptverpflichteterPLZ
            End Get
            Set
                Me._hauptverpflichteterPLZ = value
            End Set
        End Property
        
        Public Property HauptverpflichteterOrt() As String
            Get
                Return Me._hauptverpflichteterOrt
            End Get
            Set
                Me._hauptverpflichteterOrt = value
            End Set
        End Property
        
        Public Property HauptverpflichteterAnsprechpartner() As HauptverpflichteterAnsprechpartnerMITyp
            Get
                Return Me._hauptverpflichteterAnsprechpartner
            End Get
            Set
                Me._hauptverpflichteterAnsprechpartner = value
            End Set
        End Property
        
        Public Property Grund() As String
            Get
                Return Me._grund
            End Get
            Set
                Me._grund = value
            End Set
        End Property
        
        Public Property Sicherheit() As List(Of SicherheitMITyp)
            Get
                Return Me._sicherheit
            End Get
            Set
                Me._sicherheit = value
            End Set
        End Property
        
        Public Property Fehlermeldung() As List(Of FehlermeldungMITyp)
            Get
                Return Me._fehlermeldung
            End Get
            Set
                Me._fehlermeldung = value
            End Set
        End Property
        
        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(KopfDatenUngueltigkeitSicherheitenTyp))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize KopfDatenUngueltigkeitSicherheitenTyp 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 KopfDatenUngueltigkeitSicherheitenTyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output KopfDatenUngueltigkeitSicherheitenTyp 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 KopfDatenUngueltigkeitSicherheitenTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, KopfDatenUngueltigkeitSicherheitenTyp)
            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 KopfDatenUngueltigkeitSicherheitenTyp) 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 KopfDatenUngueltigkeitSicherheitenTyp
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),KopfDatenUngueltigkeitSicherheitenTyp)
            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 KopfDatenUngueltigkeitSicherheitenTyp
            Return CType(SerializerXml.Deserialize(s),KopfDatenUngueltigkeitSicherheitenTyp)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current KopfDatenUngueltigkeitSicherheitenTyp 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 Overloads Overridable 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 Overloads Overridable 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 KopfDatenUngueltigkeitSicherheitenTyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output KopfDatenUngueltigkeitSicherheitenTyp 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 KopfDatenUngueltigkeitSicherheitenTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, KopfDatenUngueltigkeitSicherheitenTyp)
            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 KopfDatenUngueltigkeitSicherheitenTyp) 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 KopfDatenUngueltigkeitSicherheitenTyp
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class TransaktionNCTSTyp
        
        #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
        
        Public Property IOPartner() As String
            Get
                Return Me._iOPartner
            End Get
            Set
                Me._iOPartner = value
            End Set
        End Property
        
        Public Property IODivision1() As String
            Get
                Return Me._iODivision1
            End Get
            Set
                Me._iODivision1 = value
            End Set
        End Property
        
        Public Property IODivision2() As String
            Get
                Return Me._iODivision2
            End Get
            Set
                Me._iODivision2 = value
            End Set
        End Property
        
        Public Property IODivision3() As String
            Get
                Return Me._iODivision3
            End Get
            Set
                Me._iODivision3 = value
            End Set
        End Property
        
        Public Property IOReferenz() As String
            Get
                Return Me._iOReferenz
            End Get
            Set
                Me._iOReferenz = value
            End Set
        End Property
        
        Public Property IODatumZeit() As Date
            Get
                Return Me._iODatumZeit
            End Get
            Set
                Me._iODatumZeit = value
            End Set
        End Property
        
        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(TransaktionNCTSTyp))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize TransaktionNCTSTyp 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 TransaktionNCTSTyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output TransaktionNCTSTyp 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 TransaktionNCTSTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, TransaktionNCTSTyp)
            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 TransaktionNCTSTyp) 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 TransaktionNCTSTyp
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),TransaktionNCTSTyp)
            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 TransaktionNCTSTyp
            Return CType(SerializerXml.Deserialize(s),TransaktionNCTSTyp)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current TransaktionNCTSTyp 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 Overloads Overridable 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 Overloads Overridable 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 TransaktionNCTSTyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output TransaktionNCTSTyp 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 TransaktionNCTSTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, TransaktionNCTSTyp)
            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 TransaktionNCTSTyp) 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 TransaktionNCTSTyp
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class DatenaustauschNCTSTyp
        
        #Region "Private fields"
        Private _transaktion As TransaktionNCTSTyp
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Sub New()
            MyBase.New
            Me._transaktion = New TransaktionNCTSTyp()
        End Sub
        
        Public Property Transaktion() As TransaktionNCTSTyp
            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(DatenaustauschNCTSTyp))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize DatenaustauschNCTSTyp 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 DatenaustauschNCTSTyp object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output DatenaustauschNCTSTyp 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 DatenaustauschNCTSTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, DatenaustauschNCTSTyp)
            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 DatenaustauschNCTSTyp) 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 DatenaustauschNCTSTyp
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),DatenaustauschNCTSTyp)
            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 DatenaustauschNCTSTyp
            Return CType(SerializerXml.Deserialize(s),DatenaustauschNCTSTyp)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current DatenaustauschNCTSTyp 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 Overloads Overridable 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 Overloads Overridable 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 DatenaustauschNCTSTyp object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output DatenaustauschNCTSTyp 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 DatenaustauschNCTSTyp, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, DatenaustauschNCTSTyp)
            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 DatenaustauschNCTSTyp) 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 DatenaustauschNCTSTyp
            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
    
    <DebuggerStepThrough>  _
    Partial Public Class ApplicationInternalDataAdditionalDetailsType
        
        #Region "Private fields"
        Private _data As List(Of ApplicationInternalDataAdditionalDetailsDataType)
        
        Private Shared _serializerXml As XmlSerializer
        #End Region
        
        Public Sub New()
            MyBase.New
            Me._data = New List(Of ApplicationInternalDataAdditionalDetailsDataType)()
        End Sub
        
        Public Property Data() As List(Of ApplicationInternalDataAdditionalDetailsDataType)
            Get
                Return Me._data
            End Get
            Set
                Me._data = value
            End Set
        End Property
        
        Private Shared ReadOnly Property SerializerXml() As XmlSerializer
            Get
                If (_serializerXml Is Nothing) Then
                    _serializerXml = New XmlSerializerFactory().CreateSerializer(GetType(ApplicationInternalDataAdditionalDetailsType))
                End If
                Return _serializerXml
            End Get
        End Property
        
        #Region "Serialize/Deserialize"
        ''' <summary>
        ''' Serialize ApplicationInternalDataAdditionalDetailsType 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()
                xmlWriterSettings.Indent = true
                xmlWriterSettings.IndentChars = "  "
                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 ApplicationInternalDataAdditionalDetailsType object
        ''' </summary>
        ''' <param name="input">string to deserialize</param>
        ''' <param name="obj">Output ApplicationInternalDataAdditionalDetailsType 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 ApplicationInternalDataAdditionalDetailsType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ApplicationInternalDataAdditionalDetailsType)
            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 ApplicationInternalDataAdditionalDetailsType) 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 ApplicationInternalDataAdditionalDetailsType
            Dim stringReader As StringReader = Nothing
            Try 
                stringReader = New StringReader(input)
                Return CType(SerializerXml.Deserialize(XmlReader.Create(stringReader)),ApplicationInternalDataAdditionalDetailsType)
            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 ApplicationInternalDataAdditionalDetailsType
            Return CType(SerializerXml.Deserialize(s),ApplicationInternalDataAdditionalDetailsType)
        End Function
        #End Region
        
        ''' <summary>
        ''' Serializes current ApplicationInternalDataAdditionalDetailsType 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 Overloads Overridable 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 Overloads Overridable 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 ApplicationInternalDataAdditionalDetailsType object
        ''' </summary>
        ''' <param name="fileName">File to load and deserialize</param>
        ''' <param name="obj">Output ApplicationInternalDataAdditionalDetailsType 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 ApplicationInternalDataAdditionalDetailsType, ByRef exception As System.Exception) As Boolean
            exception = Nothing
            obj = CType(Nothing, ApplicationInternalDataAdditionalDetailsType)
            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 ApplicationInternalDataAdditionalDetailsType) 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 ApplicationInternalDataAdditionalDetailsType
            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