ZUGFeRDService: Add IgnoreRejectionStatus Parameter

This commit is contained in:
Jonathan Jenne
2021-07-12 10:39:38 +02:00
parent 0667d31813
commit 45de1d6122
4 changed files with 25 additions and 6 deletions

View File

@@ -240,8 +240,8 @@ Public Class ImportZUGFeRDFiles
oEmbeddedAttachmentFiles.AddRange(oAttachments)
End If
' TODO MD5
oMD5CheckSum = Check_MD5Sum(oFile.FullName)
' Check the Checksum and rejection status
oMD5CheckSum = Check_MD5Sum(oFile.FullName, oArgs.IgnoreRejectionStatus)
' Check if there are more than one ZUGFeRD files
If oZUGFeRDCount = 1 Then
@@ -723,7 +723,7 @@ Public Class ImportZUGFeRDFiles
' even if the Checksum exists in the history entries (default case)
' Which means, if it was not rejected before, it will be rejected in any case!
'
' This logic can be overwritten by the ForceRejection parameter.
' This logic can be overwritten by the IgnoreRejectionStatus parameter.
' If it is set to true, the file will be rejected if the file exists in the history entries,
' regardless of the rejected parameter.
If oRejected = False Or pIgnoreRejectionStatus = True Then