cUta, Mailvorlagen
This commit is contained in:
@@ -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
|
||||
|
||||
@@ -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()
|
||||
|
||||
Reference in New Issue
Block a user