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

Essensbestellungen -> Menüanzeige

Browse Source
This commit is contained in:
d.breimaier
2024-06-11 16:13:28 +02:00
parent 978884cd2b
commit 6ae38089a2
4 changed files with 24 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
SDL/kunden/Vorauskasse/frmVorauskasse.vb
View File

@@ -295,7 +295,16 @@ Public Class frmVorauskasse
If cboSachbearbeiterQS._value <> "" Then sqlstr &= " AND [vk_QS_SachbearbeiterId] = @PersonalnummerQS "
If cboSachbearbeiterBH._value <> "" Then sqlstr &= " AND [vk_BH_SachbearbeiterId] = @PersonalnummerBH "
If MyTextBox1.Text <> "" Then sqlstr &= " AND [vk_LKW] LIKE @LKW "
If txtFirma.Text <> "" Then sqlstr &= " AND ([vk_Firma] LIKE @Firma or vk_KdNr=@Firma) "
If txtFirma.Text <> "" Then
If IsNumeric(txtFirma.Text) Then
sqlstr &= " AND vk_KdNr=@Firma "
Else
sqlstr &= " AND ([vk_Firma] LIKE @Firma ) "
End If
End If
Select Case cbxAbgerechnet.CheckState
Case CheckState.Unchecked : sqlstr &= " and (SELECT count(*) FROM Rechnungsausgang RG WHERE RG.FilialenNr = vk_FilialeNr and RG.AbfertigungsNr= vk_AbfertigungsNr and vk_KdNr=rg.RechnungsKundenNr and Trdin=1)= 0 "