From 57a233f87e058444fd9aad918456197f10f9cd01 Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Tue, 7 Mar 2023 10:07:57 +0100
Subject: [PATCH] Fehlerhandling

---
 SDL/kassenbuch/frmBelegNeu.vb | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/SDL/kassenbuch/frmBelegNeu.vb b/SDL/kassenbuch/frmBelegNeu.vb
index 8b3fabe3..ff4f8df8 100644
--- a/SDL/kassenbuch/frmBelegNeu.vb
+++ b/SDL/kassenbuch/frmBelegNeu.vb
@@ -1352,7 +1352,13 @@ Public Class frmBelegNeu
 
     Private Sub POSpayment(sender As Object, e As EventArgs) Handles btnPOS.Click
 
-        If cboKassen.SelectedItem.Text = "" Or Betrag <= 0 Then
+        If cboKassen.SelectedItem.Text = "" Then
+            MsgBox("Keine Kasse ausgewählt!")
+            Exit Sub
+        End If
+
+        If Betrag <= 0 Then
+            MsgBox("Es können nur positive Beträge über das POS-Terminal bezahlt werden!")
             Exit Sub
         End If