´╗┐Option Explicit On
Option Strict On

Imports System
Imports System.Xml

'**********************************************************************************************
'* Copyright (c) 2001-2017 Liquid Technologies Limited. All rights reserved.
'* See www.liquid-technologies.com for product details.
'*
'* Please see products End User License Agreement for distribution permissions.
'*
'* WARNING: THIS FILE IS GENERATED
'* Changes made outside of ##HAND_CODED_BLOCK_START blocks will be overwritten
'*
'* Generation  :  by Liquid XML Data Binder 15.0.1.7161
'* Using Schema: D:\Development2017\Liquid\Tools\DataBindingSamples\Samples\MusicStore\Schema\MusicStore.xsd
'**********************************************************************************************

Namespace MusicStoreLib

    ''' <summary>
    ''' This class represents the ComplexType Result
    ''' </summary>
    <LiquidTechnologies.Runtime.Net45.XmlObjectInfo(LiquidTechnologies.Runtime.Net45.XmlObjectBase.XmlElementGroupType.Sequence, _
                                                    LiquidTechnologies.Runtime.Net45.XmlObjectBase.XmlElementType.Element, _
                                                    "Result", "", true, false, _
                                                    LiquidTechnologies.Runtime.Net45.Conversions.ConversionType.type_none, Nothing, false)> _
    Public Partial Class Result
        Inherits MusicStoreLib.XmlCommonBase

        #Region "Constructors"
        ''' <summary>
        '''    Constructor for Result
        ''' </summary>
        ''' <remarks>
        '''    The class is created with all the mandatory fields populated with the
        '''    default data. 
        '''    All Collection object are created.
        '''    However any 1-n relationships (these are represented as collections) are
        '''    empty. To comply with the schema these must be populated before the xml
        '''    obtained from ToXml is valid against the schema D:\Development2017\Liquid\Tools\DataBindingSamples\Samples\MusicStore\Schema\MusicStore.xsd
        ''' </remarks>
        Public Sub New()
            _elementName = "Result"
            Init()
        End Sub
        
        Public Sub New(ByVal elementName as String)
            _elementName = elementName
            Init()
        End Sub
        #End Region

        #Region "Initialization methods for the class"
        ''' <summary>
        '''    Initializes the class
        ''' </summary>
        ''' <remarks>
        '''    The Creates all the mandatory fields (populated with the default data) 
        '''    All Collection object are created.
        '''    However any 1-n relationships (these are represented as collections) are
        '''    empty. To comply with the schema these must be populated before the xml
        '''    obtained from ToXml is valid against the schema D:\Development2017\Liquid\Tools\DataBindingSamples\Samples\MusicStore\Schema\MusicStore.xsd.
        ''' </remarks>
        Protected Overrides Sub Init()
            MusicStoreLib.Registration.iRegistrationIndicator = 0 ' causes registration to take place
            _SearchDate = new LiquidTechnologies.Runtime.Net45.XmlDateTime(LiquidTechnologies.Runtime.Net45.XmlDateTime.DateType.date)
            _Product = new MusicStoreLib.XmlObjectCollection(Of MusicStoreLib.AlbumType)("Product", "", 0, -1, false)



' ##HAND_CODED_BLOCK_START ID="Additional Inits"## DO NOT MODIFY ANYTHING OUTSIDE OF THESE TAGS

' Add Additional initialization code here...

' ##HAND_CODED_BLOCK_END ID="Additional Inits"## DO NOT MODIFY ANYTHING OUTSIDE OF THESE TAGS
        End Sub

        #End Region

        #Region "ICloneable Interface"
        ''' <summary>
        '''    Allows the class to be copied
        ''' </summary>
        ''' <remarks>
        '''    Performs a 'deep copy' of all the data in the class (and its children)
        ''' </remarks>
        Public Overrides Function Clone() As Object
            Dim newObject As New MusicStoreLib.Result(_elementName)
            Dim o As Object
            newObject._SearchDate = CType(_SearchDate.Clone(), LiquidTechnologies.Runtime.Net45.XmlDateTime)
            For Each o in _Product
                newObject._Product.Add(CType(CType(o, MusicStoreLib.AlbumType).Clone(), MusicStoreLib.AlbumType))
            Next o

            o = Nothing


' ##HAND_CODED_BLOCK_START ID="Additional clone"## DO NOT MODIFY ANYTHING OUTSIDE OF THESE TAGS

' Add Additional clone code here...

' ##HAND_CODED_BLOCK_END ID="Additional clone"## DO NOT MODIFY ANYTHING OUTSIDE OF THESE TAGS

            Return newObject
        End Function
        #End Region

        #Region "Member variables"

        Protected Overrides Readonly Property TargetNamespace() as String
            Get 
                Return ""
            End Get
        End Property

        #Region "Attribute - SearchDate"
        ''' <summary>
        ''' Represents a mandatory Element in the XML document
        ''' </summary>
        ''' <remarks>
        ''' This property is represented as an Element in the XML.
        ''' It is mandatory and therefore must be populated within the XML.
        ''' It is defaulted to new LiquidTechnologies.Runtime.Net45.XmlDateTime(LiquidTechnologies.Runtime.Net45.XmlDateTime.DateType.date).
        ''' </remarks>
        <LiquidTechnologies.Runtime.Net45.ElementInfoSeqPrimMnd("SearchDate", "", Nothing, LiquidTechnologies.Runtime.Net45.Conversions.ConversionType.type_date, Nothing, LiquidTechnologies.Runtime.Net45.WhitespaceUtils.WhitespaceRule.Collapse, "", "-1", "-1", "", "", "", "", "-1", "-1", "-1")> _
        Public Property SearchDate() as LiquidTechnologies.Runtime.Net45.XmlDateTime
            Get 
                Return _SearchDate  
            End Get
            Set(ByVal value As LiquidTechnologies.Runtime.Net45.XmlDateTime) 
                CheckElementRestriction(0, value)
                _SearchDate.SetDateTime(value, _SearchDate.Type) 
            End Set
        End Property
        Protected _SearchDate As LiquidTechnologies.Runtime.Net45.XmlDateTime

        #End Region
    
        #Region "Attribute - Product"
        ''' <summary>
        ''' A collection of Products
        ''' </summary>
        ''' <remarks>
        ''' This property is represented as an Element in the XML.
        ''' This collection may contain 0 to Many objects.
        ''' </remarks>
        <LiquidTechnologies.Runtime.Net45.ElementInfoSeqClsCol("Product", "", LiquidTechnologies.Runtime.Net45.XmlObjectBase.XmlElementType.Element)> _
        Public Readonly Property Product() As MusicStoreLib.XmlObjectCollection(Of MusicStoreLib.AlbumType)
            Get 
                Return _Product 
            End Get
        End Property
        Protected _Product As MusicStoreLib.XmlObjectCollection(Of MusicStoreLib.AlbumType)
        
        #End Region
    
        #Region "Attribute - Namespace"
        Public Overrides Readonly Property [Namespace]() As String
            Get 
                Return ""  
            End Get
        End Property
        #End Region

        #Region "Attribute - GetBase"
        Public Overrides Function GetBase() As LiquidTechnologies.Runtime.Net45.XmlObjectBase
            Return Me
        End Function
        #End Region
        #End Region


' ##HAND_CODED_BLOCK_START ID="Additional Methods"## DO NOT MODIFY ANYTHING OUTSIDE OF THESE TAGS

' Add Additional Methods and members here...

' ##HAND_CODED_BLOCK_END ID="Additional Methods"## DO NOT MODIFY ANYTHING OUTSIDE OF THESE TAGS
    End Class
End Namespace