BH, Kundenkontakte, MD;

VERAG_PROG_ALLGEMEIN/AVISO/cDatenbankAVISO.vb

@@ -1134,6 +1134,8 @@ Public Class cAvisoDAL
             sql = hSQL
         End If
 
+        If sql = "" Then Return Nothing 'weder ID noch hSQL
+
         Dim daten As cAviso = Nothing
         Dim conn As SqlConnection = cDatenbankAVISO.GetNewOpenConnection()
         Using cmd As New SqlCommand(sql, conn)