Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.IO
Imports System.Drawing
Imports System.Drawing.Color

Public Class frmDokumentinformationen
    Inherits System.Windows.Forms.Form

#Region " Vom Windows Form Designer generierter Code "

    Public Sub New()
        MyBase.New()

        ' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
        InitializeComponent()

        ' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen

    End Sub

    ' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing Then
            If Not (components Is Nothing) Then
                components.Dispose()
            End If
        End If
        MyBase.Dispose(disposing)
    End Sub

    ' Für Windows Form-Designer erforderlich
    Private components As System.ComponentModel.IContainer

    'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
    'Sie kann mit dem Windows Form-Designer modifiziert werden.
    'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
    Friend WithEvents TabControl1 As System.Windows.Forms.TabControl
    Friend WithEvents TabPageAllgemein As System.Windows.Forms.TabPage
    Friend WithEvents pnlzensur1 As System.Windows.Forms.Panel
    Friend WithEvents lblzensur1 As System.Windows.Forms.Label
    Friend WithEvents TextBox18 As System.Windows.Forms.TextBox
    Friend WithEvents Label19 As System.Windows.Forms.Label
    Friend WithEvents TextBox14 As System.Windows.Forms.TextBox
    Friend WithEvents Label15 As System.Windows.Forms.Label
    Friend WithEvents TextBox13 As System.Windows.Forms.TextBox
    Friend WithEvents Label14 As System.Windows.Forms.Label
    Friend WithEvents TextBox12 As System.Windows.Forms.TextBox
    Friend WithEvents Label12 As System.Windows.Forms.Label
    Friend WithEvents TextBox11 As System.Windows.Forms.TextBox
    Friend WithEvents Label11 As System.Windows.Forms.Label
    Friend WithEvents TextBox10 As System.Windows.Forms.TextBox
    Friend WithEvents Label10 As System.Windows.Forms.Label
    Friend WithEvents TextBox9 As System.Windows.Forms.TextBox
    Friend WithEvents Label9 As System.Windows.Forms.Label
    Friend WithEvents TextBox8 As System.Windows.Forms.TextBox
    Friend WithEvents Label8 As System.Windows.Forms.Label
    Friend WithEvents TextBox7 As System.Windows.Forms.TextBox
    Friend WithEvents Label7 As System.Windows.Forms.Label
    Friend WithEvents TextBox6 As System.Windows.Forms.TextBox
    Friend WithEvents Label6 As System.Windows.Forms.Label
    Friend WithEvents TextBox5 As System.Windows.Forms.TextBox
    Friend WithEvents Label5 As System.Windows.Forms.Label
    Friend WithEvents TextBox4 As System.Windows.Forms.TextBox
    Friend WithEvents Label4 As System.Windows.Forms.Label
    Friend WithEvents TextBox3 As System.Windows.Forms.TextBox
    Friend WithEvents Label3 As System.Windows.Forms.Label
    Friend WithEvents TextBox2 As System.Windows.Forms.TextBox
    Friend WithEvents Label2 As System.Windows.Forms.Label
    Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
    Friend WithEvents Label1 As System.Windows.Forms.Label
    Friend WithEvents TabPageStatus As System.Windows.Forms.TabPage
    Friend WithEvents Statuslist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
    Friend WithEvents Panel2 As System.Windows.Forms.Panel
    Friend WithEvents RBStatusHistory As System.Windows.Forms.RadioButton
    Friend WithEvents RBStatusAktuell As System.Windows.Forms.RadioButton
    Friend WithEvents TabPageDokumentwerte As System.Windows.Forms.TabPage
    Friend WithEvents TabControl2 As System.Windows.Forms.TabControl
    Friend WithEvents TabPage1 As System.Windows.Forms.TabPage
    Friend WithEvents pnlzensur2 As System.Windows.Forms.Panel
    Friend WithEvents ColdList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
    Friend WithEvents Splitter2 As System.Windows.Forms.Splitter
    Friend WithEvents lblzensur2 As System.Windows.Forms.Label
    Friend WithEvents ColdListDokumente As C1.Win.C1TrueDBGrid.C1TrueDBGrid
    Friend WithEvents TabPage3 As System.Windows.Forms.TabPage
    Friend WithEvents TextBox17 As System.Windows.Forms.TextBox
    Friend WithEvents Label18 As System.Windows.Forms.Label
    Friend WithEvents TextBox16 As System.Windows.Forms.TextBox
    Friend WithEvents TextBox15 As System.Windows.Forms.TextBox
    Friend WithEvents Label17 As System.Windows.Forms.Label
    Friend WithEvents Label16 As System.Windows.Forms.Label
    Friend WithEvents TabPageZuordnung As System.Windows.Forms.TabPage
    Friend WithEvents pnlzensur4 As System.Windows.Forms.Panel
    Friend WithEvents lblzensur4 As System.Windows.Forms.Label
    Friend WithEvents Zuordnungslist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
    Friend WithEvents TabPageNotizen As System.Windows.Forms.TabPage
    Friend WithEvents pnlzensur5 As System.Windows.Forms.Panel
    Friend WithEvents drpMiatarbeiter As C1.Win.C1TrueDBGrid.C1TrueDBDropdown
    Friend WithEvents lblzensur5 As System.Windows.Forms.Label
    Friend WithEvents Notizlist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
    Friend WithEvents TabPageInfomeldung As System.Windows.Forms.TabPage
    Friend WithEvents pnlzensur3 As System.Windows.Forms.Panel
    Friend WithEvents lblzensur3 As System.Windows.Forms.Label
    Friend WithEvents InfoMeldungList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
    Friend WithEvents TabPageBerechtigung As System.Windows.Forms.TabPage
    Friend WithEvents DokumentFunktionenList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
    Friend WithEvents TabPage2 As System.Windows.Forms.TabPage
    Friend WithEvents pnlzensur6 As System.Windows.Forms.Panel
    Friend WithEvents lblzensur6 As System.Windows.Forms.Label
    Friend WithEvents ErsetzteDokumenteList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
    Friend WithEvents DokList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
    Friend WithEvents ToolBar1 As System.Windows.Forms.ToolBar
    Friend WithEvents ToolBarButton1 As System.Windows.Forms.ToolBarButton
    Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
    Friend WithEvents TabControl3 As System.Windows.Forms.TabControl
    Friend WithEvents TabPage4 As System.Windows.Forms.TabPage
    Friend WithEvents Label13 As System.Windows.Forms.Label
    Friend WithEvents Label20 As System.Windows.Forms.Label
    Friend WithEvents txtPartnerInhaber As System.Windows.Forms.TextBox
    Friend WithEvents txtPartnerZusteller As System.Windows.Forms.TextBox
    Friend WithEvents Label21 As System.Windows.Forms.Label
    Friend WithEvents Label22 As System.Windows.Forms.Label
    Friend WithEvents txtvvextern1 As System.Windows.Forms.TextBox
    Friend WithEvents txtvvextern2 As System.Windows.Forms.TextBox
    Friend WithEvents txtErstelltAm As System.Windows.Forms.TextBox
    Friend WithEvents Label23 As System.Windows.Forms.Label
    Friend WithEvents txtValuta As System.Windows.Forms.TextBox
    Friend WithEvents Label24 As System.Windows.Forms.Label
    Friend WithEvents txtisin As System.Windows.Forms.TextBox
    Friend WithEvents txtvalor As System.Windows.Forms.TextBox
    Friend WithEvents Label25 As System.Windows.Forms.Label
    Friend WithEvents Label26 As System.Windows.Forms.Label
    Friend WithEvents txtnachvollziehbarkeit As System.Windows.Forms.TextBox
    Friend WithEvents Label27 As System.Windows.Forms.Label
    Friend WithEvents txtReferenzzeile2 As System.Windows.Forms.TextBox
    Friend WithEvents txtReferenzzeile1 As System.Windows.Forms.TextBox
    Friend WithEvents Label28 As System.Windows.Forms.Label
    Friend WithEvents Label29 As System.Windows.Forms.Label
    Friend WithEvents txtanzahlseiten As System.Windows.Forms.TextBox
    Friend WithEvents Label30 As System.Windows.Forms.Label
    Friend WithEvents txtDokumentid As System.Windows.Forms.TextBox
    Friend WithEvents Label31 As System.Windows.Forms.Label
    Friend WithEvents txtDokumenttyp As System.Windows.Forms.TextBox
    Friend WithEvents Label32 As System.Windows.Forms.Label
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
        Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmDokumentinformationen))
        Dim GridLines1 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
        Dim GridLines2 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
        Dim GridLines3 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
        Dim GridLines4 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
        Dim GridLines5 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
        Dim GridLines6 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
        Dim GridLines7 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
        Dim GridLines8 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
        Dim GridLines9 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
        Dim GridLines10 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
        Me.TabControl1 = New System.Windows.Forms.TabControl()
        Me.TabPageAllgemein = New System.Windows.Forms.TabPage()
        Me.pnlzensur1 = New System.Windows.Forms.Panel()
        Me.lblzensur1 = New System.Windows.Forms.Label()
        Me.TextBox18 = New System.Windows.Forms.TextBox()
        Me.Label19 = New System.Windows.Forms.Label()
        Me.TextBox14 = New System.Windows.Forms.TextBox()
        Me.Label15 = New System.Windows.Forms.Label()
        Me.TextBox13 = New System.Windows.Forms.TextBox()
        Me.Label14 = New System.Windows.Forms.Label()
        Me.TextBox12 = New System.Windows.Forms.TextBox()
        Me.Label12 = New System.Windows.Forms.Label()
        Me.TextBox11 = New System.Windows.Forms.TextBox()
        Me.Label11 = New System.Windows.Forms.Label()
        Me.TextBox10 = New System.Windows.Forms.TextBox()
        Me.Label10 = New System.Windows.Forms.Label()
        Me.TextBox9 = New System.Windows.Forms.TextBox()
        Me.Label9 = New System.Windows.Forms.Label()
        Me.TextBox8 = New System.Windows.Forms.TextBox()
        Me.Label8 = New System.Windows.Forms.Label()
        Me.TextBox7 = New System.Windows.Forms.TextBox()
        Me.Label7 = New System.Windows.Forms.Label()
        Me.TextBox6 = New System.Windows.Forms.TextBox()
        Me.Label6 = New System.Windows.Forms.Label()
        Me.TextBox5 = New System.Windows.Forms.TextBox()
        Me.Label5 = New System.Windows.Forms.Label()
        Me.TextBox4 = New System.Windows.Forms.TextBox()
        Me.Label4 = New System.Windows.Forms.Label()
        Me.TextBox3 = New System.Windows.Forms.TextBox()
        Me.Label3 = New System.Windows.Forms.Label()
        Me.TextBox2 = New System.Windows.Forms.TextBox()
        Me.Label2 = New System.Windows.Forms.Label()
        Me.TextBox1 = New System.Windows.Forms.TextBox()
        Me.Label1 = New System.Windows.Forms.Label()
        Me.TabPageStatus = New System.Windows.Forms.TabPage()
        Me.Statuslist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.Panel2 = New System.Windows.Forms.Panel()
        Me.RBStatusHistory = New System.Windows.Forms.RadioButton()
        Me.RBStatusAktuell = New System.Windows.Forms.RadioButton()
        Me.TabPageDokumentwerte = New System.Windows.Forms.TabPage()
        Me.TabControl2 = New System.Windows.Forms.TabControl()
        Me.TabPage1 = New System.Windows.Forms.TabPage()
        Me.pnlzensur2 = New System.Windows.Forms.Panel()
        Me.ColdList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.Splitter2 = New System.Windows.Forms.Splitter()
        Me.lblzensur2 = New System.Windows.Forms.Label()
        Me.ColdListDokumente = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.TabPage3 = New System.Windows.Forms.TabPage()
        Me.TextBox17 = New System.Windows.Forms.TextBox()
        Me.Label18 = New System.Windows.Forms.Label()
        Me.TextBox16 = New System.Windows.Forms.TextBox()
        Me.TextBox15 = New System.Windows.Forms.TextBox()
        Me.Label17 = New System.Windows.Forms.Label()
        Me.Label16 = New System.Windows.Forms.Label()
        Me.TabPageZuordnung = New System.Windows.Forms.TabPage()
        Me.pnlzensur4 = New System.Windows.Forms.Panel()
        Me.lblzensur4 = New System.Windows.Forms.Label()
        Me.Zuordnungslist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.TabPageNotizen = New System.Windows.Forms.TabPage()
        Me.pnlzensur5 = New System.Windows.Forms.Panel()
        Me.drpMiatarbeiter = New C1.Win.C1TrueDBGrid.C1TrueDBDropdown()
        Me.lblzensur5 = New System.Windows.Forms.Label()
        Me.Notizlist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.TabPageInfomeldung = New System.Windows.Forms.TabPage()
        Me.pnlzensur3 = New System.Windows.Forms.Panel()
        Me.lblzensur3 = New System.Windows.Forms.Label()
        Me.InfoMeldungList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.TabPageBerechtigung = New System.Windows.Forms.TabPage()
        Me.DokumentFunktionenList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.TabPage2 = New System.Windows.Forms.TabPage()
        Me.pnlzensur6 = New System.Windows.Forms.Panel()
        Me.lblzensur6 = New System.Windows.Forms.Label()
        Me.ErsetzteDokumenteList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.DokList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.ToolBar1 = New System.Windows.Forms.ToolBar()
        Me.ToolBarButton1 = New System.Windows.Forms.ToolBarButton()
        Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
        Me.TabControl3 = New System.Windows.Forms.TabControl()
        Me.TabPage4 = New System.Windows.Forms.TabPage()
        Me.txtDokumenttyp = New System.Windows.Forms.TextBox()
        Me.Label32 = New System.Windows.Forms.Label()
        Me.txtDokumentid = New System.Windows.Forms.TextBox()
        Me.Label31 = New System.Windows.Forms.Label()
        Me.txtanzahlseiten = New System.Windows.Forms.TextBox()
        Me.Label30 = New System.Windows.Forms.Label()
        Me.txtReferenzzeile2 = New System.Windows.Forms.TextBox()
        Me.txtReferenzzeile1 = New System.Windows.Forms.TextBox()
        Me.Label28 = New System.Windows.Forms.Label()
        Me.Label29 = New System.Windows.Forms.Label()
        Me.txtnachvollziehbarkeit = New System.Windows.Forms.TextBox()
        Me.Label27 = New System.Windows.Forms.Label()
        Me.txtisin = New System.Windows.Forms.TextBox()
        Me.txtvalor = New System.Windows.Forms.TextBox()
        Me.Label25 = New System.Windows.Forms.Label()
        Me.Label26 = New System.Windows.Forms.Label()
        Me.txtValuta = New System.Windows.Forms.TextBox()
        Me.Label24 = New System.Windows.Forms.Label()
        Me.txtErstelltAm = New System.Windows.Forms.TextBox()
        Me.Label23 = New System.Windows.Forms.Label()
        Me.txtvvextern2 = New System.Windows.Forms.TextBox()
        Me.txtvvextern1 = New System.Windows.Forms.TextBox()
        Me.Label22 = New System.Windows.Forms.Label()
        Me.Label21 = New System.Windows.Forms.Label()
        Me.txtPartnerZusteller = New System.Windows.Forms.TextBox()
        Me.txtPartnerInhaber = New System.Windows.Forms.TextBox()
        Me.Label20 = New System.Windows.Forms.Label()
        Me.Label13 = New System.Windows.Forms.Label()
        Me.TabControl1.SuspendLayout()
        Me.TabPageAllgemein.SuspendLayout()
        Me.pnlzensur1.SuspendLayout()
        Me.TabPageStatus.SuspendLayout()
        CType(Me.Statuslist, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.Panel2.SuspendLayout()
        Me.TabPageDokumentwerte.SuspendLayout()
        Me.TabControl2.SuspendLayout()
        Me.TabPage1.SuspendLayout()
        CType(Me.ColdList, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.ColdListDokumente, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.TabPage3.SuspendLayout()
        Me.TabPageZuordnung.SuspendLayout()
        Me.pnlzensur4.SuspendLayout()
        CType(Me.Zuordnungslist, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.TabPageNotizen.SuspendLayout()
        Me.pnlzensur5.SuspendLayout()
        CType(Me.drpMiatarbeiter, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.Notizlist, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.TabPageInfomeldung.SuspendLayout()
        Me.pnlzensur3.SuspendLayout()
        CType(Me.InfoMeldungList, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.TabPageBerechtigung.SuspendLayout()
        CType(Me.DokumentFunktionenList, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.TabPage2.SuspendLayout()
        Me.pnlzensur6.SuspendLayout()
        CType(Me.ErsetzteDokumenteList, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.DokList, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.TabControl3.SuspendLayout()
        Me.TabPage4.SuspendLayout()
        Me.SuspendLayout()
        '
        'TabControl1
        '
        Me.TabControl1.Controls.AddRange(New System.Windows.Forms.Control() {Me.TabPageAllgemein, Me.TabPageStatus, Me.TabPageDokumentwerte, Me.TabPageZuordnung, Me.TabPageNotizen, Me.TabPageInfomeldung, Me.TabPageBerechtigung, Me.TabPage2})
        Me.TabControl1.Dock = System.Windows.Forms.DockStyle.Top
        Me.TabControl1.Location = New System.Drawing.Point(0, 25)
        Me.TabControl1.Name = "TabControl1"
        Me.TabControl1.SelectedIndex = 0
        Me.TabControl1.Size = New System.Drawing.Size(786, 248)
        Me.TabControl1.TabIndex = 13
        '
        'TabPageAllgemein
        '
        Me.TabPageAllgemein.BackColor = System.Drawing.Color.Transparent
        Me.TabPageAllgemein.Controls.AddRange(New System.Windows.Forms.Control() {Me.pnlzensur1, Me.TextBox18, Me.Label19, Me.TextBox14, Me.Label15, Me.TextBox13, Me.Label14, Me.TextBox12, Me.Label12, Me.TextBox11, Me.Label11, Me.TextBox10, Me.Label10, Me.TextBox9, Me.Label9, Me.TextBox8, Me.Label8, Me.TextBox7, Me.Label7, Me.TextBox6, Me.Label6, Me.TextBox5, Me.Label5, Me.TextBox4, Me.Label4, Me.TextBox3, Me.Label3, Me.TextBox2, Me.Label2, Me.TextBox1, Me.Label1})
        Me.TabPageAllgemein.Location = New System.Drawing.Point(4, 22)
        Me.TabPageAllgemein.Name = "TabPageAllgemein"
        Me.TabPageAllgemein.Size = New System.Drawing.Size(778, 222)
        Me.TabPageAllgemein.TabIndex = 0
        Me.TabPageAllgemein.Text = "Allgemein"
        '
        'pnlzensur1
        '
        Me.pnlzensur1.Controls.AddRange(New System.Windows.Forms.Control() {Me.lblzensur1})
        Me.pnlzensur1.Location = New System.Drawing.Point(96, 184)
        Me.pnlzensur1.Name = "pnlzensur1"
        Me.pnlzensur1.Size = New System.Drawing.Size(512, 32)
        Me.pnlzensur1.TabIndex = 30
        '
        'lblzensur1
        '
        Me.lblzensur1.Location = New System.Drawing.Point(0, 8)
        Me.lblzensur1.Name = "lblzensur1"
        Me.lblzensur1.Size = New System.Drawing.Size(650, 23)
        Me.lblzensur1.TabIndex = 0
        Me.lblzensur1.Text = "Label21"
        '
        'TextBox18
        '
        Me.TextBox18.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox18.ForeColor = System.Drawing.Color.Black
        Me.TextBox18.Location = New System.Drawing.Point(96, 64)
        Me.TextBox18.Name = "TextBox18"
        Me.TextBox18.ReadOnly = True
        Me.TextBox18.Size = New System.Drawing.Size(208, 20)
        Me.TextBox18.TabIndex = 29
        Me.TextBox18.Text = ""
        '
        'Label19
        '
        Me.Label19.Location = New System.Drawing.Point(8, 64)
        Me.Label19.Name = "Label19"
        Me.Label19.Size = New System.Drawing.Size(88, 16)
        Me.Label19.TabIndex = 28
        Me.Label19.Text = "Barcodekleber"
        '
        'TextBox14
        '
        Me.TextBox14.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox14.ForeColor = System.Drawing.Color.Black
        Me.TextBox14.Location = New System.Drawing.Point(392, 160)
        Me.TextBox14.Name = "TextBox14"
        Me.TextBox14.ReadOnly = True
        Me.TextBox14.Size = New System.Drawing.Size(208, 20)
        Me.TextBox14.TabIndex = 27
        Me.TextBox14.Text = ""
        '
        'Label15
        '
        Me.Label15.Location = New System.Drawing.Point(312, 160)
        Me.Label15.Name = "Label15"
        Me.Label15.Size = New System.Drawing.Size(80, 23)
        Me.Label15.TabIndex = 26
        Me.Label15.Text = "Termin"
        '
        'TextBox13
        '
        Me.TextBox13.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox13.ForeColor = System.Drawing.Color.Black
        Me.TextBox13.Location = New System.Drawing.Point(96, 160)
        Me.TextBox13.Name = "TextBox13"
        Me.TextBox13.ReadOnly = True
        Me.TextBox13.Size = New System.Drawing.Size(208, 20)
        Me.TextBox13.TabIndex = 25
        Me.TextBox13.Text = ""
        '
        'Label14
        '
        Me.Label14.Location = New System.Drawing.Point(8, 160)
        Me.Label14.Name = "Label14"
        Me.Label14.Size = New System.Drawing.Size(88, 23)
        Me.Label14.TabIndex = 24
        Me.Label14.Text = "Verantwortlich"
        '
        'TextBox12
        '
        Me.TextBox12.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox12.ForeColor = System.Drawing.Color.Black
        Me.TextBox12.Location = New System.Drawing.Point(96, 192)
        Me.TextBox12.Multiline = True
        Me.TextBox12.Name = "TextBox12"
        Me.TextBox12.ReadOnly = True
        Me.TextBox12.Size = New System.Drawing.Size(504, 24)
        Me.TextBox12.TabIndex = 23
        Me.TextBox12.Text = ""
        '
        'Label12
        '
        Me.Label12.Location = New System.Drawing.Point(8, 192)
        Me.Label12.Name = "Label12"
        Me.Label12.Size = New System.Drawing.Size(88, 23)
        Me.Label12.TabIndex = 22
        Me.Label12.Text = "Bemerkung"
        '
        'TextBox11
        '
        Me.TextBox11.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox11.ForeColor = System.Drawing.Color.Black
        Me.TextBox11.Location = New System.Drawing.Point(96, 136)
        Me.TextBox11.Name = "TextBox11"
        Me.TextBox11.ReadOnly = True
        Me.TextBox11.Size = New System.Drawing.Size(208, 20)
        Me.TextBox11.TabIndex = 21
        Me.TextBox11.Text = ""
        '
        'Label11
        '
        Me.Label11.Location = New System.Drawing.Point(8, 136)
        Me.Label11.Name = "Label11"
        Me.Label11.Size = New System.Drawing.Size(88, 23)
        Me.Label11.TabIndex = 20
        Me.Label11.Text = "Dokumentstatus"
        '
        'TextBox10
        '
        Me.TextBox10.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox10.ForeColor = System.Drawing.Color.Black
        Me.TextBox10.Location = New System.Drawing.Point(392, 88)
        Me.TextBox10.Name = "TextBox10"
        Me.TextBox10.ReadOnly = True
        Me.TextBox10.Size = New System.Drawing.Size(208, 20)
        Me.TextBox10.TabIndex = 19
        Me.TextBox10.Text = ""
        '
        'Label10
        '
        Me.Label10.Location = New System.Drawing.Point(312, 88)
        Me.Label10.Name = "Label10"
        Me.Label10.Size = New System.Drawing.Size(80, 23)
        Me.Label10.TabIndex = 18
        Me.Label10.Text = "Mutiert durch"
        '
        'TextBox9
        '
        Me.TextBox9.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox9.ForeColor = System.Drawing.Color.Black
        Me.TextBox9.Location = New System.Drawing.Point(392, 64)
        Me.TextBox9.Name = "TextBox9"
        Me.TextBox9.ReadOnly = True
        Me.TextBox9.Size = New System.Drawing.Size(208, 20)
        Me.TextBox9.TabIndex = 17
        Me.TextBox9.Text = ""
        '
        'Label9
        '
        Me.Label9.Location = New System.Drawing.Point(312, 64)
        Me.Label9.Name = "Label9"
        Me.Label9.Size = New System.Drawing.Size(80, 23)
        Me.Label9.TabIndex = 16
        Me.Label9.Text = "Mutiert am"
        '
        'TextBox8
        '
        Me.TextBox8.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox8.ForeColor = System.Drawing.Color.Black
        Me.TextBox8.Location = New System.Drawing.Point(392, 136)
        Me.TextBox8.Name = "TextBox8"
        Me.TextBox8.ReadOnly = True
        Me.TextBox8.Size = New System.Drawing.Size(208, 20)
        Me.TextBox8.TabIndex = 15
        Me.TextBox8.Text = ""
        '
        'Label8
        '
        Me.Label8.Location = New System.Drawing.Point(312, 136)
        Me.Label8.Name = "Label8"
        Me.Label8.Size = New System.Drawing.Size(80, 23)
        Me.Label8.TabIndex = 14
        Me.Label8.Text = "Gesperrt durch"
        '
        'TextBox7
        '
        Me.TextBox7.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox7.ForeColor = System.Drawing.Color.Black
        Me.TextBox7.Location = New System.Drawing.Point(392, 112)
        Me.TextBox7.Name = "TextBox7"
        Me.TextBox7.ReadOnly = True
        Me.TextBox7.Size = New System.Drawing.Size(208, 20)
        Me.TextBox7.TabIndex = 13
        Me.TextBox7.Text = ""
        '
        'Label7
        '
        Me.Label7.Location = New System.Drawing.Point(312, 112)
        Me.Label7.Name = "Label7"
        Me.Label7.Size = New System.Drawing.Size(80, 23)
        Me.Label7.TabIndex = 12
        Me.Label7.Text = "Gesperrt am"
        '
        'TextBox6
        '
        Me.TextBox6.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox6.ForeColor = System.Drawing.Color.Black
        Me.TextBox6.Location = New System.Drawing.Point(392, 40)
        Me.TextBox6.Name = "TextBox6"
        Me.TextBox6.ReadOnly = True
        Me.TextBox6.Size = New System.Drawing.Size(208, 20)
        Me.TextBox6.TabIndex = 11
        Me.TextBox6.Text = ""
        '
        'Label6
        '
        Me.Label6.Location = New System.Drawing.Point(312, 40)
        Me.Label6.Name = "Label6"
        Me.Label6.Size = New System.Drawing.Size(80, 23)
        Me.Label6.TabIndex = 10
        Me.Label6.Text = "Erstellt durch"
        '
        'TextBox5
        '
        Me.TextBox5.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox5.ForeColor = System.Drawing.Color.Black
        Me.TextBox5.Location = New System.Drawing.Point(392, 16)
        Me.TextBox5.Name = "TextBox5"
        Me.TextBox5.ReadOnly = True
        Me.TextBox5.Size = New System.Drawing.Size(208, 20)
        Me.TextBox5.TabIndex = 9
        Me.TextBox5.Text = ""
        '
        'Label5
        '
        Me.Label5.Location = New System.Drawing.Point(312, 16)
        Me.Label5.Name = "Label5"
        Me.Label5.Size = New System.Drawing.Size(80, 23)
        Me.Label5.TabIndex = 8
        Me.Label5.Text = "Erstellt am"
        '
        'TextBox4
        '
        Me.TextBox4.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox4.ForeColor = System.Drawing.Color.Black
        Me.TextBox4.Location = New System.Drawing.Point(96, 112)
        Me.TextBox4.Name = "TextBox4"
        Me.TextBox4.ReadOnly = True
        Me.TextBox4.Size = New System.Drawing.Size(208, 20)
        Me.TextBox4.TabIndex = 7
        Me.TextBox4.Text = ""
        '
        'Label4
        '
        Me.Label4.Location = New System.Drawing.Point(8, 112)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(88, 23)
        Me.Label4.TabIndex = 6
        Me.Label4.Text = "Bezeichnung"
        '
        'TextBox3
        '
        Me.TextBox3.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox3.ForeColor = System.Drawing.Color.Black
        Me.TextBox3.Location = New System.Drawing.Point(96, 88)
        Me.TextBox3.Name = "TextBox3"
        Me.TextBox3.ReadOnly = True
        Me.TextBox3.Size = New System.Drawing.Size(208, 20)
        Me.TextBox3.TabIndex = 5
        Me.TextBox3.Text = ""
        '
        'Label3
        '
        Me.Label3.Location = New System.Drawing.Point(8, 88)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(88, 23)
        Me.Label3.TabIndex = 4
        Me.Label3.Text = "Dokumentart"
        '
        'TextBox2
        '
        Me.TextBox2.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox2.ForeColor = System.Drawing.Color.Black
        Me.TextBox2.Location = New System.Drawing.Point(96, 16)
        Me.TextBox2.Name = "TextBox2"
        Me.TextBox2.ReadOnly = True
        Me.TextBox2.Size = New System.Drawing.Size(208, 20)
        Me.TextBox2.TabIndex = 3
        Me.TextBox2.Text = ""
        '
        'Label2
        '
        Me.Label2.Location = New System.Drawing.Point(8, 16)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(88, 23)
        Me.Label2.TabIndex = 2
        Me.Label2.Text = "Partner"
        '
        'TextBox1
        '
        Me.TextBox1.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.TextBox1.ForeColor = System.Drawing.Color.Black
        Me.TextBox1.Location = New System.Drawing.Point(96, 40)
        Me.TextBox1.Name = "TextBox1"
        Me.TextBox1.ReadOnly = True
        Me.TextBox1.Size = New System.Drawing.Size(208, 20)
        Me.TextBox1.TabIndex = 1
        Me.TextBox1.Text = ""
        '
        'Label1
        '
        Me.Label1.Location = New System.Drawing.Point(8, 40)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(88, 23)
        Me.Label1.TabIndex = 0
        Me.Label1.Text = "Dokument-ID"
        '
        'TabPageStatus
        '
        Me.TabPageStatus.Controls.AddRange(New System.Windows.Forms.Control() {Me.Statuslist, Me.Panel2})
        Me.TabPageStatus.Location = New System.Drawing.Point(4, 22)
        Me.TabPageStatus.Name = "TabPageStatus"
        Me.TabPageStatus.Size = New System.Drawing.Size(896, 222)
        Me.TabPageStatus.TabIndex = 1
        Me.TabPageStatus.Text = "Dokumentstatus"
        Me.TabPageStatus.Visible = False
        '
        'Statuslist
        '
        Me.Statuslist.AllowArrows = False
        Me.Statuslist.AllowFilter = True
        Me.Statuslist.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.Statuslist.AllowSort = True
        Me.Statuslist.BackColor = System.Drawing.Color.White
        Me.Statuslist.BorderStyle = System.Windows.Forms.BorderStyle.None
        Me.Statuslist.CaptionHeight = 17
        Me.Statuslist.CollapseColor = System.Drawing.Color.Transparent
        Me.Statuslist.DataChanged = False
        Me.Statuslist.DeadAreaBackColor = System.Drawing.Color.Empty
        Me.Statuslist.Dock = System.Windows.Forms.DockStyle.Fill
        Me.Statuslist.ExpandColor = System.Drawing.Color.Transparent
        Me.Statuslist.GroupByCaption = "Drag a column header here to group by that column"
        Me.Statuslist.Images.Add(CType(resources.GetObject("resource.Images"), System.Drawing.Bitmap))
        Me.Statuslist.Location = New System.Drawing.Point(0, 32)
        Me.Statuslist.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
        Me.Statuslist.Name = "Statuslist"
        Me.Statuslist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
        Me.Statuslist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.Statuslist.PreviewInfo.ZoomFactor = 75
        Me.Statuslist.PrintInfo.ShowOptionsDialog = False
        Me.Statuslist.RecordSelectorWidth = 16
        GridLines1.Color = System.Drawing.Color.DarkGray
        GridLines1.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
        Me.Statuslist.RowDivider = GridLines1
        Me.Statuslist.RowHeight = 15
        Me.Statuslist.RowSubDividerColor = System.Drawing.Color.Transparent
        Me.Statuslist.ScrollTips = False
        Me.Statuslist.Size = New System.Drawing.Size(896, 190)
        Me.Statuslist.TabIndex = 3
        Me.Statuslist.Text = "C1TrueDBGrid1"
        Me.Statuslist.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
        "r""><Data>Group{BackColor:ControlDark;Border:None,,0, 0, 0, 0;AlignVert:Center;}E" & _
        "ditor{}Style2{}Style5{}Style4{}Style7{}Style6{}EvenRow{BackColor:Aqua;}Selected{" & _
        "ForeColor:HighlightText;BackColor:Highlight;}Style3{}Inactive{ForeColor:Inactive" & _
        "CaptionText;BackColor:InactiveCaption;}FilterBar{}Footer{}Caption{AlignHorz:Cent" & _
        "er;}Normal{BackColor:White;}HighlightRow{ForeColor:HighlightText;BackColor:Highl" & _
        "ight;}Style9{}OddRow{}RecordSelector{AlignImage:Center;}Heading{Wrap:True;AlignV" & _
        "ert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;}St" & _
        "yle8{}Style10{AlignHorz:Near;}Style11{}Style12{}Style13{}Style1{}</Data></Styles" & _
        "><Splits><C1.Win.C1TrueDBGrid.MergeView Name="""" CaptionHeight=""17"" ColumnCaption" & _
        "Height=""17"" ColumnFooterHeight=""17"" MarqueeStyle=""DottedCellBorder"" RecordSelect" & _
        "orWidth=""16"" DefRecSelWidth=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""" & _
        "1""><ClientRect>0, 0, 896, 190</ClientRect><BorderSide>0</BorderSide><CaptionStyl" & _
        "e parent=""Style2"" me=""Style10"" /><EditorStyle parent=""Editor"" me=""Style5"" /><Eve" & _
        "nRowStyle parent=""EvenRow"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""" & _
        "Style13"" /><FooterStyle parent=""Footer"" me=""Style3"" /><GroupStyle parent=""Group""" & _
        " me=""Style12"" /><HeadingStyle parent=""Heading"" me=""Style2"" /><HighLightRowStyle " & _
        "parent=""HighlightRow"" me=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Style4""" & _
        " /><OddRowStyle parent=""OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""Recor" & _
        "dSelector"" me=""Style11"" /><SelectedStyle parent=""Selected"" me=""Style6"" /><Style " & _
        "parent=""Normal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedSty" & _
        "les><Style parent="""" me=""Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style " & _
        "parent=""Heading"" me=""Footer"" /><Style parent=""Heading"" me=""Caption"" /><Style par" & _
        "ent=""Heading"" me=""Inactive"" /><Style parent=""Normal"" me=""Selected"" /><Style pare" & _
        "nt=""Normal"" me=""Editor"" /><Style parent=""Normal"" me=""HighlightRow"" /><Style pare" & _
        "nt=""Normal"" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" /><Style parent=""H" & _
        "eading"" me=""RecordSelector"" /><Style parent=""Normal"" me=""FilterBar"" /><Style par" & _
        "ent=""Caption"" me=""Group"" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1" & _
        "</horzSplits><Layout>None</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><Cl" & _
        "ientArea>0, 0, 896, 190</ClientArea></Blob>"
        '
        'Panel2
        '
        Me.Panel2.Controls.AddRange(New System.Windows.Forms.Control() {Me.RBStatusHistory, Me.RBStatusAktuell})
        Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top
        Me.Panel2.Name = "Panel2"
        Me.Panel2.Size = New System.Drawing.Size(896, 32)
        Me.Panel2.TabIndex = 1
        '
        'RBStatusHistory
        '
        Me.RBStatusHistory.Location = New System.Drawing.Point(88, 6)
        Me.RBStatusHistory.Name = "RBStatusHistory"
        Me.RBStatusHistory.Size = New System.Drawing.Size(64, 24)
        Me.RBStatusHistory.TabIndex = 4
        Me.RBStatusHistory.Text = "History"
        '
        'RBStatusAktuell
        '
        Me.RBStatusAktuell.Checked = True
        Me.RBStatusAktuell.Location = New System.Drawing.Point(16, 6)
        Me.RBStatusAktuell.Name = "RBStatusAktuell"
        Me.RBStatusAktuell.Size = New System.Drawing.Size(56, 24)
        Me.RBStatusAktuell.TabIndex = 3
        Me.RBStatusAktuell.TabStop = True
        Me.RBStatusAktuell.Text = "Aktuell"
        '
        'TabPageDokumentwerte
        '
        Me.TabPageDokumentwerte.Controls.AddRange(New System.Windows.Forms.Control() {Me.TabControl2})
        Me.TabPageDokumentwerte.Location = New System.Drawing.Point(4, 22)
        Me.TabPageDokumentwerte.Name = "TabPageDokumentwerte"
        Me.TabPageDokumentwerte.Size = New System.Drawing.Size(896, 222)
        Me.TabPageDokumentwerte.TabIndex = 2
        Me.TabPageDokumentwerte.Text = "Dokumentwerte"
        Me.TabPageDokumentwerte.Visible = False
        '
        'TabControl2
        '
        Me.TabControl2.Controls.AddRange(New System.Windows.Forms.Control() {Me.TabPage1, Me.TabPage3})
        Me.TabControl2.Dock = System.Windows.Forms.DockStyle.Fill
        Me.TabControl2.Name = "TabControl2"
        Me.TabControl2.SelectedIndex = 0
        Me.TabControl2.Size = New System.Drawing.Size(896, 222)
        Me.TabControl2.TabIndex = 0
        '
        'TabPage1
        '
        Me.TabPage1.Controls.AddRange(New System.Windows.Forms.Control() {Me.pnlzensur2, Me.ColdList, Me.Splitter2, Me.lblzensur2, Me.ColdListDokumente})
        Me.TabPage1.Location = New System.Drawing.Point(4, 22)
        Me.TabPage1.Name = "TabPage1"
        Me.TabPage1.Size = New System.Drawing.Size(677, 196)
        Me.TabPage1.TabIndex = 0
        Me.TabPage1.Text = "Dokumentarchivierung"
        '
        'pnlzensur2
        '
        Me.pnlzensur2.Dock = System.Windows.Forms.DockStyle.Fill
        Me.pnlzensur2.Location = New System.Drawing.Point(339, 0)
        Me.pnlzensur2.Name = "pnlzensur2"
        Me.pnlzensur2.Size = New System.Drawing.Size(338, 196)
        Me.pnlzensur2.TabIndex = 19
        '
        'ColdList
        '
        Me.ColdList.AllowFilter = True
        Me.ColdList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.ColdList.AllowSort = True
        Me.ColdList.AllowUpdate = False
        Me.ColdList.AllowUpdateOnBlur = False
        Me.ColdList.AlternatingRows = True
        Me.ColdList.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.ColdList.CaptionHeight = 17
        Me.ColdList.CollapseColor = System.Drawing.Color.Black
        Me.ColdList.DataChanged = False
        Me.ColdList.DeadAreaBackColor = System.Drawing.Color.Empty
        Me.ColdList.Dock = System.Windows.Forms.DockStyle.Fill
        Me.ColdList.ExpandColor = System.Drawing.Color.Black
        Me.ColdList.GroupByCaption = "Drag a column header here to group by that column"
        Me.ColdList.Images.Add(CType(resources.GetObject("resource.Images1"), System.Drawing.Bitmap))
        Me.ColdList.Location = New System.Drawing.Point(339, 0)
        Me.ColdList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
        Me.ColdList.Name = "ColdList"
        Me.ColdList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
        Me.ColdList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.ColdList.PreviewInfo.ZoomFactor = 75
        Me.ColdList.PrintInfo.ShowOptionsDialog = False
        Me.ColdList.RecordSelectorWidth = 16
        GridLines2.Color = System.Drawing.Color.DarkGray
        GridLines2.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
        Me.ColdList.RowDivider = GridLines2
        Me.ColdList.RowHeight = 15
        Me.ColdList.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.ColdList.ScrollTips = False
        Me.ColdList.Size = New System.Drawing.Size(338, 196)
        Me.ColdList.TabIndex = 18
        Me.ColdList.Text = "C1TrueDBGrid1"
        Me.ColdList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
        "r""><Data>Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:ControlDark;}E" & _
        "ditor{}Style2{}Style5{}Style4{}Style7{}Style6{}EvenRow{BackColor:White;}Selected" & _
        "{ForeColor:HighlightText;BackColor:Highlight;}Style3{}Inactive{ForeColor:Inactiv" & _
        "eCaptionText;BackColor:InactiveCaption;}FilterBar{BackColor:255, 255, 192;}Foote" & _
        "r{}Caption{AlignHorz:Center;}Normal{BackColor:224, 224, 224;}HighlightRow{ForeCo" & _
        "lor:HighlightText;BackColor:Highlight;}Style1{}OddRow{BackColor:224, 224, 224;}R" & _
        "ecordSelector{AlignImage:Center;}Heading{Wrap:True;BackColor:Control;Border:Rais" & _
        "ed,,1, 1, 1, 1;ForeColor:ControlText;AlignVert:Center;}Style8{}Style10{AlignHorz" & _
        ":Near;}Style11{}Style12{}Style13{}Style9{}</Data></Styles><Splits><C1.Win.C1True" & _
        "DBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""17"" ColumnCap" & _
        "tionHeight=""17"" ColumnFooterHeight=""17"" MarqueeStyle=""DottedCellBorder"" RecordSe" & _
        "lectorWidth=""16"" DefRecSelWidth=""16"" VerticalScrollGroup=""1"" HorizontalScrollGro" & _
        "up=""1""><ClientRect>0, 0, 334, 192</ClientRect><BorderSide>0</BorderSide><Caption" & _
        "Style parent=""Style2"" me=""Style10"" /><EditorStyle parent=""Editor"" me=""Style5"" />" & _
        "<EvenRowStyle parent=""EvenRow"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" " & _
        "me=""Style13"" /><FooterStyle parent=""Footer"" me=""Style3"" /><GroupStyle parent=""Gr" & _
        "oup"" me=""Style12"" /><HeadingStyle parent=""Heading"" me=""Style2"" /><HighLightRowSt" & _
        "yle parent=""HighlightRow"" me=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Sty" & _
        "le4"" /><OddRowStyle parent=""OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""R" & _
        "ecordSelector"" me=""Style11"" /><SelectedStyle parent=""Selected"" me=""Style6"" /><St" & _
        "yle parent=""Normal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><Name" & _
        "dStyles><Style parent="""" me=""Normal"" /><Style parent=""Normal"" me=""Heading"" /><St" & _
        "yle parent=""Heading"" me=""Footer"" /><Style parent=""Heading"" me=""Caption"" /><Style" & _
        " parent=""Heading"" me=""Inactive"" /><Style parent=""Normal"" me=""Selected"" /><Style " & _
        "parent=""Normal"" me=""Editor"" /><Style parent=""Normal"" me=""HighlightRow"" /><Style " & _
        "parent=""Normal"" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" /><Style paren" & _
        "t=""Heading"" me=""RecordSelector"" /><Style parent=""Normal"" me=""FilterBar"" /><Style" & _
        " parent=""Caption"" me=""Group"" /></NamedStyles><vertSplits>1</vertSplits><horzSpli" & _
        "ts>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth" & _
        "><ClientArea>0, 0, 334, 192</ClientArea></Blob>"
        '
        'Splitter2
        '
        Me.Splitter2.Location = New System.Drawing.Point(336, 0)
        Me.Splitter2.Name = "Splitter2"
        Me.Splitter2.Size = New System.Drawing.Size(3, 196)
        Me.Splitter2.TabIndex = 17
        Me.Splitter2.TabStop = False
        '
        'lblzensur2
        '
        Me.lblzensur2.Location = New System.Drawing.Point(8, 8)
        Me.lblzensur2.Name = "lblzensur2"
        Me.lblzensur2.Size = New System.Drawing.Size(624, 23)
        Me.lblzensur2.TabIndex = 16
        Me.lblzensur2.Text = "Label21"
        '
        'ColdListDokumente
        '
        Me.ColdListDokumente.AllowFilter = True
        Me.ColdListDokumente.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.ColdListDokumente.AllowSort = True
        Me.ColdListDokumente.AllowUpdate = False
        Me.ColdListDokumente.AllowUpdateOnBlur = False
        Me.ColdListDokumente.BackColor = System.Drawing.Color.White
        Me.ColdListDokumente.CaptionHeight = 17
        Me.ColdListDokumente.CollapseColor = System.Drawing.Color.Black
        Me.ColdListDokumente.Cursor = System.Windows.Forms.Cursors.Default
        Me.ColdListDokumente.DataChanged = False
        Me.ColdListDokumente.DataView = C1.Win.C1TrueDBGrid.DataViewEnum.Hierarchical
        Me.ColdListDokumente.DeadAreaBackColor = System.Drawing.Color.Empty
        Me.ColdListDokumente.Dock = System.Windows.Forms.DockStyle.Left
        Me.ColdListDokumente.ExpandColor = System.Drawing.Color.Black
        Me.ColdListDokumente.FlatStyle = C1.Win.C1TrueDBGrid.FlatModeEnum.Popup
        Me.ColdListDokumente.GroupByCaption = "Drag a column header here to group by that column"
        Me.ColdListDokumente.Images.Add(CType(resources.GetObject("resource.Images2"), System.Drawing.Bitmap))
        Me.ColdListDokumente.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
        Me.ColdListDokumente.Name = "ColdListDokumente"
        Me.ColdListDokumente.PreviewInfo.Location = New System.Drawing.Point(0, 0)
        Me.ColdListDokumente.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.ColdListDokumente.PreviewInfo.ZoomFactor = 75
        Me.ColdListDokumente.PrintInfo.ShowOptionsDialog = False
        Me.ColdListDokumente.RecordSelectorWidth = 16
        GridLines3.Color = System.Drawing.Color.Transparent
        GridLines3.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.None
        Me.ColdListDokumente.RowDivider = GridLines3
        Me.ColdListDokumente.RowHeight = 15
        Me.ColdListDokumente.RowSubDividerColor = System.Drawing.Color.Transparent
        Me.ColdListDokumente.ScrollTips = False
        Me.ColdListDokumente.Size = New System.Drawing.Size(336, 196)
        Me.ColdListDokumente.TabIndex = 13
        Me.ColdListDokumente.Text = "C1TrueDBGrid1"
        Me.ColdListDokumente.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
        "r""><Data>Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:ControlDark;}E" & _
        "ditor{}Style13{}EvenRow{BackColor:White;}Selected{ForeColor:HighlightText;BackCo" & _
        "lor:Highlight;}Heading{Wrap:True;BackColor:Control;Border:Flat,ControlDark,0, 1," & _
        " 0, 1;ForeColor:ControlText;AlignVert:Center;}Inactive{ForeColor:InactiveCaption" & _
        "Text;BackColor:InactiveCaption;}FilterBar{BackColor:255, 255, 192;}OddRow{BackCo" & _
        "lor:224, 224, 224;}Footer{}Caption{AlignHorz:Center;}Style25{}Normal{BackColor:W" & _
        "hite;}Style26{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style24" & _
        "{}Style23{AlignHorz:Near;}Style22{}Style21{}Style20{}RecordSelector{AlignImage:C" & _
        "enter;}Style18{}Style19{}Style14{}Style15{}Style16{}Style17{}</Data></Styles><Sp" & _
        "lits><C1.Win.C1TrueDBGrid.HierarchicalView DefRecSelWidth=""16"" Name="""" CaptionHe" & _
        "ight=""17"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" MarqueeStyle=""DottedC" & _
        "ellBorder"" RecordSelectorWidth=""16"" VerticalScrollGroup=""1"" HorizontalScrollGrou" & _
        "p=""1""><ClientRect>0, 0, 332, 192</ClientRect><CaptionStyle parent=""Heading"" me=""" & _
        "Style23"" /><EditorStyle parent=""Editor"" me=""Style15"" /><EvenRowStyle parent=""Eve" & _
        "nRow"" me=""Style21"" /><FilterBarStyle parent=""FilterBar"" me=""Style26"" /><FooterSt" & _
        "yle parent=""Footer"" me=""Style17"" /><GroupStyle parent=""Group"" me=""Style25"" /><He" & _
        "adingStyle parent=""Heading"" me=""Style16"" /><HighLightRowStyle parent=""HighlightR" & _
        "ow"" me=""Style20"" /><InactiveStyle parent=""Inactive"" me=""Style19"" /><OddRowStyle " & _
        "parent=""OddRow"" me=""Style22"" /><RecordSelectorStyle parent=""RecordSelector"" me=""" & _
        "Style24"" /><SelectedStyle parent=""Selected"" me=""Style18"" /><Style parent=""Normal" & _
        """ me=""Style14"" /></C1.Win.C1TrueDBGrid.HierarchicalView></Splits><NamedStyles><S" & _
        "tyle parent="""" me=""Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent" & _
        "=""Heading"" me=""Footer"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""H" & _
        "eading"" me=""Inactive"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""No" & _
        "rmal"" me=""Editor"" /><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""No" & _
        "rmal"" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading" & _
        """ me=""RecordSelector"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""C" & _
        "aption"" me=""Group"" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horz" & _
        "Splits><Layout>None</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientAr" & _
        "ea>0, 0, 332, 192</ClientArea></Blob>"
        '
        'TabPage3
        '
        Me.TabPage3.Controls.AddRange(New System.Windows.Forms.Control() {Me.TextBox17, Me.Label18, Me.TextBox16, Me.TextBox15, Me.Label17, Me.Label16})
        Me.TabPage3.Location = New System.Drawing.Point(4, 22)
        Me.TabPage3.Name = "TabPage3"
        Me.TabPage3.Size = New System.Drawing.Size(677, 196)
        Me.TabPage3.TabIndex = 2
        Me.TabPage3.Text = "Diverse"
        Me.TabPage3.Visible = False
        '
        'TextBox17
        '
        Me.TextBox17.BackColor = System.Drawing.SystemColors.HighlightText
        Me.TextBox17.Location = New System.Drawing.Point(104, 72)
        Me.TextBox17.Name = "TextBox17"
        Me.TextBox17.ReadOnly = True
        Me.TextBox17.Size = New System.Drawing.Size(296, 20)
        Me.TextBox17.TabIndex = 5
        Me.TextBox17.Text = ""
        '
        'Label18
        '
        Me.Label18.Location = New System.Drawing.Point(8, 72)
        Me.Label18.Name = "Label18"
        Me.Label18.Size = New System.Drawing.Size(96, 23)
        Me.Label18.TabIndex = 4
        Me.Label18.Text = "Zuständig"
        '
        'TextBox16
        '
        Me.TextBox16.BackColor = System.Drawing.SystemColors.HighlightText
        Me.TextBox16.Location = New System.Drawing.Point(104, 32)
        Me.TextBox16.Name = "TextBox16"
        Me.TextBox16.ReadOnly = True
        Me.TextBox16.Size = New System.Drawing.Size(296, 20)
        Me.TextBox16.TabIndex = 3
        Me.TextBox16.Text = ""
        '
        'TextBox15
        '
        Me.TextBox15.BackColor = System.Drawing.SystemColors.HighlightText
        Me.TextBox15.Location = New System.Drawing.Point(104, 8)
        Me.TextBox15.Name = "TextBox15"
        Me.TextBox15.ReadOnly = True
        Me.TextBox15.Size = New System.Drawing.Size(296, 20)
        Me.TextBox15.TabIndex = 2
        Me.TextBox15.Text = ""
        '
        'Label17
        '
        Me.Label17.Location = New System.Drawing.Point(8, 32)
        Me.Label17.Name = "Label17"
        Me.Label17.Size = New System.Drawing.Size(96, 23)
        Me.Label17.TabIndex = 1
        Me.Label17.Text = "Unterschrift rechts"
        '
        'Label16
        '
        Me.Label16.Location = New System.Drawing.Point(8, 8)
        Me.Label16.Name = "Label16"
        Me.Label16.Size = New System.Drawing.Size(96, 23)
        Me.Label16.TabIndex = 0
        Me.Label16.Text = "Unterschrift links"
        '
        'TabPageZuordnung
        '
        Me.TabPageZuordnung.Controls.AddRange(New System.Windows.Forms.Control() {Me.pnlzensur4, Me.Zuordnungslist})
        Me.TabPageZuordnung.Location = New System.Drawing.Point(4, 22)
        Me.TabPageZuordnung.Name = "TabPageZuordnung"
        Me.TabPageZuordnung.Size = New System.Drawing.Size(896, 222)
        Me.TabPageZuordnung.TabIndex = 6
        Me.TabPageZuordnung.Text = "Dokumentzuordnungen"
        Me.TabPageZuordnung.Visible = False
        '
        'pnlzensur4
        '
        Me.pnlzensur4.Controls.AddRange(New System.Windows.Forms.Control() {Me.lblzensur4})
        Me.pnlzensur4.Dock = System.Windows.Forms.DockStyle.Fill
        Me.pnlzensur4.Name = "pnlzensur4"
        Me.pnlzensur4.Size = New System.Drawing.Size(896, 222)
        Me.pnlzensur4.TabIndex = 15
        '
        'lblzensur4
        '
        Me.lblzensur4.Location = New System.Drawing.Point(8, 8)
        Me.lblzensur4.Name = "lblzensur4"
        Me.lblzensur4.Size = New System.Drawing.Size(640, 23)
        Me.lblzensur4.TabIndex = 0
        Me.lblzensur4.Text = "Label21"
        '
        'Zuordnungslist
        '
        Me.Zuordnungslist.AllowFilter = True
        Me.Zuordnungslist.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.Zuordnungslist.AllowSort = True
        Me.Zuordnungslist.AllowUpdate = False
        Me.Zuordnungslist.AllowUpdateOnBlur = False
        Me.Zuordnungslist.AlternatingRows = True
        Me.Zuordnungslist.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.Zuordnungslist.CaptionHeight = 17
        Me.Zuordnungslist.CollapseColor = System.Drawing.Color.Black
        Me.Zuordnungslist.DataChanged = False
        Me.Zuordnungslist.DeadAreaBackColor = System.Drawing.Color.Empty
        Me.Zuordnungslist.Dock = System.Windows.Forms.DockStyle.Fill
        Me.Zuordnungslist.ExpandColor = System.Drawing.Color.Black
        Me.Zuordnungslist.GroupByCaption = "Drag a column header here to group by that column"
        Me.Zuordnungslist.Images.Add(CType(resources.GetObject("resource.Images3"), System.Drawing.Bitmap))
        Me.Zuordnungslist.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
        Me.Zuordnungslist.Name = "Zuordnungslist"
        Me.Zuordnungslist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
        Me.Zuordnungslist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.Zuordnungslist.PreviewInfo.ZoomFactor = 75
        Me.Zuordnungslist.PrintInfo.ShowOptionsDialog = False
        Me.Zuordnungslist.RecordSelectorWidth = 16
        GridLines4.Color = System.Drawing.Color.DarkGray
        GridLines4.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
        Me.Zuordnungslist.RowDivider = GridLines4
        Me.Zuordnungslist.RowHeight = 15
        Me.Zuordnungslist.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.Zuordnungslist.ScrollTips = False
        Me.Zuordnungslist.Size = New System.Drawing.Size(896, 222)
        Me.Zuordnungslist.TabIndex = 14
        Me.Zuordnungslist.Text = "C1TrueDBGrid1"
        Me.Zuordnungslist.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
        "r""><Data>Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:ControlDark;}E" & _
        "ditor{}Style2{}Style5{}Style4{}Style7{}Style6{}EvenRow{BackColor:White;}Selected" & _
        "{ForeColor:HighlightText;BackColor:Highlight;}Style3{}Inactive{ForeColor:Inactiv" & _
        "eCaptionText;BackColor:InactiveCaption;}FilterBar{BackColor:255, 255, 192;}Foote" & _
        "r{}Caption{AlignHorz:Center;}Normal{BackColor:224, 224, 224;}HighlightRow{ForeCo" & _
        "lor:HighlightText;BackColor:Highlight;}Style1{}OddRow{BackColor:224, 224, 224;}R" & _
        "ecordSelector{AlignImage:Center;}Heading{Wrap:True;BackColor:Control;Border:Rais" & _
        "ed,,1, 1, 1, 1;ForeColor:ControlText;AlignVert:Center;}Style8{}Style10{AlignHorz" & _
        ":Near;}Style11{}Style12{}Style13{}Style9{}</Data></Styles><Splits><C1.Win.C1True" & _
        "DBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""17"" ColumnCap" & _
        "tionHeight=""17"" ColumnFooterHeight=""17"" MarqueeStyle=""DottedCellBorder"" RecordSe" & _
        "lectorWidth=""16"" DefRecSelWidth=""16"" VerticalScrollGroup=""1"" HorizontalScrollGro" & _
        "up=""1""><ClientRect>0, 0, 892, 218</ClientRect><BorderSide>0</BorderSide><Caption" & _
        "Style parent=""Style2"" me=""Style10"" /><EditorStyle parent=""Editor"" me=""Style5"" />" & _
        "<EvenRowStyle parent=""EvenRow"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" " & _
        "me=""Style13"" /><FooterStyle parent=""Footer"" me=""Style3"" /><GroupStyle parent=""Gr" & _
        "oup"" me=""Style12"" /><HeadingStyle parent=""Heading"" me=""Style2"" /><HighLightRowSt" & _
        "yle parent=""HighlightRow"" me=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Sty" & _
        "le4"" /><OddRowStyle parent=""OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""R" & _
        "ecordSelector"" me=""Style11"" /><SelectedStyle parent=""Selected"" me=""Style6"" /><St" & _
        "yle parent=""Normal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><Name" & _
        "dStyles><Style parent="""" me=""Normal"" /><Style parent=""Normal"" me=""Heading"" /><St" & _
        "yle parent=""Heading"" me=""Footer"" /><Style parent=""Heading"" me=""Caption"" /><Style" & _
        " parent=""Heading"" me=""Inactive"" /><Style parent=""Normal"" me=""Selected"" /><Style " & _
        "parent=""Normal"" me=""Editor"" /><Style parent=""Normal"" me=""HighlightRow"" /><Style " & _
        "parent=""Normal"" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" /><Style paren" & _
        "t=""Heading"" me=""RecordSelector"" /><Style parent=""Normal"" me=""FilterBar"" /><Style" & _
        " parent=""Caption"" me=""Group"" /></NamedStyles><vertSplits>1</vertSplits><horzSpli" & _
        "ts>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth" & _
        "><ClientArea>0, 0, 892, 218</ClientArea></Blob>"
        '
        'TabPageNotizen
        '
        Me.TabPageNotizen.Controls.AddRange(New System.Windows.Forms.Control() {Me.pnlzensur5, Me.Notizlist})
        Me.TabPageNotizen.Location = New System.Drawing.Point(4, 22)
        Me.TabPageNotizen.Name = "TabPageNotizen"
        Me.TabPageNotizen.Size = New System.Drawing.Size(896, 222)
        Me.TabPageNotizen.TabIndex = 5
        Me.TabPageNotizen.Text = "Notizen"
        Me.TabPageNotizen.Visible = False
        '
        'pnlzensur5
        '
        Me.pnlzensur5.Controls.AddRange(New System.Windows.Forms.Control() {Me.drpMiatarbeiter, Me.lblzensur5})
        Me.pnlzensur5.Dock = System.Windows.Forms.DockStyle.Fill
        Me.pnlzensur5.Name = "pnlzensur5"
        Me.pnlzensur5.Size = New System.Drawing.Size(896, 222)
        Me.pnlzensur5.TabIndex = 14
        '
        'drpMiatarbeiter
        '
        Me.drpMiatarbeiter.AllowColMove = True
        Me.drpMiatarbeiter.AllowColSelect = True
        Me.drpMiatarbeiter.AllowFilter = True
        Me.drpMiatarbeiter.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.drpMiatarbeiter.AllowSort = True
        Me.drpMiatarbeiter.AlternatingRows = True
        Me.drpMiatarbeiter.CaptionHeight = 17
        Me.drpMiatarbeiter.ColumnCaptionHeight = 17
        Me.drpMiatarbeiter.ColumnFooterHeight = 17
        Me.drpMiatarbeiter.DeadAreaBackColor = System.Drawing.Color.Empty
        Me.drpMiatarbeiter.FetchRowStyles = False
        Me.drpMiatarbeiter.Images.Add(CType(resources.GetObject("resource.Images4"), System.Drawing.Bitmap))
        Me.drpMiatarbeiter.LayoutFileName = ""
        Me.drpMiatarbeiter.LayoutName = ""
        Me.drpMiatarbeiter.LayoutURL = ""
        Me.drpMiatarbeiter.Location = New System.Drawing.Point(322, 71)
        Me.drpMiatarbeiter.Name = "drpMiatarbeiter"
        GridLines5.Color = System.Drawing.Color.DarkGray
        GridLines5.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
        Me.drpMiatarbeiter.RowDivider = GridLines5
        Me.drpMiatarbeiter.RowHeight = 15
        Me.drpMiatarbeiter.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.drpMiatarbeiter.ScrollTips = False
        Me.drpMiatarbeiter.Size = New System.Drawing.Size(40, 80)
        Me.drpMiatarbeiter.TabIndex = 3
        Me.drpMiatarbeiter.Text = "C1TrueDBDropdown1"
        Me.drpMiatarbeiter.Visible = False
        Me.drpMiatarbeiter.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
        "r""><Data>Group{BackColor:ControlDark;Border:None,,0, 0, 0, 0;AlignVert:Center;}E" & _
        "ditor{}Style2{}Style5{}Style4{}Style7{}Style6{}EvenRow{BackColor:White;}Selected" & _
        "{ForeColor:HighlightText;BackColor:Highlight;}Style3{}Inactive{ForeColor:Inactiv" & _
        "eCaptionText;BackColor:InactiveCaption;}FilterBar{}Footer{}Caption{AlignHorz:Cen" & _
        "ter;}Normal{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style9{}O" & _
        "ddRow{BackColor:224, 224, 224;}RecordSelector{AlignImage:Center;}Heading{Wrap:Tr" & _
        "ue;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Co" & _
        "ntrol;}Style8{}Style10{AlignHorz:Near;}Style11{}Style12{}Style13{}Style1{}</Data" & _
        "></Styles><Splits><C1.Win.C1TrueDBGrid.DropdownView Name="""" AlternatingRowStyle=" & _
        """True"" CaptionHeight=""17"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" Marqu" & _
        "eeStyle=""DottedCellBorder"" RecordSelectorWidth=""16"" RecordSelectors=""False"" Vert" & _
        "icalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 36, 76</ClientRe" & _
        "ct><CaptionStyle parent=""Style2"" me=""Style10"" /><EditorStyle parent=""Editor"" me=" & _
        """Style5"" /><EvenRowStyle parent=""EvenRow"" me=""Style8"" /><FilterBarStyle parent=""" & _
        "FilterBar"" me=""Style13"" /><FooterStyle parent=""Footer"" me=""Style3"" /><GroupStyle" & _
        " parent=""Group"" me=""Style12"" /><HeadingStyle parent=""Heading"" me=""Style2"" /><Hig" & _
        "hLightRowStyle parent=""HighlightRow"" me=""Style7"" /><InactiveStyle parent=""Inacti" & _
        "ve"" me=""Style4"" /><OddRowStyle parent=""OddRow"" me=""Style9"" /><RecordSelectorStyl" & _
        "e parent=""RecordSelector"" me=""Style11"" /><SelectedStyle parent=""Selected"" me=""St" & _
        "yle6"" /><Style parent=""Normal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.DropdownView>" & _
        "</Splits><NamedStyles><Style parent="""" me=""Normal"" /><Style parent=""Normal"" me=""" & _
        "Heading"" /><Style parent=""Heading"" me=""Footer"" /><Style parent=""Heading"" me=""Cap" & _
        "tion"" /><Style parent=""Heading"" me=""Inactive"" /><Style parent=""Normal"" me=""Selec" & _
        "ted"" /><Style parent=""Normal"" me=""Editor"" /><Style parent=""Normal"" me=""Highlight" & _
        "Row"" /><Style parent=""Normal"" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" " & _
        "/><Style parent=""Heading"" me=""RecordSelector"" /><Style parent=""Normal"" me=""Filte" & _
        "rBar"" /><Style parent=""Caption"" me=""Group"" /></NamedStyles><vertSplits>1</vertSp" & _
        "lits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>16</Defa" & _
        "ultRecSelWidth><ClientArea>0, 0, 36, 76</ClientArea></Blob>"
        '
        'lblzensur5
        '
        Me.lblzensur5.Location = New System.Drawing.Point(8, 8)
        Me.lblzensur5.Name = "lblzensur5"
        Me.lblzensur5.Size = New System.Drawing.Size(648, 23)
        Me.lblzensur5.TabIndex = 0
        Me.lblzensur5.Text = "Label21"
        '
        'Notizlist
        '
        Me.Notizlist.AllowFilter = True
        Me.Notizlist.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.Notizlist.AllowSort = True
        Me.Notizlist.AllowUpdate = False
        Me.Notizlist.AllowUpdateOnBlur = False
        Me.Notizlist.AlternatingRows = True
        Me.Notizlist.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.Notizlist.CaptionHeight = 17
        Me.Notizlist.CollapseColor = System.Drawing.Color.Black
        Me.Notizlist.DataChanged = False
        Me.Notizlist.DeadAreaBackColor = System.Drawing.Color.Empty
        Me.Notizlist.Dock = System.Windows.Forms.DockStyle.Fill
        Me.Notizlist.ExpandColor = System.Drawing.Color.Black
        Me.Notizlist.GroupByCaption = "Drag a column header here to group by that column"
        Me.Notizlist.Images.Add(CType(resources.GetObject("resource.Images5"), System.Drawing.Bitmap))
        Me.Notizlist.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
        Me.Notizlist.Name = "Notizlist"
        Me.Notizlist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
        Me.Notizlist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.Notizlist.PreviewInfo.ZoomFactor = 75
        Me.Notizlist.PrintInfo.ShowOptionsDialog = False
        Me.Notizlist.RecordSelectorWidth = 16
        GridLines6.Color = System.Drawing.Color.DarkGray
        GridLines6.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
        Me.Notizlist.RowDivider = GridLines6
        Me.Notizlist.RowHeight = 15
        Me.Notizlist.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.Notizlist.ScrollTips = False
        Me.Notizlist.Size = New System.Drawing.Size(896, 222)
        Me.Notizlist.TabIndex = 13
        Me.Notizlist.Text = "C1TrueDBGrid1"
        Me.Notizlist.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
        "r""><Data>Group{BackColor:ControlDark;Border:None,,0, 0, 0, 0;AlignVert:Center;}E" & _
        "ditor{}Style2{}Style5{}Style4{}Style7{}Style6{}EvenRow{BackColor:White;}Selected" & _
        "{ForeColor:HighlightText;BackColor:Highlight;}Style3{}Inactive{ForeColor:Inactiv" & _
        "eCaptionText;BackColor:InactiveCaption;}FilterBar{BackColor:255, 255, 192;}Foote" & _
        "r{}Caption{AlignHorz:Center;}Normal{BackColor:224, 224, 224;}HighlightRow{ForeCo" & _
        "lor:HighlightText;BackColor:Highlight;}Style9{}OddRow{BackColor:224, 224, 224;}R" & _
        "ecordSelector{AlignImage:Center;}Heading{Wrap:True;AlignVert:Center;Border:Raise" & _
        "d,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;}Style8{}Style10{AlignHorz" & _
        ":Near;}Style11{}Style12{}Style13{}Style1{}</Data></Styles><Splits><C1.Win.C1True" & _
        "DBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""17"" ColumnCap" & _
        "tionHeight=""17"" ColumnFooterHeight=""17"" MarqueeStyle=""DottedCellBorder"" RecordSe" & _
        "lectorWidth=""16"" DefRecSelWidth=""16"" VerticalScrollGroup=""1"" HorizontalScrollGro" & _
        "up=""1""><ClientRect>0, 0, 892, 218</ClientRect><BorderSide>0</BorderSide><Caption" & _
        "Style parent=""Style2"" me=""Style10"" /><EditorStyle parent=""Editor"" me=""Style5"" />" & _
        "<EvenRowStyle parent=""EvenRow"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" " & _
        "me=""Style13"" /><FooterStyle parent=""Footer"" me=""Style3"" /><GroupStyle parent=""Gr" & _
        "oup"" me=""Style12"" /><HeadingStyle parent=""Heading"" me=""Style2"" /><HighLightRowSt" & _
        "yle parent=""HighlightRow"" me=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Sty" & _
        "le4"" /><OddRowStyle parent=""OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""R" & _
        "ecordSelector"" me=""Style11"" /><SelectedStyle parent=""Selected"" me=""Style6"" /><St" & _
        "yle parent=""Normal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><Name" & _
        "dStyles><Style parent="""" me=""Normal"" /><Style parent=""Normal"" me=""Heading"" /><St" & _
        "yle parent=""Heading"" me=""Footer"" /><Style parent=""Heading"" me=""Caption"" /><Style" & _
        " parent=""Heading"" me=""Inactive"" /><Style parent=""Normal"" me=""Selected"" /><Style " & _
        "parent=""Normal"" me=""Editor"" /><Style parent=""Normal"" me=""HighlightRow"" /><Style " & _
        "parent=""Normal"" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" /><Style paren" & _
        "t=""Heading"" me=""RecordSelector"" /><Style parent=""Normal"" me=""FilterBar"" /><Style" & _
        " parent=""Caption"" me=""Group"" /></NamedStyles><vertSplits>1</vertSplits><horzSpli" & _
        "ts>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth" & _
        "><ClientArea>0, 0, 892, 218</ClientArea></Blob>"
        '
        'TabPageInfomeldung
        '
        Me.TabPageInfomeldung.Controls.AddRange(New System.Windows.Forms.Control() {Me.pnlzensur3, Me.InfoMeldungList})
        Me.TabPageInfomeldung.Location = New System.Drawing.Point(4, 22)
        Me.TabPageInfomeldung.Name = "TabPageInfomeldung"
        Me.TabPageInfomeldung.Size = New System.Drawing.Size(896, 222)
        Me.TabPageInfomeldung.TabIndex = 4
        Me.TabPageInfomeldung.Text = "Informationsmeldungen"
        Me.TabPageInfomeldung.Visible = False
        '
        'pnlzensur3
        '
        Me.pnlzensur3.Controls.AddRange(New System.Windows.Forms.Control() {Me.lblzensur3})
        Me.pnlzensur3.Dock = System.Windows.Forms.DockStyle.Fill
        Me.pnlzensur3.Name = "pnlzensur3"
        Me.pnlzensur3.Size = New System.Drawing.Size(896, 222)
        Me.pnlzensur3.TabIndex = 13
        '
        'lblzensur3
        '
        Me.lblzensur3.Location = New System.Drawing.Point(8, 8)
        Me.lblzensur3.Name = "lblzensur3"
        Me.lblzensur3.Size = New System.Drawing.Size(624, 23)
        Me.lblzensur3.TabIndex = 0
        Me.lblzensur3.Text = "Label21"
        '
        'InfoMeldungList
        '
        Me.InfoMeldungList.AllowFilter = True
        Me.InfoMeldungList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.InfoMeldungList.AllowSort = True
        Me.InfoMeldungList.AllowUpdate = False
        Me.InfoMeldungList.AllowUpdateOnBlur = False
        Me.InfoMeldungList.AlternatingRows = True
        Me.InfoMeldungList.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.InfoMeldungList.CaptionHeight = 17
        Me.InfoMeldungList.CollapseColor = System.Drawing.Color.Black
        Me.InfoMeldungList.DataChanged = False
        Me.InfoMeldungList.DeadAreaBackColor = System.Drawing.Color.Empty
        Me.InfoMeldungList.Dock = System.Windows.Forms.DockStyle.Fill
        Me.InfoMeldungList.ExpandColor = System.Drawing.Color.Black
        Me.InfoMeldungList.FetchRowStyles = True
        Me.InfoMeldungList.GroupByCaption = "Drag a column header here to group by that column"
        Me.InfoMeldungList.Images.Add(CType(resources.GetObject("resource.Images6"), System.Drawing.Bitmap))
        Me.InfoMeldungList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
        Me.InfoMeldungList.Name = "InfoMeldungList"
        Me.InfoMeldungList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
        Me.InfoMeldungList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.InfoMeldungList.PreviewInfo.ZoomFactor = 75
        Me.InfoMeldungList.PrintInfo.ShowOptionsDialog = False
        Me.InfoMeldungList.RecordSelectorWidth = 16
        GridLines7.Color = System.Drawing.Color.DarkGray
        GridLines7.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
        Me.InfoMeldungList.RowDivider = GridLines7
        Me.InfoMeldungList.RowHeight = 15
        Me.InfoMeldungList.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.InfoMeldungList.ScrollTips = False
        Me.InfoMeldungList.Size = New System.Drawing.Size(896, 222)
        Me.InfoMeldungList.TabIndex = 12
        Me.InfoMeldungList.Text = "C1TrueDBGrid1"
        Me.InfoMeldungList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
        "r""><Data>Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:ControlDark;}E" & _
        "ditor{}Style2{}Style5{}Style4{}Style7{}Style6{}EvenRow{BackColor:White;}Selected" & _
        "{ForeColor:HighlightText;BackColor:Highlight;}Style3{}Inactive{ForeColor:Inactiv" & _
        "eCaptionText;BackColor:InactiveCaption;}FilterBar{BackColor:255, 255, 192;}Foote" & _
        "r{}Caption{AlignHorz:Center;}Normal{BackColor:224, 224, 224;}HighlightRow{ForeCo" & _
        "lor:HighlightText;BackColor:Highlight;}Style1{}OddRow{BackColor:224, 224, 224;}R" & _
        "ecordSelector{AlignImage:Center;}Heading{Wrap:True;BackColor:Control;Border:Rais" & _
        "ed,,1, 1, 1, 1;ForeColor:ControlText;AlignVert:Center;}Style8{}Style10{AlignHorz" & _
        ":Near;}Style11{}Style12{}Style13{}Style9{}</Data></Styles><Splits><C1.Win.C1True" & _
        "DBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""17"" ColumnCap" & _
        "tionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles=""True"" MarqueeStyle=""Dott" & _
        "edCellBorder"" RecordSelectorWidth=""16"" DefRecSelWidth=""16"" VerticalScrollGroup=""" & _
        "1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 892, 218</ClientRect><BorderSide>" & _
        "0</BorderSide><CaptionStyle parent=""Style2"" me=""Style10"" /><EditorStyle parent=""" & _
        "Editor"" me=""Style5"" /><EvenRowStyle parent=""EvenRow"" me=""Style8"" /><FilterBarSty" & _
        "le parent=""FilterBar"" me=""Style13"" /><FooterStyle parent=""Footer"" me=""Style3"" />" & _
        "<GroupStyle parent=""Group"" me=""Style12"" /><HeadingStyle parent=""Heading"" me=""Sty" & _
        "le2"" /><HighLightRowStyle parent=""HighlightRow"" me=""Style7"" /><InactiveStyle par" & _
        "ent=""Inactive"" me=""Style4"" /><OddRowStyle parent=""OddRow"" me=""Style9"" /><RecordS" & _
        "electorStyle parent=""RecordSelector"" me=""Style11"" /><SelectedStyle parent=""Selec" & _
        "ted"" me=""Style6"" /><Style parent=""Normal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.Me" & _
        "rgeView></Splits><NamedStyles><Style parent="""" me=""Normal"" /><Style parent=""Norm" & _
        "al"" me=""Heading"" /><Style parent=""Heading"" me=""Footer"" /><Style parent=""Heading""" & _
        " me=""Caption"" /><Style parent=""Heading"" me=""Inactive"" /><Style parent=""Normal"" m" & _
        "e=""Selected"" /><Style parent=""Normal"" me=""Editor"" /><Style parent=""Normal"" me=""H" & _
        "ighlightRow"" /><Style parent=""Normal"" me=""EvenRow"" /><Style parent=""Normal"" me=""" & _
        "OddRow"" /><Style parent=""Heading"" me=""RecordSelector"" /><Style parent=""Normal"" m" & _
        "e=""FilterBar"" /><Style parent=""Caption"" me=""Group"" /></NamedStyles><vertSplits>1" & _
        "</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>" & _
        "16</DefaultRecSelWidth><ClientArea>0, 0, 892, 218</ClientArea></Blob>"
        '
        'TabPageBerechtigung
        '
        Me.TabPageBerechtigung.Controls.AddRange(New System.Windows.Forms.Control() {Me.DokumentFunktionenList})
        Me.TabPageBerechtigung.Location = New System.Drawing.Point(4, 22)
        Me.TabPageBerechtigung.Name = "TabPageBerechtigung"
        Me.TabPageBerechtigung.Size = New System.Drawing.Size(896, 222)
        Me.TabPageBerechtigung.TabIndex = 7
        Me.TabPageBerechtigung.Text = "Berechtigungseinschränkung"
        Me.TabPageBerechtigung.Visible = False
        '
        'DokumentFunktionenList
        '
        Me.DokumentFunktionenList.AllowFilter = True
        Me.DokumentFunktionenList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.DokumentFunktionenList.AllowSort = True
        Me.DokumentFunktionenList.AllowUpdate = False
        Me.DokumentFunktionenList.AllowUpdateOnBlur = False
        Me.DokumentFunktionenList.AlternatingRows = True
        Me.DokumentFunktionenList.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.DokumentFunktionenList.CaptionHeight = 17
        Me.DokumentFunktionenList.CollapseColor = System.Drawing.Color.Black
        Me.DokumentFunktionenList.DataChanged = False
        Me.DokumentFunktionenList.DeadAreaBackColor = System.Drawing.Color.Empty
        Me.DokumentFunktionenList.Dock = System.Windows.Forms.DockStyle.Fill
        Me.DokumentFunktionenList.ExpandColor = System.Drawing.Color.Black
        Me.DokumentFunktionenList.GroupByCaption = "Drag a column header here to group by that column"
        Me.DokumentFunktionenList.Images.Add(CType(resources.GetObject("resource.Images7"), System.Drawing.Bitmap))
        Me.DokumentFunktionenList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
        Me.DokumentFunktionenList.Name = "DokumentFunktionenList"
        Me.DokumentFunktionenList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
        Me.DokumentFunktionenList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.DokumentFunktionenList.PreviewInfo.ZoomFactor = 75
        Me.DokumentFunktionenList.PrintInfo.ShowOptionsDialog = False
        Me.DokumentFunktionenList.RecordSelectorWidth = 16
        GridLines8.Color = System.Drawing.Color.DarkGray
        GridLines8.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
        Me.DokumentFunktionenList.RowDivider = GridLines8
        Me.DokumentFunktionenList.RowHeight = 15
        Me.DokumentFunktionenList.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.DokumentFunktionenList.ScrollTips = False
        Me.DokumentFunktionenList.Size = New System.Drawing.Size(896, 222)
        Me.DokumentFunktionenList.TabIndex = 14
        Me.DokumentFunktionenList.Text = "C1TrueDBGrid1"
        Me.DokumentFunktionenList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
        "r""><Data>Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:ControlDark;}E" & _
        "ditor{}Style2{}Style5{}Style4{}Style7{}Style6{}EvenRow{BackColor:White;}Selected" & _
        "{ForeColor:HighlightText;BackColor:Highlight;}Style3{}Inactive{ForeColor:Inactiv" & _
        "eCaptionText;BackColor:InactiveCaption;}FilterBar{BackColor:255, 255, 192;}Foote" & _
        "r{}Caption{AlignHorz:Center;}Normal{BackColor:224, 224, 224;}HighlightRow{ForeCo" & _
        "lor:HighlightText;BackColor:Highlight;}Style1{}OddRow{BackColor:224, 224, 224;}R" & _
        "ecordSelector{AlignImage:Center;}Heading{Wrap:True;BackColor:Control;Border:Rais" & _
        "ed,,1, 1, 1, 1;ForeColor:ControlText;AlignVert:Center;}Style8{}Style10{AlignHorz" & _
        ":Near;}Style11{}Style12{}Style13{}Style9{}</Data></Styles><Splits><C1.Win.C1True" & _
        "DBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""17"" ColumnCap" & _
        "tionHeight=""17"" ColumnFooterHeight=""17"" MarqueeStyle=""DottedCellBorder"" RecordSe" & _
        "lectorWidth=""16"" DefRecSelWidth=""16"" VerticalScrollGroup=""1"" HorizontalScrollGro" & _
        "up=""1""><ClientRect>0, 0, 892, 218</ClientRect><BorderSide>0</BorderSide><Caption" & _
        "Style parent=""Style2"" me=""Style10"" /><EditorStyle parent=""Editor"" me=""Style5"" />" & _
        "<EvenRowStyle parent=""EvenRow"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" " & _
        "me=""Style13"" /><FooterStyle parent=""Footer"" me=""Style3"" /><GroupStyle parent=""Gr" & _
        "oup"" me=""Style12"" /><HeadingStyle parent=""Heading"" me=""Style2"" /><HighLightRowSt" & _
        "yle parent=""HighlightRow"" me=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Sty" & _
        "le4"" /><OddRowStyle parent=""OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""R" & _
        "ecordSelector"" me=""Style11"" /><SelectedStyle parent=""Selected"" me=""Style6"" /><St" & _
        "yle parent=""Normal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><Name" & _
        "dStyles><Style parent="""" me=""Normal"" /><Style parent=""Normal"" me=""Heading"" /><St" & _
        "yle parent=""Heading"" me=""Footer"" /><Style parent=""Heading"" me=""Caption"" /><Style" & _
        " parent=""Heading"" me=""Inactive"" /><Style parent=""Normal"" me=""Selected"" /><Style " & _
        "parent=""Normal"" me=""Editor"" /><Style parent=""Normal"" me=""HighlightRow"" /><Style " & _
        "parent=""Normal"" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" /><Style paren" & _
        "t=""Heading"" me=""RecordSelector"" /><Style parent=""Normal"" me=""FilterBar"" /><Style" & _
        " parent=""Caption"" me=""Group"" /></NamedStyles><vertSplits>1</vertSplits><horzSpli" & _
        "ts>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth" & _
        "><ClientArea>0, 0, 892, 218</ClientArea></Blob>"
        '
        'TabPage2
        '
        Me.TabPage2.Controls.AddRange(New System.Windows.Forms.Control() {Me.pnlzensur6, Me.ErsetzteDokumenteList})
        Me.TabPage2.Location = New System.Drawing.Point(4, 22)
        Me.TabPage2.Name = "TabPage2"
        Me.TabPage2.Size = New System.Drawing.Size(896, 222)
        Me.TabPage2.TabIndex = 8
        Me.TabPage2.Text = "Ersetzte Dokumente"
        Me.TabPage2.Visible = False
        '
        'pnlzensur6
        '
        Me.pnlzensur6.Controls.AddRange(New System.Windows.Forms.Control() {Me.lblzensur6})
        Me.pnlzensur6.Dock = System.Windows.Forms.DockStyle.Fill
        Me.pnlzensur6.Name = "pnlzensur6"
        Me.pnlzensur6.Size = New System.Drawing.Size(896, 222)
        Me.pnlzensur6.TabIndex = 14
        '
        'lblzensur6
        '
        Me.lblzensur6.Location = New System.Drawing.Point(16, 16)
        Me.lblzensur6.Name = "lblzensur6"
        Me.lblzensur6.Size = New System.Drawing.Size(616, 23)
        Me.lblzensur6.TabIndex = 0
        Me.lblzensur6.Text = "Label21"
        '
        'ErsetzteDokumenteList
        '
        Me.ErsetzteDokumenteList.AllowFilter = True
        Me.ErsetzteDokumenteList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.ErsetzteDokumenteList.AllowSort = True
        Me.ErsetzteDokumenteList.AllowUpdate = False
        Me.ErsetzteDokumenteList.AllowUpdateOnBlur = False
        Me.ErsetzteDokumenteList.AlternatingRows = True
        Me.ErsetzteDokumenteList.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.ErsetzteDokumenteList.CaptionHeight = 17
        Me.ErsetzteDokumenteList.CollapseColor = System.Drawing.Color.Black
        Me.ErsetzteDokumenteList.DataChanged = False
        Me.ErsetzteDokumenteList.DeadAreaBackColor = System.Drawing.Color.Empty
        Me.ErsetzteDokumenteList.Dock = System.Windows.Forms.DockStyle.Fill
        Me.ErsetzteDokumenteList.ExpandColor = System.Drawing.Color.Black
        Me.ErsetzteDokumenteList.GroupByCaption = "Drag a column header here to group by that column"
        Me.ErsetzteDokumenteList.Images.Add(CType(resources.GetObject("resource.Images8"), System.Drawing.Bitmap))
        Me.ErsetzteDokumenteList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
        Me.ErsetzteDokumenteList.Name = "ErsetzteDokumenteList"
        Me.ErsetzteDokumenteList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
        Me.ErsetzteDokumenteList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.ErsetzteDokumenteList.PreviewInfo.ZoomFactor = 75
        Me.ErsetzteDokumenteList.PrintInfo.ShowOptionsDialog = False
        Me.ErsetzteDokumenteList.RecordSelectorWidth = 16
        GridLines9.Color = System.Drawing.Color.DarkGray
        GridLines9.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
        Me.ErsetzteDokumenteList.RowDivider = GridLines9
        Me.ErsetzteDokumenteList.RowHeight = 15
        Me.ErsetzteDokumenteList.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.ErsetzteDokumenteList.ScrollTips = False
        Me.ErsetzteDokumenteList.Size = New System.Drawing.Size(896, 222)
        Me.ErsetzteDokumenteList.TabIndex = 13
        Me.ErsetzteDokumenteList.Text = "C1TrueDBGrid1"
        Me.ErsetzteDokumenteList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
        "r""><Data>Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:ControlDark;}E" & _
        "ditor{}Style2{}Style5{}Style4{}Style7{}Style6{}EvenRow{BackColor:White;}Selected" & _
        "{ForeColor:HighlightText;BackColor:Highlight;}Style3{}Inactive{ForeColor:Inactiv" & _
        "eCaptionText;BackColor:InactiveCaption;}FilterBar{BackColor:255, 255, 192;}Foote" & _
        "r{}Caption{AlignHorz:Center;}Normal{BackColor:224, 224, 224;}HighlightRow{ForeCo" & _
        "lor:HighlightText;BackColor:Highlight;}Style1{}OddRow{BackColor:224, 224, 224;}R" & _
        "ecordSelector{AlignImage:Center;}Heading{Wrap:True;BackColor:Control;Border:Rais" & _
        "ed,,1, 1, 1, 1;ForeColor:ControlText;AlignVert:Center;}Style8{}Style10{AlignHorz" & _
        ":Near;}Style11{}Style12{}Style13{}Style9{}</Data></Styles><Splits><C1.Win.C1True" & _
        "DBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""17"" ColumnCap" & _
        "tionHeight=""17"" ColumnFooterHeight=""17"" MarqueeStyle=""DottedCellBorder"" RecordSe" & _
        "lectorWidth=""16"" DefRecSelWidth=""16"" VerticalScrollGroup=""1"" HorizontalScrollGro" & _
        "up=""1""><ClientRect>0, 0, 892, 218</ClientRect><BorderSide>0</BorderSide><Caption" & _
        "Style parent=""Style2"" me=""Style10"" /><EditorStyle parent=""Editor"" me=""Style5"" />" & _
        "<EvenRowStyle parent=""EvenRow"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" " & _
        "me=""Style13"" /><FooterStyle parent=""Footer"" me=""Style3"" /><GroupStyle parent=""Gr" & _
        "oup"" me=""Style12"" /><HeadingStyle parent=""Heading"" me=""Style2"" /><HighLightRowSt" & _
        "yle parent=""HighlightRow"" me=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Sty" & _
        "le4"" /><OddRowStyle parent=""OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""R" & _
        "ecordSelector"" me=""Style11"" /><SelectedStyle parent=""Selected"" me=""Style6"" /><St" & _
        "yle parent=""Normal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><Name" & _
        "dStyles><Style parent="""" me=""Normal"" /><Style parent=""Normal"" me=""Heading"" /><St" & _
        "yle parent=""Heading"" me=""Footer"" /><Style parent=""Heading"" me=""Caption"" /><Style" & _
        " parent=""Heading"" me=""Inactive"" /><Style parent=""Normal"" me=""Selected"" /><Style " & _
        "parent=""Normal"" me=""Editor"" /><Style parent=""Normal"" me=""HighlightRow"" /><Style " & _
        "parent=""Normal"" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" /><Style paren" & _
        "t=""Heading"" me=""RecordSelector"" /><Style parent=""Normal"" me=""FilterBar"" /><Style" & _
        " parent=""Caption"" me=""Group"" /></NamedStyles><vertSplits>1</vertSplits><horzSpli" & _
        "ts>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth" & _
        "><ClientArea>0, 0, 892, 218</ClientArea></Blob>"
        '
        'DokList
        '
        Me.DokList.AllowFilter = True
        Me.DokList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.DokList.AllowSort = True
        Me.DokList.AllowUpdateOnBlur = False
        Me.DokList.AlternatingRows = True
        Me.DokList.CaptionHeight = 17
        Me.DokList.CollapseColor = System.Drawing.Color.Black
        Me.DokList.Cursor = System.Windows.Forms.Cursors.Default
        Me.DokList.DataChanged = False
        Me.DokList.DeadAreaBackColor = System.Drawing.Color.Empty
        Me.DokList.ExpandColor = System.Drawing.Color.Black
        Me.DokList.FetchRowStyles = True
        Me.DokList.FilterBar = True
        Me.DokList.GroupByCaption = "Drag a column header here to group by that column"
        Me.DokList.Images.Add(CType(resources.GetObject("resource.Images9"), System.Drawing.Bitmap))
        Me.DokList.Location = New System.Drawing.Point(576, 48)
        Me.DokList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
        Me.DokList.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
        Me.DokList.Name = "DokList"
        Me.DokList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
        Me.DokList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.DokList.PreviewInfo.ZoomFactor = 75
        Me.DokList.PrintInfo.ShowOptionsDialog = False
        Me.DokList.RecordSelectorWidth = 16
        GridLines10.Color = System.Drawing.Color.DarkGray
        GridLines10.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
        Me.DokList.RowDivider = GridLines10
        Me.DokList.RowHeight = 15
        Me.DokList.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.DokList.ScrollTips = True
        Me.DokList.Size = New System.Drawing.Size(208, 48)
        Me.DokList.TabIndex = 26
        Me.DokList.Text = "C1TrueDBGrid1"
        Me.DokList.Visible = False
        Me.DokList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
        "r""><Data>Style11{}Style12{}Style13{}Style5{}Style4{}Style7{}Style6{}EvenRow{Back" & _
        "Color:White;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Heading{Wrap:" & _
        "True;BackColor:Control;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;AlignVert" & _
        ":Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Filte" & _
        "rBar{BackColor:255, 255, 192;}Footer{}Caption{AlignHorz:Center;}Editor{}Normal{B" & _
        "ackColor:Control;}Style27{}Style26{}HighlightRow{ForeColor:HighlightText;BackCol" & _
        "or:Highlight;}Style1{}OddRow{BackColor:224, 224, 224;}RecordSelector{AlignImage:" & _
        "Center;}Style9{}Style8{}Style3{}Style2{}Group{AlignVert:Center;Border:None,,0, 0" & _
        ", 0, 0;BackColor:ControlDark;}Style10{AlignHorz:Near;}</Data></Styles><Splits><C" & _
        "1.Win.C1TrueDBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""1" & _
        "7"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles=""True"" Filter" & _
        "Bar=""True"" MarqueeStyle=""DottedCellBorder"" RecordSelectorWidth=""16"" DefRecSelWid" & _
        "th=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 204," & _
        " 44</ClientRect><BorderSide>0</BorderSide><CaptionStyle parent=""Heading"" me=""Sty" & _
        "le10"" /><EditorStyle parent=""Editor"" me=""Style2"" /><EvenRowStyle parent=""EvenRow" & _
        """ me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""Style27"" /><FooterStyle p" & _
        "arent=""Footer"" me=""Style4"" /><GroupStyle parent=""Group"" me=""Style12"" /><HeadingS" & _
        "tyle parent=""Heading"" me=""Style3"" /><HighLightRowStyle parent=""HighlightRow"" me=" & _
        """Style7"" /><InactiveStyle parent=""Inactive"" me=""Style6"" /><OddRowStyle parent=""O" & _
        "ddRow"" me=""Style9"" /><RecordSelectorStyle parent=""RecordSelector"" me=""Style11"" /" & _
        "><SelectedStyle parent=""Selected"" me=""Style5"" /><Style parent=""Normal"" me=""Style" & _
        "1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="""" me=""" & _
        "Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent=""Heading"" me=""Foot" & _
        "er"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""Heading"" me=""Inactiv" & _
        "e"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""Normal"" me=""Editor"" /" & _
        "><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""Normal"" me=""EvenRow"" " & _
        "/><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading"" me=""RecordSelecto" & _
        "r"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""Caption"" me=""Group"" " & _
        "/></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>Modi" & _
        "fied</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientArea>0, 0, 204, 4" & _
        "4</ClientArea></Blob>"
        '
        'ToolBar1
        '
        Me.ToolBar1.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.ToolBarButton1})
        Me.ToolBar1.DropDownArrows = True
        Me.ToolBar1.ImageList = Me.ImageList1
        Me.ToolBar1.Name = "ToolBar1"
        Me.ToolBar1.ShowToolTips = True
        Me.ToolBar1.Size = New System.Drawing.Size(786, 25)
        Me.ToolBar1.TabIndex = 27
        '
        'ToolBarButton1
        '
        Me.ToolBarButton1.ImageIndex = 0
        '
        'ImageList1
        '
        Me.ImageList1.ColorDepth = System.Windows.Forms.ColorDepth.Depth8Bit
        Me.ImageList1.ImageSize = New System.Drawing.Size(16, 16)
        Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
        Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
        '
        'TabControl3
        '
        Me.TabControl3.Controls.AddRange(New System.Windows.Forms.Control() {Me.TabPage4})
        Me.TabControl3.Dock = System.Windows.Forms.DockStyle.Top
        Me.TabControl3.Location = New System.Drawing.Point(0, 273)
        Me.TabControl3.Name = "TabControl3"
        Me.TabControl3.SelectedIndex = 0
        Me.TabControl3.Size = New System.Drawing.Size(786, 248)
        Me.TabControl3.TabIndex = 28
        '
        'TabPage4
        '
        Me.TabPage4.Controls.AddRange(New System.Windows.Forms.Control() {Me.txtDokumenttyp, Me.Label32, Me.txtDokumentid, Me.Label31, Me.txtanzahlseiten, Me.Label30, Me.txtReferenzzeile2, Me.txtReferenzzeile1, Me.Label28, Me.Label29, Me.txtnachvollziehbarkeit, Me.Label27, Me.txtisin, Me.txtvalor, Me.Label25, Me.Label26, Me.txtValuta, Me.Label24, Me.txtErstelltAm, Me.Label23, Me.txtvvextern2, Me.txtvvextern1, Me.Label22, Me.Label21, Me.txtPartnerZusteller, Me.txtPartnerInhaber, Me.Label20, Me.Label13})
        Me.TabPage4.Location = New System.Drawing.Point(4, 22)
        Me.TabPage4.Name = "TabPage4"
        Me.TabPage4.Size = New System.Drawing.Size(778, 222)
        Me.TabPage4.TabIndex = 0
        Me.TabPage4.Text = "Allgemein"
        '
        'txtDokumenttyp
        '
        Me.txtDokumenttyp.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtDokumenttyp.ForeColor = System.Drawing.Color.Black
        Me.txtDokumenttyp.Location = New System.Drawing.Point(104, 8)
        Me.txtDokumenttyp.Name = "txtDokumenttyp"
        Me.txtDokumenttyp.ReadOnly = True
        Me.txtDokumenttyp.Size = New System.Drawing.Size(256, 20)
        Me.txtDokumenttyp.TabIndex = 29
        Me.txtDokumenttyp.Text = ""
        '
        'Label32
        '
        Me.Label32.Location = New System.Drawing.Point(8, 8)
        Me.Label32.Name = "Label32"
        Me.Label32.Size = New System.Drawing.Size(96, 23)
        Me.Label32.TabIndex = 28
        Me.Label32.Text = "Dokumenttyp"
        '
        'txtDokumentid
        '
        Me.txtDokumentid.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtDokumentid.ForeColor = System.Drawing.Color.Black
        Me.txtDokumentid.Location = New System.Drawing.Point(496, 152)
        Me.txtDokumentid.Name = "txtDokumentid"
        Me.txtDokumentid.ReadOnly = True
        Me.txtDokumentid.Size = New System.Drawing.Size(256, 20)
        Me.txtDokumentid.TabIndex = 27
        Me.txtDokumentid.Text = ""
        '
        'Label31
        '
        Me.Label31.Location = New System.Drawing.Point(392, 152)
        Me.Label31.Name = "Label31"
        Me.Label31.Size = New System.Drawing.Size(96, 23)
        Me.Label31.TabIndex = 26
        Me.Label31.Text = "Dokument-ID"
        '
        'txtanzahlseiten
        '
        Me.txtanzahlseiten.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtanzahlseiten.ForeColor = System.Drawing.Color.Black
        Me.txtanzahlseiten.Location = New System.Drawing.Point(496, 128)
        Me.txtanzahlseiten.Name = "txtanzahlseiten"
        Me.txtanzahlseiten.ReadOnly = True
        Me.txtanzahlseiten.Size = New System.Drawing.Size(256, 20)
        Me.txtanzahlseiten.TabIndex = 25
        Me.txtanzahlseiten.Text = ""
        '
        'Label30
        '
        Me.Label30.Location = New System.Drawing.Point(392, 128)
        Me.Label30.Name = "Label30"
        Me.Label30.Size = New System.Drawing.Size(104, 23)
        Me.Label30.TabIndex = 24
        Me.Label30.Text = "Anzahl Seiten"
        '
        'txtReferenzzeile2
        '
        Me.txtReferenzzeile2.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtReferenzzeile2.ForeColor = System.Drawing.Color.Black
        Me.txtReferenzzeile2.Location = New System.Drawing.Point(496, 32)
        Me.txtReferenzzeile2.Name = "txtReferenzzeile2"
        Me.txtReferenzzeile2.ReadOnly = True
        Me.txtReferenzzeile2.Size = New System.Drawing.Size(256, 20)
        Me.txtReferenzzeile2.TabIndex = 23
        Me.txtReferenzzeile2.Text = ""
        '
        'txtReferenzzeile1
        '
        Me.txtReferenzzeile1.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtReferenzzeile1.ForeColor = System.Drawing.Color.Black
        Me.txtReferenzzeile1.Location = New System.Drawing.Point(496, 8)
        Me.txtReferenzzeile1.Name = "txtReferenzzeile1"
        Me.txtReferenzzeile1.ReadOnly = True
        Me.txtReferenzzeile1.Size = New System.Drawing.Size(256, 20)
        Me.txtReferenzzeile1.TabIndex = 22
        Me.txtReferenzzeile1.Text = ""
        '
        'Label28
        '
        Me.Label28.Location = New System.Drawing.Point(392, 32)
        Me.Label28.Name = "Label28"
        Me.Label28.Size = New System.Drawing.Size(96, 23)
        Me.Label28.TabIndex = 21
        Me.Label28.Text = "Referenzzeile 1"
        '
        'Label29
        '
        Me.Label29.Location = New System.Drawing.Point(392, 8)
        Me.Label29.Name = "Label29"
        Me.Label29.Size = New System.Drawing.Size(96, 23)
        Me.Label29.TabIndex = 20
        Me.Label29.Text = "Referenzzeile 1"
        '
        'txtnachvollziehbarkeit
        '
        Me.txtnachvollziehbarkeit.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtnachvollziehbarkeit.ForeColor = System.Drawing.Color.Black
        Me.txtnachvollziehbarkeit.Location = New System.Drawing.Point(496, 104)
        Me.txtnachvollziehbarkeit.Name = "txtnachvollziehbarkeit"
        Me.txtnachvollziehbarkeit.ReadOnly = True
        Me.txtnachvollziehbarkeit.Size = New System.Drawing.Size(256, 20)
        Me.txtnachvollziehbarkeit.TabIndex = 19
        Me.txtnachvollziehbarkeit.Text = ""
        '
        'Label27
        '
        Me.Label27.Location = New System.Drawing.Point(392, 104)
        Me.Label27.Name = "Label27"
        Me.Label27.Size = New System.Drawing.Size(104, 23)
        Me.Label27.TabIndex = 18
        Me.Label27.Text = "Nachvollziehbarkeit"
        '
        'txtisin
        '
        Me.txtisin.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtisin.ForeColor = System.Drawing.Color.Black
        Me.txtisin.Location = New System.Drawing.Point(496, 80)
        Me.txtisin.Name = "txtisin"
        Me.txtisin.ReadOnly = True
        Me.txtisin.Size = New System.Drawing.Size(256, 20)
        Me.txtisin.TabIndex = 17
        Me.txtisin.Text = ""
        '
        'txtvalor
        '
        Me.txtvalor.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtvalor.ForeColor = System.Drawing.Color.Black
        Me.txtvalor.Location = New System.Drawing.Point(496, 56)
        Me.txtvalor.Name = "txtvalor"
        Me.txtvalor.ReadOnly = True
        Me.txtvalor.Size = New System.Drawing.Size(256, 20)
        Me.txtvalor.TabIndex = 16
        Me.txtvalor.Text = ""
        '
        'Label25
        '
        Me.Label25.Location = New System.Drawing.Point(392, 80)
        Me.Label25.Name = "Label25"
        Me.Label25.Size = New System.Drawing.Size(96, 23)
        Me.Label25.TabIndex = 15
        Me.Label25.Text = "ISIN-Nr"
        '
        'Label26
        '
        Me.Label26.Location = New System.Drawing.Point(392, 56)
        Me.Label26.Name = "Label26"
        Me.Label26.Size = New System.Drawing.Size(96, 23)
        Me.Label26.TabIndex = 14
        Me.Label26.Text = "Valorennr"
        '
        'txtValuta
        '
        Me.txtValuta.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtValuta.ForeColor = System.Drawing.Color.Black
        Me.txtValuta.Location = New System.Drawing.Point(104, 104)
        Me.txtValuta.Name = "txtValuta"
        Me.txtValuta.ReadOnly = True
        Me.txtValuta.Size = New System.Drawing.Size(256, 20)
        Me.txtValuta.TabIndex = 13
        Me.txtValuta.Text = ""
        '
        'Label24
        '
        Me.Label24.Location = New System.Drawing.Point(8, 104)
        Me.Label24.Name = "Label24"
        Me.Label24.Size = New System.Drawing.Size(96, 23)
        Me.Label24.TabIndex = 12
        Me.Label24.Text = "Valutadatum"
        '
        'txtErstelltAm
        '
        Me.txtErstelltAm.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtErstelltAm.ForeColor = System.Drawing.Color.Black
        Me.txtErstelltAm.Location = New System.Drawing.Point(104, 80)
        Me.txtErstelltAm.Name = "txtErstelltAm"
        Me.txtErstelltAm.ReadOnly = True
        Me.txtErstelltAm.Size = New System.Drawing.Size(256, 20)
        Me.txtErstelltAm.TabIndex = 11
        Me.txtErstelltAm.Text = ""
        '
        'Label23
        '
        Me.Label23.Location = New System.Drawing.Point(8, 80)
        Me.Label23.Name = "Label23"
        Me.Label23.Size = New System.Drawing.Size(96, 23)
        Me.Label23.TabIndex = 10
        Me.Label23.Text = "Erstellt am"
        '
        'txtvvextern2
        '
        Me.txtvvextern2.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtvvextern2.ForeColor = System.Drawing.Color.Black
        Me.txtvvextern2.Location = New System.Drawing.Point(104, 176)
        Me.txtvvextern2.Name = "txtvvextern2"
        Me.txtvvextern2.ReadOnly = True
        Me.txtvvextern2.Size = New System.Drawing.Size(256, 20)
        Me.txtvvextern2.TabIndex = 9
        Me.txtvvextern2.Text = ""
        '
        'txtvvextern1
        '
        Me.txtvvextern1.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtvvextern1.ForeColor = System.Drawing.Color.Black
        Me.txtvvextern1.Location = New System.Drawing.Point(104, 152)
        Me.txtvvextern1.Name = "txtvvextern1"
        Me.txtvvextern1.ReadOnly = True
        Me.txtvvextern1.Size = New System.Drawing.Size(256, 20)
        Me.txtvvextern1.TabIndex = 8
        Me.txtvvextern1.Text = ""
        '
        'Label22
        '
        Me.Label22.Location = New System.Drawing.Point(8, 176)
        Me.Label22.Name = "Label22"
        Me.Label22.Size = New System.Drawing.Size(96, 23)
        Me.Label22.TabIndex = 7
        Me.Label22.Text = "VV Extern 2"
        '
        'Label21
        '
        Me.Label21.Location = New System.Drawing.Point(8, 152)
        Me.Label21.Name = "Label21"
        Me.Label21.Size = New System.Drawing.Size(96, 23)
        Me.Label21.TabIndex = 6
        Me.Label21.Text = "VV Extern 1"
        '
        'txtPartnerZusteller
        '
        Me.txtPartnerZusteller.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtPartnerZusteller.ForeColor = System.Drawing.Color.Black
        Me.txtPartnerZusteller.Location = New System.Drawing.Point(104, 56)
        Me.txtPartnerZusteller.Name = "txtPartnerZusteller"
        Me.txtPartnerZusteller.ReadOnly = True
        Me.txtPartnerZusteller.Size = New System.Drawing.Size(256, 20)
        Me.txtPartnerZusteller.TabIndex = 5
        Me.txtPartnerZusteller.Text = ""
        '
        'txtPartnerInhaber
        '
        Me.txtPartnerInhaber.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
        Me.txtPartnerInhaber.ForeColor = System.Drawing.Color.Black
        Me.txtPartnerInhaber.Location = New System.Drawing.Point(104, 32)
        Me.txtPartnerInhaber.Name = "txtPartnerInhaber"
        Me.txtPartnerInhaber.ReadOnly = True
        Me.txtPartnerInhaber.Size = New System.Drawing.Size(256, 20)
        Me.txtPartnerInhaber.TabIndex = 4
        Me.txtPartnerInhaber.Text = ""
        '
        'Label20
        '
        Me.Label20.Location = New System.Drawing.Point(8, 56)
        Me.Label20.Name = "Label20"
        Me.Label20.Size = New System.Drawing.Size(96, 23)
        Me.Label20.TabIndex = 1
        Me.Label20.Text = "Partner Zusteller"
        '
        'Label13
        '
        Me.Label13.Location = New System.Drawing.Point(8, 32)
        Me.Label13.Name = "Label13"
        Me.Label13.Size = New System.Drawing.Size(96, 23)
        Me.Label13.TabIndex = 0
        Me.Label13.Text = "Partner Inhaber"
        '
        'frmDokumentinformationen
        '
        Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
        Me.ClientSize = New System.Drawing.Size(786, 269)
        Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.TabControl3, Me.TabControl1, Me.ToolBar1, Me.DokList})
        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
        Me.Name = "frmDokumentinformationen"
        Me.Text = "Dokumentinformationen"
        Me.TabControl1.ResumeLayout(False)
        Me.TabPageAllgemein.ResumeLayout(False)
        Me.pnlzensur1.ResumeLayout(False)
        Me.TabPageStatus.ResumeLayout(False)
        CType(Me.Statuslist, System.ComponentModel.ISupportInitialize).EndInit()
        Me.Panel2.ResumeLayout(False)
        Me.TabPageDokumentwerte.ResumeLayout(False)
        Me.TabControl2.ResumeLayout(False)
        Me.TabPage1.ResumeLayout(False)
        CType(Me.ColdList, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.ColdListDokumente, System.ComponentModel.ISupportInitialize).EndInit()
        Me.TabPage3.ResumeLayout(False)
        Me.TabPageZuordnung.ResumeLayout(False)
        Me.pnlzensur4.ResumeLayout(False)
        CType(Me.Zuordnungslist, System.ComponentModel.ISupportInitialize).EndInit()
        Me.TabPageNotizen.ResumeLayout(False)
        Me.pnlzensur5.ResumeLayout(False)
        CType(Me.drpMiatarbeiter, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.Notizlist, System.ComponentModel.ISupportInitialize).EndInit()
        Me.TabPageInfomeldung.ResumeLayout(False)
        Me.pnlzensur3.ResumeLayout(False)
        CType(Me.InfoMeldungList, System.ComponentModel.ISupportInitialize).EndInit()
        Me.TabPageBerechtigung.ResumeLayout(False)
        CType(Me.DokumentFunktionenList, System.ComponentModel.ISupportInitialize).EndInit()
        Me.TabPage2.ResumeLayout(False)
        Me.pnlzensur6.ResumeLayout(False)
        CType(Me.ErsetzteDokumenteList, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.DokList, System.ComponentModel.ISupportInitialize).EndInit()
        Me.TabControl3.ResumeLayout(False)
        Me.TabPage4.ResumeLayout(False)
        Me.ResumeLayout(False)

    End Sub

#End Region

    Dim m_dokumentid As String
    Property Dokumentid() As String
        Get
            Return m_dokumentid
        End Get
        Set(ByVal Value As String)
            m_dokumentid = Value
        End Set
    End Property

    Dim m_typ As Integer
    Property Typ() As Integer
        Get
            Return m_typ
        End Get
        Set(ByVal Value As Integer)
            m_typ = Value
        End Set
    End Property

    Public Sub New(ByVal dokumentid As String, ByVal typ As Integer)
        MyBase.New()
        InitializeComponent()
        Me.Dokumentid = dokumentid
        Me.Typ = typ
        If Me.Typ = 0 Then
            Me.TabControl1.Visible = True
            Me.TabControl3.Visible = False
        Else
            Me.TabControl1.Visible = False
            Me.TabControl3.Visible = True
        End If

    End Sub

    Private Sub frmDokumentinformationen_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim d As New DataTable()
        d = get_dokumentinfo()
        If Me.Typ = 0 Then
            Me.DokList.DataSource = d
            Me.DokList.DataMember = d.TableName
            Me.Update_DetailInformation()
        Else
            Me.txtDokumenttyp.Text = d.Rows(0).Item("dokumenttyp")
            Me.txtPartnerInhaber.Text = d.Rows(0).Item("partnernr_inhaber") + " " + d.Rows(0).Item("partnername_inhaber")
            Me.txtPartnerZusteller.Text = d.Rows(0).Item("partnernr_zusteller") + " " + d.Rows(0).Item("partnername_zusteller")
            Me.txtReferenzzeile1.Text = d.Rows(0).Item("referenzzeile1")
            Me.txtReferenzzeile2.Text = d.Rows(0).Item("referenzzeile2")
            Me.txtErstelltAm.Text = d.Rows(0).Item("valutadatum")
            Me.txtValuta.Text = d.Rows(0).Item("valutadatum1")
            Me.txtvalor.Text = d.Rows(0).Item("valorennr")
            Me.txtisin.Text = d.Rows(0).Item("isinnr")
            Me.txtDokumentid.Text = d.Rows(0).Item("dokumentid")
            Me.txtanzahlseiten.Text = d.Rows(0).Item("anzahlseiten")
            Me.txtnachvollziehbarkeit.Text = d.Rows(0).Item("nachvollziehbarkeit")
            Me.txtvvextern1.Text = d.Rows(0).Item("vvextern1")
            Me.txtvvextern2.Text = d.Rows(0).Item("vvextern2")
        End If
    End Sub

    Private Function get_dokumentinfo() As DataTable
        Dim scmCmdToExecute As SqlCommand = New SqlCommand()
        Dim i As Integer
        Dim dtToReturn As DataTable = New DataTable()
        Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
        scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_dokumentinfo"
        scmCmdToExecute.CommandType = CommandType.StoredProcedure
        scmCmdToExecute.Connection = conn.scoDBConnection
        Try
            scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.Dokumentid))
            scmCmdToExecute.Parameters.Add(New SqlParameter("@typ", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.Typ))
            sdaAdapter.Fill(dtToReturn)
            Return dtToReturn
        Catch ex As Exception
            MsgBox(ex.Message)
            ' // some error occured. Bubble it to caller and encapsulate Exception object
            Throw New Exception("Dokument_Information_Wert::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
        Finally
            scmCmdToExecute.Dispose()
            sdaAdapter.Dispose()
        End Try
    End Function

    Private Sub TabControl1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles TabControl1.Click

        Me.Update_DetailInformation()
    End Sub

#Region "Detail-Informationen"

    Dim colornotset As Boolean = False
    Dim bcknr As Integer
    Dim m_ExpandColdListDokumente As Integer = 0            'koe Anzahl der Expandet Spalten in Grid ColdListDokumente
    Dim m_ColdListDokumenteDefaultWidth As Integer = 336           ' Breite des Grid ColdListDokumente
    Dim statushistory As Boolean
    Dim m_DTMitarbeiter As DataTable            'koe 28.07.2004


    Private Sub Update_DetailInformation()
        Globals.PerfMon.insert_entry("'-- Begin Dokumentdetails")
        Me.Notizlist.Enabled = False
        Me.InfoMeldungList.Enabled = False
        Me.Zuordnungslist.Enabled = False
        Me.DokumentFunktionenList.Enabled = False
        Me.Cursor = Cursors.WaitCursor
        Select Case Me.TabControl1.SelectedTab.Name
            Case "TabPageAllgemein"
                Update_Details()
            Case "TabPageDokumentwerte"
                Update_Coldindex()
            Case "TabPageArchivierung"
                'update_archivierung()
            Case "TabPageInfomeldung"
                Update_DokumentInfoMeldung()
            Case "TabPageZuordnung"
                Update_Dokumentzuordnung()
            Case "TabPageStatus"
                Update_Status()
            Case "TabPageNotizen"
                Update_Notizen()
            Case "TabPageBerechtigung"
                Update_Dokumentfunktionen()
            Case "TabPage2"
                Update_Ersetzte_Dokumente()
        End Select
        Me.Notizlist.Enabled = True
        Me.InfoMeldungList.Enabled = True
        Me.Zuordnungslist.Enabled = True
        Me.DokumentFunktionenList.Enabled = True
        Me.Cursor = Cursors.Default
        Update_Details()

        Dim d As DataTable
        Dim I As Integer
        Try
            d = DivFnkt.Berechtigte_Mitarbeiter(Me.DokList.Columns("dokumenttypnr").Value, Globals.MitarbeiterNr, Me.DokList.Columns("partnernr").Value, Me.DokList.Columns("dokumentid").Value, 0, 0, 0, Me.DokList.Columns("vertraulich").Value, "")
            If Me.DokList.Columns("verantwortlich").Value <> Globals.MitarbeiterNr Then
                If d.Rows.Count = 0 And Globals.stv = 0 Then
                    Me.pnlzensur1.Visible = True
                    Me.pnlzensur2.Visible = True
                    Me.pnlzensur3.Visible = True
                    Me.pnlzensur4.Visible = True
                    Me.pnlzensur5.Visible = True
                    Me.pnlzensur6.Visible = True
                    Me.lblzensur1.Visible = True
                    Me.lblzensur2.Visible = True
                    Me.lblzensur3.Visible = True
                    Me.lblzensur4.Visible = True
                    Me.lblzensur5.Visible = True
                    Me.lblzensur6.Visible = True
                    Me.ColdListDokumente.Visible = False
                    '           Me.DokList.Columns("Bemerkung").Value = ""
                    Me.TabControl1.Visible = True
                    Exit Sub
                End If
                If d.Rows(0).Item("anzeigen") = 0 Then
                    Me.pnlzensur1.Visible = True
                    Me.pnlzensur2.Visible = True
                    Me.pnlzensur3.Visible = True
                    Me.pnlzensur4.Visible = True
                    Me.pnlzensur5.Visible = True
                    Me.pnlzensur6.Visible = True
                    Me.lblzensur1.Visible = True
                    Me.lblzensur2.Visible = True
                    Me.lblzensur3.Visible = True
                    Me.lblzensur4.Visible = True
                    Me.lblzensur5.Visible = True
                    Me.lblzensur6.Visible = True
                    Me.ColdListDokumente.Visible = False
                    '            Me.DokList.Columns("Bemerkung").Value = ""
                    Me.TabControl1.Visible = True
                    Exit Sub
                End If
                d.Dispose()
                '
                Me.pnlzensur1.Visible = False
                Me.pnlzensur2.Visible = False
                Me.pnlzensur3.Visible = False
                Me.pnlzensur4.Visible = False
                Me.pnlzensur5.Visible = False
                Me.pnlzensur6.Visible = False
                Me.lblzensur1.Visible = False
                Me.lblzensur2.Visible = False
                Me.lblzensur3.Visible = False
                Me.lblzensur4.Visible = False
                Me.lblzensur5.Visible = False
                Me.lblzensur6.Visible = False
                Me.ColdListDokumente.Visible = True
                '         Me.DokList.Columns("Bemerkung").Value = ""
                Me.TabControl1.Visible = True
            Else
                Me.pnlzensur1.Visible = False
                Me.pnlzensur2.Visible = False
                Me.pnlzensur3.Visible = False
                Me.pnlzensur4.Visible = False
                Me.pnlzensur5.Visible = False
                Me.pnlzensur6.Visible = False
                Me.lblzensur1.Visible = False
                Me.lblzensur2.Visible = False
                Me.lblzensur3.Visible = False
                Me.lblzensur4.Visible = False
                Me.lblzensur5.Visible = False
                Me.lblzensur6.Visible = False
                Me.ColdListDokumente.Visible = True
                '                Me.DokList.Columns("Bemerkung").Value = ""
                Me.TabControl1.Visible = True
            End If
        Catch
            Me.TabControl1.Visible = False
        End Try
        Globals.PerfMon.insert_entry("'-- Ende Dokumentdetails")
    End Sub

    Dim ttip As New ToolTip()

    Private Sub Update_Details()
        Try
            Dim xbck As String

            Me.TextBox1.Text = Me.DokList.Columns("Dokumentid").Value
            If Me.DokList.Columns("Bemerkung").Text Is System.DBNull.Value Then
                Me.TextBox12.Text = ""
            Else
                Me.TextBox12.Text = Me.DokList.Columns("Bemerkung").Value
                ttip.SetToolTip(Me.TextBox12, Me.TextBox12.Text)
            End If


            If isbck() Then
                xbck = LTrim(Str(Me.bcknr))
                While Len(xbck) < 10
                    xbck = "0" + xbck
                End While
                Me.TextBox18.Text = xbck
            Else
                Me.TextBox18.Text = ""
            End If
            Me.TextBox2.Text = Str(Me.DokList.Columns("PartnerNr").Value) + " " + Me.DokList.Columns("Partnerkurzbezeichnung").Value
            Me.TextBox3.Text = Me.DokList.Columns("Dokumentart").Value
            Me.TextBox4.Text = Me.DokList.Columns("Bezeichnung").Value
            Me.TextBox5.Text = Me.DokList.Columns("Erstellungsdatum").Value
            Me.TextBox6.Text = Me.DokList.Columns("DokErsteller").Value
            If Me.DokList.Columns("Sperrdatum").Value Is System.DBNull.Value Then Me.TextBox7.Text = "" Else Me.TextBox7.Text = Me.DokList.Columns("Sperrdatum").Value
            If Me.DokList.Columns("DokSperrung").Value Is System.DBNull.Value Then
                Me.TextBox8.Text = ""
                Me.TextBox7.Text = ""
            Else
                Me.TextBox8.Text = Me.DokList.Columns("DokSperrung").Value
            End If
            Me.TextBox9.Text = Me.DokList.Columns("Mutationsdatum").Value
            Me.TextBox10.Text = Me.DokList.Columns("DokMutierer").Value
            Me.TextBox11.Text = Me.DokList.Columns("Status").Value
            Me.TextBox13.Text = Me.DokList.Columns("DokVerantwortlich").Value
            Me.TextBox14.Text = ""
            If (Me.DokList.Columns("termin").Value Is System.DBNull.Value) Or (Year(Me.DokList.Columns("termin").Value) = 1900) Then Me.TextBox14.Text = "" Else Me.TextBox14.Text = Me.DokList.Columns("Termin").Value
            '            If Me.DokList.Columns("termin").Value Is System.DBNull.Value Then Me.TextBox14.Text = "" Else Me.TextBox14.Text = Me.DokList.Columns("Termin").Value
            Me.TabControl1.Visible = True
        Catch ex As Exception
            '      MsgBox(ex.Message)
            '     Me.TabControl1.Visible = False
        End Try
    End Sub

    Private Sub Statuslist_FetchRowStyle(ByVal sender As Object, ByVal e As C1.Win.C1TrueDBGrid.FetchRowStyleEventArgs) Handles Statuslist.FetchRowStyle

        If Me.Statuslist.Columns("bezeichnung").CellValue(e.Row) = Me.TextBox11.Text Then
            If colornotset Then
                e.CellStyle.ForeColor = Red
                colornotset = False
            End If
        Else
            e.CellStyle.ForeColor = Black
        End If
    End Sub

    Private Sub Update_Status()
        Try
            colornotset = True
            Dim st As DataTable
            st = Status_lesen()
            Me.Statuslist.FetchRowStyles = True
            Me.Statuslist.DataSource = Nothing
            Me.Statuslist.DataSource = st
            DivFnkt.SpaltenTitel_Aktualisieren(Me.Statuslist, st, "statushistory")
        Catch
        End Try
    End Sub

    Private Sub Update_Coldindex()
        Me.ColdListDokumente.Enabled = False
        Me.ColdList.Enabled = False
        Dim ds As New DataSet()
        Dim cd As DataTable
        Dim cdHierarchie As DataTable

        Dim iCnt As Integer
        Try

            Me.ColdListDokumente.DataView = C1.Win.C1TrueDBGrid.DataViewEnum.Normal
            cd = Cold_Index_lesen(0, 1)
            cdHierarchie = Cold_Index_lesen(0, 0)
            '----------------------------------------------
            ds.Tables.Add(cd)
            ds.Tables.Add(cdHierarchie)


            Dim dr As DataRelation
            Dim dc1 As DataColumn = cd.Columns("TreeID")
            Dim dc2 As DataColumn = cdHierarchie.Columns("SubTreeID")
            Dim rel As New DataRelation("RelColdIndex", dc1, dc2)
            Try
                Me.ColdListDokumente.DataView = C1.Win.C1TrueDBGrid.DataViewEnum.Hierarchical
            Catch ex As System.ArgumentException
                '  MsgBox(ex.Message)
            End Try


            ds.Relations.Add(rel)
            Me.ColdListDokumente.SetDataBinding(ds, ds.Tables(0).TableName)

            DivFnkt.SpaltenTitel_Aktualisieren(Me.ColdListDokumente, cd, "coldlistdokumente")
            If m_ExpandColdListDokumente < 0 Then m_ExpandColdListDokumente = 0
            If m_ExpandColdListDokumente < 1 Then
                For iCnt = 0 To ColdListDokumente.Splits(0).DisplayColumns.Count - 1
                    Select Case UCase(ColdListDokumente.Splits(0).DisplayColumns(iCnt).DataColumn.DataField)
                        Case "STATUSALT", "ARCHIVDATUMALT"
                            ColdListDokumente.Splits(0).DisplayColumns(iCnt).Visible = False
                    End Select
                Next
            End If

            Update_ColdListDokumente_Detail(False)
            Me.ColdListDokumente.Enabled = True
            Me.ColdList.Enabled = True
        Catch ex As Exception
            '  MsgBox(ex.Message)
        End Try

    End Sub

    Private Sub Update_DokumentInfoMeldung()
        Dim dokumentinfomeldung As DataTable
        dokumentinfomeldung = Dokumentinfomeldungen_laden()
        Me.InfoMeldungList.DataSource = dokumentinfomeldung
        Me.InfoMeldungList.Columns("aktiv").FilterText = True
        DivFnkt.SpaltenTitel_Aktualisieren(Me.InfoMeldungList, dokumentinfomeldung, "Dokumentinfomeldung")
    End Sub

    Private Function Dokumentinfomeldungen_laden()
        Dim scmCmdToExecute As SqlCommand = New SqlCommand()
        Dim dtToReturn As DataTable = New DataTable()
        Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
        scmCmdToExecute.CommandText = "dbo.SP_Trefferliste_Dokumentinfomeldung_select"
        scmCmdToExecute.CommandType = CommandType.StoredProcedure
        scmCmdToExecute.Connection = conn.scoDBConnection
        Try
            scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.VarChar, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, DokList.Columns("dokumentid").Value))
            sdaAdapter.Fill(dtToReturn)
            Return dtToReturn
        Catch ex As Exception
            ' // some error occured. Bubble it to caller and encapsulate Exception object
            Throw New Exception("Dokumentinfomeldung_Wert::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
        Finally
            scmCmdToExecute.Dispose()
            sdaAdapter.Dispose()
        End Try
    End Function

    Private Sub Update_Notizen()
        Dim Notizen As DataTable
        Notizen = Notizen_Laden()
        Me.Notizlist.DataSource = Notizen
        Mitarbeiter_Laden()         'koe 28.07.2004 
        DivFnkt.SpaltenTitel_Aktualisieren(Me.Notizlist, Notizen, "notizen")
    End Sub

    Private Function Notizen_Laden() As DataTable
        Dim scmCmdToExecute As SqlCommand = New SqlCommand()
        Dim dtToReturn As DataTable = New DataTable()
        Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
        scmCmdToExecute.CommandText = "dbo.SP_Dokument_Notizen_select"
        scmCmdToExecute.CommandType = CommandType.StoredProcedure
        scmCmdToExecute.Connection = conn.scoDBConnection
        Try
            scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.VarChar, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.DokList.Columns("dokumentid").Value))
            sdaAdapter.Fill(dtToReturn)
            Return dtToReturn
        Catch ex As Exception
            ' // some error occured. Bubble it to caller and encapsulate Exception object
            Throw New Exception("Dokument_Information_Wert::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
        Finally
            scmCmdToExecute.Dispose()
            sdaAdapter.Dispose()
        End Try
    End Function

    Private Sub Update_Dokumentzuordnung()
        Dim dokumentzuordnungen As DataTable
        Dim i As Integer
        dokumentzuordnungen = Dokumentzuordnungen_Laden()
        Me.Zuordnungslist.DataSource = dokumentzuordnungen
        Me.Zuordnungslist.Columns("zuordnungnr").ValueItems.Presentation = C1.Win.C1TrueDBGrid.PresentationEnum.ComboBox

        Dim dxx As New SqlDataAdapter("Select zuordnungnr, bezeichnung from zuordnung", Globals.sConnectionString)
        Dim dh As New DataSet()
        dxx.Fill(dh, "dd")
        Dim vv(100)
        For i = 0 To dh.Tables(0).Rows.Count - 1
            vv(i) = New C1.Win.C1TrueDBGrid.ValueItem()
            vv(i).DisplayValue = dh.Tables(0).Rows(i).Item("bezeichnung")
            vv(i).Value = dh.Tables(0).Rows(i).Item("zuordnungnr")
            Me.Zuordnungslist.Columns("zuordnungnr").ValueItems.Values.Add(vv(i))
            Me.Zuordnungslist.Columns("zuordnungnr").ValueItems.Translate = True
        Next
        DivFnkt.SpaltenTitel_Aktualisieren(Me.Zuordnungslist, dokumentzuordnungen, "dokumentzuordnungentr")

    End Sub

    Private Function Dokumentzuordnungen_Laden()
        Dim scmCmdToExecute As SqlCommand = New SqlCommand()
        Dim dtToReturn As DataTable = New DataTable()
        Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
        scmCmdToExecute.CommandText = "dbo.SP_Trefferliste_Dokumentzuordnungen_select"
        scmCmdToExecute.CommandType = CommandType.StoredProcedure
        scmCmdToExecute.Connection = conn.scoDBConnection
        Try
            scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.VarChar, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.DokList.Columns("dokumentid").Value))
            sdaAdapter.Fill(dtToReturn)
            Return dtToReturn
        Catch ex As Exception
            ' // some error occured. Bubble it to caller and encapsulate Exception object
            Throw New Exception("Dokument_Information_Wert::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
        Finally
            scmCmdToExecute.Dispose()
            sdaAdapter.Dispose()
        End Try
    End Function

    Private Sub Update_Dokumentfunktionen()
        Dim Dokumentfunktionen As DataTable
        Dokumentfunktionen = Dokumentfunktionen_Laden()
        Me.DokumentFunktionenList.DataSource = Dokumentfunktionen
        Me.DokumentFunktionenList.DataMember = Dokumentfunktionen.TableName
        Me.DokumentFunktionenList.Columns("aktiv").FilterText = True
        Me.DokumentFunktionenList.FilterBar = False
        DivFnkt.SpaltenTitel_Aktualisieren(Me.DokumentFunktionenList, Dokumentfunktionen, "berechtigungseinschraenkung")
    End Sub

    Private Function Dokumentfunktionen_Laden() As DataTable
        Dim scmCmdToExecute As SqlCommand = New SqlCommand()
        scmCmdToExecute.CommandText = "sp_dokumentfunktion_zugewiesen"
        scmCmdToExecute.CommandType = CommandType.StoredProcedure
        Dim dtToReturn As DataTable = New DataTable()
        Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
        Try
            scmCmdToExecute.Connection = conn.scoDBConnection
            scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.VarChar, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.DokList.Columns("dokumentid").Value))
            sdaAdapter.Fill(dtToReturn)
            Return dtToReturn
        Catch ex As Exception
            ' // some error occured. Bubble it to caller and encapsulate Exception object
            Throw New Exception("Dokumenterstellung::Generic_Select::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
        Finally
            scmCmdToExecute.Dispose()
            sdaAdapter.Dispose()
        End Try
    End Function

    Private Sub Update_Ersetzte_Dokumente()
        Dim ed As DataTable
        ed = ErsetzteDokumente_Laden()
        Me.ErsetzteDokumenteList.DataSource = ed
        DivFnkt.SpaltenTitel_Aktualisieren(Me.ErsetzteDokumenteList, ed, "ersetztedokumente")
    End Sub

    Private Function ErsetzteDokumente_Laden() As DataTable
        Dim scmCmdToExecute As SqlCommand = New SqlCommand()
        Dim dtToReturn As DataTable = New DataTable()
        Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
        scmCmdToExecute.CommandText = "dbo.SP_trefferliste_ersetztedokumente"
        scmCmdToExecute.CommandType = CommandType.StoredProcedure
        scmCmdToExecute.Connection = conn.scoDBConnection
        Try
            scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.VarChar, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.DokList.Columns("dokumentid").Value))
            sdaAdapter.Fill(dtToReturn)
            Return dtToReturn
        Catch ex As Exception
            ' // some error occured. Bubble it to caller and encapsulate Exception object
            Throw New Exception("Dokument_Information_Wert::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
        Finally
            scmCmdToExecute.Dispose()
            sdaAdapter.Dispose()
        End Try
    End Function

    Private Function isbck() As Boolean
        Dim scmCmdToExecute As SqlCommand = New SqlCommand()
        scmCmdToExecute.CommandText = "sp_check_bck"
        scmCmdToExecute.CommandType = CommandType.StoredProcedure
        Dim dtToReturn As DataTable = New DataTable()
        Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
        Try
            scmCmdToExecute.Connection = conn.scoDBConnection
            scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.VarChar, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.DokList.Columns("dokumentid").Value))
            scmCmdToExecute.Parameters.Add(New SqlParameter("@isbck", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, 0))
            scmCmdToExecute.Parameters.Add(New SqlParameter("@bcknr", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, 0))
            sdaAdapter.Fill(dtToReturn)
            If scmCmdToExecute.Parameters("@isbck").Value = 1 Then
                isbck = True
                Me.bcknr = scmCmdToExecute.Parameters("@bcknr").Value
            Else
                isbck = False
                Me.bcknr = 0
            End If

        Catch ex As Exception
            ' // some error occured. Bubble it to caller and encapsulate Exception object
            Throw New Exception("CheckBCK:" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
        Finally
            scmCmdToExecute.Dispose()
            sdaAdapter.Dispose()
            dtToReturn.Dispose()
        End Try
    End Function

    Public Function Status_lesen() As DataTable
        Dim scmCmdToExecute As SqlCommand = New SqlCommand()
        Dim dtToReturn As DataTable = New DataTable()
        Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
        scmCmdToExecute.CommandText = "dbo.SP_Trefferliste_Select_Status"
        scmCmdToExecute.CommandType = CommandType.StoredProcedure
        scmCmdToExecute.Connection = conn.scoDBConnection
        Try
            scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.VarChar, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, DokList.Columns("dokumentid").Value))
            If Me.statushistory = True Then
                scmCmdToExecute.Parameters.Add(New SqlParameter("@fnkt", SqlDbType.VarChar, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 1))
            Else
                scmCmdToExecute.Parameters.Add(New SqlParameter("@fnkt", SqlDbType.VarChar, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 0))
            End If
            sdaAdapter.Fill(dtToReturn)
            Return dtToReturn
        Catch ex As Exception
            ' // some error occured. Bubble it to caller and encapsulate Exception object
            Throw New Exception("Dokument_Information_Wert::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
        Finally
            scmCmdToExecute.Dispose()
            sdaAdapter.Dispose()
        End Try
    End Function

    Public Function Cold_Index_lesen(ByVal indextyp As Integer, ByVal iRoot As Integer) As DataTable
        Dim scmCmdToExecute As SqlCommand = New SqlCommand()
        Dim dtToReturn As DataTable = New DataTable()
        Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
        scmCmdToExecute.CommandText = "dbo.SP_Trefferliste_Select_Coldindex"
        scmCmdToExecute.CommandType = CommandType.StoredProcedure
        scmCmdToExecute.Connection = conn.scoDBConnection
        Try
            scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.VarChar, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, DokList.Columns("dokumentid").Value))
            scmCmdToExecute.Parameters.Add(New SqlParameter("@indextyp", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, indextyp))
            scmCmdToExecute.Parameters.Add(New SqlParameter("@Root", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, iRoot))
            sdaAdapter.Fill(dtToReturn)
            Return dtToReturn
        Catch ex As Exception
            ' // some error occured. Bubble it to caller and encapsulate Exception object
            Throw New Exception("Dokument_Information_Wert::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
        Finally
            scmCmdToExecute.Dispose()
            sdaAdapter.Dispose()
        End Try
    End Function

    Public Function Dokumentwert_lesen() As DataTable
        Dim scmCmdToExecute As SqlCommand = New SqlCommand()
        Dim dtToReturn As DataTable = New DataTable()
        Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
        scmCmdToExecute.CommandText = "dbo.SP_Trefferliste_Select_Dokumentwert"
        scmCmdToExecute.CommandType = CommandType.StoredProcedure
        scmCmdToExecute.Connection = conn.scoDBConnection
        Try
            scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.VarChar, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, DokList.Columns("dokumentid").Value))
            sdaAdapter.Fill(dtToReturn)
            Return dtToReturn
        Catch ex As Exception
            ' // some error occured. Bubble it to caller and encapsulate Exception object
            Throw New Exception("Dokument_Information_Wert::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
        Finally
            scmCmdToExecute.Dispose()
            sdaAdapter.Dispose()
        End Try
    End Function

    Private Sub Update_ColdListDokumente_Detail(ByVal doenable As Boolean)
        Try
            Dim cd As DataTable
            If doenable Then Me.ColdList.Enabled = False
            cd = Cold_Index_lesen(Me.ColdListDokumente.Columns("indextypnr").Value, 0)
            Me.ColdList.DataSource = cd
            DivFnkt.SpaltenTitel_Aktualisieren(Me.ColdList, cd, "coldlist")
            Me.TextBox15.Text = Me.DokList.Columns("dokunterschriftlinks").Text
            Me.TextBox16.Text = Me.DokList.Columns("dokunterschriftrechts").Text
            Me.TextBox17.Text = Me.DokList.Columns("dokzustaendig").Text
            Me.ColdList.Enabled = True
        Catch
        End Try
    End Sub

    Private Sub Mitarbeiter_Laden()
        '===============================================================================
        'Description: Mitarbeiter in DRP Laden DropDown an Grid Binden und Mutierer übersetzen
        'Date       : koe 28.07.2004
        'Modified   :
        '===============================================================================
        conn.OpenConnection()
        If m_DTMitarbeiter Is Nothing Then
            m_DTMitarbeiter = Generic_Select(17)
        End If

        Me.drpMiatarbeiter.DataSource = m_DTMitarbeiter
        Me.drpMiatarbeiter.ListField = "FullName"
        Me.drpMiatarbeiter.DataField = "mitarbeiternr"
        Me.drpMiatarbeiter.ValueTranslate = True
        Me.Notizlist.Columns("mutierer").DropDown = Me.drpMiatarbeiter
        conn.CloseConnection(True)

    End Sub

    Private Function Generic_Select(ByVal typ As Integer) As DataTable
        '===============================================================================
        'Description: Dynamische Datenherkuft
        'Input      : Typ 
        'Output     : Datatable
        'Date       : koe 28.07.2004
        'Modified   :
        '===============================================================================
        Dim scmCmdToExecute As SqlCommand = New SqlCommand()

        Select Case typ
            Case 17
                'Mitarbeiter
                scmCmdToExecute.CommandText = "dbo.SP_ValueSelect"
            Case Else
        End Select
        scmCmdToExecute.CommandType = CommandType.StoredProcedure
        Dim dtToReturn As DataTable = New DataTable()
        Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)

        scmCmdToExecute.Connection = conn.scoDBConnection
        Try
            Select Case typ
                Case 17
                    'Mitarbeiter
                    scmCmdToExecute.Parameters.Add(New SqlParameter("@Datenherkunft", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, "&AlleMitarbeiter&"))
                Case Else
            End Select
            If typ = 1 Then
            End If
            sdaAdapter.Fill(dtToReturn)
            Return dtToReturn
        Catch ex As Exception
            ' // some error occured. Bubble it to caller and encapsulate Exception object
            Throw New Exception("Trefferliste::Generic_Select::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
        Finally
            scmCmdToExecute.Dispose()
            sdaAdapter.Dispose()
        End Try
    End Function

#End Region


    Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
        Me.Close()
    End Sub
End Class