Merge branch 'newMaster2024' of https://git.it.verag.ag/edv/SDL into newMaster2024

VERAG_PROG_ALLGEMEIN/Schnittstellen/TIMAS/cTimasAPI.vb

@@ -1039,6 +1039,7 @@ Public Class cTimasAPI
                 dt.Columns.Add("Geschlecht", GetType(String))
                 dt.Columns.Add("Ausweis-Nr", GetType(Integer))
                 dt.Columns.Add("Info", GetType(String))
+                'dt.Columns.Add("AVISO-ID", GetType(Integer))
             End If
             dt.Clear()
 
@@ -1055,6 +1056,8 @@ Public Class cTimasAPI
                 R("Geschlecht") = employee.StringOf("gender")
                 R("Ausweis-Nr") = employee.IntOf("card")
                 R("Info") = employee.StringOf("info")
+                'R("AVISO-ID") = employee.IntOf("externid")
+
                 dt.Rows.Add(R)
                 j = j + 1
             End While

VERAG_PROG_ALLGEMEIN/Schnittstellen/cSyska_Interface.vb

@@ -240,7 +240,7 @@ Public Class cSyska_Interface
                 Dim dt_Stamm As DataTable = getStammdaten(FiBuSchnittstelleNr)
                 Dim postfix As String = ""
                 If dt_Stamm IsNot Nothing AndAlso dt_Stamm.Rows.Count > 0 Then
-                    If FiBuSchnittstelleNr = 19 Then postfix = "MDM_"
+                    If FiBuSchnittstelleNr = 19 Then postfix = "_MDM"
                     Dim fileKD As System.IO.StreamWriter
                     Dim DateinameKD = "AVISO_DEBI_" & Now.ToString("ddMMyyyy_HHmm") & postfix & ".txt"
                     fileKD = My.Computer.FileSystem.OpenTextFileWriter(pathKD & DateinameKD, True, System.Text.Encoding.GetEncoding("iso-8859-15"))