Umbau Warenorte, Neues Feature Essensbestellungen, Sendungsvermerk bei GMVS

2023-01-11 14:49:31 +01:00
parent 39837250f1
commit bdee5e1176
8 changed files with 376 additions and 126 deletions
--- a/Aviso/UsrCntlEssensbestellungen.Designer.vb
+++ b/Aviso/UsrCntlEssensbestellungen.Designer.vb
@@ -64,12 +64,18 @@ Partial Class UsrCntlessensbestellungen
        Me.CheckBox1 = New System.Windows.Forms.CheckBox()
        Me.BackgroundWorker1 = New System.ComponentModel.BackgroundWorker()
        Me.CheckBox2 = New System.Windows.Forms.CheckBox()
-        Me.Button1 = New System.Windows.Forms.Button()
-        Me.txtGebäude = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.btnSave = New System.Windows.Forms.Button()
        Me.Label1 = New System.Windows.Forms.Label()
        Me.CheckBox3 = New System.Windows.Forms.CheckBox()
        Me.Label3 = New System.Windows.Forms.Label()
        Me.txtAnmerkung = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.cbxMitarbeiter = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.cbxGebäude = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.lblWochenkarte = New System.Windows.Forms.Label()
+        Me.cbxMenu = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.cbxAbteilung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.Label5 = New System.Windows.Forms.Label()
        Me.MyPanel1.SuspendLayout()
        Me.GroupBoxDienstag.SuspendLayout()
        Me.GroupBoxMontag.SuspendLayout()
@@ -92,7 +98,7 @@ Partial Class UsrCntlessensbestellungen
        Me.MyPanel1.Controls.Add(Me.Mittwoch)
        Me.MyPanel1.Controls.Add(Me.GroupBoxDonnerstag)
        Me.MyPanel1.Controls.Add(Me.txtAnzahlMenu)
-        Me.MyPanel1.Location = New System.Drawing.Point(3, 48)
+        Me.MyPanel1.Location = New System.Drawing.Point(3, 77)
        Me.MyPanel1.Name = "MyPanel1"
        Me.MyPanel1.Size = New System.Drawing.Size(667, 266)
        Me.MyPanel1.TabIndex = 19
@@ -563,7 +569,7 @@ Partial Class UsrCntlessensbestellungen
        'CheckBox1
        '
        Me.CheckBox1.AutoSize = True
-        Me.CheckBox1.Location = New System.Drawing.Point(121, 14)
+        Me.CheckBox1.Location = New System.Drawing.Point(12, 26)
        Me.CheckBox1.Name = "CheckBox1"
        Me.CheckBox1.Size = New System.Drawing.Size(63, 17)
        Me.CheckBox1.TabIndex = 20
@@ -573,50 +579,27 @@ Partial Class UsrCntlessensbestellungen
        'CheckBox2
        '
        Me.CheckBox2.AutoSize = True
-        Me.CheckBox2.Location = New System.Drawing.Point(12, 14)
+        Me.CheckBox2.Location = New System.Drawing.Point(12, 4)
        Me.CheckBox2.Name = "CheckBox2"
        Me.CheckBox2.Size = New System.Drawing.Size(86, 17)
        Me.CheckBox2.TabIndex = 21
        Me.CheckBox2.Text = "abgerechnet"
        Me.CheckBox2.UseVisualStyleBackColor = True
        '
-        'Button1
+        'btnSave
        '
-        Me.Button1.DialogResult = System.Windows.Forms.DialogResult.OK
-        Me.Button1.Location = New System.Drawing.Point(595, 320)
-        Me.Button1.Name = "Button1"
-        Me.Button1.Size = New System.Drawing.Size(75, 23)
-        Me.Button1.TabIndex = 22
-        Me.Button1.Text = "Speichern"
-        Me.Button1.UseVisualStyleBackColor = True
-        '
-        'txtGebäude
-        '
-        Me.txtGebäude._DateTimeOnly = False
-        Me.txtGebäude._numbersOnly = False
-        Me.txtGebäude._numbersOnlyKommastellen = ""
-        Me.txtGebäude._numbersOnlyTrennzeichen = True
-        Me.txtGebäude._Prozent = False
-        Me.txtGebäude._ShortDateNew = False
-        Me.txtGebäude._ShortDateOnly = False
-        Me.txtGebäude._TimeOnly = False
-        Me.txtGebäude._TimeOnly_Seconds = False
-        Me.txtGebäude._value = ""
-        Me.txtGebäude._Waehrung = False
-        Me.txtGebäude._WaehrungZeichen = True
-        Me.txtGebäude.ForeColor = System.Drawing.Color.Black
-        Me.txtGebäude.Location = New System.Drawing.Point(514, 2)
-        Me.txtGebäude.MaxLineLength = -1
-        Me.txtGebäude.MaxLines_Warning = ""
-        Me.txtGebäude.MaxLines_Warning_Label = Nothing
-        Me.txtGebäude.Name = "txtGebäude"
-        Me.txtGebäude.Size = New System.Drawing.Size(142, 20)
-        Me.txtGebäude.TabIndex = 30
+        Me.btnSave.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.btnSave.Location = New System.Drawing.Point(595, 349)
+        Me.btnSave.Name = "btnSave"
+        Me.btnSave.Size = New System.Drawing.Size(75, 23)
+        Me.btnSave.TabIndex = 22
+        Me.btnSave.Text = "Speichern"
+        Me.btnSave.UseVisualStyleBackColor = True
        '
        'Label1
        '
        Me.Label1.AutoSize = True
-        Me.Label1.Location = New System.Drawing.Point(444, 5)
+        Me.Label1.Location = New System.Drawing.Point(443, 27)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(54, 13)
        Me.Label1.TabIndex = 30
@@ -625,7 +608,7 @@ Partial Class UsrCntlessensbestellungen
        'CheckBox3
        '
        Me.CheckBox3.AutoSize = True
-        Me.CheckBox3.Location = New System.Drawing.Point(225, 14)
+        Me.CheckBox3.Location = New System.Drawing.Point(12, 49)
        Me.CheckBox3.Name = "CheckBox3"
        Me.CheckBox3.Size = New System.Drawing.Size(70, 17)
        Me.CheckBox3.TabIndex = 31
@@ -635,7 +618,7 @@ Partial Class UsrCntlessensbestellungen
        'Label3
        '
        Me.Label3.AutoSize = True
-        Me.Label3.Location = New System.Drawing.Point(444, 26)
+        Me.Label3.Location = New System.Drawing.Point(444, 50)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(64, 13)
        Me.Label3.TabIndex = 32
@@ -656,7 +639,7 @@ Partial Class UsrCntlessensbestellungen
        Me.txtAnmerkung._Waehrung = False
        Me.txtAnmerkung._WaehrungZeichen = True
        Me.txtAnmerkung.ForeColor = System.Drawing.Color.Black
-        Me.txtAnmerkung.Location = New System.Drawing.Point(514, 23)
+        Me.txtAnmerkung.Location = New System.Drawing.Point(514, 46)
        Me.txtAnmerkung.MaxLineLength = -1
        Me.txtAnmerkung.MaxLines_Warning = ""
        Me.txtAnmerkung.MaxLines_Warning_Label = Nothing
@@ -664,21 +647,99 @@ Partial Class UsrCntlessensbestellungen
        Me.txtAnmerkung.Size = New System.Drawing.Size(142, 20)
        Me.txtAnmerkung.TabIndex = 33
        '
+        'Label4
+        '
+        Me.Label4.AutoSize = True
+        Me.Label4.Location = New System.Drawing.Point(210, 5)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(59, 13)
+        Me.Label4.TabIndex = 34
+        Me.Label4.Text = "Mitarbeiter:"
+        '
+        'cbxMitarbeiter
+        '
+        Me.cbxMitarbeiter._allowedValuesFreiText = Nothing
+        Me.cbxMitarbeiter._allowFreiText = False
+        Me.cbxMitarbeiter._value = ""
+        Me.cbxMitarbeiter.FormattingEnabled = True
+        Me.cbxMitarbeiter.Location = New System.Drawing.Point(275, 0)
+        Me.cbxMitarbeiter.Name = "cbxMitarbeiter"
+        Me.cbxMitarbeiter.Size = New System.Drawing.Size(138, 21)
+        Me.cbxMitarbeiter.TabIndex = 35
+        '
+        'cbxGebäude
+        '
+        Me.cbxGebäude._allowedValuesFreiText = Nothing
+        Me.cbxGebäude._allowFreiText = False
+        Me.cbxGebäude._value = ""
+        Me.cbxGebäude.FormattingEnabled = True
+        Me.cbxGebäude.Location = New System.Drawing.Point(514, 24)
+        Me.cbxGebäude.Name = "cbxGebäude"
+        Me.cbxGebäude.Size = New System.Drawing.Size(142, 21)
+        Me.cbxGebäude.TabIndex = 36
+        '
+        'lblWochenkarte
+        '
+        Me.lblWochenkarte.AutoSize = True
+        Me.lblWochenkarte.Location = New System.Drawing.Point(210, 26)
+        Me.lblWochenkarte.Name = "lblWochenkarte"
+        Me.lblWochenkarte.Size = New System.Drawing.Size(34, 13)
+        Me.lblWochenkarte.TabIndex = 38
+        Me.lblWochenkarte.Text = "Menü"
+        '
+        'cbxMenu
+        '
+        Me.cbxMenu._allowedValuesFreiText = Nothing
+        Me.cbxMenu._allowFreiText = False
+        Me.cbxMenu._value = ""
+        Me.cbxMenu.DropDownWidth = 200
+        Me.cbxMenu.FormattingEnabled = True
+        Me.cbxMenu.Location = New System.Drawing.Point(275, 27)
+        Me.cbxMenu.Name = "cbxMenu"
+        Me.cbxMenu.Size = New System.Drawing.Size(138, 21)
+        Me.cbxMenu.TabIndex = 37
+        '
+        'cbxAbteilung
+        '
+        Me.cbxAbteilung._allowedValuesFreiText = Nothing
+        Me.cbxAbteilung._allowFreiText = False
+        Me.cbxAbteilung._value = ""
+        Me.cbxAbteilung.FormattingEnabled = True
+        Me.cbxAbteilung.Location = New System.Drawing.Point(514, 0)
+        Me.cbxAbteilung.Name = "cbxAbteilung"
+        Me.cbxAbteilung.Size = New System.Drawing.Size(142, 21)
+        Me.cbxAbteilung.TabIndex = 40
+        '
+        'Label5
+        '
+        Me.Label5.AutoSize = True
+        Me.Label5.Location = New System.Drawing.Point(444, 5)
+        Me.Label5.Name = "Label5"
+        Me.Label5.Size = New System.Drawing.Size(54, 13)
+        Me.Label5.TabIndex = 39
+        Me.Label5.Text = "Abteilung:"
+        '
        'UsrCntlessensbestellungen
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.Controls.Add(Me.cbxAbteilung)
+        Me.Controls.Add(Me.Label5)
+        Me.Controls.Add(Me.lblWochenkarte)
+        Me.Controls.Add(Me.cbxMenu)
+        Me.Controls.Add(Me.cbxGebäude)
+        Me.Controls.Add(Me.cbxMitarbeiter)
+        Me.Controls.Add(Me.Label4)
        Me.Controls.Add(Me.Label3)
        Me.Controls.Add(Me.txtAnmerkung)
        Me.Controls.Add(Me.CheckBox3)
        Me.Controls.Add(Me.Label1)
-        Me.Controls.Add(Me.txtGebäude)
-        Me.Controls.Add(Me.Button1)
+        Me.Controls.Add(Me.btnSave)
        Me.Controls.Add(Me.CheckBox2)
        Me.Controls.Add(Me.CheckBox1)
        Me.Controls.Add(Me.MyPanel1)
        Me.Name = "UsrCntlessensbestellungen"
-        Me.Size = New System.Drawing.Size(700, 350)
+        Me.Size = New System.Drawing.Size(700, 412)
        Me.MyPanel1.ResumeLayout(False)
        Me.MyPanel1.PerformLayout()
        Me.GroupBoxDienstag.ResumeLayout(False)
@@ -737,10 +798,16 @@ Partial Class UsrCntlessensbestellungen
    Friend WithEvents CheckBox1 As CheckBox
    Friend WithEvents BackgroundWorker1 As System.ComponentModel.BackgroundWorker
    Friend WithEvents CheckBox2 As CheckBox
-    Friend WithEvents Button1 As Button
-    Friend WithEvents txtGebäude As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents btnSave As Button
    Friend WithEvents Label1 As Label
    Friend WithEvents CheckBox3 As CheckBox
    Friend WithEvents Label3 As Label
    Friend WithEvents txtAnmerkung As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents Label4 As Label
+    Friend WithEvents cbxMitarbeiter As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents cbxGebäude As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents lblWochenkarte As Label
+    Friend WithEvents cbxMenu As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents cbxAbteilung As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents Label5 As Label
 End Class