edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

MA

Browse Source
This commit is contained in:
Andreas Luxbauer
2023-10-27 15:21:28 +02:00
parent b56e276882
commit c08aa3750b
2 changed files with 11 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
VERAG_PROG_ALLGEMEIN/Classes/cMitarbeiter.vb
View File

@@ -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")