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">
<HintPath>..\..\..\dll\.net MySQL v4.5.2\MySql.Data.dll</HintPath>
</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">
<HintPath>..\..\..\dll\PdfSharp.dll</HintPath>
</Reference>
@@ -245,6 +248,7 @@
<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>
</Reference>
<Reference Include="System.Net.Http" />
<Reference Include="System.Numerics" />
<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>

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

@@ -34,21 +34,13 @@ Partial Class frmMitarbDetails
Me.TabPage1 = New System.Windows.Forms.TabPage()
Me.tbcntr = New System.Windows.Forms.TabControl()
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.Label38 = New System.Windows.Forms.Label()
Me.cboPersonal = New VERAG_PROG_ALLGEMEIN.MyComboBox()
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.Label40 = New System.Windows.Forms.Label()
Me.cbxSpedBuch = New System.Windows.Forms.CheckBox()
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.txtTelotecSB = New System.Windows.Forms.TextBox()
Me.Label51 = New System.Windows.Forms.Label()
@@ -58,25 +50,26 @@ Partial Class frmMitarbDetails
Me.Label46 = New System.Windows.Forms.Label()
Me.Label44 = New System.Windows.Forms.Label()
Me.Label43 = New System.Windows.Forms.Label()
Me.cboEZOLL_SB = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboATLAS_SB = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.TabPage5 = New System.Windows.Forms.TabPage()
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.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.cboALIASDomain2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtALIASUser2 = New System.Windows.Forms.TextBox()
Me.Label54 = New System.Windows.Forms.Label()
Me.cboFirmaHaupt = New System.Windows.Forms.ComboBox()
Me.cboTeam = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label53 = New System.Windows.Forms.Label()
Me.cboALIASDomain = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtALIASUser = New System.Windows.Forms.TextBox()
Me.Label52 = New System.Windows.Forms.Label()
Me.lkl = New System.Windows.Forms.LinkLabel()
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.cboFirma = New System.Windows.Forms.ComboBox()
Me.Label36 = New System.Windows.Forms.Label()
@@ -92,13 +85,11 @@ Partial Class frmMitarbDetails
Me.txtDurchwahl = New System.Windows.Forms.TextBox()
Me.Label19 = 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.Label11 = New System.Windows.Forms.Label()
Me.Label6 = New System.Windows.Forms.Label()
Me.txtUsername = New System.Windows.Forms.TextBox()
Me.Label3 = New System.Windows.Forms.Label()
Me.cboNiederlassung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label9 = New System.Windows.Forms.Label()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.cbxChatBenutzer = New System.Windows.Forms.CheckBox()
@@ -130,7 +121,6 @@ Partial Class frmMitarbDetails
Me.Label2 = New System.Windows.Forms.Label()
Me.txtInfo = New System.Windows.Forms.RichTextBox()
Me.TabPage3 = New System.Windows.Forms.TabPage()
Me.cboProgSprache = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label55 = New System.Windows.Forms.Label()
Me.Button5 = 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.cboAdminBer = New System.Windows.Forms.ComboBox()
Me.Label7 = New System.Windows.Forms.Label()
Me.txtAbweichenderAnzeigename = New System.Windows.Forms.TextBox()
Me.Label57 = New System.Windows.Forms.Label()
Me.cboDPFirma2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
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()
Me.Panel1.SuspendLayout()
Me.TabControl2.SuspendLayout()
@@ -182,6 +190,7 @@ Partial Class frmMitarbDetails
Me.tbcntr.SuspendLayout()
Me.TabPage2.SuspendLayout()
Me.TabPage4.SuspendLayout()
Me.TabPage5.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.GroupBox1.SuspendLayout()
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.TabPage4)
Me.tbcntr.Controls.Add(Me.TabPage5)
Me.tbcntr.Location = New System.Drawing.Point(2, 539)
Me.tbcntr.Name = "tbcntr"
Me.tbcntr.SelectedIndex = 0
@@ -333,30 +343,6 @@ Partial Class frmMitarbDetails
Me.TabPage2.Text = "Zuordnung Intern"
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
'
Me.Label50.AutoSize = True
@@ -377,18 +363,6 @@ Partial Class frmMitarbDetails
Me.Label38.TabIndex = 96
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
'
Me.Label37.AutoSize = True
@@ -399,42 +373,6 @@ Partial Class frmMitarbDetails
Me.Label37.TabIndex = 94
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
'
Me.Label42.AutoSize = True
@@ -476,31 +414,6 @@ Partial Class frmMitarbDetails
Me.Label41.TabIndex = 100
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
'
Me.TabPage4.Controls.Add(Me.txtTelotecSB)
@@ -595,33 +508,79 @@ Partial Class frmMitarbDetails
Me.Label43.TabIndex = 108
Me.Label43.Text = "EZOLL Sachbearbeiter:"
'
'cboEZOLL_SB
'TabPage5
'
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
Me.TabPage5.Controls.Add(Me.cbxShowPW)
Me.TabPage5.Controls.Add(Me.lblCheckconnection)
Me.TabPage5.Controls.Add(Me.Button6)
Me.TabPage5.Controls.Add(Me.txtCSPW)
Me.TabPage5.Controls.Add(Me.Label58)
Me.TabPage5.Controls.Add(Me.txtCSUser)
Me.TabPage5.Controls.Add(Me.Label59)
Me.TabPage5.Location = New System.Drawing.Point(4, 22)
Me.TabPage5.Name = "TabPage5"
Me.TabPage5.Size = New System.Drawing.Size(442, 174)
Me.TabPage5.TabIndex = 2
Me.TabPage5.Text = "Zuordnung Creditsafe"
Me.TabPage5.UseVisualStyleBackColor = True
'
'cboATLAS_SB
'lblCheckconnection
'
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
Me.lblCheckconnection.AutoSize = True
Me.lblCheckconnection.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblCheckconnection.Location = New System.Drawing.Point(131, 104)
Me.lblCheckconnection.Name = "lblCheckconnection"
Me.lblCheckconnection.Size = New System.Drawing.Size(0, 13)
Me.lblCheckconnection.TabIndex = 121
'
'Button6
'
Me.Button6.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
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
'
@@ -682,19 +641,23 @@ Partial Class frmMitarbDetails
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Firmendaten"
'
'cboFaktGrp
'txtAbweichenderAnzeigename
'
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
Me.txtAbweichenderAnzeigename.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtAbweichenderAnzeigename.Location = New System.Drawing.Point(399, 156)
Me.txtAbweichenderAnzeigename.Name = "txtAbweichenderAnzeigename"
Me.txtAbweichenderAnzeigename.Size = New System.Drawing.Size(148, 20)
Me.txtAbweichenderAnzeigename.TabIndex = 109
'
'Label57
'
Me.Label57.AutoSize = True
Me.Label57.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
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
'
@@ -705,19 +668,6 @@ Partial Class frmMitarbDetails
Me.Label56.TabIndex = 108
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
'
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.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
'
Me.Label53.AutoSize = True
@@ -771,19 +707,6 @@ Partial Class frmMitarbDetails
Me.Label53.TabIndex = 102
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
'
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.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
'
Me.Label39.AutoSize = True
@@ -994,20 +892,6 @@ Partial Class frmMitarbDetails
Me.Label8.TabIndex = 1
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
'
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.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
'
Me.Label9.AutoSize = True
@@ -1439,19 +1309,6 @@ Partial Class frmMitarbDetails
Me.TabPage3.Text = "Programme"
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
'
Me.Label55.AutoSize = True
@@ -1893,23 +1750,261 @@ Partial Class frmMitarbDetails
Me.Label7.TabIndex = 78
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.txtAbweichenderAnzeigename.Location = New System.Drawing.Point(399, 156)
Me.txtAbweichenderAnzeigename.Name = "txtAbweichenderAnzeigename"
Me.txtAbweichenderAnzeigename.Size = New System.Drawing.Size(148, 20)
Me.txtAbweichenderAnzeigename.TabIndex = 109
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
'
'Label57
'cboDPFirma
'
Me.Label57.AutoSize = True
Me.Label57.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
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):"
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
'
'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
'
@@ -1936,6 +2031,8 @@ Partial Class frmMitarbDetails
Me.TabPage2.PerformLayout()
Me.TabPage4.ResumeLayout(False)
Me.TabPage4.PerformLayout()
Me.TabPage5.ResumeLayout(False)
Me.TabPage5.PerformLayout()
Me.GroupBox2.ResumeLayout(False)
Me.GroupBox2.PerformLayout()
Me.GroupBox1.ResumeLayout(False)
@@ -2105,4 +2202,12 @@ Partial Class frmMitarbDetails
Friend WithEvents Label56 As Label
Friend WithEvents txtAbweichenderAnzeigename As TextBox
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

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">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wQAADsEBuJFr7QAAAhBJREFUWEftlbFKA1EQRQP5FyG1fyBp/ANT2KYxWNkm+AExtYipLASDlYVpRBSC
vAAADrwBlbxySQAAAhBJREFUWEftlbFKA1EQRQP5FyG1fyBp/ANT2KYxWNkm+AExtYipLASDlYVpRBSC
RRoDQbBYEItAFLQwksJi9Qy5j8ljG5vdZgdmd959M3fuzEaspAVbKaAUUApYE/CzWJjH9h/cn+M46y4I
eBuN0ptq1XzcaKzQ1GLhD/V6OhsODectnFoI72u1UM85jpWrWvAgYNrphCSIMBXS+LnXMxwHT/r9kP86
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 berechtigungen As New List(Of cBerechtigungen)
@@ -251,6 +262,8 @@
txtDakosySB.Text = mitarbeiter.mit_DAKOSY_SB
txtDyFullName.Text = If(mitarbeiter.mit_DAKOSY_SBFull, "")
txtTelotecSB.Text = mitarbeiter.mit_TELOTEC_SB
txtCSUser.Text = mitarbeiter.mit_CSuser
txtCSPW.Text = mitarbeiter.mit_CSpwd
cboALIASDomain.changeItem(mitarbeiter.mit_AliasAD_Domain)
txtALIASUser.Text = mitarbeiter.mit_AliasAD_Username
@@ -523,6 +536,8 @@
mitarbeiter.mit_AliasAD_Domain2 = cboALIASDomain2._value
mitarbeiter.mit_AliasAD_Username2 = txtALIASUser2.Text
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
cboFirmaHaupt.Enabled = (cboFirma.Text = "ALLE")
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
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_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_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_sprache", m.mit_sprache)
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
@@ -1640,7 +1642,7 @@ Public Class cMitarbeiter
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 " &
" ,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 "
@@ -1712,6 +1714,8 @@ Public Class cMitarbeiter
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_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))