Imports System.Collections.ObjectModel
Imports System.Runtime.Serialization
Imports DigitalData.Modules.Database
Imports DigitalData.Modules.Logging
Imports ECM.JobRunner.Common
Imports ECM.JobRunner.Windows.Scheduler

Public Class GetJobStatus
    Public Class GetJobStatusMethod
        Inherits Base.BaseMethod

        Private ReadOnly Scheduler As JobScheduler

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

        Public Function Run() As GetJobStatusResponse
            Return New GetJobStatusResponse With {
                .StatusItems = State.JobStatus.Entries
            }
        End Function

    End Class

    Public Class GetJobStatusResponse
        Inherits Base.BaseResponse

        <DataMember>
        Public Property StatusItems As List(Of StatusItem)
    End Class
End Class