From 13e24bb02ac9863b236ad5a81a7aa120946c769a Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Fri, 17 Apr 2026 13:27:13 +0200
Subject: [PATCH] Mahnlauf fix, Mitarbeiter, verwahrung, etc.

---
 SDL/buchhaltung/frmBU_Mahnlauf.vb  |  4 ++--
 SDL/mdm/frmMDMDatenverarbetiung.vb | 16 ++++------------
 2 files changed, 6 insertions(+), 14 deletions(-)

diff --git a/SDL/buchhaltung/frmBU_Mahnlauf.vb b/SDL/buchhaltung/frmBU_Mahnlauf.vb
index 2ffd9650..b0567c1e 100644
--- a/SDL/buchhaltung/frmBU_Mahnlauf.vb
+++ b/SDL/buchhaltung/frmBU_Mahnlauf.vb
@@ -374,7 +374,7 @@ Public Class frmBU_Mahnlauf
         Dim bemerkungFilter As String = ""
 
         If bemerkungSrch IsNot Nothing AndAlso bemerkungSrch.Length > 0 Then
-            bemerkungFilter = " AND (" &
+            bemerkungFilter = " AND ( 1 = 1 " &
                 String.Join(" OR ",
                     bemerkungSrch.
                     Where(Function(x) Not String.IsNullOrWhiteSpace(x)).
@@ -383,7 +383,7 @@ Public Class frmBU_Mahnlauf
                                Return "c_bemerkung LIKE '" & val & "'"
                            End Function)
                 ) &
-            ") " 
+            ") "
         End If
         Dim sqlStr = "SELECT c_urbelegid OP_Typ,d_rechnung Rechnungsdatum,d_netto Faelligkeit,dec_fremdbrutto Rechnungsbetrag,c_bemerkung Bemerkung,dec_fremdzahlung Zahlung,dec_fremdbrutto+dec_fremdzahlung Ausstand,c_waehrung Währung,si_mahnstufe Mahnstufe
                     FROM op_debitor OP 
diff --git a/SDL/mdm/frmMDMDatenverarbetiung.vb b/SDL/mdm/frmMDMDatenverarbetiung.vb
index b0911873..a34d8578 100644
--- a/SDL/mdm/frmMDMDatenverarbetiung.vb
+++ b/SDL/mdm/frmMDMDatenverarbetiung.vb
@@ -241,18 +241,6 @@ Public Class frmMDMDatenverarbetiung
 
         rpt.DataSource = dt
 
-
-
-
-        'If cbxProdukt.Checked Then
-        '    rpt.GroupHeader2.DataField = "prod_descr"
-        'Else
-        '    rpt.GroupHeader2.Visible = False
-        '    rpt.GroupFooter2.Visible = False
-        'End If
-
-
-
         Dim sum = 0
         rpt.lblUeberschrift.Text = "PLOSE Summenbericht " & dat_Sum_Von.Text & " bis " & dat_Sum_Bis.Text
         rpt.lblSachbearbeiter.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME
@@ -4222,6 +4210,10 @@ Public Class frmMDMDatenverarbetiung
                                     op.LeistungsNr
                                 
                                 ORDER BY
+                                    KundeOK,
+                                    ProduktOK,
+                                    OfferteOK,
+                                    LeistungOK,
                                     d.plose_POLSEKundennummer,
                                     d.plose_ProduktCode"