edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

ueberstunden

Browse Source
This commit is contained in:
d.breimaier
2025-12-30 13:14:27 +01:00
parent 0cce733304
commit 614bfdc398
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmUeberstundenauszahlen.vb
View File

@@ -626,7 +626,7 @@ Public Class frmUeberstundenauszahlen
Dim stichtag As Integer = 25 Dim stichtag As Integer = 25
Dim ignoreAuszahlungsdatum As Boolean = False 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") MsgBox("Auszahlungssumme übersteigt den aktuellen Saldo!" & vbNewLine & "Vorgang wird abgebrochen")
Exit Sub Exit Sub
End If End If