Fakturierung

SDL/frmMain.vb

@@ -1034,6 +1034,18 @@ Public Class frmMain
 
     End Sub
 
+    Private Sub RechnungsdatenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles RechnungsdatenToolStripMenuItem.Click
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG("MDM_Fakturierung", Me) = 0 Then
+            'clrPnlMain()
+            'Dim usrCntl As New SDL.frmRechnungenSuche
+            'usrCntl.Dock = System.Windows.Forms.DockStyle.Fill
+            'pnlMain.Controls.Add(usrCntl)
+            Dim f As New SDL.frmRechnungenSuche
+            f.Show(Me)
+        Else
+            setInfo("err", "Daten sind noch nicht freigegeben!", 3)
+        End If
+    End Sub
 End Class
 
 Public Class MyRenderer