cUta, Mailvorlagen

This commit is contained in:
2025-10-09 09:53:18 +02:00
parent 89354f7739
commit ca2e86ac26
2 changed files with 2 additions and 0 deletions

View File

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

View File

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