ueberstunden
This commit is contained in:
@@ -626,7 +626,7 @@ Public Class frmUeberstundenauszahlen
|
||||
Dim stichtag As Integer = 25
|
||||
Dim ignoreAuszahlungsdatum As Boolean = False
|
||||
|
||||
If cbxoverwrite.Checked AndAlso (CDbl(txtSummeAuszb.Text) < CDbl(txtAuszManuell.Text) Or CDbl(txtSummeAuszb.Text) < CDbl(txtAuszManuell_hhmm.Text)) Then
|
||||
If cbxoverwrite.Checked AndAlso (CDbl(txtSummeAuszb.Text) < CDbl(txtAuszManuell.Text) Or CDbl(txtSummeAuszb.Text) < CDbl(txtAuszManuell_hhmm.Text) Or CDbl(txtSummeAuszb.Text) < (CDbl(txtAusz100Netto.Text) + CDbl(txtAusz50.Text) + CDbl(txtAusz50vonSaldo.Text))) Then
|
||||
MsgBox("Auszahlungssumme übersteigt den aktuellen Saldo!" & vbNewLine & "Vorgang wird abgebrochen")
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Reference in New Issue
Block a user