Berechtigung für Essensbestellung

This commit is contained in:
2022-11-30 16:09:47 +01:00
parent 67601f4ee3
commit 914da90d60
2 changed files with 15 additions and 7 deletions

View File

@@ -126,6 +126,7 @@ Partial Class frmHauptfenster
Me.ATGesamtsicherheitVeragAGToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ATGesamtsicherheitVeragCSToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.EssensbestellungenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.StatistikToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.LKWBerichtToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.StatistikADMINToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
@@ -363,7 +364,6 @@ Partial Class frmHauptfenster
Me.ToolStripMenuItem19 = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripMenuItem20 = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripMenuItem21 = New System.Windows.Forms.ToolStripMenuItem()
Me.EssensbestellungenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.conMenuAviso.SuspendLayout()
Me.MenuStrip1.SuspendLayout()
Me.Top.SuspendLayout()
@@ -990,6 +990,13 @@ Partial Class frmHauptfenster
Me.ATGesamtsicherheitVeragCSToolStripMenuItem.Text = "AT | Gesamtsicherheit Verag CS"
Me.ATGesamtsicherheitVeragCSToolStripMenuItem.Visible = False
'
'EssensbestellungenToolStripMenuItem
'
Me.EssensbestellungenToolStripMenuItem.Name = "EssensbestellungenToolStripMenuItem"
Me.EssensbestellungenToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
Me.EssensbestellungenToolStripMenuItem.Text = "Essensbestellungen"
Me.EssensbestellungenToolStripMenuItem.Visible = False
'
'StatistikToolStripMenuItem
'
Me.StatistikToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.LKWBerichtToolStripMenuItem, Me.StatistikADMINToolStripMenuItem, Me.ToolStripSeparator8, Me.BürgschafrtsbuchungenFremdToolStripMenuItem, Me.LKWEingetroffenNachToolStripMenuItem, Me.ToolStripSeparator7, Me.SDLAuswertungenToolStripMenuItem, Me.SDLAuswertungenToolStripMenuItem1})
@@ -3465,12 +3472,6 @@ Partial Class frmHauptfenster
Me.ToolStripMenuItem21.Size = New System.Drawing.Size(121, 22)
Me.ToolStripMenuItem21.Text = "GELB"
'
'EssensbestellungenToolStripMenuItem
'
Me.EssensbestellungenToolStripMenuItem.Name = "EssensbestellungenToolStripMenuItem"
Me.EssensbestellungenToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
Me.EssensbestellungenToolStripMenuItem.Text = "Essensbestellungen"
'
'frmHauptfenster
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)

View File

@@ -536,6 +536,13 @@ Public Class frmHauptfenster
btnKassenbuch.Visible = True
End If
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ESSENSBESTELLUNGEN", "AVISO") Then
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Case "FRONTOFFICE", "VERAG", "IMEX"
EssensbestellungenToolStripMenuItem.Visible = True
End Select
End If
Panel1.Height -= pnlSearch.Height
End Sub