neu

initATLASAufschubkonten/cBuergschaften.vb

@@ -152,10 +152,10 @@ Public Class cBuergschaften
         'MsgBox("start")
         Dim cnt As Integer = 0
         Dim dr As SqlDataReader
-        Dim sql As String = "SELECT  * FROM ezoll.dbo.vwVERAG_Zolaris_EZoll_NCTS_Datenübernahme"
+        Dim sql As String = "SELECT  * FROM  ezoll.dbo.vwVERAG_Zolaris_EZoll_NCTS_Datenübernahme"
         If Not history Then sql &= " WHERE [AnmeldungsDatum] > DATEADD(DAY, - 10, GETDATE())" 'letzten 10 Tage
 
-        Dim sqlConn As SqlConnection = GetNewOpenConnectionBUCHHALTUNG()
+        Dim sqlConn As SqlConnection = VERAG_PROG_ALLGEMEIN.SQL.GetNewOpenConnectionEZOLL
         '    setLabel(frmAtlasAufschub.lbBrgAtlasSuben, "einlesen ...")
 
         Using conn As SqlConnection = sqlConn