edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

SPedbuch

Browse Source
This commit is contained in:
d.breimaier
2026-09-02 08:33:37 +02:00
parent d098d0a1f3
commit 42808b5d25
1 changed files with 14 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
SDL/Speditionsbuch/usrCntlSpeditionsBuchSuche.vb
View File

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