This commit is contained in:
2021-10-20 23:37:42 +02:00
parent 2d7bb951d2
commit afaaa450e1

View File

@@ -284,6 +284,8 @@ Public Class frmEintragAviso
Me.Text = "Neuanlage LKW-Aviso"
dtpDatum.Value = Now
datVoraussichtlichesEintreffen.Value = Now.AddDays(-1)
If cboFirma._value = "ATILLA" Then datVoraussichtlichesEintreffen.Value = Now 'Bei ATILLA gibt es meist kein voraussichtliches Eintreffdatum.
dtpAvisoEingangDatum.Value = Now.Date
dtpAvisoEingangZeit.Value = LeerDatum
txtÄnderungen.Text = "Neuanlage von " & cGlobal.AktiverMitarbeiter.Mitarbeiter