Jobs/ZUGFeRD: Create subfolders per date for processed files

This commit is contained in:
Jonathan Jenne 2021-01-27 15:54:08 +01:00
parent f7df0f1a27
commit ac4da26fa7

View File

@ -467,8 +467,8 @@ Public Class ImportZUGFeRDFiles
IsSuccess As Boolean)
Dim oFinalMoveDirectory As String = MoveDirectory
Dim oDateSubDirectoryName As String = Now.ToString("yyyy-MM-dd")
Dim oAttachmentDirectory As String = Path.Combine(MoveDirectory, Args.AttachmentsSubDirectory, oDateSubDirectoryName)
Dim oDateSubDirectoryName As String = Now.ToString("yyyy\\MM\\dd")
Dim oAttachmentDirectory As String = Path.Combine(oFinalMoveDirectory, Args.AttachmentsSubDirectory, oDateSubDirectoryName)
' Files will be moved to a subfolder for the current day if they are rejected
If Not IsSuccess Then