Namespace Persons.Business ''' ''' Contains embedded schema and configuration data that is used by the ''' Persons.InsigniaTable class ''' to initialize the class's TableDefinition. ''' ''' Public Class InsigniaDefinition #Region "Definition (XML) for InsigniaDefinition table" 'Next 131 lines contain Table Definition (XML) for table "InsigniaDefinition" Private Shared _DefinitionString As String = "" #End Region ''' ''' Gets the embedded schema and configuration data for the ''' ''' class's TableDefinition. ''' ''' This function is only called once at runtime. ''' An XML string. Public Shared Function GetXMLString() As String If _DefinitionString = "" Then Dim tbf As System.Text.StringBuilder = New System.Text.StringBuilder() tbf.Append("") tbf.Append( "") tbf.Append( "") tbf.Append( "InsigniaId") tbf.Append( "Insignia") tbf.Append( "Number") tbf.Append( "smallint") tbf.Append( "5.0") tbf.Append( "") tbf.Append( "") tbf.Append( "Y") tbf.Append( "Y") tbf.Append( "") tbf.Append( "") tbf.Append( "Y") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "Y") tbf.Append( "Y") tbf.Append( "N") tbf.Append( "") tbf.Append( "N") tbf.Append( "%ISD_DEFAULT%") tbf.Append( "") tbf.Append( "Y") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "InsigniaAbbr") tbf.Append( "ชื่อย่อ") tbf.Append( "String") tbf.Append( "nvarchar") tbf.Append( "9") tbf.Append( "") tbf.Append( "") tbf.Append( "N") tbf.Append( "N") tbf.Append( "") tbf.Append( "") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "Thai_CI_AS") tbf.Append( "N") tbf.Append( "%ISD_DEFAULT%") tbf.Append( "") tbf.Append( "Y") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "InsigniaName") tbf.Append( "ชื่อเต็ม") tbf.Append( "String") tbf.Append( "nvarchar") tbf.Append( "50") tbf.Append( "") tbf.Append( "") tbf.Append( "N") tbf.Append( "N") tbf.Append( "") tbf.Append( "") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "Thai_CI_AS") tbf.Append( "N") tbf.Append( "%ISD_DEFAULT%") tbf.Append( "") tbf.Append( "Y") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "N") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "Insignia") tbf.Append( "1") tbf.Append( "dbo") tbf.Append( "Insignia") tbf.Append( "Insignia_") tbf.Append( "DatabasePersons1") tbf.Append( "RowNum") tbf.Append( "Y") tbf.Append( "Y") tbf.Append( "Y") tbf.Append( "Y") tbf.Append( "BinaryChecksum") tbf.Append( "Persons") tbf.Append("") _DefinitionString = tbf.ToString() End If Return _DefinitionString End Function End Class End Namespace