edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix searchbox

Browse Source
This commit is contained in:
d.breimaier
2025-12-29 15:12:35 +01:00
parent 51b7ecf2a0
commit 1bc88630bf
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/KdSearchBox.vb
View File

@@ -712,7 +712,7 @@ Public Class KdSearchBox
'End If 'End If
If Not _displayWoelflKd Then SQLstrEnd &= " AND AdressenNr NOT LIKE '15%'" If Not _displayWoelflKd Then SQLstrEnd &= " AND AdressenNr NOT LIKE '15%'"
setDS(True, usrcntl.dgvKundenAktiv, SQL.loadDgvBySql(SQLstr & SQLstrEnd & " order by Ordnungsbegriff ", "FMZOLL"), topAnz, IIf(srch.Count > 4, SQL.getValueTxtBySql(SQLstrCount & SQLstrEnd, "FMZOLL"), "")) setDS(True, usrcntl.dgvKundenAktiv, SQL.loadDgvBySql(SQLstr & SQLstrEnd & " order by Ordnungsbegriff ", "FMZOLL"), topAnz, IIf(srch.Count > 2, SQL.getValueTxtBySql(SQLstrCount & SQLstrEnd, "FMZOLL"), ""))
End With End With
@@ -832,7 +832,7 @@ Public Class KdSearchBox
If aktiveKunden Then If aktiveKunden Then
If topKunden < CInt(anzahlKunden) And CInt(anzahlKunden) < 65 Then If IsNumeric(anzahlKunden) AndAlso topKunden < CInt(anzahlKunden) AndAlso CInt(anzahlKunden) < 100 Then
usrcntl.btnAlleKunden.Visible = True usrcntl.btnAlleKunden.Visible = True
Else Else
usrcntl.btnAlleKunden.Visible = False usrcntl.btnAlleKunden.Visible = False