TimasAPI, Uberstunden, Mailvorlagen, etc,

VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmUeberstundenauszahlen.vb

@@ -494,6 +494,27 @@ Public Class frmUeberstundenauszahlen
         Process.Start(webAddress)
     End Sub
 
+    Private Sub TabControl1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TabControl1.SelectedIndexChanged
+        If TabControl1.SelectedIndex = 1 Then
+            Try
+
+                Dim dtbereitsausgezahlteUE As DataTable
+                Dim bereitsgezahlteueberstunden = "select uest_date as Datum ,isnull(uest_100,0) as ÜS100 , isnull(uest_50,0) as ÜS50, isnull(uest_25,0) as ÜS25, isnull(uest_0,0) as ÜS50_Saldo, isnull(uest_paidout_sum,0) as ausbezahlt, uest_systemuser as eingetragen_von ,uest_created as eingetragen_am 
+                FROM [ADMIN].[dbo].[tblUeberstunden] 
+                where uest_deleted = 0 and uest_timasId = " & MA.mit_timasId & "
+                Order by uest_date"
+
+                dtbereitsausgezahlteUE = SQL.loadDgvBySql(bereitsgezahlteueberstunden, "ADMIN", 100, True)
+
+                dgvUberstundenauszahlungen.DataSource = dtbereitsausgezahlteUE
+
+
+            Catch ex As Exception
+                VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
+            End Try
+        End If
+    End Sub
+
     Private Sub txtAusz_hhmm_KeyPress(sender As Object, e As KeyPressEventArgs)
         Select Case Asc(e.KeyChar)
             Case 48 To 57, 8, 44, 46, 58
@@ -880,7 +901,7 @@ Public Class frmUeberstundenauszahlen
 
         'wenn berechneter Saldo negativ, dann ist im Regelfall das aktuelle MOnat noch nicht abgeschlossen!, daher anstatt den berechneten Saldo in overallBalance laden!
 
-        txtlfdSaldo.Text = timas.getTimeSaldo(MA.mit_timasId, "", "overallBalance")
+        txtlfdSaldo.Text = timas.getTimeSaldo(MA.mit_timasId, "", "dailyBalanceYesterday")
 
         stunden100auszbere = RoundOfDigits(stunden100ausz * faktor100Zuschlag / 100, 2)
         stunden50auszbere = RoundOfDigits(stunden50ausz * faktor50Zuschlag / 100, 2)