ustva, etc.

2025-02-24 13:35:46 +01:00
parent c4a355407e
commit 260de92f7e
12 changed files with 220 additions and 132 deletions
--- a/SDL/frmMain.vb
+++ b/SDL/frmMain.vb
@@ -1129,7 +1129,7 @@ Public Class frmMain
    End Sub

    Private Sub mneFakturierung_Click(sender As Object, e As EventArgs) Handles mneFakturierung.Click
-        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG("MDM_Fakturierung", Me) = 0 Then
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG("MDM_Fakturierung", Me) = 0 OrElse VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG("MDM_LIEFERANTENRECHNUNGEN", "SDL") = 0 Then
            clrPnlMain()
            Dim usrCntl As New usrcntlFakturierung
            usrCntl.Dock = System.Windows.Forms.DockStyle.Fill