Imports DigitalData.Modules.Database
Imports DigitalData.Modules.Logging
Imports ECM.JobRunner.Common
Imports System.Runtime.Serialization

Public Class GetJobHistory
    Public Class GetJobHistoryMethod
        Inherits Base.BaseMethod

        Public Sub New(pLogConfig As LogConfig, pDatabase As MSSQLServer, pState As State)
            MyBase.New(pLogConfig, pDatabase, pState)
        End Sub

        Public Function Run() As GetJobHistoryResponse
            Return New GetJobHistoryResponse With {.Items = State.JobHistory.Entries}
        End Function
    End Class

    Public Class GetJobHistoryResponse
        Inherits Base.BaseResponse

        <DataMember>
        Public Property Items As List(Of HistoryItem)
    End Class
End Class