AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

einmal mit profis

Browse Source
This commit is contained in:
Jonathan Jenne 2023-10-12 13:29:51 +02:00
parent 4f3d8e0c7d
commit 011b78472b
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Jobs/ZUGFeRD/ImportZUGFeRDFiles.vb
View File

@ -168,7 +168,7 @@ Public Class ImportZUGFeRDFiles
For Each oFile In oFileGroupFiles
Dim oResult As ProcessFileResult = ProcessFile(oMessageId, oEmailDataBase, oZUGFeRDCount, oFile, oConnections, oArgs)
If oResult.ZugferdFileFound = False Then
If oResult.ZugferdFileFound = True Then
_logger.Debug("Zugferd File found")
oMD5CheckSum = oResult.MD5Checksum
oZUGFeRDCount = oResult.ZugferdFileCount
@ -478,6 +478,7 @@ Public Class ImportZUGFeRDFiles
' Since extraction went well, increase the amount of ZUGFeRD files
pZugferdFiles += 1
_logger.Info("Zugferd file found. Increasing counter.")
' Extract all attachments with the extensions specified in `AllowedExtensions`.
' If you need to extract and use embedded xml files, you need to filter out the zugferd-invoice.xml yourself.
@ -533,7 +534,7 @@ Public Class ImportZUGFeRDFiles
oResult.ZugferdFileFound = True
oResult.MD5Checksum = oMD5Checksum
oResult.ZugferdFileCount = pZugferdFiles + 1
oResult.ZugferdFileCount = pZugferdFiles
Return oResult