Option Explicit
'**********************************************************************************************
'* 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
'**********************************************************************************************
Public Const ERR_TO_XML_FAILED = 1
Public Const ERR_PARSING_XML = 2
Public Const ERR_UNEXPECTED_ATTRIBUTE = 3
Public Const ERR_MISSING_ATTRIBUTE = 4
Public Const ERR_MISSING_ELEMENT = 5
Public Const ERR_UNEXPECTED_ELEMENT = 6
Public Const ERR_INVALID_STATE = 7
Public Const ERR_PROHIBITED_PROPERTY = 8
Public Const ERR_INVALID_VALUE = 9
Public Const ERR_INVALID_COUNT = 10

private m_ClassFactory as MusicStoreLib.ClassFactory
Public  g_ClsDataAlbumType as LtXmlComLib15.ClassInfo
Public  g_ClsDataError_ as LtXmlComLib15.ClassInfo
Public  g_ClsDataPriceFilter as LtXmlComLib15.ClassInfo
Public  g_ClsDataResult as LtXmlComLib15.ClassInfo
Public  g_ClsDataSearchRequest as LtXmlComLib15.ClassInfo
Public  g_ClsDataSearchResponse as LtXmlComLib15.ClassInfo
Public  g_ClsDataTrackType as LtXmlComLib15.ClassInfo
' ##HAND_CODED_BLOCK_START ID="Additional Variable Declarations"## DO NOT MODIFY ANYTHING OUTSIDE OF THESE TAGS
' Add Additional Variable Declarations...
' ##HAND_CODED_BLOCK_END ID="Additional Variable Declarations"## DO NOT MODIFY ANYTHING OUTSIDE OF THESE TAGS


public Function CF() as MusicStoreLib.ClassFactory
    If m_ClassFactory Is Nothing Then
        Set m_ClassFactory = New MusicStoreLib.ClassFactory
' ##HAND_CODED_BLOCK_START ID="Default Namespace Declarations"## DO NOT MODIFY ANYTHING OUTSIDE OF THESE TAGS
'       Add Additional namespace declarations here...
         LtXmlComLib15.DefaultXmlSerializationContext.SchemaType = LtXmlComLib15.SchemaType_XSD
'       LtXmlComLib15.DefaultXmlSerializationContext.DefaultNamespaceURI = "http://www.fpml.org/2003/FpML-4-0"
'       LtXmlComLib15.DefaultXmlSerializationContext.NamespaceAliases.Add "http://www.w3.org/2000/09/xmldsig#", "dsig"
        LtXmlComLib15.DefaultXmlSerializationContext.NamespaceAliases.Add "http://www.w3.org/2001/XMLSchema-instance", "xs"


' ##HAND_CODED_BLOCK_END ID="Default Namespace Declarations"## DO NOT MODIFY ANYTHING OUTSIDE OF THESE TAGS
    End If
    Set CF = m_ClassFactory
End Function

public Function CastToXmlObjectBase(ByVal obj as LtXmlComLib15.XmlObjectBase) as LtXmlComLib15.XmlObjectBase
    set CastToXmlObjectBase = obj
End Function

public Function CastToXmlCollectionBase(ByVal obj as LtXmlComLib15.XmlCollectionBase) as LtXmlComLib15.XmlCollectionBase
    set CastToXmlCollectionBase = obj
End Function

Public Sub RegisterProduct()
    LtXmlComLib15.Register "Liquid Technologies Ltd (99 * Pro License)", "MusicStore.xsd", "H4X7QDL3UPUGLNYF000000AA"
End Sub

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

' Add Additional Methods/Properties Here...

' ##HAND_CODED_BLOCK_END ID="Additional Methods/Properties"## DO NOT MODIFY ANYTHING OUTSIDE OF THESE TAGS