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

Merge branch 'ADMIN' of https://verag.visualstudio.com/ADMIN/_git/ADMIN into ADMIN

Browse Source
This commit is contained in:
Andreas Luxbauer
2023-03-29 08:27:27 +02:00
parent b32f22ff24 575b10f4c4
commit 847f01c38b
5 changed files with 439 additions and 280 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
UID/ADMIN.vbproj
View File

@@ -220,6 +220,9 @@
<Reference Include="MySql.Data"> <Reference Include="MySql.Data">
<HintPath>..\..\..\dll\.net MySQL v4.5.2\MySql.Data.dll</HintPath> <HintPath>..\..\..\dll\.net MySQL v4.5.2\MySql.Data.dll</HintPath>
</Reference> </Reference>
<Reference Include="Newtonsoft.Json, Version=13.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
<HintPath>..\packages\Newtonsoft.Json.13.0.2\lib\net45\Newtonsoft.Json.dll</HintPath>
</Reference>
<Reference Include="PdfSharp"> <Reference Include="PdfSharp">
<HintPath>..\..\..\dll\PdfSharp.dll</HintPath> <HintPath>..\..\..\dll\PdfSharp.dll</HintPath>
</Reference> </Reference>
@@ -245,6 +248,7 @@
<Reference Include="System.Memory, Version=4.0.1.1, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL"> <Reference Include="System.Memory, Version=4.0.1.1, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
<HintPath>..\packages\System.Memory.4.5.4\lib\net461\System.Memory.dll</HintPath> <HintPath>..\packages\System.Memory.4.5.4\lib\net461\System.Memory.dll</HintPath>
</Reference> </Reference>
<Reference Include="System.Net.Http" />
<Reference Include="System.Numerics" /> <Reference Include="System.Numerics" />
<Reference Include="System.Numerics.Vectors, Version=4.1.4.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL"> <Reference Include="System.Numerics.Vectors, Version=4.1.4.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
<HintPath>..\packages\System.Numerics.Vectors.4.5.0\lib\net46\System.Numerics.Vectors.dll</HintPath> <HintPath>..\packages\System.Numerics.Vectors.4.5.0\lib\net46\System.Numerics.Vectors.dll</HintPath>

653
UID/Mitarbeiter/frmMitarbDetails.Designer.vb generated
View File

@@ -34,21 +34,13 @@ Partial Class frmMitarbDetails
Me.TabPage1 = New System.Windows.Forms.TabPage() Me.TabPage1 = New System.Windows.Forms.TabPage()
Me.tbcntr = New System.Windows.Forms.TabControl() Me.tbcntr = New System.Windows.Forms.TabControl()
Me.TabPage2 = New System.Windows.Forms.TabPage() Me.TabPage2 = New System.Windows.Forms.TabPage()
Me.cboDPFirma2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboDPFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label50 = New System.Windows.Forms.Label() Me.Label50 = New System.Windows.Forms.Label()
Me.Label38 = New System.Windows.Forms.Label() Me.Label38 = New System.Windows.Forms.Label()
Me.cboPersonal = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label37 = New System.Windows.Forms.Label() Me.Label37 = New System.Windows.Forms.Label()
Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboDP = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboKasse = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label42 = New System.Windows.Forms.Label() Me.Label42 = New System.Windows.Forms.Label()
Me.Label40 = New System.Windows.Forms.Label() Me.Label40 = New System.Windows.Forms.Label()
Me.cbxSpedBuch = New System.Windows.Forms.CheckBox() Me.cbxSpedBuch = New System.Windows.Forms.CheckBox()
Me.Label41 = New System.Windows.Forms.Label() Me.Label41 = New System.Windows.Forms.Label()
Me.cboSpedbuch = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.MyComboBox3 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.TabPage4 = New System.Windows.Forms.TabPage() Me.TabPage4 = New System.Windows.Forms.TabPage()
Me.txtTelotecSB = New System.Windows.Forms.TextBox() Me.txtTelotecSB = New System.Windows.Forms.TextBox()
Me.Label51 = New System.Windows.Forms.Label() Me.Label51 = New System.Windows.Forms.Label()
@@ -58,25 +50,26 @@ Partial Class frmMitarbDetails
Me.Label46 = New System.Windows.Forms.Label() Me.Label46 = New System.Windows.Forms.Label()
Me.Label44 = New System.Windows.Forms.Label() Me.Label44 = New System.Windows.Forms.Label()
Me.Label43 = New System.Windows.Forms.Label() Me.Label43 = New System.Windows.Forms.Label()
Me.cboEZOLL_SB = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.TabPage5 = New System.Windows.Forms.TabPage()
Me.cboATLAS_SB = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.lblCheckconnection = New System.Windows.Forms.Label()
Me.Button6 = New System.Windows.Forms.Button()
Me.txtCSPW = New System.Windows.Forms.TextBox()
Me.Label58 = New System.Windows.Forms.Label()
Me.txtCSUser = New System.Windows.Forms.TextBox()
Me.Label59 = New System.Windows.Forms.Label()
Me.Label4 = New System.Windows.Forms.Label() Me.Label4 = New System.Windows.Forms.Label()
Me.GroupBox2 = New System.Windows.Forms.GroupBox() Me.GroupBox2 = New System.Windows.Forms.GroupBox()
Me.cboFaktGrp = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.txtAbweichenderAnzeigename = New System.Windows.Forms.TextBox()
Me.Label57 = New System.Windows.Forms.Label()
Me.Label56 = New System.Windows.Forms.Label() Me.Label56 = New System.Windows.Forms.Label()
Me.cboALIASDomain2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtALIASUser2 = New System.Windows.Forms.TextBox() Me.txtALIASUser2 = New System.Windows.Forms.TextBox()
Me.Label54 = New System.Windows.Forms.Label() Me.Label54 = New System.Windows.Forms.Label()
Me.cboFirmaHaupt = New System.Windows.Forms.ComboBox() Me.cboFirmaHaupt = New System.Windows.Forms.ComboBox()
Me.cboTeam = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label53 = New System.Windows.Forms.Label() Me.Label53 = New System.Windows.Forms.Label()
Me.cboALIASDomain = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtALIASUser = New System.Windows.Forms.TextBox() Me.txtALIASUser = New System.Windows.Forms.TextBox()
Me.Label52 = New System.Windows.Forms.Label() Me.Label52 = New System.Windows.Forms.Label()
Me.lkl = New System.Windows.Forms.LinkLabel() Me.lkl = New System.Windows.Forms.LinkLabel()
Me.Label45 = New System.Windows.Forms.Label() Me.Label45 = New System.Windows.Forms.Label()
Me.MyListBox1 = New VERAG_PROG_ALLGEMEIN.MyListBox()
Me.cboFirmaFMZOLL = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label39 = New System.Windows.Forms.Label() Me.Label39 = New System.Windows.Forms.Label()
Me.cboFirma = New System.Windows.Forms.ComboBox() Me.cboFirma = New System.Windows.Forms.ComboBox()
Me.Label36 = New System.Windows.Forms.Label() Me.Label36 = New System.Windows.Forms.Label()
@@ -92,13 +85,11 @@ Partial Class frmMitarbDetails
Me.txtDurchwahl = New System.Windows.Forms.TextBox() Me.txtDurchwahl = New System.Windows.Forms.TextBox()
Me.Label19 = New System.Windows.Forms.Label() Me.Label19 = New System.Windows.Forms.Label()
Me.Label8 = New System.Windows.Forms.Label() Me.Label8 = New System.Windows.Forms.Label()
Me.cboAbteilung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtPwd = New System.Windows.Forms.TextBox() Me.txtPwd = New System.Windows.Forms.TextBox()
Me.Label11 = New System.Windows.Forms.Label() Me.Label11 = New System.Windows.Forms.Label()
Me.Label6 = New System.Windows.Forms.Label() Me.Label6 = New System.Windows.Forms.Label()
Me.txtUsername = New System.Windows.Forms.TextBox() Me.txtUsername = New System.Windows.Forms.TextBox()
Me.Label3 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label()
Me.cboNiederlassung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label9 = New System.Windows.Forms.Label() Me.Label9 = New System.Windows.Forms.Label()
Me.GroupBox1 = New System.Windows.Forms.GroupBox() Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.cbxChatBenutzer = New System.Windows.Forms.CheckBox() Me.cbxChatBenutzer = New System.Windows.Forms.CheckBox()
@@ -130,7 +121,6 @@ Partial Class frmMitarbDetails
Me.Label2 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label()
Me.txtInfo = New System.Windows.Forms.RichTextBox() Me.txtInfo = New System.Windows.Forms.RichTextBox()
Me.TabPage3 = New System.Windows.Forms.TabPage() Me.TabPage3 = New System.Windows.Forms.TabPage()
Me.cboProgSprache = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label55 = New System.Windows.Forms.Label() Me.Label55 = New System.Windows.Forms.Label()
Me.Button5 = New System.Windows.Forms.Button() Me.Button5 = New System.Windows.Forms.Button()
Me.Button4 = New System.Windows.Forms.Button() Me.Button4 = New System.Windows.Forms.Button()
@@ -173,8 +163,26 @@ Partial Class frmMitarbDetails
Me.PictureBox6 = New System.Windows.Forms.PictureBox() Me.PictureBox6 = New System.Windows.Forms.PictureBox()
Me.cboAdminBer = New System.Windows.Forms.ComboBox() Me.cboAdminBer = New System.Windows.Forms.ComboBox()
Me.Label7 = New System.Windows.Forms.Label() Me.Label7 = New System.Windows.Forms.Label()
Me.txtAbweichenderAnzeigename = New System.Windows.Forms.TextBox() Me.cboDPFirma2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label57 = New System.Windows.Forms.Label() Me.cboDPFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboPersonal = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboDP = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboKasse = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboSpedbuch = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.MyComboBox3 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboEZOLL_SB = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboATLAS_SB = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboFaktGrp = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboALIASDomain2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboTeam = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboALIASDomain = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.MyListBox1 = New VERAG_PROG_ALLGEMEIN.MyListBox()
Me.cboFirmaFMZOLL = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboAbteilung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboNiederlassung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboProgSprache = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cbxShowPW = New System.Windows.Forms.CheckBox()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Panel1.SuspendLayout() Me.Panel1.SuspendLayout()
Me.TabControl2.SuspendLayout() Me.TabControl2.SuspendLayout()
@@ -182,6 +190,7 @@ Partial Class frmMitarbDetails
Me.tbcntr.SuspendLayout() Me.tbcntr.SuspendLayout()
Me.TabPage2.SuspendLayout() Me.TabPage2.SuspendLayout()
Me.TabPage4.SuspendLayout() Me.TabPage4.SuspendLayout()
Me.TabPage5.SuspendLayout()
Me.GroupBox2.SuspendLayout() Me.GroupBox2.SuspendLayout()
Me.GroupBox1.SuspendLayout() Me.GroupBox1.SuspendLayout()
CType(Me.picFoto, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.picFoto, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -302,6 +311,7 @@ Partial Class frmMitarbDetails
' '
Me.tbcntr.Controls.Add(Me.TabPage2) Me.tbcntr.Controls.Add(Me.TabPage2)
Me.tbcntr.Controls.Add(Me.TabPage4) Me.tbcntr.Controls.Add(Me.TabPage4)
Me.tbcntr.Controls.Add(Me.TabPage5)
Me.tbcntr.Location = New System.Drawing.Point(2, 539) Me.tbcntr.Location = New System.Drawing.Point(2, 539)
Me.tbcntr.Name = "tbcntr" Me.tbcntr.Name = "tbcntr"
Me.tbcntr.SelectedIndex = 0 Me.tbcntr.SelectedIndex = 0
@@ -333,30 +343,6 @@ Partial Class frmMitarbDetails
Me.TabPage2.Text = "Zuordnung Intern" Me.TabPage2.Text = "Zuordnung Intern"
Me.TabPage2.UseVisualStyleBackColor = True Me.TabPage2.UseVisualStyleBackColor = True
' '
'cboDPFirma2
'
Me.cboDPFirma2._allowedValuesFreiText = Nothing
Me.cboDPFirma2._allowFreiText = False
Me.cboDPFirma2._value = ""
Me.cboDPFirma2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboDPFirma2.FormattingEnabled = True
Me.cboDPFirma2.Location = New System.Drawing.Point(106, 151)
Me.cboDPFirma2.Name = "cboDPFirma2"
Me.cboDPFirma2.Size = New System.Drawing.Size(101, 21)
Me.cboDPFirma2.TabIndex = 108
'
'cboDPFirma
'
Me.cboDPFirma._allowedValuesFreiText = Nothing
Me.cboDPFirma._allowFreiText = False
Me.cboDPFirma._value = ""
Me.cboDPFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboDPFirma.FormattingEnabled = True
Me.cboDPFirma.Location = New System.Drawing.Point(7, 151)
Me.cboDPFirma.Name = "cboDPFirma"
Me.cboDPFirma.Size = New System.Drawing.Size(101, 21)
Me.cboDPFirma.TabIndex = 107
'
'Label50 'Label50
' '
Me.Label50.AutoSize = True Me.Label50.AutoSize = True
@@ -377,18 +363,6 @@ Partial Class frmMitarbDetails
Me.Label38.TabIndex = 96 Me.Label38.TabIndex = 96
Me.Label38.Text = "Standard-Filiale (SpedBuch)" Me.Label38.Text = "Standard-Filiale (SpedBuch)"
' '
'cboPersonal
'
Me.cboPersonal._allowedValuesFreiText = Nothing
Me.cboPersonal._allowFreiText = False
Me.cboPersonal._value = ""
Me.cboPersonal.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboPersonal.FormattingEnabled = True
Me.cboPersonal.Location = New System.Drawing.Point(7, 65)
Me.cboPersonal.Name = "cboPersonal"
Me.cboPersonal.Size = New System.Drawing.Size(200, 21)
Me.cboPersonal.TabIndex = 95
'
'Label37 'Label37
' '
Me.Label37.AutoSize = True Me.Label37.AutoSize = True
@@ -399,42 +373,6 @@ Partial Class frmMitarbDetails
Me.Label37.TabIndex = 94 Me.Label37.TabIndex = 94
Me.Label37.Text = "Zuordnung / FM-ZOLL Personal - Tabelle:" Me.Label37.Text = "Zuordnung / FM-ZOLL Personal - Tabelle:"
' '
'MyComboBox2
'
Me.MyComboBox2._allowedValuesFreiText = Nothing
Me.MyComboBox2._allowFreiText = False
Me.MyComboBox2._value = ""
Me.MyComboBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.MyComboBox2.FormattingEnabled = True
Me.MyComboBox2.Location = New System.Drawing.Point(9, 24)
Me.MyComboBox2.Name = "MyComboBox2"
Me.MyComboBox2.Size = New System.Drawing.Size(198, 21)
Me.MyComboBox2.TabIndex = 97
'
'cboDP
'
Me.cboDP._allowedValuesFreiText = Nothing
Me.cboDP._allowFreiText = False
Me.cboDP._value = ""
Me.cboDP.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboDP.FormattingEnabled = True
Me.cboDP.Location = New System.Drawing.Point(217, 151)
Me.cboDP.Name = "cboDP"
Me.cboDP.Size = New System.Drawing.Size(198, 21)
Me.cboDP.TabIndex = 105
'
'cboKasse
'
Me.cboKasse._allowedValuesFreiText = Nothing
Me.cboKasse._allowFreiText = False
Me.cboKasse._value = ""
Me.cboKasse.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboKasse.FormattingEnabled = True
Me.cboKasse.Location = New System.Drawing.Point(7, 106)
Me.cboKasse.Name = "cboKasse"
Me.cboKasse.Size = New System.Drawing.Size(200, 21)
Me.cboKasse.TabIndex = 99
'
'Label42 'Label42
' '
Me.Label42.AutoSize = True Me.Label42.AutoSize = True
@@ -476,31 +414,6 @@ Partial Class frmMitarbDetails
Me.Label41.TabIndex = 100 Me.Label41.TabIndex = 100
Me.Label41.Text = "Standard-Preisliste:" Me.Label41.Text = "Standard-Preisliste:"
' '
'cboSpedbuch
'
Me.cboSpedbuch._allowedValuesFreiText = Nothing
Me.cboSpedbuch._allowFreiText = False
Me.cboSpedbuch._value = ""
Me.cboSpedbuch.Enabled = False
Me.cboSpedbuch.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboSpedbuch.FormattingEnabled = True
Me.cboSpedbuch.Location = New System.Drawing.Point(217, 66)
Me.cboSpedbuch.Name = "cboSpedbuch"
Me.cboSpedbuch.Size = New System.Drawing.Size(200, 21)
Me.cboSpedbuch.TabIndex = 103
'
'MyComboBox3
'
Me.MyComboBox3._allowedValuesFreiText = Nothing
Me.MyComboBox3._allowFreiText = False
Me.MyComboBox3._value = ""
Me.MyComboBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.MyComboBox3.FormattingEnabled = True
Me.MyComboBox3.Location = New System.Drawing.Point(217, 106)
Me.MyComboBox3.Name = "MyComboBox3"
Me.MyComboBox3.Size = New System.Drawing.Size(198, 21)
Me.MyComboBox3.TabIndex = 101
'
'TabPage4 'TabPage4
' '
Me.TabPage4.Controls.Add(Me.txtTelotecSB) Me.TabPage4.Controls.Add(Me.txtTelotecSB)
@@ -595,33 +508,79 @@ Partial Class frmMitarbDetails
Me.Label43.TabIndex = 108 Me.Label43.TabIndex = 108
Me.Label43.Text = "EZOLL Sachbearbeiter:" Me.Label43.Text = "EZOLL Sachbearbeiter:"
' '
'cboEZOLL_SB 'TabPage5
' '
Me.cboEZOLL_SB._allowedValuesFreiText = Nothing Me.TabPage5.Controls.Add(Me.cbxShowPW)
Me.cboEZOLL_SB._allowFreiText = False Me.TabPage5.Controls.Add(Me.lblCheckconnection)
Me.cboEZOLL_SB._value = "" Me.TabPage5.Controls.Add(Me.Button6)
Me.cboEZOLL_SB.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend Me.TabPage5.Controls.Add(Me.txtCSPW)
Me.cboEZOLL_SB.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems Me.TabPage5.Controls.Add(Me.Label58)
Me.cboEZOLL_SB.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.TabPage5.Controls.Add(Me.txtCSUser)
Me.cboEZOLL_SB.FormattingEnabled = True Me.TabPage5.Controls.Add(Me.Label59)
Me.cboEZOLL_SB.Location = New System.Drawing.Point(217, 29) Me.TabPage5.Location = New System.Drawing.Point(4, 22)
Me.cboEZOLL_SB.Name = "cboEZOLL_SB" Me.TabPage5.Name = "TabPage5"
Me.cboEZOLL_SB.Size = New System.Drawing.Size(198, 21) Me.TabPage5.Size = New System.Drawing.Size(442, 174)
Me.cboEZOLL_SB.TabIndex = 109 Me.TabPage5.TabIndex = 2
Me.TabPage5.Text = "Zuordnung Creditsafe"
Me.TabPage5.UseVisualStyleBackColor = True
' '
'cboATLAS_SB 'lblCheckconnection
' '
Me.cboATLAS_SB._allowedValuesFreiText = Nothing Me.lblCheckconnection.AutoSize = True
Me.cboATLAS_SB._allowFreiText = False Me.lblCheckconnection.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboATLAS_SB._value = "" Me.lblCheckconnection.Location = New System.Drawing.Point(131, 104)
Me.cboATLAS_SB.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend Me.lblCheckconnection.Name = "lblCheckconnection"
Me.cboATLAS_SB.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems Me.lblCheckconnection.Size = New System.Drawing.Size(0, 13)
Me.cboATLAS_SB.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblCheckconnection.TabIndex = 121
Me.cboATLAS_SB.FormattingEnabled = True '
Me.cboATLAS_SB.Location = New System.Drawing.Point(9, 29) 'Button6
Me.cboATLAS_SB.Name = "cboATLAS_SB" '
Me.cboATLAS_SB.Size = New System.Drawing.Size(200, 21) Me.Button6.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.cboATLAS_SB.TabIndex = 107 Me.Button6.BackColor = System.Drawing.Color.White
Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button6.Location = New System.Drawing.Point(14, 97)
Me.Button6.Name = "Button6"
Me.Button6.Size = New System.Drawing.Size(88, 26)
Me.Button6.TabIndex = 53
Me.Button6.Text = "prüfen"
Me.Button6.UseVisualStyleBackColor = False
'
'txtCSPW
'
Me.txtCSPW.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtCSPW.Location = New System.Drawing.Point(14, 71)
Me.txtCSPW.Name = "txtCSPW"
Me.txtCSPW.Size = New System.Drawing.Size(174, 20)
Me.txtCSPW.TabIndex = 120
Me.txtCSPW.UseSystemPasswordChar = True
'
'Label58
'
Me.Label58.AutoSize = True
Me.Label58.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label58.Location = New System.Drawing.Point(11, 55)
Me.Label58.Name = "Label58"
Me.Label58.Size = New System.Drawing.Size(50, 13)
Me.Label58.TabIndex = 119
Me.Label58.Text = "Passwort"
'
'txtCSUser
'
Me.txtCSUser.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtCSUser.Location = New System.Drawing.Point(12, 28)
Me.txtCSUser.Name = "txtCSUser"
Me.txtCSUser.Size = New System.Drawing.Size(176, 20)
Me.txtCSUser.TabIndex = 118
'
'Label59
'
Me.Label59.AutoSize = True
Me.Label59.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label59.Location = New System.Drawing.Point(9, 12)
Me.Label59.Name = "Label59"
Me.Label59.Size = New System.Drawing.Size(49, 13)
Me.Label59.TabIndex = 117
Me.Label59.Text = "Benutzer"
' '
'Label4 'Label4
' '
@@ -682,19 +641,23 @@ Partial Class frmMitarbDetails
Me.GroupBox2.TabStop = False Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Firmendaten" Me.GroupBox2.Text = "Firmendaten"
' '
'cboFaktGrp 'txtAbweichenderAnzeigename
' '
Me.cboFaktGrp._allowedValuesFreiText = Nothing Me.txtAbweichenderAnzeigename.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboFaktGrp._allowFreiText = False Me.txtAbweichenderAnzeigename.Location = New System.Drawing.Point(399, 156)
Me.cboFaktGrp._value = "" Me.txtAbweichenderAnzeigename.Name = "txtAbweichenderAnzeigename"
Me.cboFaktGrp.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.txtAbweichenderAnzeigename.Size = New System.Drawing.Size(148, 20)
Me.cboFaktGrp.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.txtAbweichenderAnzeigename.TabIndex = 109
Me.cboFaktGrp.FormattingEnabled = True '
Me.cboFaktGrp.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"}) 'Label57
Me.cboFaktGrp.Location = New System.Drawing.Point(211, 155) '
Me.cboFaktGrp.Name = "cboFaktGrp" Me.Label57.AutoSize = True
Me.cboFaktGrp.Size = New System.Drawing.Size(177, 21) Me.Label57.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboFaktGrp.TabIndex = 107 Me.Label57.Location = New System.Drawing.Point(396, 140)
Me.Label57.Name = "Label57"
Me.Label57.Size = New System.Drawing.Size(151, 13)
Me.Label57.TabIndex = 110
Me.Label57.Text = "And. Anzeigename (Aviso,TV):"
' '
'Label56 'Label56
' '
@@ -705,19 +668,6 @@ Partial Class frmMitarbDetails
Me.Label56.TabIndex = 108 Me.Label56.TabIndex = 108
Me.Label56.Text = "Fakturierungs-Gruppe:" Me.Label56.Text = "Fakturierungs-Gruppe:"
' '
'cboALIASDomain2
'
Me.cboALIASDomain2._allowedValuesFreiText = Nothing
Me.cboALIASDomain2._allowFreiText = False
Me.cboALIASDomain2._value = ""
Me.cboALIASDomain2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboALIASDomain2.FormattingEnabled = True
Me.cboALIASDomain2.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
Me.cboALIASDomain2.Location = New System.Drawing.Point(402, 60)
Me.cboALIASDomain2.Name = "cboALIASDomain2"
Me.cboALIASDomain2.Size = New System.Drawing.Size(116, 21)
Me.cboALIASDomain2.TabIndex = 106
'
'txtALIASUser2 'txtALIASUser2
' '
Me.txtALIASUser2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.txtALIASUser2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -747,20 +697,6 @@ Partial Class frmMitarbDetails
Me.cboFirmaHaupt.Size = New System.Drawing.Size(57, 21) Me.cboFirmaHaupt.Size = New System.Drawing.Size(57, 21)
Me.cboFirmaHaupt.TabIndex = 103 Me.cboFirmaHaupt.TabIndex = 103
' '
'cboTeam
'
Me.cboTeam._allowedValuesFreiText = Nothing
Me.cboTeam._allowFreiText = False
Me.cboTeam._value = ""
Me.cboTeam.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboTeam.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboTeam.FormattingEnabled = True
Me.cboTeam.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"})
Me.cboTeam.Location = New System.Drawing.Point(399, 116)
Me.cboTeam.Name = "cboTeam"
Me.cboTeam.Size = New System.Drawing.Size(148, 21)
Me.cboTeam.TabIndex = 101
'
'Label53 'Label53
' '
Me.Label53.AutoSize = True Me.Label53.AutoSize = True
@@ -771,19 +707,6 @@ Partial Class frmMitarbDetails
Me.Label53.TabIndex = 102 Me.Label53.TabIndex = 102
Me.Label53.Text = "Team:" Me.Label53.Text = "Team:"
' '
'cboALIASDomain
'
Me.cboALIASDomain._allowedValuesFreiText = Nothing
Me.cboALIASDomain._allowFreiText = False
Me.cboALIASDomain._value = ""
Me.cboALIASDomain.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboALIASDomain.FormattingEnabled = True
Me.cboALIASDomain.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
Me.cboALIASDomain.Location = New System.Drawing.Point(402, 37)
Me.cboALIASDomain.Name = "cboALIASDomain"
Me.cboALIASDomain.Size = New System.Drawing.Size(116, 21)
Me.cboALIASDomain.TabIndex = 100
'
'txtALIASUser 'txtALIASUser
' '
Me.txtALIASUser.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.txtALIASUser.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -823,31 +746,6 @@ Partial Class frmMitarbDetails
Me.Label45.TabIndex = 97 Me.Label45.TabIndex = 97
Me.Label45.Text = "Einsicht Firmen-Daten:" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(Offene Posten, Umsätze, ... )" Me.Label45.Text = "Einsicht Firmen-Daten:" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(Offene Posten, Umsätze, ... )"
' '
'MyListBox1
'
Me.MyListBox1._value = ""
Me.MyListBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.MyListBox1.FormattingEnabled = True
Me.MyListBox1.Location = New System.Drawing.Point(551, 133)
Me.MyListBox1.MultiColumn = True
Me.MyListBox1.Name = "MyListBox1"
Me.MyListBox1.SelectionMode = System.Windows.Forms.SelectionMode.MultiSimple
Me.MyListBox1.Size = New System.Drawing.Size(152, 95)
Me.MyListBox1.TabIndex = 96
'
'cboFirmaFMZOLL
'
Me.cboFirmaFMZOLL._allowedValuesFreiText = Nothing
Me.cboFirmaFMZOLL._allowFreiText = False
Me.cboFirmaFMZOLL._value = ""
Me.cboFirmaFMZOLL.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboFirmaFMZOLL.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboFirmaFMZOLL.FormattingEnabled = True
Me.cboFirmaFMZOLL.Location = New System.Drawing.Point(210, 76)
Me.cboFirmaFMZOLL.Name = "cboFirmaFMZOLL"
Me.cboFirmaFMZOLL.Size = New System.Drawing.Size(178, 21)
Me.cboFirmaFMZOLL.TabIndex = 95
'
'Label39 'Label39
' '
Me.Label39.AutoSize = True Me.Label39.AutoSize = True
@@ -994,20 +892,6 @@ Partial Class frmMitarbDetails
Me.Label8.TabIndex = 1 Me.Label8.TabIndex = 1
Me.Label8.Text = "(erst bei Doppelklick sichtbar)" Me.Label8.Text = "(erst bei Doppelklick sichtbar)"
' '
'cboAbteilung
'
Me.cboAbteilung._allowedValuesFreiText = Nothing
Me.cboAbteilung._allowFreiText = False
Me.cboAbteilung._value = ""
Me.cboAbteilung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboAbteilung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboAbteilung.FormattingEnabled = True
Me.cboAbteilung.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"})
Me.cboAbteilung.Location = New System.Drawing.Point(211, 116)
Me.cboAbteilung.Name = "cboAbteilung"
Me.cboAbteilung.Size = New System.Drawing.Size(177, 21)
Me.cboAbteilung.TabIndex = 4
'
'txtPwd 'txtPwd
' '
Me.txtPwd.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.txtPwd.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -1054,20 +938,6 @@ Partial Class frmMitarbDetails
Me.Label3.TabIndex = 56 Me.Label3.TabIndex = 56
Me.Label3.Text = "Username:" Me.Label3.Text = "Username:"
' '
'cboNiederlassung
'
Me.cboNiederlassung._allowedValuesFreiText = Nothing
Me.cboNiederlassung._allowFreiText = False
Me.cboNiederlassung._value = ""
Me.cboNiederlassung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboNiederlassung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboNiederlassung.FormattingEnabled = True
Me.cboNiederlassung.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
Me.cboNiederlassung.Location = New System.Drawing.Point(18, 116)
Me.cboNiederlassung.Name = "cboNiederlassung"
Me.cboNiederlassung.Size = New System.Drawing.Size(177, 21)
Me.cboNiederlassung.TabIndex = 3
'
'Label9 'Label9
' '
Me.Label9.AutoSize = True Me.Label9.AutoSize = True
@@ -1439,19 +1309,6 @@ Partial Class frmMitarbDetails
Me.TabPage3.Text = "Programme" Me.TabPage3.Text = "Programme"
Me.TabPage3.UseVisualStyleBackColor = True Me.TabPage3.UseVisualStyleBackColor = True
' '
'cboProgSprache
'
Me.cboProgSprache._allowedValuesFreiText = Nothing
Me.cboProgSprache._allowFreiText = False
Me.cboProgSprache._value = ""
Me.cboProgSprache.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboProgSprache.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboProgSprache.FormattingEnabled = True
Me.cboProgSprache.Location = New System.Drawing.Point(16, 526)
Me.cboProgSprache.Name = "cboProgSprache"
Me.cboProgSprache.Size = New System.Drawing.Size(178, 21)
Me.cboProgSprache.TabIndex = 120
'
'Label55 'Label55
' '
Me.Label55.AutoSize = True Me.Label55.AutoSize = True
@@ -1893,23 +1750,261 @@ Partial Class frmMitarbDetails
Me.Label7.TabIndex = 78 Me.Label7.TabIndex = 78
Me.Label7.Text = "Berechtigung:" Me.Label7.Text = "Berechtigung:"
' '
'txtAbweichenderAnzeigename 'cboDPFirma2
' '
Me.txtAbweichenderAnzeigename.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cboDPFirma2._allowedValuesFreiText = Nothing
Me.txtAbweichenderAnzeigename.Location = New System.Drawing.Point(399, 156) Me.cboDPFirma2._allowFreiText = False
Me.txtAbweichenderAnzeigename.Name = "txtAbweichenderAnzeigename" Me.cboDPFirma2._value = ""
Me.txtAbweichenderAnzeigename.Size = New System.Drawing.Size(148, 20) Me.cboDPFirma2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtAbweichenderAnzeigename.TabIndex = 109 Me.cboDPFirma2.FormattingEnabled = True
Me.cboDPFirma2.Location = New System.Drawing.Point(106, 151)
Me.cboDPFirma2.Name = "cboDPFirma2"
Me.cboDPFirma2.Size = New System.Drawing.Size(101, 21)
Me.cboDPFirma2.TabIndex = 108
' '
'Label57 'cboDPFirma
' '
Me.Label57.AutoSize = True Me.cboDPFirma._allowedValuesFreiText = Nothing
Me.Label57.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cboDPFirma._allowFreiText = False
Me.Label57.Location = New System.Drawing.Point(396, 140) Me.cboDPFirma._value = ""
Me.Label57.Name = "Label57" Me.cboDPFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label57.Size = New System.Drawing.Size(151, 13) Me.cboDPFirma.FormattingEnabled = True
Me.Label57.TabIndex = 110 Me.cboDPFirma.Location = New System.Drawing.Point(7, 151)
Me.Label57.Text = "And. Anzeigename (Aviso,TV):" Me.cboDPFirma.Name = "cboDPFirma"
Me.cboDPFirma.Size = New System.Drawing.Size(101, 21)
Me.cboDPFirma.TabIndex = 107
'
'cboPersonal
'
Me.cboPersonal._allowedValuesFreiText = Nothing
Me.cboPersonal._allowFreiText = False
Me.cboPersonal._value = ""
Me.cboPersonal.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboPersonal.FormattingEnabled = True
Me.cboPersonal.Location = New System.Drawing.Point(7, 65)
Me.cboPersonal.Name = "cboPersonal"
Me.cboPersonal.Size = New System.Drawing.Size(200, 21)
Me.cboPersonal.TabIndex = 95
'
'MyComboBox2
'
Me.MyComboBox2._allowedValuesFreiText = Nothing
Me.MyComboBox2._allowFreiText = False
Me.MyComboBox2._value = ""
Me.MyComboBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.MyComboBox2.FormattingEnabled = True
Me.MyComboBox2.Location = New System.Drawing.Point(9, 24)
Me.MyComboBox2.Name = "MyComboBox2"
Me.MyComboBox2.Size = New System.Drawing.Size(198, 21)
Me.MyComboBox2.TabIndex = 97
'
'cboDP
'
Me.cboDP._allowedValuesFreiText = Nothing
Me.cboDP._allowFreiText = False
Me.cboDP._value = ""
Me.cboDP.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboDP.FormattingEnabled = True
Me.cboDP.Location = New System.Drawing.Point(217, 151)
Me.cboDP.Name = "cboDP"
Me.cboDP.Size = New System.Drawing.Size(198, 21)
Me.cboDP.TabIndex = 105
'
'cboKasse
'
Me.cboKasse._allowedValuesFreiText = Nothing
Me.cboKasse._allowFreiText = False
Me.cboKasse._value = ""
Me.cboKasse.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboKasse.FormattingEnabled = True
Me.cboKasse.Location = New System.Drawing.Point(7, 106)
Me.cboKasse.Name = "cboKasse"
Me.cboKasse.Size = New System.Drawing.Size(200, 21)
Me.cboKasse.TabIndex = 99
'
'cboSpedbuch
'
Me.cboSpedbuch._allowedValuesFreiText = Nothing
Me.cboSpedbuch._allowFreiText = False
Me.cboSpedbuch._value = ""
Me.cboSpedbuch.Enabled = False
Me.cboSpedbuch.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboSpedbuch.FormattingEnabled = True
Me.cboSpedbuch.Location = New System.Drawing.Point(217, 66)
Me.cboSpedbuch.Name = "cboSpedbuch"
Me.cboSpedbuch.Size = New System.Drawing.Size(200, 21)
Me.cboSpedbuch.TabIndex = 103
'
'MyComboBox3
'
Me.MyComboBox3._allowedValuesFreiText = Nothing
Me.MyComboBox3._allowFreiText = False
Me.MyComboBox3._value = ""
Me.MyComboBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.MyComboBox3.FormattingEnabled = True
Me.MyComboBox3.Location = New System.Drawing.Point(217, 106)
Me.MyComboBox3.Name = "MyComboBox3"
Me.MyComboBox3.Size = New System.Drawing.Size(198, 21)
Me.MyComboBox3.TabIndex = 101
'
'cboEZOLL_SB
'
Me.cboEZOLL_SB._allowedValuesFreiText = Nothing
Me.cboEZOLL_SB._allowFreiText = False
Me.cboEZOLL_SB._value = ""
Me.cboEZOLL_SB.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cboEZOLL_SB.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cboEZOLL_SB.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboEZOLL_SB.FormattingEnabled = True
Me.cboEZOLL_SB.Location = New System.Drawing.Point(217, 29)
Me.cboEZOLL_SB.Name = "cboEZOLL_SB"
Me.cboEZOLL_SB.Size = New System.Drawing.Size(198, 21)
Me.cboEZOLL_SB.TabIndex = 109
'
'cboATLAS_SB
'
Me.cboATLAS_SB._allowedValuesFreiText = Nothing
Me.cboATLAS_SB._allowFreiText = False
Me.cboATLAS_SB._value = ""
Me.cboATLAS_SB.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cboATLAS_SB.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cboATLAS_SB.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboATLAS_SB.FormattingEnabled = True
Me.cboATLAS_SB.Location = New System.Drawing.Point(9, 29)
Me.cboATLAS_SB.Name = "cboATLAS_SB"
Me.cboATLAS_SB.Size = New System.Drawing.Size(200, 21)
Me.cboATLAS_SB.TabIndex = 107
'
'cboFaktGrp
'
Me.cboFaktGrp._allowedValuesFreiText = Nothing
Me.cboFaktGrp._allowFreiText = False
Me.cboFaktGrp._value = ""
Me.cboFaktGrp.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboFaktGrp.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboFaktGrp.FormattingEnabled = True
Me.cboFaktGrp.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"})
Me.cboFaktGrp.Location = New System.Drawing.Point(211, 155)
Me.cboFaktGrp.Name = "cboFaktGrp"
Me.cboFaktGrp.Size = New System.Drawing.Size(177, 21)
Me.cboFaktGrp.TabIndex = 107
'
'cboALIASDomain2
'
Me.cboALIASDomain2._allowedValuesFreiText = Nothing
Me.cboALIASDomain2._allowFreiText = False
Me.cboALIASDomain2._value = ""
Me.cboALIASDomain2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboALIASDomain2.FormattingEnabled = True
Me.cboALIASDomain2.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
Me.cboALIASDomain2.Location = New System.Drawing.Point(402, 60)
Me.cboALIASDomain2.Name = "cboALIASDomain2"
Me.cboALIASDomain2.Size = New System.Drawing.Size(116, 21)
Me.cboALIASDomain2.TabIndex = 106
'
'cboTeam
'
Me.cboTeam._allowedValuesFreiText = Nothing
Me.cboTeam._allowFreiText = False
Me.cboTeam._value = ""
Me.cboTeam.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboTeam.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboTeam.FormattingEnabled = True
Me.cboTeam.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"})
Me.cboTeam.Location = New System.Drawing.Point(399, 116)
Me.cboTeam.Name = "cboTeam"
Me.cboTeam.Size = New System.Drawing.Size(148, 21)
Me.cboTeam.TabIndex = 101
'
'cboALIASDomain
'
Me.cboALIASDomain._allowedValuesFreiText = Nothing
Me.cboALIASDomain._allowFreiText = False
Me.cboALIASDomain._value = ""
Me.cboALIASDomain.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboALIASDomain.FormattingEnabled = True
Me.cboALIASDomain.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
Me.cboALIASDomain.Location = New System.Drawing.Point(402, 37)
Me.cboALIASDomain.Name = "cboALIASDomain"
Me.cboALIASDomain.Size = New System.Drawing.Size(116, 21)
Me.cboALIASDomain.TabIndex = 100
'
'MyListBox1
'
Me.MyListBox1._value = ""
Me.MyListBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.MyListBox1.FormattingEnabled = True
Me.MyListBox1.Location = New System.Drawing.Point(551, 133)
Me.MyListBox1.MultiColumn = True
Me.MyListBox1.Name = "MyListBox1"
Me.MyListBox1.SelectionMode = System.Windows.Forms.SelectionMode.MultiSimple
Me.MyListBox1.Size = New System.Drawing.Size(152, 95)
Me.MyListBox1.TabIndex = 96
'
'cboFirmaFMZOLL
'
Me.cboFirmaFMZOLL._allowedValuesFreiText = Nothing
Me.cboFirmaFMZOLL._allowFreiText = False
Me.cboFirmaFMZOLL._value = ""
Me.cboFirmaFMZOLL.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboFirmaFMZOLL.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboFirmaFMZOLL.FormattingEnabled = True
Me.cboFirmaFMZOLL.Location = New System.Drawing.Point(210, 76)
Me.cboFirmaFMZOLL.Name = "cboFirmaFMZOLL"
Me.cboFirmaFMZOLL.Size = New System.Drawing.Size(178, 21)
Me.cboFirmaFMZOLL.TabIndex = 95
'
'cboAbteilung
'
Me.cboAbteilung._allowedValuesFreiText = Nothing
Me.cboAbteilung._allowFreiText = False
Me.cboAbteilung._value = ""
Me.cboAbteilung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboAbteilung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboAbteilung.FormattingEnabled = True
Me.cboAbteilung.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"})
Me.cboAbteilung.Location = New System.Drawing.Point(211, 116)
Me.cboAbteilung.Name = "cboAbteilung"
Me.cboAbteilung.Size = New System.Drawing.Size(177, 21)
Me.cboAbteilung.TabIndex = 4
'
'cboNiederlassung
'
Me.cboNiederlassung._allowedValuesFreiText = Nothing
Me.cboNiederlassung._allowFreiText = False
Me.cboNiederlassung._value = ""
Me.cboNiederlassung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboNiederlassung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboNiederlassung.FormattingEnabled = True
Me.cboNiederlassung.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
Me.cboNiederlassung.Location = New System.Drawing.Point(18, 116)
Me.cboNiederlassung.Name = "cboNiederlassung"
Me.cboNiederlassung.Size = New System.Drawing.Size(177, 21)
Me.cboNiederlassung.TabIndex = 3
'
'cboProgSprache
'
Me.cboProgSprache._allowedValuesFreiText = Nothing
Me.cboProgSprache._allowFreiText = False
Me.cboProgSprache._value = ""
Me.cboProgSprache.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboProgSprache.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboProgSprache.FormattingEnabled = True
Me.cboProgSprache.Location = New System.Drawing.Point(16, 526)
Me.cboProgSprache.Name = "cboProgSprache"
Me.cboProgSprache.Size = New System.Drawing.Size(178, 21)
Me.cboProgSprache.TabIndex = 120
'
'cbxShowPW
'
Me.cbxShowPW.AutoSize = True
Me.cbxShowPW.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cbxShowPW.Location = New System.Drawing.Point(206, 74)
Me.cbxShowPW.Name = "cbxShowPW"
Me.cbxShowPW.Size = New System.Drawing.Size(69, 17)
Me.cbxShowPW.TabIndex = 94
Me.cbxShowPW.Text = "anzeigen"
Me.cbxShowPW.UseVisualStyleBackColor = True
' '
'frmMitarbDetails 'frmMitarbDetails
' '
@@ -1936,6 +2031,8 @@ Partial Class frmMitarbDetails
Me.TabPage2.PerformLayout() Me.TabPage2.PerformLayout()
Me.TabPage4.ResumeLayout(False) Me.TabPage4.ResumeLayout(False)
Me.TabPage4.PerformLayout() Me.TabPage4.PerformLayout()
Me.TabPage5.ResumeLayout(False)
Me.TabPage5.PerformLayout()
Me.GroupBox2.ResumeLayout(False) Me.GroupBox2.ResumeLayout(False)
Me.GroupBox2.PerformLayout() Me.GroupBox2.PerformLayout()
Me.GroupBox1.ResumeLayout(False) Me.GroupBox1.ResumeLayout(False)
@@ -2105,4 +2202,12 @@ Partial Class frmMitarbDetails
Friend WithEvents Label56 As Label Friend WithEvents Label56 As Label
Friend WithEvents txtAbweichenderAnzeigename As TextBox Friend WithEvents txtAbweichenderAnzeigename As TextBox
Friend WithEvents Label57 As Label Friend WithEvents Label57 As Label
Friend WithEvents TabPage5 As TabPage
Friend WithEvents lblCheckconnection As Label
Friend WithEvents Button6 As Button
Friend WithEvents txtCSPW As TextBox
Friend WithEvents Label58 As Label
Friend WithEvents txtCSUser As TextBox
Friend WithEvents Label59 As Label
Friend WithEvents cbxShowPW As CheckBox
End Class End Class

2
UID/Mitarbeiter/frmMitarbDetails.resx
View File

@@ -121,7 +121,7 @@
<data name="PictureBox6.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="PictureBox6.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wQAADsEBuJFr7QAAAhBJREFUWEftlbFKA1EQRQP5FyG1fyBp/ANT2KYxWNkm+AExtYipLASDlYVpRBSC vAAADrwBlbxySQAAAhBJREFUWEftlbFKA1EQRQP5FyG1fyBp/ANT2KYxWNkm+AExtYipLASDlYVpRBSC
RRoDQbBYEItAFLQwksJi9Qy5j8ljG5vdZgdmd959M3fuzEaspAVbKaAUUApYE/CzWJjH9h/cn+M46y4I RRoDQbBYEItAFLQwksJi9Qy5j8ljG5vdZgdmd959M3fuzEaspAVbKaAUUApYE/CzWJjH9h/cn+M46y4I
eBuN0ptq1XzcaKzQ1GLhD/V6OhsODectnFoI72u1UM85jpWrWvAgYNrphCSIMBXS+LnXMxwHT/r9kP86 eBuN0ptq1XzcaKzQ1GLhD/V6OhsODectnFoI72u1UM85jpWrWvAgYNrphCSIMBXS+LnXMxwHT/r9kP86
GKyd4dJAPtaZXA1pApbzuV1Crolp8pUkFj+2WpaMCM4QkocwzhKnM4LwOOZePRCCmQCp50ICPieTsCru GKyd4dJAPtaZXA1pApbzuV1Crolp8pUkFj+2WpaMCM4QkocwzhKnM4LwOOZePRCCmQCp50ICPieTsCru

50
UID/Mitarbeiter/frmMitarbDetails.vb
View File

@@ -1,4 +1,15 @@
Public Class frmMitarbDetails 
Imports System.IO
Imports System.Net
Imports System.Net.Http
Imports System.Net.WebRequestMethods
Imports System.Security.Policy
Imports System.Text
Imports System.Windows
Imports Newtonsoft.Json
Imports VERAG_PROG_ALLGEMEIN
Public Class frmMitarbDetails
Private UID As New cMitarbeiter Private UID As New cMitarbeiter
Private berechtigungen As New List(Of cBerechtigungen) Private berechtigungen As New List(Of cBerechtigungen)
@@ -251,6 +262,8 @@
txtDakosySB.Text = mitarbeiter.mit_DAKOSY_SB txtDakosySB.Text = mitarbeiter.mit_DAKOSY_SB
txtDyFullName.Text = If(mitarbeiter.mit_DAKOSY_SBFull, "") txtDyFullName.Text = If(mitarbeiter.mit_DAKOSY_SBFull, "")
txtTelotecSB.Text = mitarbeiter.mit_TELOTEC_SB txtTelotecSB.Text = mitarbeiter.mit_TELOTEC_SB
txtCSUser.Text = mitarbeiter.mit_CSuser
txtCSPW.Text = mitarbeiter.mit_CSpwd
cboALIASDomain.changeItem(mitarbeiter.mit_AliasAD_Domain) cboALIASDomain.changeItem(mitarbeiter.mit_AliasAD_Domain)
txtALIASUser.Text = mitarbeiter.mit_AliasAD_Username txtALIASUser.Text = mitarbeiter.mit_AliasAD_Username
@@ -523,6 +536,8 @@
mitarbeiter.mit_AliasAD_Domain2 = cboALIASDomain2._value mitarbeiter.mit_AliasAD_Domain2 = cboALIASDomain2._value
mitarbeiter.mit_AliasAD_Username2 = txtALIASUser2.Text mitarbeiter.mit_AliasAD_Username2 = txtALIASUser2.Text
mitarbeiter.mit_teamId = If(cboTeam._value = "", Nothing, cboTeam._value) mitarbeiter.mit_teamId = If(cboTeam._value = "", Nothing, cboTeam._value)
mitarbeiter.mit_CSuser = txtCSUser.Text
mitarbeiter.mit_CSpwd = txtCSPW.Text
@@ -834,4 +849,35 @@
End If End If
cboFirmaHaupt.Enabled = (cboFirma.Text = "ALLE") cboFirmaHaupt.Enabled = (cboFirma.Text = "ALLE")
End Sub End Sub
End Class
Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
lblCheckconnection.Text = ""
If txtCSUser.Text = "" Then
lblCheckconnection.Text = "User ist leer!"
Exit Sub
End If
If txtCSPW.Text = "" Then
lblCheckconnection.Text = "Passwort ist leer!"
Exit Sub
End If
Dim cs = New cCreditSafeAPI
Dim statuscode = cs.authenticate(txtCSUser.Text, txtCSPW.Text)
Select Case statuscode
Case 200 : lblCheckconnection.Text = "Zugangsdaten OK"
Case Else
lblCheckconnection.Text = "User konnte nicht authentifiziert werden (" & statuscode & ")"
End Select
End Sub
Private Sub cbxShowPW_CheckedChanged(sender As Object, e As EventArgs) Handles cbxShowPW.CheckedChanged
txtCSPW.UseSystemPasswordChar = Not cbxShowPW.Checked
End Sub
End Class

10
UID/cSqlDb.vb
View File

@@ -1550,8 +1550,8 @@ Public Class cMitarbeiter
'Änderung 'Änderung
Dim sql = "INSERT INTO tblMitarbeiter " & Dim sql = "INSERT INTO tblMitarbeiter " &
"(mit_username,mit_abweichenderAnzeigename, mit_pwd, mit_geschlecht, mit_affix, mit_vname, mit_nname, mit_gebdat, mit_strasse,mit_hausnr,mit_land,mit_plz,mit_ort,mit_niederlassung, mit_abteilung, mit_position, mit_durchwahl, mit_email, mit_mobiltel, mit_allowAnruf,mit_info, mit_einstiegsdatum, mit_gekuendigt, mit_kuendigungsdatum, mit_foto,mit_firma,mit_firmaFMZoll,mit_FMZollPersID,mit_FMZollPersIDKasseIsnotSpedBuch,mit_FMZollPersIDSpedBuch,mit_standartFiliale,mit_DpUserStandardDP,mit_EZOLL_SB,mit_ATLAS_SB,mit_FirmenDatenAnzeige,mit_DAKOSY_SB,mit_DAKOSY_SBFull,mit_DpUserStandardFirma,mit_DpUserStandardFirma2,mit_TESTonly,mit_PasswortChanged,mit_TELOTEC_SB,mit_AliasAD_Domain,mit_AliasAD_Username,mit_AliasAD_Domain2,mit_AliasAD_Username2,mit_teamId,mit_ChatBenutzer,mit_FirmaHaupt,mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname,mit_foto_DocId,mit_MAVerzeichnis_Motto,mit_sprache,mit_fakturierungsgruppe ) VALUES " & "(mit_username,mit_abweichenderAnzeigename, mit_pwd, mit_geschlecht, mit_affix, mit_vname, mit_nname, mit_gebdat, mit_strasse,mit_hausnr,mit_land,mit_plz,mit_ort,mit_niederlassung, mit_abteilung, mit_position, mit_durchwahl, mit_email, mit_mobiltel, mit_allowAnruf,mit_info, mit_einstiegsdatum, mit_gekuendigt, mit_kuendigungsdatum, mit_foto,mit_firma,mit_firmaFMZoll,mit_FMZollPersID,mit_FMZollPersIDKasseIsnotSpedBuch,mit_FMZollPersIDSpedBuch,mit_standartFiliale,mit_DpUserStandardDP,mit_EZOLL_SB,mit_ATLAS_SB,mit_FirmenDatenAnzeige,mit_DAKOSY_SB,mit_DAKOSY_SBFull,mit_DpUserStandardFirma,mit_DpUserStandardFirma2,mit_TESTonly,mit_PasswortChanged,mit_TELOTEC_SB,mit_AliasAD_Domain,mit_AliasAD_Username,mit_AliasAD_Domain2,mit_AliasAD_Username2,mit_teamId,mit_ChatBenutzer,mit_FirmaHaupt,mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname,mit_foto_DocId,mit_MAVerzeichnis_Motto,mit_sprache,mit_fakturierungsgruppe, mit_CSuser, mit_CSpwd ) VALUES " &
"(@mit_username,@mit_abweichenderAnzeigename,@mit_pwd,@mit_geschlecht,@mit_affix,@mit_vname,@mit_nname,@mit_gebdat,@mit_strasse,@mit_hausnr,@mit_land,@mit_plz,@mit_ort,@mit_niederlassung,@mit_abteilung,@mit_position,@mit_durchwahl,@mit_email,@mit_mobiltel,@mit_allowAnruf,@mit_info,@mit_einstiegsdatum,@mit_gekuendigt,@mit_kuendigungsdatum,@mit_foto,@mit_firma,@mit_firmaFMZoll,@mit_FMZollPersID,@mit_FMZollPersIDKasseIsnotSpedBuch,@mit_FMZollPersIDSpedBuch,@mit_standartFiliale,@mit_DpUserStandardDP,@mit_EZOLL_SB,@mit_ATLAS_SB,@mit_FirmenDatenAnzeige,@mit_DAKOSY_SB,@mit_DAKOSY_SBFull,@mit_DpUserStandardFirma,@mit_DpUserStandardFirma2,@mit_TESTonly,@mit_PasswortChanged,@mit_TELOTEC_SB,@mit_AliasAD_Domain,@mit_AliasAD_Username,@mit_AliasAD_Domain2,@mit_AliasAD_Username2,@mit_teamId,@mit_ChatBenutzer,@mit_FirmaHaupt,@mit_ChatEasteregg,@mit_MAVerzeichnis_SettingsTstmp,@mit_MAVerzeichnis_allowGebDat,@mit_MAVerzeichnis_allowWohnadresse,@mit_MAVerzeichnis_allowGebDatOhneJahr,@mit_MAVerzeichnis_Spitzname,@mit_foto_DocId,@mit_MAVerzeichnis_Motto ,@mit_sprache,@mit_fakturierungsgruppe )" "(@mit_username,@mit_abweichenderAnzeigename,@mit_pwd,@mit_geschlecht,@mit_affix,@mit_vname,@mit_nname,@mit_gebdat,@mit_strasse,@mit_hausnr,@mit_land,@mit_plz,@mit_ort,@mit_niederlassung,@mit_abteilung,@mit_position,@mit_durchwahl,@mit_email,@mit_mobiltel,@mit_allowAnruf,@mit_info,@mit_einstiegsdatum,@mit_gekuendigt,@mit_kuendigungsdatum,@mit_foto,@mit_firma,@mit_firmaFMZoll,@mit_FMZollPersID,@mit_FMZollPersIDKasseIsnotSpedBuch,@mit_FMZollPersIDSpedBuch,@mit_standartFiliale,@mit_DpUserStandardDP,@mit_EZOLL_SB,@mit_ATLAS_SB,@mit_FirmenDatenAnzeige,@mit_DAKOSY_SB,@mit_DAKOSY_SBFull,@mit_DpUserStandardFirma,@mit_DpUserStandardFirma2,@mit_TESTonly,@mit_PasswortChanged,@mit_TELOTEC_SB,@mit_AliasAD_Domain,@mit_AliasAD_Username,@mit_AliasAD_Domain2,@mit_AliasAD_Username2,@mit_teamId,@mit_ChatBenutzer,@mit_FirmaHaupt,@mit_ChatEasteregg,@mit_MAVerzeichnis_SettingsTstmp,@mit_MAVerzeichnis_allowGebDat,@mit_MAVerzeichnis_allowWohnadresse,@mit_MAVerzeichnis_allowGebDatOhneJahr,@mit_MAVerzeichnis_Spitzname,@mit_foto_DocId,@mit_MAVerzeichnis_Motto ,@mit_sprache,@mit_fakturierungsgruppe, @mit_CSuser, @mit_CSpwd )"
@@ -1621,6 +1621,8 @@ Public Class cMitarbeiter
cmd.Parameters.AddWithValue("@mit_MAVerzeichnis_Motto", If(m.mit_MAVerzeichnis_Motto, DBNull.Value)) cmd.Parameters.AddWithValue("@mit_MAVerzeichnis_Motto", If(m.mit_MAVerzeichnis_Motto, DBNull.Value))
cmd.Parameters.AddWithValue("@mit_sprache", m.mit_sprache) cmd.Parameters.AddWithValue("@mit_sprache", m.mit_sprache)
cmd.Parameters.AddWithValue("@mit_fakturierungsgruppe", m.mit_fakturierungsgruppe) cmd.Parameters.AddWithValue("@mit_fakturierungsgruppe", m.mit_fakturierungsgruppe)
cmd.Parameters.AddWithValue("@mit_CSuser", If(m.mit_CSuser, DBNull.Value))
cmd.Parameters.AddWithValue("@mit_CSpwd", If(m.mit_CSpwd, DBNull.Value))
Try Try
@@ -1640,7 +1642,7 @@ Public Class cMitarbeiter
Dim sql = "UPDATE tblMitarbeiter " & Dim sql = "UPDATE tblMitarbeiter " &
"SET mit_username=@mit_username, mit_abweichenderAnzeigename=@mit_abweichenderAnzeigename,mit_pwd=@mit_pwd, mit_geschlecht=@mit_geschlecht, mit_affix=@mit_affix, mit_vname=@mit_vname, mit_nname=@mit_nname, mit_gebdat=@mit_gebdat, mit_strasse=@mit_strasse, mit_hausnr=@mit_hausnr, mit_land=@mit_land, mit_plz=@mit_plz, mit_ort=@mit_ort, mit_niederlassung=@mit_niederlassung, mit_abteilung=@mit_abteilung, mit_position=@mit_position, mit_durchwahl=@mit_durchwahl, mit_email=@mit_email, mit_mobiltel=@mit_mobiltel, mit_allowAnruf=@mit_allowAnruf, mit_info=@mit_info, mit_einstiegsdatum=@mit_einstiegsdatum, mit_gekuendigt=@mit_gekuendigt, mit_kuendigungsdatum=@mit_kuendigungsdatum, mit_foto=@mit_foto, mit_firma=@mit_firma,mit_firmaFMZoll=@mit_firmaFMZoll,mit_FMZollPersID=@mit_FMZollPersID, mit_FMZollPersIDKasseIsnotSpedBuch=@mit_FMZollPersIDKasseIsnotSpedBuch,mit_FMZollPersIDSpedBuch=@mit_FMZollPersIDSpedBuch,mit_standartFiliale=@mit_standartFiliale,mit_standardPreisliste=@mit_standardPreisliste,mit_DpUserStandardDP=@mit_DpUserStandardDP, mit_EZOLL_SB=@mit_EZOLL_SB, mit_ATLAS_SB=@mit_ATLAS_SB,mit_FirmenDatenAnzeige=@mit_FirmenDatenAnzeige,mit_DAKOSY_SB=@mit_DAKOSY_SB, mit_DAKOSY_SBFull=@mit_DAKOSY_SBFull ,mit_DpUserStandardFirma=@mit_DpUserStandardFirma,mit_DpUserStandardFirma2=@mit_DpUserStandardFirma2, mit_TESTonly=@mit_TESTonly,mit_PasswortChanged=@mit_PasswortChanged,mit_TELOTEC_SB=@mit_TELOTEC_SB,mit_AliasAD_Domain=@mit_AliasAD_Domain,mit_AliasAD_Username=@mit_AliasAD_Username,mit_AliasAD_Domain2=@mit_AliasAD_Domain2,mit_AliasAD_Username2=@mit_AliasAD_Username2,mit_teamId=@mit_teamId,mit_ChatBenutzer=@mit_ChatBenutzer,mit_FirmaHaupt=@mit_FirmaHaupt " & "SET mit_username=@mit_username, mit_abweichenderAnzeigename=@mit_abweichenderAnzeigename,mit_pwd=@mit_pwd, mit_geschlecht=@mit_geschlecht, mit_affix=@mit_affix, mit_vname=@mit_vname, mit_nname=@mit_nname, mit_gebdat=@mit_gebdat, mit_strasse=@mit_strasse, mit_hausnr=@mit_hausnr, mit_land=@mit_land, mit_plz=@mit_plz, mit_ort=@mit_ort, mit_niederlassung=@mit_niederlassung, mit_abteilung=@mit_abteilung, mit_position=@mit_position, mit_durchwahl=@mit_durchwahl, mit_email=@mit_email, mit_mobiltel=@mit_mobiltel, mit_allowAnruf=@mit_allowAnruf, mit_info=@mit_info, mit_einstiegsdatum=@mit_einstiegsdatum, mit_gekuendigt=@mit_gekuendigt, mit_kuendigungsdatum=@mit_kuendigungsdatum, mit_foto=@mit_foto, mit_firma=@mit_firma,mit_firmaFMZoll=@mit_firmaFMZoll,mit_FMZollPersID=@mit_FMZollPersID, mit_FMZollPersIDKasseIsnotSpedBuch=@mit_FMZollPersIDKasseIsnotSpedBuch,mit_FMZollPersIDSpedBuch=@mit_FMZollPersIDSpedBuch,mit_standartFiliale=@mit_standartFiliale,mit_standardPreisliste=@mit_standardPreisliste,mit_DpUserStandardDP=@mit_DpUserStandardDP, mit_EZOLL_SB=@mit_EZOLL_SB, mit_ATLAS_SB=@mit_ATLAS_SB,mit_FirmenDatenAnzeige=@mit_FirmenDatenAnzeige,mit_DAKOSY_SB=@mit_DAKOSY_SB, mit_DAKOSY_SBFull=@mit_DAKOSY_SBFull ,mit_DpUserStandardFirma=@mit_DpUserStandardFirma,mit_DpUserStandardFirma2=@mit_DpUserStandardFirma2, mit_TESTonly=@mit_TESTonly,mit_PasswortChanged=@mit_PasswortChanged,mit_TELOTEC_SB=@mit_TELOTEC_SB,mit_AliasAD_Domain=@mit_AliasAD_Domain,mit_AliasAD_Username=@mit_AliasAD_Username,mit_AliasAD_Domain2=@mit_AliasAD_Domain2,mit_AliasAD_Username2=@mit_AliasAD_Username2,mit_teamId=@mit_teamId,mit_ChatBenutzer=@mit_ChatBenutzer,mit_FirmaHaupt=@mit_FirmaHaupt " &
" ,mit_ChatEasteregg=@mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp=@mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat=@mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse=@mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr=@mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname=@mit_MAVerzeichnis_Spitzname,mit_foto_DocId=@mit_foto_DocId,mit_MAVerzeichnis_Motto=@mit_MAVerzeichnis_Motto,mit_sprache=@mit_sprache,mit_fakturierungsgruppe=@mit_fakturierungsgruppe " & " ,mit_ChatEasteregg=@mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp=@mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat=@mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse=@mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr=@mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname=@mit_MAVerzeichnis_Spitzname,mit_foto_DocId=@mit_foto_DocId,mit_MAVerzeichnis_Motto=@mit_MAVerzeichnis_Motto,mit_sprache=@mit_sprache,mit_fakturierungsgruppe=@mit_fakturierungsgruppe, mit_CSuser=@mit_CSuser, mit_CSpwd=@mit_CSpwd " &
" WHERE mit_id=@mit_id " " WHERE mit_id=@mit_id "
@@ -1712,6 +1714,8 @@ Public Class cMitarbeiter
cmd.Parameters.AddWithValue("@mit_MAVerzeichnis_Motto", If(m.mit_MAVerzeichnis_Motto, DBNull.Value)) cmd.Parameters.AddWithValue("@mit_MAVerzeichnis_Motto", If(m.mit_MAVerzeichnis_Motto, DBNull.Value))
cmd.Parameters.AddWithValue("@mit_sprache", m.mit_sprache) cmd.Parameters.AddWithValue("@mit_sprache", m.mit_sprache)
cmd.Parameters.AddWithValue("@mit_fakturierungsgruppe", m.mit_fakturierungsgruppe) cmd.Parameters.AddWithValue("@mit_fakturierungsgruppe", m.mit_fakturierungsgruppe)
cmd.Parameters.AddWithValue("@mit_CSuser", If(m.mit_CSuser, DBNull.Value))
cmd.Parameters.AddWithValue("@mit_CSpwd", If(m.mit_CSpwd, DBNull.Value))