From 718115a1e4c5aa24f4de487db639f1f744dca4f5 Mon Sep 17 00:00:00 2001 From: Andreas Luxbauer Date: Thu, 2 Jul 2026 10:55:27 +0200 Subject: [PATCH] Fix Berechtitungssteuerg Fakturierung --- SDL/My Project/AssemblyInfo.vb | 4 ++-- SDL/seriendruck/usrCntlFakturierung.vb | 10 +++++----- 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/SDL/My Project/AssemblyInfo.vb b/SDL/My Project/AssemblyInfo.vb index 8b0a8238..a5c0c19c 100644 --- a/SDL/My Project/AssemblyInfo.vb +++ b/SDL/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/SDL/seriendruck/usrCntlFakturierung.vb b/SDL/seriendruck/usrCntlFakturierung.vb index 295e1fa9..83ab726e 100644 --- a/SDL/seriendruck/usrCntlFakturierung.vb +++ b/SDL/seriendruck/usrCntlFakturierung.vb @@ -44,7 +44,7 @@ Public Class usrcntlFakturierung 'PathMautberichte = "C:\Users\d.breimaier\Desktop\MDM\Mautgesamtberichte\" - Dim FaktAbt As Boolean = IIf(VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG("MDM_FAKTURIERUNG", "SDL") = 0, True, False) + Dim FaktAbt As Boolean = VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("MDM_Fakturierung", "SDL") countCSV = 0 countPDF = 0 @@ -75,12 +75,12 @@ Public Class usrcntlFakturierung End If - If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG("MDM_LIEFERANTENRECHNUNGEN", "SDL") = 0 Then + If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("MDM_LIEFERANTENRECHNUNGEN", "SDL") Then GroupBox1.Enabled = True btnLieferantenrechnungen.Enabled = True - btnMDMSammelrechnung.Enabled = False - btnFakturierung.Enabled = False - btnRechnugnsdaten.Enabled = True + ' btnMDMSammelrechnung.Enabled = False + ' btnFakturierung.Enabled = False + ' btnRechnugnsdaten.Enabled = True End If If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ADMINFUNCTIONS", "SDL") Then