Feiertage

This commit is contained in:
2022-11-08 08:54:02 +01:00
parent 49b57830f2
commit 0fd21dba2a
5 changed files with 6 additions and 6 deletions

View File

@@ -3978,7 +3978,7 @@ Public Class cDienstplan
Dim datum As Date = CDate(dr.Item("dstetr_datum"))
Dim woTag = datum.ToString("ddd", New CultureInfo("de-DE")).ToUpper
Dim FT As New cFeiertage()
Dim FT As New VERAG_PROG_ALLGEMEIN.cFeiertage()
' If FT.isFeiertag(datum) And woTag <> "SO" And woTag <> "SA" Then
' s +=
' End If