Kategorie Besonderheiten: Einschr.Firma

This commit is contained in:
2022-11-14 10:50:11 +01:00
parent 3e642d5283
commit cc2755579f
2 changed files with 3 additions and 4 deletions

View File

@@ -57,7 +57,7 @@
End Sub
Private Sub frmKundenBesonderheiten_Add_Load(sender As Object, e As EventArgs) Handles Me.Load
cboKategorie.fillWithSQL("SELECT [kdbkat_kategorie],[kdbkat_bezeichnung] FROM [tblKundenBesonderheiten_Kategorien]", False, "FMZOLL", True)
cboKategorie.fillWithSQL("SELECT [kdbkat_kategorie],[kdbkat_bezeichnung] FROM [tblKundenBesonderheiten_Kategorien] WHERE (kdbkat_Firma IS NULL OR kdbkat_Firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' ) ", False, "FMZOLL", True)
If KD_BESONSERHEITEN.hasEntry Then
rtbText.Text = KD_BESONSERHEITEN.kdb_text