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

Essensbestellungen GUI Verbesserung, Control für Warenorte

Browse Source
This commit is contained in:
d.breimaier
2023-01-10 16:28:06 +01:00
parent 7b991737d9
commit fc89dc23ef
11 changed files with 778 additions and 37 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Aviso/UsrCntlEssensbestellungen.vb
View File

@@ -38,7 +38,7 @@ Public Class UsrCntlessensbestellungen
loadMenuInfo(dt)
essen = New cEssensbestellung()
txtGebäude.Text = essen.eb_gebaeude.ToString
txtAnmerkung.Text = essen.eb_anmerkung.ToString
txtAnmerkung.Text = If(essen.eb_anmerkung IsNot Nothing, essen.eb_anmerkung.ToString, "")
End Sub
@@ -58,7 +58,7 @@ Public Class UsrCntlessensbestellungen
dt = SQL.loadDgvBySql("Select Top 1 * from (Select (REPLACE(MenuTitel,'Wochenkarte ','')) + ' - ' + Convert(varchar, Year(MenuDateVon)) as kwDate, * FROM tblEBMenu) kwDate where kwDate = '" & menutitle & "'", "AVISO", 100, True)
loadMenuInfo(dt)
txtGebäude.Text = essen.eb_gebaeude.ToString
txtAnmerkung.Text = essen.eb_anmerkung.ToString
txtAnmerkung.Text = If(essen.eb_anmerkung IsNot Nothing, essen.eb_anmerkung.ToString, "")
End Sub