remove history item
This commit is contained in:
parent
b1e95bc942
commit
835467f0d7
@ -1,37 +0,0 @@
|
|||||||
Imports DigitalData.Modules.Base
|
|
||||||
Imports DigitalData.Modules.Logging
|
|
||||||
Imports ECM.JobRunner.Common
|
|
||||||
|
|
||||||
Namespace Scheduler
|
|
||||||
Public Class JobHistory
|
|
||||||
Inherits BaseClass
|
|
||||||
|
|
||||||
Public ReadOnly Entries As New List(Of HistoryItem)
|
|
||||||
|
|
||||||
Public Sub New(pLogConfig As LogConfig)
|
|
||||||
MyBase.New(pLogConfig)
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Public Sub AddSuccess(pName As String, pMessage As String, pSteps As List(Of HistoryItem.HistoryStep))
|
|
||||||
Entries.Add(New HistoryItem With {
|
|
||||||
.CreatedAt = Now,
|
|
||||||
.JobName = pName,
|
|
||||||
.Successful = True,
|
|
||||||
.ErrorMessage = Nothing,
|
|
||||||
.Message = pMessage,
|
|
||||||
.Steps = pSteps
|
|
||||||
})
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Public Sub AddError(pName As String, ErrorMessage As String, pSteps As List(Of HistoryItem.HistoryStep))
|
|
||||||
Entries.Add(New HistoryItem With {
|
|
||||||
.CreatedAt = Now,
|
|
||||||
.JobName = pName,
|
|
||||||
.Successful = False,
|
|
||||||
.ErrorMessage = ErrorMessage,
|
|
||||||
.Message = "",
|
|
||||||
.Steps = pSteps
|
|
||||||
})
|
|
||||||
End Sub
|
|
||||||
End Class
|
|
||||||
End Namespace
|
|
||||||
@ -12,7 +12,6 @@ Public Class State
|
|||||||
Private ReadOnly Database As MSSQLServer
|
Private ReadOnly Database As MSSQLServer
|
||||||
Private ReadOnly Windream As Windream
|
Private ReadOnly Windream As Windream
|
||||||
|
|
||||||
Public ReadOnly JobHistory As JobHistory
|
|
||||||
Public ReadOnly JobStatus As JobStatus
|
Public ReadOnly JobStatus As JobStatus
|
||||||
|
|
||||||
Public ReadOnly Property JobTypes As New List(Of JobType)
|
Public ReadOnly Property JobTypes As New List(Of JobType)
|
||||||
@ -29,7 +28,6 @@ Public Class State
|
|||||||
MyBase.New(pLogConfig)
|
MyBase.New(pLogConfig)
|
||||||
Database = pDatabase
|
Database = pDatabase
|
||||||
Windream = pWindream
|
Windream = pWindream
|
||||||
JobHistory = New JobHistory(pLogConfig)
|
|
||||||
JobStatus = New JobStatus(pLogConfig)
|
JobStatus = New JobStatus(pLogConfig)
|
||||||
|
|
||||||
LoadData()
|
LoadData()
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user