diff --git a/SDL/frmdynMailvorlage.vb b/SDL/frmdynMailvorlage.vb
index 5410325a..76c6b1e5 100644
--- a/SDL/frmdynMailvorlage.vb
+++ b/SDL/frmdynMailvorlage.vb
@@ -449,6 +449,7 @@ Public Class frmdynMailvorlagen
                 cbxTyp.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("MDM-SR", "4"))
                 cbxTyp.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Erstattungsschreiben", "5"))
                 cbxTyp.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Zu Wenig", "6"))
+                cbxTyp.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("MDM-VZ", "7"))
                 cbxTyp.changeItem("")
 
             Case Else
diff --git a/VERAG_PROG_ALLGEMEIN/Classes/cUTA.vb b/VERAG_PROG_ALLGEMEIN/Classes/cUTA.vb
index 8235e688..b9384a3b 100644
--- a/VERAG_PROG_ALLGEMEIN/Classes/cUTA.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cUTA.vb
@@ -1338,6 +1338,7 @@ Public Class cUTA
 
             MDMEinarb.ds_count += savedTrans
             MDMEinarb.import_date = Now()
+            MDMEinarb.importfilename = fi.Name
             If MDMEinarb.ds_count = MDMEinarb.ds_total - 2 Then 'header and trailer wegzählen!
                 MDMEinarb.completed = True
                 MDMEinarb.completed_date = Now()