remove history item

This commit is contained in:
Jonathan Jenne 2022-12-20 11:57:31 +01:00
parent b1e95bc942
commit 835467f0d7
2 changed files with 0 additions and 39 deletions

View File

@ -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

View File

@ -12,7 +12,6 @@ Public Class State
Private ReadOnly Database As MSSQLServer
Private ReadOnly Windream As Windream
Public ReadOnly JobHistory As JobHistory
Public ReadOnly JobStatus As JobStatus
Public ReadOnly Property JobTypes As New List(Of JobType)
@ -29,7 +28,6 @@ Public Class State
MyBase.New(pLogConfig)
Database = pDatabase
Windream = pWindream
JobHistory = New JobHistory(pLogConfig)
JobStatus = New JobStatus(pLogConfig)
LoadData()