ZUGFeRDService: Add IgnoreRejectionStatus Parameter

2021-07-12 10:39:38 +02:00
parent 0667d31813
commit 45de1d6122
4 changed files with 25 additions and 6 deletions
--- a/Services.ZUGFeRDService/ThreadRunner.vb
+++ b/Services.ZUGFeRDService/ThreadRunner.vb
@@ -50,7 +50,8 @@ Public Class ThreadRunner
        End Try

        Dim oArgs As New WorkerArgs With {
-            .ExceptionEmailAddress = _config.Config.ExceptionEmailAddress
+            .ExceptionEmailAddress = _config.Config.ExceptionEmailAddress,
+            .IgnoreRejectionStatus = _config.Config.Custom.IgnoreRejectionStatus
        }
        oArgs = LoadFolderConfig(oArgs)
        oArgs = LoadPropertyMapFor(oArgs, "DEFAULT")