'############################################################################## ' Author: Kevin Koch ' Description: This class represents a facade layer and the component ' tier where business logic is contained for functionality ' regarding Availability '############################################################################## Public Class AvailabilityServices Private Const CLASS_NAME As String = "AvailabilityServices" '######################################################################################################################### ' Returns the entire availability table '######################################################################################################################### Public Function GetAllAvailability() As DataSet Const METHOD_NAME As String = "GetAllAvailability" Try Dim DbObj As AvailabilityDb = New AvailabilityDb() Return DbObj.GetAllAvailability() Catch dbEx As DbTierException 'Exception has already been logged, just throw it to the ASPX Throw dbEx Catch ex As Exception 'Exception occurred within this method, log it Log.WriteLogEntry(ex, Me.CLASS_NAME, METHOD_NAME) Throw New BizTierException(ex.Message, ex) End Try End Function End Class |