POS-Berechtigungen

SDL/kassenbuch/frmBelegNeu.vb

@@ -294,6 +294,14 @@ Public Class frmBelegNeu
         AddHandler EasyZVT_Worker.DoWork, New ComponentModel.DoWorkEventHandler(AddressOf EasyZVT_Async)
         AddHandler EasyZVT_Worker.RunWorkerCompleted, New System.ComponentModel.RunWorkerCompletedEventHandler(AddressOf EasyZVT_OnCompleted)
 
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG("Kassenbuch POS-Terminalzahlungen", Me) = 0 Then
+            btnPOS.Enabled = False
+        Else
+            btnPOS.Enabled = True
+        End If
+
+
+
     End Sub