Essensbestellungen

VERAG_PROG_ALLGEMEIN/Classes/Essensbestellung.vb

@@ -24,6 +24,7 @@ Public Class cEssensbestellung
     Property eb_gesendet_am As Object = Nothing
     Property eb_gesendet As Boolean
     Property eb_firma As Object = Nothing
+    Property eb_MenuID As Object = Nothing
     Property eb_archiviert As Boolean
 
 
@@ -41,6 +42,17 @@ Public Class cEssensbestellung
         LOAD()
     End Sub
 
+    Sub New(eb_kw, eb_mitid, eb_gebaeude, eb_abteilung, eb_mitname, eb_anmerkung, eb_MenuID)
+        Me.eb_kw = eb_kw
+        Me.eb_mitid = eb_mitid
+        Me.eb_gebaeude = eb_gebaeude
+        Me.eb_abteilung = eb_abteilung
+        Me.eb_mitname = eb_mitname
+        Me.eb_anmerkung = eb_anmerkung
+        Me.eb_MenuID = eb_MenuID
+        LOAD()
+    End Sub
+
     Sub New()
 
 
@@ -49,6 +61,7 @@ Public Class cEssensbestellung
     Sub New(eb_kw, eb_mitid)
         Me.eb_kw = eb_kw
         Me.eb_mitid = eb_mitid
+        'Me.eb_MenuID = eb_MenuID
         LOAD()
     End Sub
 
@@ -76,6 +89,7 @@ Public Class cEssensbestellung
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("eb_gesendet_am", eb_gesendet_am))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("eb_firma", eb_firma))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("eb_archiviert", eb_archiviert))
+        list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("eb_MenuID", eb_MenuID))
 
 
         Return list