SPedbuch

SDL/Speditionsbuch/usrCntlSpeditionsBuchSuche.vb

@@ -577,18 +577,24 @@ Public Class usrCntlSpeditionsBuchSuche
             Button16.Visible = True
             Button17.Visible = True
             btnnachLeistungsNr.Visible = True
-        ElseIf VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
-            pnlBerichte.Visible = True
-            For Each p In pnlBerichte.Controls
-                p.Visible = False
-            Next
-            cbxHandlingAbrechnen.Visible = True
-            pnlHandling.Visible = False
-            pnlHandlingAmbar.Visible = True
+
+            'darf nur angezeigt werden, wenn Berechtigung: ZOLL_Auswertungen
+            If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
+                pnlBerichte.Visible = True
+                For Each p In pnlBerichte.Controls
+                    p.Visible = False
+                Next
+                cbxHandlingAbrechnen.Visible = True
+                pnlHandling.Visible = False
+                pnlHandlingAmbar.Visible = True
+
+            End If
 
         End If
 
 
+
+
         If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ZOLL_Auswertungen_Erlöse", "SDL") Then
             btnSpedBuchEinnahmen.Visible = True
         End If