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