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

Fix Berechtitungssteuerg Fakturierung

Browse Source
This commit is contained in:
Andreas Luxbauer
2026-07-02 10:55:27 +02:00
parent 2af2eaaed0
commit 718115a1e4
2 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
SDL/My Project/AssemblyInfo.vb
View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.5.5.6")> <Assembly: AssemblyVersion("1.5.5.8")>
<Assembly: AssemblyFileVersion("1.5.5.6")> <Assembly: AssemblyFileVersion("1.5.5.8")>

10
SDL/seriendruck/usrCntlFakturierung.vb
View File

@@ -44,7 +44,7 @@ Public Class usrcntlFakturierung
'PathMautberichte = "C:\Users\d.breimaier\Desktop\MDM\Mautgesamtberichte\" '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 countCSV = 0
countPDF = 0 countPDF = 0
@@ -75,12 +75,12 @@ Public Class usrcntlFakturierung
End If 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 GroupBox1.Enabled = True
btnLieferantenrechnungen.Enabled = True btnLieferantenrechnungen.Enabled = True
btnMDMSammelrechnung.Enabled = False ' btnMDMSammelrechnung.Enabled = False
btnFakturierung.Enabled = False ' btnFakturierung.Enabled = False
btnRechnugnsdaten.Enabled = True ' btnRechnugnsdaten.Enabled = True
End If End If
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ADMINFUNCTIONS", "SDL") Then If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ADMINFUNCTIONS", "SDL") Then