TimasAPI, Ueberstundenprotokollierung, etc.

VERAG_PROG_ALLGEMEIN/Schnittstellen/TIMAS/cTimasAPI.vb

@@ -907,7 +907,7 @@ Public Class cTimasAPI
 
             If dt IsNot Nothing AndAlso Not dt.Columns.Contains("Id") Then
                 dt.Columns.Add("Id", GetType(Integer))
-                'dt.Columns.Add("externid", GetType(String))
+                'dt.Columns.Add("Login", GetType(String))
                 dt.Columns.Add("Personal-Nr (Lohn)", GetType(String))
                 dt.Columns.Add("Vorname", GetType(String))
                 dt.Columns.Add("Nachname", GetType(String))
@@ -923,7 +923,7 @@ Public Class cTimasAPI
                 Dim employee As Chilkat.JsonObject = jsonArray.ObjectAt(j)
                 Dim R As DataRow = dt.NewRow
                 R("Id") = employee.IntOf("id")
-                '("externid") = employee.StringOf("externid")
+                'R("Login") = employee.StringOf("login")
                 R("Personal-Nr (Lohn)") = employee.StringOf("pnr1")
                 R("Vorname") = employee.StringOf("firstname")
                 R("Nachname") = employee.StringOf("lastname")