report & service fixes

This commit is contained in:
Jonathan Jenne
2023-12-21 16:28:14 +01:00
parent 73cb1d8963
commit 119f54e8aa
14 changed files with 492 additions and 95 deletions

View File

@@ -111,6 +111,12 @@ Namespace Jobs
Throw New ApplicationException("Document could not be finalized")
End If
Logger.Debug("Setting envelope status..")
If ActionService.FinalizeEnvelope(oEnvelope) = False Then
Logger.Warn("Envelope could not be finalized!")
Throw New ApplicationException("Envelope could not be finalized")
End If
Logger.Debug("Creating report..")
Dim oReport As Byte() = ReportCreator.CreateReport(oEnvelope)
@@ -126,16 +132,10 @@ Namespace Jobs
Try
File.WriteAllBytes(oOutputFilePath, oMergedDocument)
Catch ex As Exception
Logger.Warn("Could not export final document to disk!")
Throw New ExportDocumentException("Could not export final document to disk!", ex)
Logger.Error(ex)
End Try
Logger.Debug("Setting envelope status..")
If ActionService.FinalizeEnvelope(oEnvelope) = False Then
Logger.Warn("Envelope could not be finalized!")
Throw New ApplicationException("Envelope could not be finalized")
End If
oCurrent += 1
Logger.Info("Envelope finalized!")
@@ -149,9 +149,11 @@ Namespace Jobs
Catch ex As Exception
Logger.Warn("Certificate Document job failed!")
Logger.Error(ex)
Finally
Logger.Info("Job execution for [{0}] ended", JobId)
End Try
Logger.Info("Job execution for [{0}] ended", JobId)
Return Task.FromResult(True)
End Function
Private Function MergeDocuments(pDocument As Byte(), pReport As Byte()) As Byte()