Jobs: Improve logging

This commit is contained in:
Jonathan Jenne 2023-12-20 15:29:27 +01:00
parent 726c3481e5
commit 71e9fe7cd2

View File

@ -160,7 +160,7 @@ Public Class ImportZUGFeRDFiles
Dim oMessageId As String = oFileGroup.Key Dim oMessageId As String = oFileGroup.Key
Dim oMD5CheckSum As String = String.Empty Dim oMD5CheckSum As String = String.Empty
_logger.Info("Start processing file group {0}", oMessageId) _logger.Info("START processing file group {0}", oMessageId)
If _file.CheckFileAge(oFileGroupFiles, oArgs.MinFileAgeInMinutes) Then If _file.CheckFileAge(oFileGroupFiles, oArgs.MinFileAgeInMinutes) Then
_logger.Info("At least one file was created less than [{0}] minutes ago. Skipping file group.", oArgs.MinFileAgeInMinutes) _logger.Info("At least one file was created less than [{0}] minutes ago. Skipping file group.", oArgs.MinFileAgeInMinutes)
@ -378,7 +378,7 @@ Public Class ImportZUGFeRDFiles
' Move all files of the current group ' Move all files of the current group
_file.MoveFiles(oArgs, oMessageId, oFileGroupFiles, oEmailAttachmentFiles, oEmbeddedAttachmentFiles, oMoveDirectory, oIsSuccess) _file.MoveFiles(oArgs, oMessageId, oFileGroupFiles, oEmailAttachmentFiles, oEmbeddedAttachmentFiles, oMoveDirectory, oIsSuccess)
End If End If
_logger.Info("Finished processing file group {0}", oMessageId) _logger.Info("END processing file group {0}", oMessageId)
Catch ex As Exception Catch ex As Exception
' Send Email to Digital Data ' Send Email to Digital Data
Dim oBody = _email.CreateBodyForUnhandledException(oMessageId, ex) Dim oBody = _email.CreateBodyForUnhandledException(oMessageId, ex)