Imports DigitalData.Modules.Base
Imports DigitalData.Modules.Database

Public Class EnvelopeListController
    Inherits BaseClass
    Private ReadOnly Database As MSSQLServer
    Private ReadOnly State As State
    Private ReadOnly EnvelopeModel As EnvelopeModel

    Public Sub New(pState As State)
        MyBase.New(pState.LogConfig)
        Database = pState.Database
        State = pState
        EnvelopeModel = New EnvelopeModel(pState)
    End Sub

    Public Function ListEnvelopes() As IEnumerable(Of Envelope)
        Return EnvelopeModel.List()
    End Function

End Class