Namespace Persons.Business ''' ''' Contains embedded schema and configuration data that is used by the ''' Persons.TblUserRoleTable class ''' to initialize the class's TableDefinition. ''' ''' Public Class TblUserRoleDefinition #Region "Definition (XML) for TblUserRoleDefinition table" 'Next 150 lines contain Table Definition (XML) for table "TblUserRoleDefinition" 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( "UserRoleId") tbf.Append( "User Role") tbf.Append( "Number") tbf.Append( "int") tbf.Append( "10.0") tbf.Append( "") tbf.Append( "") tbf.Append( "Y") tbf.Append( "Y") tbf.Append( "") tbf.Append( "") tbf.Append( "Y") tbf.Append( "N") tbf.Append( "Y") tbf.Append( "Y") tbf.Append( "Y") tbf.Append( "N") 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( "PersonalId") tbf.Append( "Personal") tbf.Append( "String") tbf.Append( "nvarchar") tbf.Append( "13") 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( "") tbf.Append( "FK_tblUserRole_PersonalId") tbf.Append( "Persons.Business.PersonalIdTable, App_Code") tbf.Append( "dbo") tbf.Append( "PersonalId") tbf.Append( "PersonalName") tbf.Append( "Explicit") 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( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "RoleId") tbf.Append( "Role") tbf.Append( "Number") tbf.Append( "tinyint") tbf.Append( "3.0") 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( "") tbf.Append( "N") tbf.Append( "%ISD_DEFAULT%") tbf.Append( "") tbf.Append( "Y") tbf.Append( "") tbf.Append( "FK_tblUserRole_tblRole") tbf.Append( "Persons.Business.TblRoleTable, App_Code") tbf.Append( "dbo") tbf.Append( "RoleId") tbf.Append( "Role") tbf.Append( "Explicit") 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( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "") tbf.Append( "tblUserRole") tbf.Append( "1") tbf.Append( "dbo") tbf.Append( "TblUserRole") tbf.Append( "TblUserRole_") 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( "Y") tbf.Append( "RoleId") tbf.Append( "PersonalId") tbf.Append("") _DefinitionString = tbf.ToString() End If Return _DefinitionString End Function End Class End Namespace