Partial Public Class seriesfacturas


    Private Shared _ListadoSeries As List(Of String)
    Public Shared ReadOnly Property ListadoSeries As List(Of String)
        Get
            If _ListadoSeries Is Nothing Then
                Dim bd = bdGestionAsegasa.gestionasegasaEntities.NuevoContextoCN()
                _ListadoSeries = bd.seriesfacturas.Select(Function(x) x.Serie).ToList
            End If
            Return _ListadoSeries
        End Get
    End Property

    Public ReadOnly Property SerieDescripcion As String
        Get
            Return Me.Serie & " - " & Me.Descripcion
        End Get
    End Property
    Public ReadOnly Property DescripcionClase As String
        Get
            Return DirectCast(Me.Clase, ClaseFacturaEnum).ToString.Replace("_", " ")
        End Get
    End Property
    Public Enum ClaseFacturaEnum As Integer
        LIQUIDACIONES_A_AGENTES = 0
    End Enum
End Class