Class ViewerManager(Of ViewTable)

Protected ReadOnly Property StoredView As ViewTable

#Region "View Object Properties"

    Enum ViewerManagerTemplate
        Unkown = 1
        TblMemorizedFilterPage = 2
        TblMemorizedAEV = 3
    End Enum

    Protected _ManagerTemplate As ViewerManagerTemplate = ViewerManagerTemplate.Unkown
    Protected ReadOnly Property ManagerTemplate As ViewerManagerTemplate
        Get
            If _ManagerTemplate = ViewerManagerTemplate.Unkown Then
                If PageID > 0 Then
                    _ManagerTemplate = ViewerManagerTemplate.TblMemorizedFilterPage
                Else
                    _ManagerTemplate = ViewerManagerTemplate.TblMemorizedAEV
                End If
            End If
            Return _ManagerTemplate
        End Get
    End Property

    Protected InitializedStoredView As Boolean = False
    Protected _StoredView As ViewTable = Nothing
    Protected ReadOnly Property StoredView As ViewTable
        Get
            If Not InitializedStoredView Then
                InitializedStoredView = True
                Select Case ManagerTemplate
                    Case ViewerManagerTemplate.TblMemorizedFilterPage
                        If PageObject.StoredViewID > 0 Then
                            _StoredView = CType(CType(BOs.CustomGridBO.GetMemorizedFilterPage(PageObject.StoredViewID), Object), ViewTable)
                        End If
                End Select
            End If
            Return _StoredView
        End Get
    End Property
#End Region

_StoredView = CType(CType(BOs.CustomGridBO.GetMemorizedFilterPage(PageObject.StoredViewID), Object), ViewTable)