From 4305a23c2e489f051e0f5cb6ad5ad5f7d2330f72 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Fri, 13 Jan 2023 11:30:37 +0100 Subject: [PATCH] =?UTF-8?q?TageBisBestellungM=C3=B6glich=20in=20Essensbest?= =?UTF-8?q?ellungen=20ist=20nun=20im=20DB=20gespeichert!?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Aviso/frmEssensbestellungen.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Aviso/frmEssensbestellungen.vb b/Aviso/frmEssensbestellungen.vb index bc18eee..8c821c1 100644 --- a/Aviso/frmEssensbestellungen.vb +++ b/Aviso/frmEssensbestellungen.vb @@ -546,7 +546,7 @@ Public Class frmEssensbestellungen Try Dim startMenu = Date.Parse(dt.Rows(0).Item("MenuDateVon")) - Dim tageBisBestellende = -5 + Dim tageBisBestellende = dt.Rows(0).Item("MenuBestellungBisTageVorher") * -1 If tageBisBestellende > 0 Then lblTest.Text = "Zu Testzwecken darf aktuell " & tageBisBestellende & " Tage im Nachhinein bestellt werden!"