neu

2021-10-20 22:24:56 +02:00
parent 787491cf6b
commit 2d7bb951d2
26 changed files with 1204 additions and 415 deletions
--- a/Aviso/usrcntlAktDetailsATILLA.vb
+++ b/Aviso/usrcntlAktDetailsATILLA.vb
@@ -54,8 +54,11 @@ Public Class usrcntlAktDetailsATILLA
    End Sub
    Public Sub reload(id)
        Try
-
-            UsrCntlVermerkeATilla1.init(id)
+            Dim SENDUNG = Nothing
+            If SENDUNG_LIST IsNot Nothing AndAlso SENDUNG_LIST.Count > 0 Then
+                SENDUNG = SENDUNG_LIST(0)
+            End If
+            UsrCntlVermerkeATilla1.init(id, SENDUNG)
            '  reloadTimer.Enabled = True
            loaded = False
            pnlOptionen.Visible = False