kontrolle DHL/VW

2024-11-05 17:03:37 +01:00
parent 9d136403e1
commit 43c72f5544
2 changed files with 8 additions and 3 deletions
--- a/VERAG_PROG_ALLGEMEIN/AVISO/cMeineFunktionenAVISO.vb
+++ b/VERAG_PROG_ALLGEMEIN/AVISO/cMeineFunktionenAVISO.vb
@@ -279,9 +279,11 @@ Public Class cMeineFunktionenAVISO
        Dim newLKWOK = False
        If Aviso.VerwahrungStatus = 0 Then
            Aviso.VerwahrungStatus = 1
+            Aviso.VerwahrungStatusDate = Now
            newLKWOK = True
        Else
            Aviso.VerwahrungStatus = 0
+            Aviso.VerwahrungStatusDate = Nothing
            newLKWOK = False
        End If