From b6680ea12eab6a12bbeed0948dfcf3787bb53649 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Wed, 28 Feb 2024 11:21:22 +0100 Subject: [PATCH] uberstunden --- .../Mitarbeiterverzeichnis/frmUeberstundenauszahlen.vb | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmUeberstundenauszahlen.vb b/VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmUeberstundenauszahlen.vb index 796d55b4..ae2db613 100644 --- a/VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmUeberstundenauszahlen.vb +++ b/VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmUeberstundenauszahlen.vb @@ -72,7 +72,7 @@ Public Class frmUeberstundenauszahlen If abwDatum Then startdate = (dtpMonat.Value) enddate = (dtpBis.Value) - auszahlugsdatum = enddate + auszahlugsdatum = tag.GetLastyDayYInxMonth(enddate.DayOfWeek, enddate.Month, enddate.Year, True) 'Endmonat des Enddates Else startdate = tag.GetFirstyDayYInxMonth(DateTime.Parse(dtpMonat.Value).DayOfWeek, DateTime.Parse(dtpMonat.Value).Month, DateTime.Parse(dtpMonat.Value).Year, True) enddate = tag.GetLastyDayYInxMonth(DateTime.Parse(dtpMonat.Value).DayOfWeek, DateTime.Parse(dtpMonat.Value).Month, DateTime.Parse(dtpMonat.Value).Year, True) @@ -433,11 +433,11 @@ Public Class frmUeberstundenauszahlen End If If timas.deleteTimeAccounts(auszahlugsdatum, auszahlugsdatum, MA.mit_timasId, dtdeleteEntries) Then - Dim ues As New cUeberstunden(MA.mit_id, auszahlugsdatum.ToShortDateString) + Dim ues As New cUeberstunden(MA.mit_id, auszahlugsdatum.ToString("dd/MM/yyyy")) ues.uest_deleted = True - ues.uest_lastChanged = Now() - ues.uest_systemuser = VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME - ues.SAVE() + ues.uest_lastChanged = Now() + ues.uest_systemuser = VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME + ues.SAVE() MsgBox("Erfolgreich aus Timas zurückgesetzt!") picDel.Visible = False