' This is a "safe" class, meaning that it is created once
' and never overwritten. Any custom code you add to this class
' will be preserved when you regenerate your application.
'
' Typical customizations that may be done in this class include
' - adding custom event handlers
' - overriding base class methods
Imports System
Imports System.Data.SqlTypes
Imports BaseClasses
Imports BaseClasses.Data
Imports BaseClasses.Data.SqlProvider
Namespace Persons.Business
'''
''' Provides access to the schema information and record data of the ShowPersonalIdTable custom query.
''' See for additional information.
'''
'''
''' See for additional information.
'''
''' This class is implemented using the Singleton design pattern.
'''
'''
'''
'''
'''
'''
'''
'''
Public Class ShowPersonalIdTableQuery
Inherits BaseShowPersonalIdTableQuery
Implements System.Runtime.Serialization.ISerializable, ISingleton
#Region "ISerializable Members"
'''
''' Overridden to use the class
''' for deserialization of data.
'''
'''
''' Since the class is implemented using the Singleton design pattern,
''' this method must be overridden to prevent additional instances from being created during deserialization.
'''
Protected Overridable Sub GetObjectData( _
ByVal info As System.Runtime.Serialization.SerializationInfo, _
ByVal context As System.Runtime.Serialization.StreamingContext _
) Implements System.Runtime.Serialization.ISerializable.GetObjectData
info.SetType(GetType(ShowPersonalIdTableQuery_SerializationHelper)) 'No other values need to be added
End Sub
#Region "Class ShowPersonalIdTableQuery_SerializationHelper"
Private Class ShowPersonalIdTableQuery_SerializationHelper
Implements System.Runtime.Serialization.IObjectReference
'Method called after this object is deserialized
Public Function GetRealObject(ByVal context As System.Runtime.Serialization.StreamingContext) As Object _
Implements System.Runtime.Serialization.IObjectReference.GetRealObject
Return ShowPersonalIdTableQuery.Instance
End Function
End Class
#End Region
#End Region
'''
''' References the only instance of the class.
'''
'''
''' Since the class is implemented using the Singleton design pattern,
''' this field is the only way to access an instance of the class.
'''
Public Shared ReadOnly Instance As New ShowPersonalIdTableQuery()
Private Sub New()
MyBase.New()
End Sub
End Class
End Namespace