diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb
index e5dee9c..5940e68 100644
--- a/Aviso/My Project/AssemblyInfo.vb	
+++ b/Aviso/My Project/AssemblyInfo.vb	
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("4.0.0.4")>
-<Assembly: AssemblyFileVersion("4.0.0.4")>
+<Assembly: AssemblyVersion("4.0.0.5")>
+<Assembly: AssemblyFileVersion("4.0.0.5")>
diff --git a/Aviso/frmHauptfenster.vb b/Aviso/frmHauptfenster.vb
index 8d9ecc7..57cb581 100644
--- a/Aviso/frmHauptfenster.vb
+++ b/Aviso/frmHauptfenster.vb
@@ -4561,7 +4561,7 @@ Public Class frmHauptfenster
         Try
             Dim Pathlist As New List(Of String)
 
-            If VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, False, True, True,, Pathlist) Then
+            If VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, False, True, True,, Pathlist, False) Then
                 MsgBox("Buchungen wurden erfolgreich exportiert!")
             Else
                 MsgBox("Es wurden keine Buchungen exportiert!")
diff --git a/Aviso/usrcntlAktDetails.vb b/Aviso/usrcntlAktDetails.vb
index 9dde028..501734b 100644
--- a/Aviso/usrcntlAktDetails.vb
+++ b/Aviso/usrcntlAktDetails.vb
@@ -1303,9 +1303,14 @@ Public Class usrcntlAktDetails
     Private Sub gridVermerke_Paint(sender As Object, e As PaintEventArgs) Handles gridVermerke.Paint
         If painted Then Exit Sub
         If dgvSendungen.RowCount = 0 Then Exit Sub
-        painted = True
+
         gridVermerke_Paint(gridVermerke)
-        painted = False
+        painted = True
+
+
+        'painted = True
+        'gridVermerke_Paint(gridVermerke)
+        'painted = False
     End Sub
     Shared Sub gridVermerke_Paint(gridvermerke As DataGridView)