diff --git a/VERAG_PROG_ALLGEMEIN/Classes/SQL.vb b/VERAG_PROG_ALLGEMEIN/Classes/SQL.vb index 328fb45b..48409fde 100644 --- a/VERAG_PROG_ALLGEMEIN/Classes/SQL.vb +++ b/VERAG_PROG_ALLGEMEIN/Classes/SQL.vb @@ -595,6 +595,7 @@ Public Class SQL Case "ATLAS" : conn = GetNewOpenConnectionATLAS() Case "ATLAS_SBG" : conn = GetNewOpenConnectionATLAS_SBG() Case "EZOLL" : conn = GetNewOpenConnectionEZOLL() + Case "EZOLL_UNISPED" : conn = GetNewOpenConnectionEZOLL_UNISPED() Case "AVISO" : conn = GetNewOpenConnectionAVISO() Case "VERAG" : conn = GetNewOpenConnectionFMZOLL() Case "WEB" : conn = GetNewOpenConnectionWEB() @@ -631,6 +632,7 @@ Public Class SQL Case "ATLAS" : conn = GetNewOpenConnectionATLAS() Case "ATLAS_SBG" : conn = GetNewOpenConnectionATLAS_SBG() Case "EZOLL" : conn = GetNewOpenConnectionEZOLL() + Case "EZOLL_UNISPED" : conn = GetNewOpenConnectionEZOLL_UNISPED() Case "AVISO" : conn = GetNewOpenConnectionAVISO() Case "VERAG" : conn = GetNewOpenConnectionFMZOLL() Case "DISPO" : conn = GetNewOpenConnectionDISPO() @@ -700,6 +702,7 @@ Public Class SQL Case "ATLAS" : conn = GetNewOpenConnectionATLAS() Case "ATLAS_SBG" : conn = GetNewOpenConnectionATLAS_SBG() Case "EZOLL" : conn = GetNewOpenConnectionEZOLL() + Case "EZOLL_UNISPED" : conn = GetNewOpenConnectionEZOLL_UNISPED() Case "AVISO" : conn = GetNewOpenConnectionAVISO() Case "VERAG" : conn = GetNewOpenConnectionFMZOLL() Case "SCANCANON" : conn = GetNewOpenConnectionSCANCANON() @@ -753,6 +756,7 @@ Public Class SQL Case "DISPO" : conn = GetNewOpenConnectionDISPO() Case "ATLAS_SBG" : conn = GetNewOpenConnectionATLAS_SBG() Case "EZOLL" : conn = GetNewOpenConnectionEZOLL() + Case "EZOLL_UNISPED" : conn = GetNewOpenConnectionEZOLL_UNISPED() Case "AVISO" : conn = GetNewOpenConnectionAVISO() Case "VERAG" : conn = GetNewOpenConnectionFMZOLL() Case "WEB" : conn = GetNewOpenConnectionWEB() @@ -797,6 +801,7 @@ Public Class SQL Case "ATLAS" : conn = GetNewOpenConnectionATLAS() Case "ATLAS_SBG" : conn = GetNewOpenConnectionATLAS_SBG() Case "EZOLL" : conn = GetNewOpenConnectionEZOLL() + Case "EZOLL_UNISPED" : conn = GetNewOpenConnectionEZOLL_UNISPED() Case "AVISO" : conn = GetNewOpenConnectionAVISO() Case "VERAG" : conn = GetNewOpenConnectionFMZOLL() Case "DISPO" : conn = GetNewOpenConnectionDISPO() @@ -839,6 +844,7 @@ Public Class SQL Case "ATLAS" : conn = GetNewOpenConnectionATLAS() Case "ATLAS_SBG" : conn = GetNewOpenConnectionATLAS_SBG() Case "EZOLL" : conn = GetNewOpenConnectionEZOLL() + Case "EZOLL_UNISPED" : conn = GetNewOpenConnectionEZOLL_UNISPED() Case "AVISO" : conn = GetNewOpenConnectionAVISO() Case "DISPO" : conn = GetNewOpenConnectionDISPO() Case "VERAG" : conn = GetNewOpenConnectionFMZOLL() @@ -875,6 +881,7 @@ Public Class SQL Case "ATLAS" : conn = GetNewOpenConnectionATLAS() Case "ATLAS_SBG" : conn = GetNewOpenConnectionATLAS_SBG() Case "EZOLL" : conn = GetNewOpenConnectionEZOLL() + Case "EZOLL_UNISPED" : conn = GetNewOpenConnectionEZOLL_UNISPED() Case "AVISO" : conn = GetNewOpenConnectionAVISO() Case "DISPO" : conn = GetNewOpenConnectionDISPO() Case "VERAG" : conn = GetNewOpenConnectionFMZOLL() @@ -940,6 +947,7 @@ Public Class SQL Case "ATLAS" : conn = GetNewOpenConnectionATLAS() Case "ATLAS_SBG" : conn = GetNewOpenConnectionATLAS_SBG() Case "EZOLL" : conn = GetNewOpenConnectionEZOLL() + Case "EZOLL_UNISPED" : conn = GetNewOpenConnectionEZOLL_UNISPED() Case "AVISO" : conn = GetNewOpenConnectionAVISO() Case "VERAG" : conn = GetNewOpenConnectionFMZOLL() Case "WEB" : conn = GetNewOpenConnectionWEB() diff --git a/VERAG_PROG_ALLGEMEIN/Classes/cMitarbeiter.vb b/VERAG_PROG_ALLGEMEIN/Classes/cMitarbeiter.vb index c1f42bab..05585073 100644 --- a/VERAG_PROG_ALLGEMEIN/Classes/cMitarbeiter.vb +++ b/VERAG_PROG_ALLGEMEIN/Classes/cMitarbeiter.vb @@ -41,6 +41,7 @@ Public Class cMitarbeiter Property mit_DpUserStandardFirma2 As Object = Nothing Property mit_EZOLL_SB As Object = Nothing + Property mit_EZOLL_SB_UNISPED As Object = Nothing Property mit_ATLAS_SB As Object = Nothing Property mit_pseudoUser As Boolean = False @@ -160,6 +161,7 @@ Public Class cMitarbeiter list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_DpUserStandardFirma", mit_DpUserStandardFirma)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_DpUserStandardFirma2", mit_DpUserStandardFirma2)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_EZOLL_SB", mit_EZOLL_SB)) + list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_EZOLL_SB_UNISPED", mit_EZOLL_SB_UNISPED)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_ATLAS_SB", mit_ATLAS_SB)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_pseudoUser", mit_pseudoUser)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_FirmenDatenAnzeige", mit_FirmenDatenAnzeige)) @@ -351,6 +353,7 @@ Public Class cMitarbeiter Me.mit_firma = dr.Item("mit_firma") If Not dr.Item("mit_firmaFMZoll") Is DBNull.Value Then Me.mit_firmaFMZoll = dr.Item("mit_firmaFMZoll") If Not dr.Item("mit_EZOLL_SB") Is DBNull.Value Then Me.mit_EZOLL_SB = dr.Item("mit_EZOLL_SB") + If Not dr.Item("mit_EZOLL_SB_UNISPED") Is DBNull.Value Then Me.mit_EZOLL_SB_UNISPED = dr.Item("mit_EZOLL_SB_UNISPED") If Not dr.Item("mit_ATLAS_SB") Is DBNull.Value Then Me.mit_ATLAS_SB = dr.Item("mit_ATLAS_SB") Me.mit_pseudoUser = dr.Item("mit_pseudoUser") If Not dr.Item("mit_DAKOSY_SB") Is DBNull.Value Then Me.mit_DAKOSY_SB = dr.Item("mit_DAKOSY_SB")