Merge branch 'master' of http://dd-vmp07-com04:3000/AppStd/Monorepo

Controls.LookupGrid/LookupControl2.vb

@@ -88,23 +88,23 @@ Public Class LookupControl2
         AddHandler QueryPopUp, AddressOf HandleQueryPopup
     End Sub
 
-    Private Sub SetFormButtonEnabled(Enabled As Boolean)
+    Private Sub SetFormButtonEnabled(pVisible As Boolean)
         Dim oButton As EditorButton = Properties.Buttons.
             Where(Function(b) b.Tag = TAG_BUTTON_LOOKUP_FORM).
             FirstOrDefault()
 
         If oButton IsNot Nothing Then
-            oButton.Enabled = Enabled
+            oButton.Visible = pVisible
         End If
     End Sub
 
-    Private Sub SetDropdownButtonEnabled(Enabled As Boolean)
+    Private Sub SetDropdownButtonEnabled(pVisible As Boolean)
         Dim oButton As EditorButton = Properties.Buttons.
             Where(Function(b) b.Tag = TAG_DROPDOWN).
             FirstOrDefault()
 
         If oButton IsNot Nothing Then
-            oButton.Enabled = Enabled
+            oButton.Visible = pVisible
         End If
     End Sub
 

Controls.LookupGrid/My Project/AssemblyInfo.vb

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("1.0.2.3")>
+<Assembly: AssemblyVersion("1.0.3.0")>
 <Assembly: AssemblyFileVersion("1.0.0.0")>

Modules.Jobs/EDMI/ZUGFeRD/ImportZUGFeRDFiles.vb

@@ -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

Modules.Jobs/My Project/AssemblyInfo.vb

@@ -30,5 +30,5 @@ Imports System.Runtime.InteropServices
 ' Sie können alle Werte angeben oder die standardmäßigen Build- und Revisionsnummern 
 ' übernehmen, indem Sie "*" eingeben:
 
-<Assembly: AssemblyVersion("1.3.1.0")>
-<Assembly: AssemblyFileVersion("1.3.1.0")>
+<Assembly: AssemblyVersion("1.3.2.0")>
+<Assembly: AssemblyFileVersion("1.3.2.0")>