diff --git a/UID/ADMIN.vbproj b/UID/ADMIN.vbproj
index 924da17..5a922f0 100644
--- a/UID/ADMIN.vbproj
+++ b/UID/ADMIN.vbproj
@@ -467,6 +467,12 @@
     <Compile Include="frmPrintLayout.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="Mitarbeiter\frmMitarbTimas.Designer.vb">
+      <DependentUpon>frmMitarbTimas.vb</DependentUpon>
+    </Compile>
+    <Compile Include="Mitarbeiter\frmMitarbTimas.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="My Project\Resources.Designer.vb">
       <AutoGen>True</AutoGen>
       <DesignTime>True</DesignTime>
@@ -727,6 +733,10 @@
     <EmbeddedResource Include="frmPrintLayout.resx">
       <DependentUpon>frmPrintLayout.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="Mitarbeiter\frmMitarbTimas.resx">
+      <DependentUpon>frmMitarbTimas.vb</DependentUpon>
+      <SubType>Designer</SubType>
+    </EmbeddedResource>
     <EmbeddedResource Include="My Project\licenses.licx" />
     <EmbeddedResource Include="Programme\frmBenutzerBerGruppenKopieren.resx">
       <DependentUpon>frmBenutzerBerGruppenKopieren.vb</DependentUpon>
@@ -757,6 +767,7 @@
     </EmbeddedResource>
     <EmbeddedResource Include="Mitarbeiter\frmMitarbDetails.resx">
       <DependentUpon>frmMitarbDetails.vb</DependentUpon>
+      <SubType>Designer</SubType>
     </EmbeddedResource>
     <EmbeddedResource Include="Mitarbeiter\frmMitarbeiter.resx">
       <DependentUpon>frmMitarbeiter.vb</DependentUpon>
diff --git a/UID/Mitarbeiter/frmMitarbDetails.Designer.vb b/UID/Mitarbeiter/frmMitarbDetails.Designer.vb
index 1e11805..4d0b5bc 100644
--- a/UID/Mitarbeiter/frmMitarbDetails.Designer.vb
+++ b/UID/Mitarbeiter/frmMitarbDetails.Designer.vb
@@ -83,6 +83,8 @@ Partial Class frmMitarbDetails
         Me.cbxTimasAngelegt = New System.Windows.Forms.CheckBox()
         Me.txtPersonalNr = New System.Windows.Forms.TextBox()
         Me.btnMAanlegen = New System.Windows.Forms.Button()
+        Me.TabPage7 = New System.Windows.Forms.TabPage()
+        Me.lbSprachen = New VERAG_PROG_ALLGEMEIN.MyListBox()
         Me.Label4 = New System.Windows.Forms.Label()
         Me.GroupBox2 = New System.Windows.Forms.GroupBox()
         Me.txtTelNr = New System.Windows.Forms.TextBox()
@@ -214,6 +216,7 @@ Partial Class frmMitarbDetails
         Me.TabPage6.SuspendLayout()
         CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.dgvData, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.TabPage7.SuspendLayout()
         Me.GroupBox2.SuspendLayout()
         Me.GroupBox1.SuspendLayout()
         CType(Me.picFoto, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -350,6 +353,7 @@ Partial Class frmMitarbDetails
         Me.tbcntr.Controls.Add(Me.TabPage4)
         Me.tbcntr.Controls.Add(Me.TabPage5)
         Me.tbcntr.Controls.Add(Me.TabPage6)
+        Me.tbcntr.Controls.Add(Me.TabPage7)
         Me.tbcntr.Location = New System.Drawing.Point(2, 539)
         Me.tbcntr.Name = "tbcntr"
         Me.tbcntr.SelectedIndex = 0
@@ -820,7 +824,7 @@ Partial Class frmMitarbDetails
         Me.TabControl1.Location = New System.Drawing.Point(5, 26)
         Me.TabControl1.Name = "TabControl1"
         Me.TabControl1.SelectedIndex = 0
-        Me.TabControl1.Size = New System.Drawing.Size(360, 145)
+        Me.TabControl1.Size = New System.Drawing.Size(287, 145)
         Me.TabControl1.TabIndex = 122
         '
         'PictureBox9
@@ -894,6 +898,28 @@ Partial Class frmMitarbDetails
         Me.btnMAanlegen.Text = "anlegen"
         Me.btnMAanlegen.UseVisualStyleBackColor = False
         '
+        'TabPage7
+        '
+        Me.TabPage7.Controls.Add(Me.lbSprachen)
+        Me.TabPage7.Location = New System.Drawing.Point(4, 22)
+        Me.TabPage7.Name = "TabPage7"
+        Me.TabPage7.Size = New System.Drawing.Size(442, 174)
+        Me.TabPage7.TabIndex = 4
+        Me.TabPage7.Text = "Sprachen"
+        Me.TabPage7.UseVisualStyleBackColor = True
+        '
+        'lbSprachen
+        '
+        Me.lbSprachen._value = ""
+        Me.lbSprachen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lbSprachen.FormattingEnabled = True
+        Me.lbSprachen.Location = New System.Drawing.Point(5, 3)
+        Me.lbSprachen.MultiColumn = True
+        Me.lbSprachen.Name = "lbSprachen"
+        Me.lbSprachen.SelectionMode = System.Windows.Forms.SelectionMode.MultiSimple
+        Me.lbSprachen.Size = New System.Drawing.Size(152, 134)
+        Me.lbSprachen.TabIndex = 97
+        '
         'Label4
         '
         Me.Label4.AutoSize = True
@@ -2260,6 +2286,7 @@ Partial Class frmMitarbDetails
         Me.TabPage6.PerformLayout()
         CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.dgvData, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.TabPage7.ResumeLayout(False)
         Me.GroupBox2.ResumeLayout(False)
         Me.GroupBox2.PerformLayout()
         Me.GroupBox1.ResumeLayout(False)
@@ -2456,4 +2483,6 @@ Partial Class frmMitarbDetails
     Friend WithEvents Label60 As Label
     Friend WithEvents Label61 As Label
     Friend WithEvents txtATGRNAccessCode_AT51FP7 As TextBox
+    Friend WithEvents TabPage7 As TabPage
+    Friend WithEvents lbSprachen As VERAG_PROG_ALLGEMEIN.MyListBox
 End Class
diff --git a/UID/Mitarbeiter/frmMitarbDetails.vb b/UID/Mitarbeiter/frmMitarbDetails.vb
index 5403ca1..2fda113 100644
--- a/UID/Mitarbeiter/frmMitarbDetails.vb
+++ b/UID/Mitarbeiter/frmMitarbDetails.vb
@@ -79,6 +79,9 @@ Public Class frmMitarbDetails
         MyListBox1.fillWithSQL("SELECT [Firma_ID],[Firma_Bez]  FROM [VERAG].[dbo].[tblFirma]", False, "FMZOLL")
         MyListBox1.Items.Insert(0, New VERAG_PROG_ALLGEMEIN.MyListItem("Alle", "A"))
 
+
+        lbSprachen.fillWithSQL("SELECT [wert], [bezeichnung]  FROM [dbo].[tblSprachen]", False, "ADMIN")
+
         cboDPFirma.Items.Clear()
         cboDPFirma.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
         cboDPFirma.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE", "ALLE"))
@@ -125,7 +128,6 @@ Public Class frmMitarbDetails
         cboProgSprache.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ENGLISCH", "EN"))
 
 
-
         cboFirma.Items.Clear()
         cboFirma.Items.Add("VERAG")
         cboFirma.Items.Add("ATILLA")
@@ -332,6 +334,16 @@ Public Class frmMitarbDetails
             Next
         End If
 
+        If mitarbeiter.mit_Sprachkentnisse IsNot Nothing AndAlso mitarbeiter.mit_Sprachkentnisse <> "" Then
+            For Each f In mitarbeiter.mit_Sprachkentnisse.ToString.Split(",")
+                For i = 0 To lbSprachen.Items.Count - 1
+                    If DirectCast(lbSprachen.Items(i), VERAG_PROG_ALLGEMEIN.MyListItem).Value.ToString = f.ToString Then
+                        lbSprachen.SetSelected(i, True)
+                    End If
+                Next
+            Next
+        End If
+
 
         If mitarbeiter.mit_einstiegsdatum = "" Then
             cbxEinsteigsDat.Checked = False
@@ -601,6 +613,24 @@ Public Class frmMitarbDetails
 
 
 
+        mitarbeiter.mit_Sprachkentnisse = ""
+        'For Each a In lbSprachen.SelectedItems
+        '    If DirectCast(a, VERAG_PROG_ALLGEMEIN.MyListItem).Value = "DE" Then
+        '        mitarbeiter.mit_Sprachkentnisse = "DE"
+        '        Exit For
+        '    End If
+        'Next
+        If mitarbeiter.mit_Sprachkentnisse = "" Then
+            For Each i In lbSprachen.SelectedItems
+                mitarbeiter.mit_Sprachkentnisse &= DirectCast(i, VERAG_PROG_ALLGEMEIN.MyListItem).Value & ","
+            Next
+        End If
+        If mitarbeiter.mit_Sprachkentnisse <> "" And mitarbeiter.mit_Sprachkentnisse.ToString.EndsWith(",") Then
+            mitarbeiter.mit_Sprachkentnisse = mitarbeiter.mit_Sprachkentnisse.ToString.Substring(0, mitarbeiter.mit_Sprachkentnisse.ToString.Length - 1)
+        End If
+
+
+
 
         mitarbeiter.mit_FMZollPersIDKasseIsnotSpedBuch = cbxSpedBuch.Checked
         mitarbeiter.mit_FMZollPersIDSpedBuch = Nothing
@@ -864,7 +894,7 @@ Public Class frmMitarbDetails
 
             If IsNothing(mitarbeiter.mit_timasId) Then
                 cbxTimasAngelegt.Checked = False
-                timas.getGroups(dtTimas)
+                timas.getAllGroups(dtTimas)
                 initDGV(dtTimas)
             Else
                 cbxTimasAngelegt.Checked = True
@@ -1141,8 +1171,8 @@ Public Class frmMitarbDetails
 
 
         If checkMandatoryFields() Then
-                timas.createMA(mitarbeiter, rtfInfoTimas.Text, dtTimas)
-                tbcntr_TabIndexChanged(sender, e)
+            timas.createEmployee(mitarbeiter, rtfInfoTimas.Text, dtTimas)
+            tbcntr_TabIndexChanged(sender, e)
             End If
 
     End Sub
diff --git a/UID/Mitarbeiter/frmMitarbTimas.Designer.vb b/UID/Mitarbeiter/frmMitarbTimas.Designer.vb
new file mode 100644
index 0000000..82ba6fc
--- /dev/null
+++ b/UID/Mitarbeiter/frmMitarbTimas.Designer.vb
@@ -0,0 +1,759 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmMitarbTimas
+    Inherits System.Windows.Forms.Form
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()>
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()>
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMitarbTimas))
+        Me.PictureBox1 = New System.Windows.Forms.PictureBox()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Panel1 = New System.Windows.Forms.Panel()
+        Me.Label48 = New System.Windows.Forms.Label()
+        Me.Label47 = New System.Windows.Forms.Label()
+        Me.btnCancel = New System.Windows.Forms.Button()
+        Me.btnOK = New System.Windows.Forms.Button()
+        Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.GroupBox2 = New System.Windows.Forms.GroupBox()
+        Me.GroupBox1 = New System.Windows.Forms.GroupBox()
+        Me.cbxTestaccount = New System.Windows.Forms.CheckBox()
+        Me.cbxGebDat = New System.Windows.Forms.CheckBox()
+        Me.txtGebDat = New System.Windows.Forms.DateTimePicker()
+        Me.lblgeb = New System.Windows.Forms.Label()
+        Me.txtMobiltel = New System.Windows.Forms.TextBox()
+        Me.Label18 = New System.Windows.Forms.Label()
+        Me.txtOrt = New System.Windows.Forms.TextBox()
+        Me.Label16 = New System.Windows.Forms.Label()
+        Me.txtPlz = New System.Windows.Forms.TextBox()
+        Me.Label14 = New System.Windows.Forms.Label()
+        Me.txtStrasse = New System.Windows.Forms.TextBox()
+        Me.Label13 = New System.Windows.Forms.Label()
+        Me.rbtnGeschlechtW = New System.Windows.Forms.RadioButton()
+        Me.rbtnGeschlechtM = New System.Windows.Forms.RadioButton()
+        Me.txtNname = New System.Windows.Forms.TextBox()
+        Me.Label5 = New System.Windows.Forms.Label()
+        Me.txtVname = New System.Windows.Forms.TextBox()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.GroupBox3 = New System.Windows.Forms.GroupBox()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.txtUsername = New System.Windows.Forms.TextBox()
+        Me.Label19 = New System.Windows.Forms.Label()
+        Me.txtDurchwahl = New System.Windows.Forms.TextBox()
+        Me.Label20 = New System.Windows.Forms.Label()
+        Me.txtEmail = New System.Windows.Forms.TextBox()
+        Me.cbxGekuendigt = New System.Windows.Forms.CheckBox()
+        Me.datGekuendigtAm = New System.Windows.Forms.DateTimePicker()
+        Me.datEinstiegsdatum = New System.Windows.Forms.DateTimePicker()
+        Me.Label30 = New System.Windows.Forms.Label()
+        Me.cbxEinsteigsDat = New System.Windows.Forms.CheckBox()
+        Me.txtTelNr = New System.Windows.Forms.TextBox()
+        Me.Label6 = New System.Windows.Forms.Label()
+        Me.txtPwd = New System.Windows.Forms.TextBox()
+        Me.Label8 = New System.Windows.Forms.Label()
+        Me.lkl = New System.Windows.Forms.LinkLabel()
+        Me.lblInfo = New System.Windows.Forms.Label()
+        Me.txtInfo = New System.Windows.Forms.TextBox()
+        Me.lblCard = New System.Windows.Forms.Label()
+        Me.txtCard = New System.Windows.Forms.TextBox()
+        Me.Label7 = New System.Windows.Forms.Label()
+        Me.TextBox2 = New System.Windows.Forms.TextBox()
+        Me.cbxAccount = New System.Windows.Forms.CheckBox()
+        Me.lblLohnNr = New System.Windows.Forms.Label()
+        Me.txtLohn = New System.Windows.Forms.TextBox()
+        Me.TabControl1 = New System.Windows.Forms.TabControl()
+        Me.dgvData = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.Panel1.SuspendLayout()
+        Me.GroupBox2.SuspendLayout()
+        Me.GroupBox1.SuspendLayout()
+        Me.GroupBox3.SuspendLayout()
+        CType(Me.dgvData, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'PictureBox1
+        '
+        Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
+        Me.PictureBox1.Location = New System.Drawing.Point(12, 7)
+        Me.PictureBox1.Name = "PictureBox1"
+        Me.PictureBox1.Size = New System.Drawing.Size(198, 41)
+        Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
+        Me.PictureBox1.TabIndex = 13
+        Me.PictureBox1.TabStop = False
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Cursor = System.Windows.Forms.Cursors.Default
+        Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label1.Location = New System.Drawing.Point(216, 19)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(101, 16)
+        Me.Label1.TabIndex = 18
+        Me.Label1.Text = "Zeiterfassung"
+        '
+        'Panel1
+        '
+        Me.Panel1.Controls.Add(Me.Label48)
+        Me.Panel1.Controls.Add(Me.Label47)
+        Me.Panel1.Controls.Add(Me.Label1)
+        Me.Panel1.Controls.Add(Me.PictureBox1)
+        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
+        Me.Panel1.Location = New System.Drawing.Point(0, 0)
+        Me.Panel1.Name = "Panel1"
+        Me.Panel1.Size = New System.Drawing.Size(570, 57)
+        Me.Panel1.TabIndex = 23
+        '
+        'Label48
+        '
+        Me.Label48.Cursor = System.Windows.Forms.Cursors.Default
+        Me.Label48.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label48.Location = New System.Drawing.Point(449, 22)
+        Me.Label48.Name = "Label48"
+        Me.Label48.Size = New System.Drawing.Size(82, 16)
+        Me.Label48.TabIndex = 93
+        Me.Label48.Text = "00"
+        Me.Label48.TextAlign = System.Drawing.ContentAlignment.TopRight
+        '
+        'Label47
+        '
+        Me.Label47.AutoSize = True
+        Me.Label47.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label47.Location = New System.Drawing.Point(508, 9)
+        Me.Label47.Name = "Label47"
+        Me.Label47.Size = New System.Drawing.Size(21, 13)
+        Me.Label47.TabIndex = 92
+        Me.Label47.Text = "ID:"
+        '
+        'btnCancel
+        '
+        Me.btnCancel.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.btnCancel.BackColor = System.Drawing.Color.White
+        Me.btnCancel.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnCancel.Location = New System.Drawing.Point(191, 871)
+        Me.btnCancel.Name = "btnCancel"
+        Me.btnCancel.Size = New System.Drawing.Size(88, 36)
+        Me.btnCancel.TabIndex = 52
+        Me.btnCancel.Text = "Abbrechen"
+        Me.btnCancel.UseVisualStyleBackColor = False
+        '
+        'btnOK
+        '
+        Me.btnOK.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.btnOK.BackColor = System.Drawing.Color.White
+        Me.btnOK.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnOK.Location = New System.Drawing.Point(12, 871)
+        Me.btnOK.Name = "btnOK"
+        Me.btnOK.Size = New System.Drawing.Size(173, 36)
+        Me.btnOK.TabIndex = 51
+        Me.btnOK.Text = "OK"
+        Me.btnOK.UseVisualStyleBackColor = False
+        '
+        'ContextMenuStrip1
+        '
+        Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
+        Me.ContextMenuStrip1.Size = New System.Drawing.Size(61, 4)
+        '
+        'GroupBox2
+        '
+        Me.GroupBox2.Controls.Add(Me.txtLohn)
+        Me.GroupBox2.Controls.Add(Me.lblLohnNr)
+        Me.GroupBox2.Controls.Add(Me.cbxAccount)
+        Me.GroupBox2.Controls.Add(Me.TextBox2)
+        Me.GroupBox2.Controls.Add(Me.Label7)
+        Me.GroupBox2.Controls.Add(Me.txtCard)
+        Me.GroupBox2.Controls.Add(Me.lblCard)
+        Me.GroupBox2.Controls.Add(Me.txtInfo)
+        Me.GroupBox2.Controls.Add(Me.lblInfo)
+        Me.GroupBox2.Controls.Add(Me.lkl)
+        Me.GroupBox2.Controls.Add(Me.Label8)
+        Me.GroupBox2.Controls.Add(Me.txtPwd)
+        Me.GroupBox2.Controls.Add(Me.Label6)
+        Me.GroupBox2.Controls.Add(Me.txtTelNr)
+        Me.GroupBox2.Controls.Add(Me.cbxEinsteigsDat)
+        Me.GroupBox2.Controls.Add(Me.Label30)
+        Me.GroupBox2.Controls.Add(Me.datEinstiegsdatum)
+        Me.GroupBox2.Controls.Add(Me.datGekuendigtAm)
+        Me.GroupBox2.Controls.Add(Me.cbxGekuendigt)
+        Me.GroupBox2.Controls.Add(Me.txtEmail)
+        Me.GroupBox2.Controls.Add(Me.Label20)
+        Me.GroupBox2.Controls.Add(Me.txtDurchwahl)
+        Me.GroupBox2.Controls.Add(Me.Label19)
+        Me.GroupBox2.Controls.Add(Me.txtUsername)
+        Me.GroupBox2.Controls.Add(Me.Label3)
+        Me.GroupBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.GroupBox2.Location = New System.Drawing.Point(6, 289)
+        Me.GroupBox2.Name = "GroupBox2"
+        Me.GroupBox2.Size = New System.Drawing.Size(552, 303)
+        Me.GroupBox2.TabIndex = 86
+        Me.GroupBox2.TabStop = False
+        Me.GroupBox2.Text = "Timas - User"
+        '
+        'GroupBox1
+        '
+        Me.GroupBox1.Controls.Add(Me.cbxTestaccount)
+        Me.GroupBox1.Controls.Add(Me.cbxGebDat)
+        Me.GroupBox1.Controls.Add(Me.txtGebDat)
+        Me.GroupBox1.Controls.Add(Me.lblgeb)
+        Me.GroupBox1.Controls.Add(Me.txtMobiltel)
+        Me.GroupBox1.Controls.Add(Me.Label18)
+        Me.GroupBox1.Controls.Add(Me.txtOrt)
+        Me.GroupBox1.Controls.Add(Me.Label16)
+        Me.GroupBox1.Controls.Add(Me.txtPlz)
+        Me.GroupBox1.Controls.Add(Me.Label14)
+        Me.GroupBox1.Controls.Add(Me.txtStrasse)
+        Me.GroupBox1.Controls.Add(Me.Label13)
+        Me.GroupBox1.Controls.Add(Me.rbtnGeschlechtW)
+        Me.GroupBox1.Controls.Add(Me.rbtnGeschlechtM)
+        Me.GroupBox1.Controls.Add(Me.txtNname)
+        Me.GroupBox1.Controls.Add(Me.Label5)
+        Me.GroupBox1.Controls.Add(Me.txtVname)
+        Me.GroupBox1.Controls.Add(Me.Label2)
+        Me.GroupBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.GroupBox1.Location = New System.Drawing.Point(12, 63)
+        Me.GroupBox1.Name = "GroupBox1"
+        Me.GroupBox1.Size = New System.Drawing.Size(552, 220)
+        Me.GroupBox1.TabIndex = 85
+        Me.GroupBox1.TabStop = False
+        Me.GroupBox1.Text = "Person"
+        '
+        'cbxTestaccount
+        '
+        Me.cbxTestaccount.AutoSize = True
+        Me.cbxTestaccount.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cbxTestaccount.Location = New System.Drawing.Point(389, 61)
+        Me.cbxTestaccount.Name = "cbxTestaccount"
+        Me.cbxTestaccount.Size = New System.Drawing.Size(86, 17)
+        Me.cbxTestaccount.TabIndex = 92
+        Me.cbxTestaccount.Text = "Testaccount"
+        Me.cbxTestaccount.UseVisualStyleBackColor = True
+        '
+        'cbxGebDat
+        '
+        Me.cbxGebDat.AutoSize = True
+        Me.cbxGebDat.Checked = True
+        Me.cbxGebDat.CheckState = System.Windows.Forms.CheckState.Checked
+        Me.cbxGebDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cbxGebDat.Location = New System.Drawing.Point(9, 196)
+        Me.cbxGebDat.Name = "cbxGebDat"
+        Me.cbxGebDat.Size = New System.Drawing.Size(15, 14)
+        Me.cbxGebDat.TabIndex = 91
+        Me.cbxGebDat.UseVisualStyleBackColor = True
+        '
+        'txtGebDat
+        '
+        Me.txtGebDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtGebDat.Location = New System.Drawing.Point(30, 194)
+        Me.txtGebDat.Name = "txtGebDat"
+        Me.txtGebDat.Size = New System.Drawing.Size(200, 20)
+        Me.txtGebDat.TabIndex = 10
+        '
+        'lblgeb
+        '
+        Me.lblgeb.AutoSize = True
+        Me.lblgeb.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblgeb.Location = New System.Drawing.Point(6, 178)
+        Me.lblgeb.Name = "lblgeb"
+        Me.lblgeb.Size = New System.Drawing.Size(62, 13)
+        Me.lblgeb.TabIndex = 82
+        Me.lblgeb.Text = "Geburtstag:"
+        '
+        'txtMobiltel
+        '
+        Me.txtMobiltel.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtMobiltel.Location = New System.Drawing.Point(9, 155)
+        Me.txtMobiltel.Name = "txtMobiltel"
+        Me.txtMobiltel.Size = New System.Drawing.Size(286, 20)
+        Me.txtMobiltel.TabIndex = 8
+        '
+        'Label18
+        '
+        Me.Label18.AutoSize = True
+        Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label18.Location = New System.Drawing.Point(6, 139)
+        Me.Label18.Name = "Label18"
+        Me.Label18.Size = New System.Drawing.Size(84, 13)
+        Me.Label18.TabIndex = 79
+        Me.Label18.Text = "Mobiltelefon-Nr.:"
+        '
+        'txtOrt
+        '
+        Me.txtOrt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtOrt.Location = New System.Drawing.Point(196, 116)
+        Me.txtOrt.Name = "txtOrt"
+        Me.txtOrt.Size = New System.Drawing.Size(177, 20)
+        Me.txtOrt.TabIndex = 7
+        '
+        'Label16
+        '
+        Me.Label16.AutoSize = True
+        Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label16.Location = New System.Drawing.Point(193, 100)
+        Me.Label16.Name = "Label16"
+        Me.Label16.Size = New System.Drawing.Size(24, 13)
+        Me.Label16.TabIndex = 75
+        Me.Label16.Text = "Ort:"
+        '
+        'txtPlz
+        '
+        Me.txtPlz.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtPlz.Location = New System.Drawing.Point(10, 116)
+        Me.txtPlz.Name = "txtPlz"
+        Me.txtPlz.Size = New System.Drawing.Size(177, 20)
+        Me.txtPlz.TabIndex = 6
+        '
+        'Label14
+        '
+        Me.Label14.AutoSize = True
+        Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label14.Location = New System.Drawing.Point(7, 100)
+        Me.Label14.Name = "Label14"
+        Me.Label14.Size = New System.Drawing.Size(30, 13)
+        Me.Label14.TabIndex = 73
+        Me.Label14.Text = "PLZ:"
+        '
+        'txtStrasse
+        '
+        Me.txtStrasse.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtStrasse.Location = New System.Drawing.Point(9, 77)
+        Me.txtStrasse.Name = "txtStrasse"
+        Me.txtStrasse.Size = New System.Drawing.Size(286, 20)
+        Me.txtStrasse.TabIndex = 3
+        '
+        'Label13
+        '
+        Me.Label13.AutoSize = True
+        Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label13.Location = New System.Drawing.Point(6, 61)
+        Me.Label13.Name = "Label13"
+        Me.Label13.Size = New System.Drawing.Size(45, 13)
+        Me.Label13.TabIndex = 71
+        Me.Label13.Text = "Strasse:"
+        '
+        'rbtnGeschlechtW
+        '
+        Me.rbtnGeschlechtW.AutoSize = True
+        Me.rbtnGeschlechtW.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.rbtnGeschlechtW.Location = New System.Drawing.Point(389, 35)
+        Me.rbtnGeschlechtW.Name = "rbtnGeschlechtW"
+        Me.rbtnGeschlechtW.Size = New System.Drawing.Size(33, 17)
+        Me.rbtnGeschlechtW.TabIndex = 65
+        Me.rbtnGeschlechtW.Text = "w"
+        Me.rbtnGeschlechtW.UseVisualStyleBackColor = True
+        '
+        'rbtnGeschlechtM
+        '
+        Me.rbtnGeschlechtM.AutoSize = True
+        Me.rbtnGeschlechtM.Checked = True
+        Me.rbtnGeschlechtM.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.rbtnGeschlechtM.Location = New System.Drawing.Point(389, 19)
+        Me.rbtnGeschlechtM.Name = "rbtnGeschlechtM"
+        Me.rbtnGeschlechtM.Size = New System.Drawing.Size(33, 17)
+        Me.rbtnGeschlechtM.TabIndex = 64
+        Me.rbtnGeschlechtM.TabStop = True
+        Me.rbtnGeschlechtM.Text = "m"
+        Me.rbtnGeschlechtM.UseVisualStyleBackColor = True
+        '
+        'txtNname
+        '
+        Me.txtNname.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtNname.Location = New System.Drawing.Point(193, 32)
+        Me.txtNname.Name = "txtNname"
+        Me.txtNname.Size = New System.Drawing.Size(177, 20)
+        Me.txtNname.TabIndex = 2
+        '
+        'Label5
+        '
+        Me.Label5.AutoSize = True
+        Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label5.Location = New System.Drawing.Point(190, 16)
+        Me.Label5.Name = "Label5"
+        Me.Label5.Size = New System.Drawing.Size(62, 13)
+        Me.Label5.TabIndex = 61
+        Me.Label5.Text = "Nachname:"
+        '
+        'txtVname
+        '
+        Me.txtVname.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtVname.Location = New System.Drawing.Point(10, 32)
+        Me.txtVname.Name = "txtVname"
+        Me.txtVname.Size = New System.Drawing.Size(177, 20)
+        Me.txtVname.TabIndex = 1
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label2.Location = New System.Drawing.Point(7, 16)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(52, 13)
+        Me.Label2.TabIndex = 60
+        Me.Label2.Text = "Vorname:"
+        '
+        'GroupBox3
+        '
+        Me.GroupBox3.Controls.Add(Me.dgvData)
+        Me.GroupBox3.Controls.Add(Me.TabControl1)
+        Me.GroupBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.GroupBox3.Location = New System.Drawing.Point(6, 598)
+        Me.GroupBox3.Name = "GroupBox3"
+        Me.GroupBox3.Size = New System.Drawing.Size(552, 261)
+        Me.GroupBox3.TabIndex = 87
+        Me.GroupBox3.TabStop = False
+        Me.GroupBox3.Text = "Timas - Gruppen"
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label3.Location = New System.Drawing.Point(13, 39)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(58, 13)
+        Me.Label3.TabIndex = 56
+        Me.Label3.Text = "Username:"
+        '
+        'txtUsername
+        '
+        Me.txtUsername.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtUsername.Location = New System.Drawing.Point(16, 55)
+        Me.txtUsername.Name = "txtUsername"
+        Me.txtUsername.Size = New System.Drawing.Size(177, 20)
+        Me.txtUsername.TabIndex = 0
+        '
+        'Label19
+        '
+        Me.Label19.AutoSize = True
+        Me.Label19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label19.Location = New System.Drawing.Point(15, 188)
+        Me.Label19.Name = "Label19"
+        Me.Label19.Size = New System.Drawing.Size(108, 13)
+        Me.Label19.TabIndex = 81
+        Me.Label19.Text = "Telefon / Durchwahl:"
+        '
+        'txtDurchwahl
+        '
+        Me.txtDurchwahl.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtDurchwahl.Location = New System.Drawing.Point(138, 204)
+        Me.txtDurchwahl.Name = "txtDurchwahl"
+        Me.txtDurchwahl.Size = New System.Drawing.Size(54, 20)
+        Me.txtDurchwahl.TabIndex = 6
+        '
+        'Label20
+        '
+        Me.Label20.AutoSize = True
+        Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label20.Location = New System.Drawing.Point(207, 188)
+        Me.Label20.Name = "Label20"
+        Me.Label20.Size = New System.Drawing.Size(39, 13)
+        Me.Label20.TabIndex = 83
+        Me.Label20.Text = "E-Mail:"
+        '
+        'txtEmail
+        '
+        Me.txtEmail.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtEmail.Location = New System.Drawing.Point(210, 204)
+        Me.txtEmail.Name = "txtEmail"
+        Me.txtEmail.Size = New System.Drawing.Size(178, 20)
+        Me.txtEmail.TabIndex = 7
+        '
+        'cbxGekuendigt
+        '
+        Me.cbxGekuendigt.AutoSize = True
+        Me.cbxGekuendigt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cbxGekuendigt.Location = New System.Drawing.Point(16, 262)
+        Me.cbxGekuendigt.Name = "cbxGekuendigt"
+        Me.cbxGekuendigt.Size = New System.Drawing.Size(69, 17)
+        Me.cbxGekuendigt.TabIndex = 8
+        Me.cbxGekuendigt.Text = "Ende DV"
+        Me.cbxGekuendigt.UseVisualStyleBackColor = True
+        '
+        'datGekuendigtAm
+        '
+        Me.datGekuendigtAm.Enabled = False
+        Me.datGekuendigtAm.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.datGekuendigtAm.Location = New System.Drawing.Point(118, 259)
+        Me.datGekuendigtAm.Name = "datGekuendigtAm"
+        Me.datGekuendigtAm.Size = New System.Drawing.Size(200, 20)
+        Me.datGekuendigtAm.TabIndex = 9
+        '
+        'datEinstiegsdatum
+        '
+        Me.datEinstiegsdatum.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.datEinstiegsdatum.Location = New System.Drawing.Point(118, 236)
+        Me.datEinstiegsdatum.Name = "datEinstiegsdatum"
+        Me.datEinstiegsdatum.Size = New System.Drawing.Size(200, 20)
+        Me.datEinstiegsdatum.TabIndex = 2
+        '
+        'Label30
+        '
+        Me.Label30.AutoSize = True
+        Me.Label30.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label30.Location = New System.Drawing.Point(31, 238)
+        Me.Label30.Name = "Label30"
+        Me.Label30.Size = New System.Drawing.Size(81, 13)
+        Me.Label30.TabIndex = 89
+        Me.Label30.Text = "Einstiegsdatum:"
+        '
+        'cbxEinsteigsDat
+        '
+        Me.cbxEinsteigsDat.AutoSize = True
+        Me.cbxEinsteigsDat.Checked = True
+        Me.cbxEinsteigsDat.CheckState = System.Windows.Forms.CheckState.Checked
+        Me.cbxEinsteigsDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cbxEinsteigsDat.Location = New System.Drawing.Point(16, 238)
+        Me.cbxEinsteigsDat.Name = "cbxEinsteigsDat"
+        Me.cbxEinsteigsDat.Size = New System.Drawing.Size(15, 14)
+        Me.cbxEinsteigsDat.TabIndex = 90
+        Me.cbxEinsteigsDat.UseVisualStyleBackColor = True
+        '
+        'txtTelNr
+        '
+        Me.txtTelNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtTelNr.Location = New System.Drawing.Point(18, 204)
+        Me.txtTelNr.Name = "txtTelNr"
+        Me.txtTelNr.Size = New System.Drawing.Size(114, 20)
+        Me.txtTelNr.TabIndex = 113
+        '
+        'Label6
+        '
+        Me.Label6.AutoSize = True
+        Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label6.Location = New System.Drawing.Point(202, 36)
+        Me.Label6.Name = "Label6"
+        Me.Label6.Size = New System.Drawing.Size(53, 13)
+        Me.Label6.TabIndex = 116
+        Me.Label6.Text = "Passwort:"
+        '
+        'txtPwd
+        '
+        Me.txtPwd.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtPwd.Location = New System.Drawing.Point(204, 52)
+        Me.txtPwd.Name = "txtPwd"
+        Me.txtPwd.Size = New System.Drawing.Size(178, 20)
+        Me.txtPwd.TabIndex = 115
+        '
+        'Label8
+        '
+        Me.Label8.AutoSize = True
+        Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label8.Location = New System.Drawing.Point(206, 55)
+        Me.Label8.Name = "Label8"
+        Me.Label8.Size = New System.Drawing.Size(146, 13)
+        Me.Label8.TabIndex = 114
+        Me.Label8.Text = "(erst bei Doppelklick sichtbar)"
+        '
+        'lkl
+        '
+        Me.lkl.AutoSize = True
+        Me.lkl.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lkl.Location = New System.Drawing.Point(347, 36)
+        Me.lkl.Name = "lkl"
+        Me.lkl.Size = New System.Drawing.Size(35, 13)
+        Me.lkl.TabIndex = 117
+        Me.lkl.TabStop = True
+        Me.lkl.Text = "Reset"
+        '
+        'lblInfo
+        '
+        Me.lblInfo.AutoSize = True
+        Me.lblInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblInfo.Location = New System.Drawing.Point(13, 125)
+        Me.lblInfo.Name = "lblInfo"
+        Me.lblInfo.Size = New System.Drawing.Size(28, 13)
+        Me.lblInfo.TabIndex = 119
+        Me.lblInfo.Text = "Info:"
+        '
+        'txtInfo
+        '
+        Me.txtInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtInfo.Location = New System.Drawing.Point(16, 141)
+        Me.txtInfo.Name = "txtInfo"
+        Me.txtInfo.Size = New System.Drawing.Size(179, 20)
+        Me.txtInfo.TabIndex = 118
+        '
+        'lblCard
+        '
+        Me.lblCard.AutoSize = True
+        Me.lblCard.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblCard.Location = New System.Drawing.Point(202, 80)
+        Me.lblCard.Name = "lblCard"
+        Me.lblCard.Size = New System.Drawing.Size(55, 13)
+        Me.lblCard.TabIndex = 123
+        Me.lblCard.Text = "Karten-Nr:"
+        '
+        'txtCard
+        '
+        Me.txtCard.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtCard.Location = New System.Drawing.Point(205, 96)
+        Me.txtCard.Name = "txtCard"
+        Me.txtCard.Size = New System.Drawing.Size(179, 20)
+        Me.txtCard.TabIndex = 122
+        '
+        'Label7
+        '
+        Me.Label7.AutoSize = True
+        Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label7.Location = New System.Drawing.Point(13, 80)
+        Me.Label7.Name = "Label7"
+        Me.Label7.Size = New System.Drawing.Size(49, 13)
+        Me.Label7.TabIndex = 125
+        Me.Label7.Text = "RFID-Nr:"
+        '
+        'TextBox2
+        '
+        Me.TextBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBox2.Location = New System.Drawing.Point(16, 96)
+        Me.TextBox2.Name = "TextBox2"
+        Me.TextBox2.Size = New System.Drawing.Size(179, 20)
+        Me.TextBox2.TabIndex = 124
+        '
+        'cbxAccount
+        '
+        Me.cbxAccount.AutoSize = True
+        Me.cbxAccount.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cbxAccount.Location = New System.Drawing.Point(16, 19)
+        Me.cbxAccount.Name = "cbxAccount"
+        Me.cbxAccount.Size = New System.Drawing.Size(52, 17)
+        Me.cbxAccount.TabIndex = 126
+        Me.cbxAccount.Text = "Login"
+        Me.cbxAccount.UseVisualStyleBackColor = True
+        '
+        'lblLohnNr
+        '
+        Me.lblLohnNr.AutoSize = True
+        Me.lblLohnNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblLohnNr.Location = New System.Drawing.Point(204, 125)
+        Me.lblLohnNr.Name = "lblLohnNr"
+        Me.lblLohnNr.Size = New System.Drawing.Size(48, 13)
+        Me.lblLohnNr.TabIndex = 128
+        Me.lblLohnNr.Text = "Lohn-Nr:"
+        '
+        'txtLohn
+        '
+        Me.txtLohn.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtLohn.Location = New System.Drawing.Point(207, 141)
+        Me.txtLohn.Name = "txtLohn"
+        Me.txtLohn.Size = New System.Drawing.Size(179, 20)
+        Me.txtLohn.TabIndex = 127
+        '
+        'TabControl1
+        '
+        Me.TabControl1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TabControl1.Location = New System.Drawing.Point(6, 19)
+        Me.TabControl1.Name = "TabControl1"
+        Me.TabControl1.SelectedIndex = 0
+        Me.TabControl1.Size = New System.Drawing.Size(546, 242)
+        Me.TabControl1.TabIndex = 123
+        '
+        'dgvData
+        '
+        Me.dgvData.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvData.BackgroundColor = System.Drawing.Color.White
+        Me.dgvData.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvData.Location = New System.Drawing.Point(6, 19)
+        Me.dgvData.Name = "dgvData"
+        Me.dgvData.Size = New System.Drawing.Size(546, 242)
+        Me.dgvData.TabIndex = 124
+        '
+        'frmMitarbTimas
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.ClientSize = New System.Drawing.Size(570, 919)
+        Me.Controls.Add(Me.GroupBox3)
+        Me.Controls.Add(Me.GroupBox2)
+        Me.Controls.Add(Me.GroupBox1)
+        Me.Controls.Add(Me.btnCancel)
+        Me.Controls.Add(Me.btnOK)
+        Me.Controls.Add(Me.Panel1)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.Name = "frmMitarbTimas"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "frmMitarbDetails"
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.Panel1.ResumeLayout(False)
+        Me.Panel1.PerformLayout()
+        Me.GroupBox2.ResumeLayout(False)
+        Me.GroupBox2.PerformLayout()
+        Me.GroupBox1.ResumeLayout(False)
+        Me.GroupBox1.PerformLayout()
+        Me.GroupBox3.ResumeLayout(False)
+        CType(Me.dgvData, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+
+    End Sub
+    Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
+    Friend WithEvents Label1 As System.Windows.Forms.Label
+    Friend WithEvents Panel1 As System.Windows.Forms.Panel
+    Friend WithEvents btnCancel As System.Windows.Forms.Button
+    Friend WithEvents btnOK As System.Windows.Forms.Button
+    Friend WithEvents Label48 As System.Windows.Forms.Label
+    Friend WithEvents Label47 As System.Windows.Forms.Label
+    Friend WithEvents ContextMenuStrip1 As ContextMenuStrip
+    Private WithEvents GroupBox2 As GroupBox
+    Friend WithEvents GroupBox1 As GroupBox
+    Friend WithEvents cbxTestaccount As CheckBox
+    Friend WithEvents cbxGebDat As CheckBox
+    Friend WithEvents txtGebDat As DateTimePicker
+    Friend WithEvents lblgeb As Label
+    Friend WithEvents txtMobiltel As TextBox
+    Friend WithEvents Label18 As Label
+    Friend WithEvents txtOrt As TextBox
+    Friend WithEvents Label16 As Label
+    Friend WithEvents txtPlz As TextBox
+    Friend WithEvents Label14 As Label
+    Friend WithEvents txtStrasse As TextBox
+    Friend WithEvents Label13 As Label
+    Friend WithEvents rbtnGeschlechtW As RadioButton
+    Friend WithEvents rbtnGeschlechtM As RadioButton
+    Friend WithEvents txtNname As TextBox
+    Friend WithEvents Label5 As Label
+    Friend WithEvents txtVname As TextBox
+    Friend WithEvents Label2 As Label
+    Friend WithEvents txtLohn As TextBox
+    Friend WithEvents lblLohnNr As Label
+    Friend WithEvents cbxAccount As CheckBox
+    Friend WithEvents TextBox2 As TextBox
+    Friend WithEvents Label7 As Label
+    Friend WithEvents txtCard As TextBox
+    Friend WithEvents lblCard As Label
+    Friend WithEvents txtInfo As TextBox
+    Friend WithEvents lblInfo As Label
+    Friend WithEvents lkl As LinkLabel
+    Friend WithEvents Label8 As Label
+    Friend WithEvents txtPwd As TextBox
+    Friend WithEvents Label6 As Label
+    Friend WithEvents txtTelNr As TextBox
+    Friend WithEvents cbxEinsteigsDat As CheckBox
+    Friend WithEvents Label30 As Label
+    Friend WithEvents datEinstiegsdatum As DateTimePicker
+    Friend WithEvents datGekuendigtAm As DateTimePicker
+    Friend WithEvents cbxGekuendigt As CheckBox
+    Friend WithEvents txtEmail As TextBox
+    Friend WithEvents Label20 As Label
+    Friend WithEvents txtDurchwahl As TextBox
+    Friend WithEvents Label19 As Label
+    Friend WithEvents txtUsername As TextBox
+    Friend WithEvents Label3 As Label
+    Private WithEvents GroupBox3 As GroupBox
+    Friend WithEvents TabControl1 As TabControl
+    Friend WithEvents dgvData As VERAG_PROG_ALLGEMEIN.MyDatagridview
+End Class
diff --git a/UID/Mitarbeiter/frmMitarbTimas.resx b/UID/Mitarbeiter/frmMitarbTimas.resx
new file mode 100644
index 0000000..db78be9
--- /dev/null
+++ b/UID/Mitarbeiter/frmMitarbTimas.resx
@@ -0,0 +1,835 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAABAQAAADDCAYAAAAVxcPwAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAADM2SURBVHhe7d154H37XO9xwzEdU+YkyTkoTbiHUBwl
+        SoUIpUw3R4YrGaKruA0iEnUJodwIR6au6WSI7jnIPEbI1HF0UYbrZJ5yX2+n7eyzf6/9/X7ea6+9Pp/1
+        Wc8/Hv98fr/v2u/1Xp+19+fzXmt91tm+/vWvAwAAAACAhbGNAAAAAACgb7YRAAAAAAD0zTYCAAAAAIC+
+        2UYAAAAAANA32wgAAAAAAPpmGwEAAAAAQN9sIwAAAAAA6JttBAAAAAAAfbONAAAAAACgb7YRAAAAAAD0
+        zTYCAAAAAIC+2UYAAAAAANA32wgAAAAAAPpmGwEAAAAAQN9sIwAAAAAA6JttBAAAAAAAfbONAAAAAACg
+        b7YRAAAAAAD0zTYCAAAAAIC+2caMs/3g7wAAAABYhnPJMXJ9uaP8pjxCniR/LafIO+RU+Vf59H/6knx9
+        hlbxh09I7Nc75Y1ysrxQniWx/38g95Pbyo3k6nIZOYe4XA7i5mTAULYxw3VSAAAAALN2fjle7i6Pl5j8
+        xmT4q+Imztjuy/J+eYn8kdxBvkcGFQrcnAwYyjYeRJ3wluI6ei1xgl1ejjhZMMh3yhfF5bqGO4mLsxX/
+        VVzc6MO3iDvuc/Q/xe0jxhe/S6urSR+X98kb5GUSV5GeKA+Vu8pPy/fLhcUdNyzDA8T1pRY9Rdw+YP4u
+        ITHOj8n/2+Vr4voAxhO/E8+TKLpcVtxxOYKbowFD2caDqBOeXd4krlPX8mQ54mTBICeKy3EN75GjxMXZ
+        CgoCfaMggCnFwPBV8hi5s1xTjhZ3PNGPi8vp4vpEi/5Doojl9gXzc6z8hrxG4ti6Y47pvFaiWHwhccfr
+        G9wcDRjKNh5GHfHHxXXiWuILLG67OeKEQco1xOW3lluIi7MlFAT6RkEAtcUdW/9HHijXltaLpMh7tLhj
+        37J4ZtrtC+YhCo0nSEw+3fFFff8uj5RLyxHH0M3PgKFsYwl1xhiguA5cy3PliBMGKXFlyuW2hri9Nu5G
+        cXG2hIJA3ygIoDWfkli46kdkDt+RONgVJB4xcce6ddcVt09oV9yN8hCJ7xF3TNGez8pvyXnkm8fSzc2A
+        oWxjCXXGa4nruDUdJ988WZByc3E5rSVWrnVxtoaCQN8oCKBl/yTx3On5xB1ztO/Z4o7tHPy9uH1Ce+I7
+        IiaVMbl0xxLte7dcTb5xTN3cDBjKNpZSh4xFMFynrSVW7lz/AkSZeH3Me8XltIaXiouzRRQE+kZBAHPw
+        Ubmb8DjBvPyguOM5Jz8jbt/Qjh+VeDOAO36Yl3ht4+3EzsuAoWxjKXXIeG6/tQVI4jbKzS9DHOwe4nJZ
+        yzcroDNAQaBvFAQwJ2+Wq4g7/mjPK8Udxzl5l5xT3P6hrigQxuvt3HHDvN3fzcuAoWxjhjplrPDvOmst
+        r5bNL0VsFxOeT4jLZQ3PEBdnqygI9I2CAOYmFiH8ZXF9AO24ibjjN0d3FLePqCdeY3qKuOOFPtzHzcuA
+        IWxjhjrk5aS1BXF+Sja/HOE9XFwOa/iKxAJLLs5WURDoGwUBzNWDxfUD1BdXbuPKujtuc3SasI5FOy4h
+        bxd3rNCXm7u5GZBlGzPUGcOj1jpnC94qrL58uMtLXE1yOazhceLibBkFgb5REMCcURRoU9zB4Y7XnN1X
+        3L5iWnFnQDw65I4R+nO6XMHNz4AM25ihjhguJa2tXPpzsv4liSP9lbjc1fA5se9abRwFgb5REMDc3V5c
+        f0Ad55dYBNIdqzn7pPT0fTlH55AXiTs+6Fe8Mvwcbo4GlLKNGeqEK78nrqPW8h5hxeXtrikub7XEe3Fd
+        nK2jINA3CgKYu8/Ld4vrE5je/xB3nHrw++L2GdPouW/hYCe4ORpQyjZmqBOuxMC5pcXpwi/Jeow4Uyy+
+        6HJWw5yvLFAQ6BsFAfTg9RJXD12/wHQuKZ8Rd4x68AWZ451+Pbi6fFXccUH/4q6j87t5GlDCNmaoA66L
+        Z8hcR60lFro5t2zGuXS3EJevWub87CEFgb5REEAvThDXLzCdx4g7Nj15orh9x/7Eax/fJu54YDnu6eZp
+        QAnbmKEOuC5Wmf0XcR21ll+VzTiXLAok7xOXqxo+LHNenZiCQN8oCKAXc/+unbsrSbxJxx2bnsRV6thX
+        lwPsx38TdyywLKcKawlgENuYoc63qbXVc+M2mguIi3WJ7ikuT7XM/aoVBYG+URBAT+4qrm9g/54r7pj0
+        6DnicoDxRZGvx0UqMcxPurkacBjbmKHOtykW8nuvuI5ay/3Fxbo0MbmJ5/Vdjmp4t8x94UcKAn2jIICe
+        xHcur+Sd3g+JOx49u4a4XGBc9xCXfyzTU91cDTiMbcxQ53PilX+uo9byaelpYD/UI8Tlp5afFRfnnFAQ
+        6BsFAfQmJqeuf2B/WlrEdyp/Jy4XGE8sFNrSI6Co73Q5t5uvAQexjRnqeE5cgXiruM5ay1xfazeWy8uX
+        xOWmhlj1uocrVRQE+kZBAL15nLj+gf24mbjjsAQ/IS4nGEfk1+Udy3Y9N18DDmIbM9TxtrmRuI5ay2fl
+        UuJiXYK/EpeXWn5UXJxzQ0GgbxQE0JtY+JfHBqYRj8S9R9xxWIK4MMTrLvfnRHF5x7I9yM3XgIPYxgx1
+        vIOcLK6z1hIDYhdn764pLh+1vFRcnHNEQaBvFATQo6uK6yMY193E5X9JflFcbrCbWEzw8+JyjmV7mZuv
+        AQexjRnqeAe5trjOWkvcMv8d4mLtVVwJau35xauJi3WOKAj0jYIAenQvcX0E44m3G31MXP6X5AMSrzt2
+        OcJwPyMu38Cn3XwNOIhtzFDHO8zzxXXYWp4kLs5e3VJcHmp5hrg454qCQN8oCKBHzxbXRzCe3xGX+yWK
+        lfBdjjDcE8XlGgjf4eZswDa2MUOd7jDfJ/8hrsPW8FW5orhYexNV+ajOuzzU8BW5grhY54qCQN8oCKBH
+        /ySuj2Ac3yqxbpHL/RL9q8QdEy5XGOb94nINhBu6ORuwjW3MUKcr8ZfiOmwtscCei7M39xa3/7X0uLo1
+        BYG+URBAj74mR4vrJ9jdn4rL+5L9trhcIe8y4nIMrJzg5mzANrYxQ52uRLzy7sviOm0NccdCT8+xOxeR
+        T4nb/xriasmlxcU6ZxQE+kZBAL26urh+gt18l8SdiC7nS/YZuYS4nCHnZ8XluHVflLfLs+QRcl/5Bbmh
+        xOLX3yOXk/jdnUqMS79TYqHVa8lPye3kPvJH8hx5s8xtAccHujkbsI1tzFCnK/UYcZ22lheJi7MXjxS3
+        37U8WFycc9dKQeBh4n7ssJueXs9GQQDrbi+un2A3zxOX7xpebtpqepS4nCHnIeLy25p/kyfLCRKFsjm/
+        gvKcciWJMd9TpKULbs6fujkbsI1tzFCnKxVVuNaeqYu3ILhY5+4YaemOjE9ITK5crHPXSkEgFrBy8QEr
+        rRQEbiybhZceXFziCtdN5XfldeL2vxX3F9dPMNx1xOW6hg/JeeSNa221xbgk7hh1uUO5uKDl8tuCuAM3
+        imI/JjGJdvH3IM6tn5N3ictDbS9wczZgG9uYoU6X0VpV82Rxcc5d3I7l9reWXxMXZw8oCGAuWikI/Ii4
+        +HoUBYK45dTlobboDy5mDBN3E71GXK5ruINEXHG+uX+v5WmymTvkfFBcbmv7e4mFxF3MvTpKWrsjN5zs
+        5mzANrYxQ50uI66itHabzY+Li3Wu4q4Ht5+1nCbnExdrDygIYC4oCNRzW2nprq3wTHGxYphbiMtzDe+U
+        9duzW7qiHFeQryLruUO5uDIdi4K63Nb0dInJsYt5CX5PXF5qeZubswHb2MYMdbqsXxfXeWuJ2+l6eU44
+        9iMqtG4/a7mjuFh7QUEAc0FBoK5YPMvlo5ZXiYsTeTEReq+4PNdwE1mPL67atjSJ/BtZjw/l4tXNLqc1
+        vUJ6fjygRIy/Iw8uPzVQEECKbcxQp8uKq8UfEdeBa7mZuFjn5pbi9q+WeLaq94oxBQHMBQWB+uKVty4n
+        NbxNXIzI+xVxOa7h1eJifJK4/1/L9cTFiYNdX1w+a4m1wWKVfhfr0sQjYnEHjMvT1E51czZgG9uYoU43
+        xF3EdeBaYuI659VPw7nlA+L2r5abi4u1JxQEMBcUBOqLq3utDBjfLS5G5FxQYjV1l+MaYmFDF+e3SUuv
+        Tnu99PQWl6ncRlw+a3mouDiX6iRxeZoaBQGk2MYMdboh4qrx+8V14lrm/gqme4vbr1pihe0l/NhTEMBc
+        UBBowyni8jK1U8XFh5yWnh1+obgYV+L1v+7vaon36bs4sV1LY70vSbxBzMW5VDGXcLma2ofcnA3YxjZm
+        qNMNdWtxnbiWKFDEVXYXa+suKq0t1riUQT8FAcwFBYE23E9cXqb2f8XFh3IxGfqcuPxOLe48+X5xca5c
+        SD4u7u9reI8seSG6IX5fXC5riKvhLsYlu5y4XE2NOwSQYhsz1OmGilv03yquI9dyV3Gxtu6Pxe1PLS8W
+        F2ePKAhgLigItOF4cXmZ2qfFxYdyfyYutzX8pbgYN91D3N/XcidxccJr5Xs8nCAuxqX7pLh8TYmCAFJs
+        Y4Y63S5+SlxHruWjMrdX5B0rLb3OKq5SXE1crD2iIIC5oCDQhkuKy8vUKAjs5sryVXG5nVqMAUoXdos7
+        IVt6ZDPuVOn51cRje6K4PNbAYoLem8Tla0oUBJBiGzPU6Xb1SnGduZa4ndPF2arniNuPWk4UF2evKAhg
+        LigItCHWVmlhIhkFcBcfysTz+i6vNTxKXIzb3ErcdmqJ11G7OHGkJ4vL4dQ+Ji4+tLGw4D+5ORuwjW3M
+        UKfb1Q+L68y1fELiOTsXa2tay11cpYhVtF2svaIggLmgINCOuDrvcjMlFhUcrpXHPkK89u0S4uLcJopS
+        bxC3vRrifLiIuFhxVq28upT1A7Z7nricTemtbs4GbGMbM9TpxtBSpT3MYXIVP+ivFRd/LY8VF2vPKAhg
+        LigItKOFgsD7xMWGg7U2mR763d9SUSM8XFycOKsWJpshe1fKkhwnN6vsOm7OBmxjGzPU6cbwA9LKu5nD
+        Z+Ti4mJtxc+Ji72WuEqxxNfPUBDAXFAQaMe/i8vNlN4oLjYcrKXb7eONARcQF2eJli7GfEG+XVycOFMr
+        BYFYnNLFh4m4ORkwlG3McJ10oKeJ+9Kp5RHi4mxBLAr0QXFx1xLvN3ax9o6CAOaCgkA7XF6m9nJxsWG7
+        1hbku6e4OEt9r7SyMGL4c3Fx4kytFARuIS4+TMTNyYChbGOG66QDxbPnLa2WH9XqbxMXa22/Ji7mWmLd
+        hW8RF2vvKAhgLigItCGu6Lq8TO1Z4uLDdi29si/WgIgChYszIybhbvs1RHEi3t7g4sQZWikIxCMnLj5M
+        xM3JgKFsY4brpDt4nLgvnloeLy7Omi4q/09cvLVEgcLFugQUBDAXFATaELdFu7xM7Y/FxQfvwhLFb5fL
+        Gm4vLs6suPDxeXGfUcNfi4sTZ2ilIBB3l7j4MBE3JwOGso0ZrpPuIJ5Bb+mH6SvS2qr5MYhzsdZymiz5
+        HcKtFASwu97fqUxBoA3XEZeXqS25kDvEQ8TlsYZ/kHOIi3OIeOTPfU4t1xYXJ9opCPT+e9k8NycDhrKN
+        Ga6T7uih4r58anmquDhrOFZaeqwi/JK4WJeCgkA/KAhMY+kFgbuIy8vUbikuPhzpMhKPEbo81nBjcXEO
+        Fa9ajgUK3WfVcIq4ONFOQeCy4uLDRNycDBjKNma4TrqjeBa9hVcyrcTbD1q5Neo54mKs5V1yTnGxLgUF
+        gX5QEJjG0gsCrTyzzS2/5Z4kLoc1vEpcjLtqaX2E8NPi4ly6VgoCNdeNit9qFxPO6lQ3bwMc25ihDrcP
+        9xfXuWuJL2AX55Rauc10Xbzr1MW6JBQE+kFBYBpLLgjEO+zjMSuXlynF43DnEhcjzur75Gvi8ljDD4uL
+        c1etvUHh7TLmYxG9oCBAQaAUBQEUs40Z6nD7EM+kf1RcB6/lmuJinUIMIl8vLq5aXisu1qWhINAPCgLT
+        WHJB4HricjK1t4iLD0d6kbgc1vACcTGO5VbiPreW24mLc8koCFAQKEVBAMVsY4Y63L7cTVwHr+VvxcU5
+        hVuLi6mmGNi6WJeGgkA/KAhMY8kFgZeIy8nU/kRcfDir64vLXw3x+GLcreDiHEtcfHiDuM+vYaxXK/aE
+        ggAFgVIUBFDMNmaow+1L3M7Y0u1rocZA9jzyz+LiqeVvxMW6RBQE+kFBYBpLLQjcVlw+avh5cTHiTDE5
+        fpO4/NXwFHFxji3eL+8+v5Z7iotzqSgIUBAoRUEAxWxjhjrcPt1GXCev5XXi4tyn+4qLpZa4SnFVcbEu
+        EQWBflAQmMYSCwK3kFbeEBPrB8Q79V2cONMviMtfDdF3Licuzn14obg4aviEXFBcnEtEQYCCQCkKAihm
+        GzPU4fYpFpSJhWVcR6/lJuJi3YeLSUtvXAhPFxfrUlEQ6AcFgWksqSAQfep/ictDLS8TFyvOFLepf1Bc
+        /mqIc9fFuS/xBoqvioulhgeJi3OJKAhQEChFQQDFbGOGOty+xft2XUev5W0y1cq3jxIXQy1xleJYcbEu
+        FQWBflAQmEaPBYF4j3sUcK8s8bq0B8jJEndUuRzUFI8uuH3Ame4lLnc1fEYuLi7OfWrl9Zjhs3IpcXEu
+        DQUBCgKlKAigmG3MUIebwqvFdfZaYpE/F+eYriit3GK68hhxsS4ZBYF+UBBA7+L261iXxvUPnCEmOp8U
+        l78afltcnPt2afmcuJhqYPxxBgoCFARKURBAMduYoQ43heuK6+y1xGKHR4mLdSzPFffZtUSF/lvFxbpk
+        FAT6QUEAvftNcX0DZ/oDcbmr4d/kAuLinMLviYurhrhAcgVxcS4JBQEKAqUoCKCYbcxQh5vKSeI6fC13
+        EhfnGK4j7jNrioGBi3XpKAj0g4IAevYROb+4voEzXFa+IC5/NfyquDinEov5RVHCxVbDieLiXBIKAhQE
+        SlEQQDHbmKEON5VY2b6l5zFPk/OKi3UX8aqj14v7zFriNlNWpfYoCPSDggB6djNx/QJnerK43NUQrxtu
+        4R38vyIuvlquJi7OpaAgQEGgFAUBFLONGepwU3qGuE5fSyw85OLcRaxP4D6rpvuIixUUBHpCQQC9eqK4
+        PoEz/YC0dNGhlcUfzyXvExdjDUt/SwYFAQoCpSgIoJhtzFCHm1I8P9bSq3DGfr4v7jiIqwLus2rZ150Q
+        vaAg0A8KAujRK6SFK82te7G4/NUQr1ue6m1GJW4pLs5ari8uziWgIEBBoBQFARSzjRnqcFN7vLiOX8sD
+        xcU5xK+L+4yafklcrDgDBYF+UBBAb14uNRelm4sbiMtfLfHqShdnLfEo4+vExVrDGyVicrH2joIABYFS
+        FARQzDZmqMNNLV6F09KiP5+Wi4iLNSPeMxzbcp9Ry7vknOLixRkoCPSDggB68iThzoDDxZX4t4jLYQ2v
+        FBdnba297elW4uLsHQUBCgKlKAigmG3MUIeroaXXAoWHiYsz40/EbbsmFqE6HAWBflAQQA9iEdjbiOsD
+        OFI8q+/yWMsPiYuzBS8QF3MN75V9v/65RRQEKAiUoiCAYrYxQx2uhrgi39LV9M9J3LngYi1xJfmKuG3X
+        8lpxseKsKAj0g4IA5uyLEoXli4o7/jjSeeRUcfms4fni4mzFlaWldZzuIi7OnrVSELiMuPimQEGgDAUB
+        FLONGepwtfymuBOglhiIuThL/G9x26zpeHGx4qwoCPSDggDm6KPyUNmlKL1UvyYupzXEGw6+V1ycLfkz
+        cfHXEH3/aHFx9qqVgkDN30sKAmUoCKCYbcxQh6vl/BI/Bu4kqOHL8h3iYj1Ia8/lhZPExYojURDoBwUB
+        zMUH5XHyE8I6L8PELc+fEpdfzMcDxB3fXrVSELiKuPimQEGgDAUBFLONGepwNd1d3ElQy5PFxblNrJIb
+        q+W6bdUSVylqftHPTSsFgVjHIga4GK6l13ztAwWBfsSCr4+WHxMKAsM8QlxuMS/x+OjFxB3jHrVSELiR
+        uPimQEGgDAUBFLONGepwNcUKynGlxJ0INcSzdfGMnYvV+UVx26npaeJihddKQeB3xMUHrFAQ6NO/yR/K
+        seKOO450OYk1F1w+MT+PFHece9RKQeCO4uKbAgWBMhQEUMw2ZqjD1XY7cSdCLc8WF+em80pLixmFeOzh
+        GHHxwqMggLmgINC3uLvrqUJh4HCRJ5dDzFO8inrII5tz1EpB4OHi4ptC3M3n7vJrxZvE5WxqFARQzDZm
+        qMPVFl8M7xB3MtRyNXGxrvt1cX9b0y4LIy4VBQHMBQWBZfiSPEjiDjrXD5buqhLFE5c7zNdfiDvevWml
+        IPAScfGhnddzUhBAMduYoQ7XgpuKOxlqebG4OFcuLi29NjF8Vi4lLl5sR0EAc0FBYFneLJcX1xeW7G/F
+        5Qvz9jWZw1sadtVKQeCT0vu6O0M9QVzOpkZBAMVsY4Y6XCteI+6EqCXeHuDiDHEl3v1NTXFFycWKg1EQ
+        wFxQEFiej8s1xPWHJfpxcXlCH+LKrDvuPWmlIBD4bvHicQqXr6lREEAx25ihDteK64k7IWp5pbg4v0ti
+        8UH3N7V8Qi4kLl4cjIIA5oKCwDKdLnGbvOsTSxJXM98uLkfoxw+LO/69aKkg8BBxMS7dY8Xla2oUBFDM
+        Nmaow7UkbtV3J0Ut7rUszxf3f2u6t2zGiTIUBDAXFASW62PyreL6xVLcXlxu0JdXizv+vXi6uP2u4SNy
+        lLg4lyzWV3D5mhoFARSzjRnqcC2JxfzcSVHLW+TssoqvtbsYwmlyHlnPI8pREMBcUBBYtnh2fv33aEnO
+        J/Fb5/KC/txEXD/owePF7XMttxUX51KdU+KuW5erqVEQQDHbmKEO15pnijsxarmlRFwxEGvlVSTrYkK7
+        mUOUoyCAuaAggHhNr+sbvbufuHygT++UXhe8+0Nx+1zLhyQKbi7WJfoJcXmqgYIAitnGDHW41lxRWnpG
+        /10SFcOoorp/r+kfhVVid0NBAHNBQQBxlXxpryO8qLT2Vh/s3x3E9Ye5a/GV1bGqvot1iU4Rl6MaKAig
+        mG3MUIdr0RPFnRy13E2iiur+raafEZc/lKMggLmgIIBwR3H9o1ePFJcH9C2KX+cV1yfmLO7ycftb293F
+        xbskdxaXm1ooCKCYbcxQh2vRZeQL4k6QGr5i2mqL1zS63CGHggDmgoIAwrY34PTo8vJlcXlA/+4jrl/M
+        2Q3E7WsLHiBLvev0ZtLadw0FARSzjRnqcK1q7Tmr1hwvLm/IoSCAuaAggJVLi+sjvWlpRXZMLxZ3+xZx
+        fWOujhG3r614lcQC3y72HsX6CQ+W/xCXj5ooCKCYbcxQh2vVxYTnBr2TxOUMeRQEMBcUBLASr+BzfaQn
+        x4nbdyxLTNZc/5ireM1fS+tkbfNCibc99LpmSRSa7imnitv/FlAQQDHbmKEO17IHijtJliyqmFcRly/k
+        URDAXLRSELixxGCqB/Fu/++U75d4rWwsHvsgiaLrp8TtfwseK66P9OQV4vYdy/I56e2OmHiLgtvXFsX3
+        4DPkrnJliUW23T61Lu4E+CG5r7xMviRuf1tCQQDFbGOGOlzLLiAfE3eiLNXTxOUKw1AQwFy0UhD4EXHx
+        9SYGvvG87/PF5aGmuK3XxdyLnxS331imPxXXT+bqRHH7OQdflLdJ7MMfyD0kXs/9o/Jf5FiJQuuq6Hph
+        cTkYKuYFsd2LSxRzw/fJVeW6EmsBnCCxHsLj5cXyQWnxkYDDvNPN2wDHNmaow7XuV8WdKEsUC57E82cu
+        TximlYIA9ieOsTv2c0NBoJ64K+J0cfmo4cPi4uxBLGr2DnH7jWWKW+zjldSuv8zRvcXtJ7Du9W7eBji2
+        MUMdrnXx/FLLz/hM6dHicoThKAj0j4LAuJZYEAhxBexr4nIytXjzjYuxB/FaRbfPWLZniesvc/SD4vYR
+        WPcKN28DHNuYoQ43B3cQd7IsyWflkuLyg+EoCPSPgsC4lloQCPHsvstJDT0u9hXP+f6LuP0Fri6u38xN
+        LCzIotk4zHPdvA1wbGOGOtwcxC2E/yjuhFmK3xWXG+yGgkD/KAiMa8kFgXhkq5VnUeM5WhfjnP2GuH0F
+        wsvF9Zs5ijse3D4CK49y8zbAsY0Z6nBzEQuFuBNmCeJdvBcUlxfshoJA/ygIjGvJBYHwBnF5mVpvBYFY
+        JIyrpjjMDcX1n7m5jbj9A1bu4eZtgGMbM9Th5uR14k6a3t1LXD6wOwoC/aMgMK6lFwQeKS4vU+utINBK
+        /0bb3iJnF9eH5iRWy49HQd0+AuF4N28DHNuYoQ43JzEQdSdNzz4kPT4r2goKAv2jIDCupRcE4pVWLi9T
+        66kgEK8qi7fouP0ENt1aXD+am78Qt39AfB8e7eZtgGMbM9Th5ual4k6eXsWCii4PGAcFgf5REBjX0gsC
+        NxKXl6n1VBB4prh9BJz3y7nE9aU5iXfnu/0DXuXmbMA2tjFDnW5ujhN38vTonRILKro8YBwUBPpHQWBc
+        Sy8IXFdcXqbWS0HgGuL2r6ZYt+eyEjleuu+VL4rLU013F9ef5uYl4vYPy3Y/N2cDtrGNGep0c/RscSdQ
+        b24qbv8xHgoC/aMgMK6lFwRauaoXkzUX39ycLG7/arqzuFiX6sHi8lTTRyWew3fxzsm1xO0fliveZHM5
+        N2cDtrGNGep0c/Rd8lVxJ1Iv/l7cvmNcFAT6R0FgXBQEfF6m1kNB4Mbi9q2mNwt35p3V0fJhcfmq6X+I
+        i3duni5u/7BML3LzNeAgtjFDHW+u/lzcidSLuC3V7TfGRUGgfxQExkVBwOdlanMvCBwl8Vic27eari0u
+        3qX7eXH5qunfJV5X6eKdk0sLr9zEynXdfA04iG3MUMebq3i+7wviTqa5e5G4fcb4KAj0j4LAuCgI+LxM
+        be4FgTuJ26+aniIuVpzhFHF5q+mPxcU6N78gbv+wLCe5uRpwGNuYoc43Z628D3pM8ezQD4jbX4yPgkD/
+        KAiMi4KAz8vU5lwQiFvQPyJuv2qJq82XEhcvzhBjk9Ye14zXs11OXLxz82Rx+4hl+Lxc0c3VgMPYxgx1
+        vjmLW8VOF3dizdVTxe0r9oOCQP8oCIyLgoDPy9TmXBB4oLh9quk+4mLFWT1GXP5q+ktxsc7NeeWN4vYR
+        /buHm6cBJWxjhjrg3P2WuBNrjqLSfXlx+4n9oCDQPwoC46Ig4PMytbkWBC4hcTXe7VMt75Ie3ms/hYtK
+        vJbR5bGWnu6sjPPjfeL2E/060c3RgFK2MUOdcO7itTMfF3eCzc2jxe0j9oeCQP8oCIyLgoDPy9TmWhD4
+        E3H7U9MNxcUK767i8lhTT2svfbu8X9x+oj+vkHO7ORpQyjZmqBP24F7iTrI5+axcUtz+YX8oCPSPgsC4
+        KAj4vExtjgWBK0rcCef2p5bniosV251T3iounzUdLy7eOYqiQNy54vYT/ThJjnbzMyDDNmaoI/bg3HKa
+        uJNtLn5X3L5hvygI9I+CwLgoCPi8TG2OBYHniNuXWuJNRb0sSDe164jLaU2vERfrXF1YXipuXzF/8Zt+
+        lJubAVm2MUOdsRdzntjF83gXFLdf2C8KAv2jIDAuCgI+L1ObW0HgWuL2o6bfFhcrypwoLq813UxcrHMV
+        d2PEBaOvidtfzM+/yk3dnAwYyjZmqFP2Ir4053p7VTzy4PYJ+0dBoH8UBMZFQcDnZWpzKwi8Stx+1PLP
+        cj5xsaLMZSQed3T5rSXGgUeJi3fOoqD2j+L2GfMQj0vFGioXETsnA4ayjRnRKTtyc3EnYctOlXjkwe0P
+        9o+CQP8oCIyLgoDPy9TmVBC4qbh9qCnGCy5W5NxfXH5rOkFcrHMXY8V7y6fE7TfaFI8mPUGOkW8eTzcn
+        A4ayjRnrnbMDZ5fXizshW3V7cfuCaVAQ6B8FgXFREPB5mdpcCgJxtfbd4vahlngu28WKvPNIayvif1h6
+        vvsj1haIQkzceu72H234B4kCzsXkiOPo5mTAULYxw3XSmbu+uBOzRe+Qc4jbD0yDgkD/KAiMi4KAz8vU
+        5lIQuIu4+GuJ23a/W1ysGObG4nJd0/3ExdqTuGPgF+VlwhoD9X1R4hWCvyGHfse4ORkwlG3McJ20Ay8X
+        d7K25ibi4sd0KAj0j4LAuCgI+LxMbQ4FgQvIR8XFX8sfiosVu/kbcfmuJW6rn9s6G7u4tPyyvEBOF5cT
+        jOvjEncbPVRuIKm7UtycDBjKNma4TtqBa4g7eVvyanGxY1oUBPpHQWBcFAR8XqY2h8nOb4mLvZYoTlxI
+        XKzYzZUk7r5wea/lYeJi7V0ssn2c3FkeL68UHi8YJu68iLW+/k7+XOJRjbiYFwtqutwXc3MyYCjbmOE6
+        aSfiGasYMLXqvOLixrTiljt3fNCPXhbtjKsPbv+m1uMK3hkx2HZ5mVqsmePia0ncIeBir+VocXFiHPH6
+        ZJf3Wnid81lF/4/CzfFya7mPPFyeJM+Uk+QUeZt8QKKI8Ok1c30sIe6YWO3DaRJrmrxJTpbnydPlsfJA
+        iUecYsHRa8uxsrfxg5uTAUPZRgAAAAAA0DfbCAAAAAAA+mYbAQAAAABA32wjAAAAAADom20EAAAAAAB9
+        s40AAAAAAKBvthEAAAAAAPTNNgIAAAAAgL7ZRgAAAAAA0DfbCAAAAAAA+mYbAQAAAABA32wjAAAAAADo
+        m20EAAAAAAB9s40AAAAAAKBvthEAAAAAAPTNNgIA0Lp3nO1sADBHd5b/Lk+Qrx/iAxL/NxwjbntTmnPs
+        LTlOVrn5lLj8rVvP5XHuNxEYyjYCANA6DYp29SZxA6+DPEvctsYQ23afOUQM1leDx4uI+7yxDcnnuhgU
+        u+0eZtfPDTHJcds+TOaY/a24bZQY0jcyE7CYnLhtbIr+5P5+KmMc613ssv+3kjHO8dXE0H3Gvswp9oeJ
+        +2xnl3NyiPgujv0vKQCUiG0d434fgQzbCABA6zQQ2kVm0Lhu6KS1xFiDRCe2HYPHfRYHxog/JqZu29vE
+        PrntZGU/dyUmOG57zi4ToSG5jaKQ25ZTmseheRpD9F0X05SG7P8NZF+FjKGFrFJzjD0T7y7nZFbsr4th
+        DE9wv5FAKdsIAEDrNAgaqvRq6Db7mBTF1Vz3Wfuwj0HwrjldyUwSxvrMoUWe7AQ1rrK67Rxml/2MCZ3b
+        5qaSq79D8zSWyJ+LaypD9r/ktvpdxVXufRT65hj7VOdkRsQU++k+f0xRnORRAgxiGwEAaJ0GP0Nlruo6
+        +5hQTz3ZiatoYz7TW3qF+TBx54bbvjPWlcuYDLvtHyZ7zIZOfHbpG6W3RJfcgTA0T2MZelfPWDL7H8d6
+        X1fWnfhOG+t8nnPsU52TpabOZZzHFAWQZhsBAGidBj5DjDGpyExaS9WY7Iw5EB/j+eIQg2e3/U1jFSDC
+        0AJP5piV7peza9847Cpo6R0I+yiEZexayNtV6d0rQyeBMZmLHIch51N85q4T3DnHHqY6J0sNyUX8zSqX
+        Q45FnCcXcb+ZwDa2EQCA1mnQkzXWLeb7GEhmBn4x6F0NGHcZOIZvDB7FxZRRcoW5RGzHbX/dWMdxJbbn
+        Pucw2WPmtlFi6LFdiWPstrsS/cf93aaheRrLZp/fJlM4iNy6bTil50n2eMVdHNtymy0G7dLPwpxjD1Od
+        kyXicR33udscFE82l6wpgBTbCABA6zToyRrzCuMYk+iV2Jb7DOewCXNMXLKT87gi5bZVauoJ+q4T5HUl
+        BQgnc8zCYVfpt8l+zjbRL9z2Q8mz4kPzVEOm/x+UlyH2MQnO3gY/9K6fOccepjonS2XuDijph9kCA48O
+        oJhtBACgdRrwZGQHu4cZczCZGTSXTN5jYJxdxGqX/YnBrNvmUAfdmj32Z5U+Y78pO9GJY+K2c5js52wT
+        k+RtMZQUWHYtGk0lW5w6rPiUkT1WJRPqlcwCf5m3S6zMOfaVqc7JUpkCdGksB33/Re7i31d4HSGK2UYA
+        AFqnAU+p0klC5spiZkB8mEyxIgZ6bhubYoCZvXXabadE6ZWw0vxuy+3YdyKEoccxc8x2yW3mcw7j9jX6
+        ifu/m0r7XW2ZV7uNeddD9nyL/+u2s02m72f3a86xr5vqnCzlPneb0jsj4lgx6cfobCMAAK3TYKhE6WA3
+        BqKZWzLHHFCWXKFdyVzRzL73OrPtdSXxx/8pLRxsy23J52SuRoa4qug+6zCZYza06BAyn1Nic+JRelV1
+        aJ6mlpkUDr07xInJmfuMbTKv11wpLaiFzLk859jXTXVOlnKfu03Ennpcwv0mAkPZRgAAWucGSUbpBGE1
+        yM0MXKPYsPl5WbENt20ne/Uss+0QEwO3nYOUfkYch9KJh9vPkr+NCV52cjPkGGbzOnQynf2cEpu3/pee
+        H0PyVEOtSeE+r7CvZPYt0+fmHPu6zHf3FAWuzD6vxPkZ32FRnHbb/Cb3mwgMZRsBAGidGyRtKL3iv36l
+        cIqB67rYhtu2M+Q57n1PkErjj/+XuXV4/Sphyd/FZCCusJXehRAiN+v7UipzzMLQyXTp52T2OaxPNkr6
+        x9A8TW2qQs2m7GJvQwpvIbMuSOlV/DnHvi7z3RKmKHBli5PbxPkX2wrfjNv9JgJD2UYAAFq3GhhtEQOn
+        0itf67dqll4xDWNcYcx83pDBeGYgPqTgUBr/aiDr/s1ZnxSUTFpXuclcJRx6/DID/aFXVEMmt5njvCqA
+        xd+5f980Rj+fwlSFmk2ZczgM/dzMlfzS74o5x75uqnMyI3KV+T7K+MYCgu53ERjCNgIA0DoNiA5SOtDd
+        HHxmJhVjXDnNXN0d8mztkIliRslkfX0AXvL/w2oSWjLQX8WdvUo49Apx5pgNKbKslORq1QezV3qj4FLa
+        18e6kr5vmcntGOfuSmmfDrt8bmZyWXqVfc6xr5vqnMzKnpdDRL+/iPuNBErZRgAAWqdB0DalgzB3pWjq
+        W09LB8rx/9zfHyYz4M8OlGPf3XY2rW+3dNIWcWceFYhtZ64ShiEFlpCZ3Ay52rlS8jnruc0sqBh9vzRf
+        u/bxqWT6+qrgNIZMfxj6uaXn2krppHrOsa+b6pwcIn6PMvENEdu/gfudBErYRgAAWqcBkBODz9LbU2Og
+        5raRGbwNnVSGTPFh6NU5t61tsu8AL73CvD4AL/2bOAYlE7z1bWcmxLH91d9lZAtGQ/tH6ees738URsae
+        eAztd1PLTjrHuush+7lDJ6Ol583Ktu+2dXOOfd1U5+SuSouhu6AogEFsIwAArdPgxykddB00+c3cfjp0
+        kBzib902nSFX57ID8ey+lOZ6fQAek1b3f4bYfMQhc4V46G3DmWM2tOgQSj9nc3KTia9Ept9lHk9xsv1v
+        XXZSGJNht52sbH/OTnZXspPJkv2bc+zrpjonxxLxZnNSKvaPxweQZhsBAGidBj6bMlefDxp0ZgZrQyeW
+        IVN4GHJFM3PFPGSvnJXE7wbg0eb+b0ZsY/WoQJjqamfmmO27b7jcRh5K75Apkel3ux7XXa7c1poUTjWp
+        zuS29K6OOce+bqpzcl+i745ZJGCxQaTZRgAAWqeBz7qxJ0KldplcZAbK2atm8f8z23frKRymZPtuAJ4Z
+        wG+zOaHP3g0xdPKZyenQokMYmtsQz2C7/z9Eab/LXqF3sn18Xa1JYcTsPmOb9SJWqZiIu21tU9rv5hz7
+        uqnOySnF+RSxZu56WnmT+70EDmIbAQBonQY+67JXw8c0ZHKZmUANuWqWzUd2oFwav9tutLn/W8q9DSFz
+        dS0mEJt/XyI76R3SL8IuuV0ZMpHYlOl3ux7TIX18Xc1JYeazh1xlzxbQMhP3Occepjona8oWVT7gfi+B
+        g9hGAABap4HPSvbq8NiGTDAyE6iY7LptbJMdJMekIHt1tjR+NwDPDnDXRaxu0pCZAA+9Qpw5ZhGn20aJ
+        XXK7skuOVzL9Ljvx25Tt4+tqTwozfS/7XRF93W1nm4PWRnHmHHvIfPfvck4eJvY18uNs3rk25Psn9TjB
+        5m8lcBjbCABA6zTwCTGRrfGowLohA7zMBCrzHHdMdjJX/cI+3/vt/jZ7q/K6GGDvur2hk8/MMRvSJ1ZK
+        P+ewIs6ud81k+l30oc2JUMYuk/T4exe/s49JYebz3d0tB8ku1Ji9wj7n2ENmorzLOXmYbFFqn8eJOwSQ
+        ZhsBAGidBj6h5qMCK0MmGZlJe+nV+9RVpP80dJBcEv9Bt4FnrkyubJuQZK+GZya66zKFpxjAu22U2DW3
+        K9krtJtK+11tUxVqtsnmufTW++z5PKTPzTn2sM87HLIy3w8l5++6THHlWe73EjiIbQQAoHUa+GRuF40B
+        agwIS2ULDZkrnJlB+EEDxxicR6yZCdG62PaQSV/p1bDIufv7kJ0wxCR521W1yIH7m22G7HP8jdvWNkOL
+        DmPkdl02NyvZCUtNUxVqDpL5voi+fNjEOntO71LomGvsU52TpbLnWkzyt32nrcv+Ft3Z/V4CB7GNAAC0
+        TIOeGAyWTgSGDDizg83MRCNTyNiXocWAUDrwPWgAns3BQY81ZCYgQye62Xhr5nZdxFFyx8Gm0oJDbdnz
+        tPQKd1bEkX10KSZ668cxikFx/LPHa5dzOcw19uw5uauSR6uyeQyRy83fjygURFt2e7xhAIPYRgAAWqaB
+        T+kkMAaoJVdhnBisum06maJD9ur42IZekVspjf+ggX7plfBwWLyZScjQiW7mmA0tOoQxcrtpyGsISwsO
+        tWUnhbtMnA8TfXpI8WUXuxYDVuYY+9Tfo5EjF8e6zPfa2OL4Hed+L4HD2EYAAFqlQU9mErB55SUjc6tm
+        ZhKYKTSMKa42jTHRK4m/JB8lE5D4PwcVdLID8KH7nzlmQ4sOYazcbsrEH/Y5cR7TVIWaUlNOrOOW8zGP
+        09xiz/bpXWT6TtyFMlUeV+LzKAZgMNsIAECLNOiJQWTpYCsmwJuDtYwoJrjtblMywI3/4/52nyJfuxRG
+        1pXGXzIpLrnL47DbdPdxjDZlj9nQosOYud0UkxS3LWeKifNYMpPCXQo1GVHAyiwCN0TJ7etDzCX2qb9H
+        s31nijyuxOcc434vgVK2EQCAFv3n4McNipxdnxfOXn0uGegOuX17iFURYIw7AtaVxl/yuYdN5ksebSgp
+        KqxETtw2DhP74ra3zZCiQxgzt05prqaaOO9qqkLNUPF5Y1/FjnNmaP/KaD327Dm5q6F9J/5uX4WBOD63
+        cr+TQJZtBACgRRoAxaCyxBhXoYLb9jYlBYj4P+5vx+I+c0yl8ZcM/KPg4v52pWTthzjO7m+doX3isDg3
+        uW2UGDO3TuTTbW9T7K/7+9ZEHlz820wxkXZWx9VN6kpEgWas77OsVmPPnpO72rXvrPpqpoDpRBEgtsPj
+        ARiVbQQAoHUaFAHA3JQUfoZekd63OcfemsiTy59zxN+730RgKNsIAAAAAAD6ZhsBAAAAAEDfbCMAAAAA
+        AOibbQQAAAAAAH2zjQAAAAAAoG+2EQAAAAAA9M02AgAAAACAvtlGAAAAAADQN9sIAAAAAAD6ZhsBAAAA
+        AEDfbCMAAAAAAOibbQQAAAAAAH2zjQAAAAAAoG+2EQAAAAAA9M02AgAAAACAvtlGAAAAAADQs6+f7f8D
+        B3v2d44WCwAAAAAASUVORK5CYII=
+</value>
+  </data>
+  <metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAABAAEAYGAAAAEAGACocAAAFgAAACgAAABgAAAAwAAAAAEAGAAAAAAAgHAAAMQOAADEDgAAAAAAAAAA
+        AAB6TSF6TSFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRF6TSF6TSF6TSF6TSFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRF6TSF6TSFnNQJnNQJmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBnNQJnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBtPAttPAtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBtPAtt
+        PAtwQRFwQRFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwDLv7j////////////39fR0
+        SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////////////////////////////
+        //+AXUJmMwBmMwBmMwBmMwDUy8X///////////90SSZmMwBmMwBmMwBmMwBmMwDu6+n///////////+A
+        XUJmMwBmMwBmMwDd1tH///////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////39fRm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwC3p5zd1tH////////////39fS3p5x0SSaYfWv////Uy8VmMwBmMwBm
+        MwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwDm4N3////////////////Lv7hmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwD///////////////////////////////////////////////+jjH1mMwBmMwBm
+        MwBmMwC3p5z///////////+jjH1mMwBmMwBmMwBmMwCYfWv////////////Uy8VmMwBmMwBmMwBmMwCA
+        XUL39fT////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////Uy8VmMwBmMwBmMwBmMwBm
+        MwCMblju6+n////////////////////////////////d1tH////39fRmMwBmMwBmMwBmMwBmMwBwQRFw
+        QRFwQRFwQRFmMwBmMwBmMwBmMwD///////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwDm4N3////////////////////////////////////////////Bs6pmMwBmMwBmMwBmMwCMblj/////
+        ///////Bs6pmMwBmMwBmMwBmMwDLv7j///////////+jjH1mMwBmMwBmMwBmMwBmMwC3p5z/////////
+        //+YfWtmMwBmMwBmMwBmMwBmMwDLv7j///////////+3p5xmMwBmMwBmMwBmMwB0SSbu6+n/////////
+        ///////////////Lv7jd1tH///////////////+jjH1mMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBm
+        MwBmMwCMblj////////////u6+n////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////
+        //+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////m4N1mMwBm
+        MwBmMwB0SSb39fT////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////////////
+        //////////////////////////+MblhmMwBmMwBmMwBmMwC3p5z///////////////+tmo1mMwBmMwBm
+        MwBmMwDBs6r////////////Bs6pmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwCtmo3/////
+        //////+3p5zUy8X///////+3p5xmMwBmMwBmMwBmMwBmMwBmMwCjjH3////////////Uy8VmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3////////39fRmMwBmMwBmMwCtmo3/////
+        //////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////////////////////////////////
+        //////////90SSZmMwBmMwBmMwBmMwDd1tH///////////+3p5xmMwBmMwDUy8X/////////////////
+        ///////m4N1mMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwDBs6r///////////+jjH2AXUL/
+        ///////39fSAXUJmMwBmMwBmMwBmMwBmMwB0SSb////////////////////////////////////////m
+        4N1mMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////////////////////////////+3p5xmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////////////////////////m4N1mMwBm
+        MwBmMwBmMwBmMwDd1tH///////////+tmo1mMwBmMwC3p5z///////////////////////////+AXUJm
+        MwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwDm4N3///////////90SSZmMwDBs6r////////Uy8Vm
+        MwBmMwBmMwBmMwBmMwBmMwD39fT///////////////////////////////////////9mMwBmMwBmMwBm
+        MwBmMwBmMwCjjH3///////////////////////////////////////////////+3p5xmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwDu6+n////////Lv7hmMwBmMwC3p5z////////////Bs6pmMwBmMwBmMwBmMwBmMwDU
+        y8X////////////Bs6pmMwBmMwCYfWv///////////////////////////+3p5xmMwBmMwBmMwBwQRFw
+        QRFwQRFwQRFmMwBmMwBmMwD39fT////////39fRmMwBmMwB0SSb39fT///////+jjH1mMwBmMwBmMwBm
+        MwBmMwDUy8X///////////////////////////////////////+MblhmMwBmMwBmMwBmMwBmMwCAXUL/
+        //////////////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwCY
+        fWv///////////+MblhmMwDLv7j///////////+jjH1mMwBmMwBmMwBmMwBmMwC3p5z////////////u
+        6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBm
+        MwCMblj////////////d1tFmMwBmMwBmMwCtmo3////////u6+lmMwBmMwBmMwBmMwBmMwC3p5z/////
+        ///////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT////////m4N1m
+        MwBmMwBmMwBmMwBmMwC3p5z////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////d
+        1tFmMwDm4N3///////////90SSZmMwBmMwBmMwBmMwBmMwCAXUL///////////////+3p5xmMwBmMwBm
+        MwBmMwBmMwDBs6r////d1tG3p5yMblhmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwCjjH3/////////
+        ///Bs6pmMwBmMwBmMwBmMwDm4N3///////+3p5xmMwBmMwBmMwBmMwCMblj////////////m4N1mMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////90SSZmMwBmMwBmMwBm
+        MwCjjH3///////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbu6+n///////+3p5z/////////
+        ///39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////Bs6p0SSZmMwBmMwC3p5z/////
+        ///////39fR0SSZmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwDBs6r///////////+3p5xmMwBmMwBm
+        MwBmMwCYfWv///////////+AXUJmMwBmMwBmMwBmMwD/////////////////////////////////////
+        //////////+jjH1mMwBmMwBmMwBmMwC3p5z/////////////////////////////////////////////
+        ///d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3////////////////////////Uy8VmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////////////////////////+3p5xmMwBm
+        MwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwDUy8X///////////+MblhmMwBmMwBmMwBmMwBmMwDLv7j/
+        ///////d1tFmMwBmMwBmMwBmMwDm4N3///////////////////////////////////////////+3p5xm
+        MwBmMwBmMwBmMwCMblj////////////////////////////////////////////u6+mAXUJmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwC3p5z////////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBwQRFw
+        QRFwQRFwQRFmMwBmMwD39fT///////////90SSZmMwBmMwBmMwBmMwBmMwCAXUL///////////+3p5xm
+        MwBmMwBmMwDBs6r////////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwB0
+        SSb////////////////////////////////////m4N23p5x0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwCAXUL39fT///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCA
+        XUK3p5zm4N3///////////////+3p5yMblhmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFw
+        QRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFtPAttPAtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBtPAttPAtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBnNQJnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNQJnNQJ6TSF6TSFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRF6TSF6TSF6TSF6TSFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
+        QRFwQRFwQRFwQRFwQRFwQRFwQRF6TSF6TSH/////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////R0e+rq+Krq+Krq+Krq+LR0e//////////////////
+        //////////+rq+Krq+Krq+Krq+Krq+Ld3fP////d3fOrq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Kr
+        q+K4uOb////////////////////////////d3fOrq+Krq+Krq+Krq+L////////////////Fxeqrq+Kr
+        q+Krq+L////////////p6ferq+Krq+Krq+Krq+Krq+L///////////////+4uOarq+Krq+Krq+Krq+Lp
+        6ff///////////+4uOarq+Krq+Krq+LR0e////////////////////////+rq+Krq+Krq+Krq+LR0e//
+        ///////////////////////FxeoDA70DA70DA70DA71sbND///////////////////////////8DA70D
+        A70DA70DA70DA73Fxer////R0e8DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72Ojtn0
+        9Pv////////////////R0e8DA70DA70DA70DA73p6ff///////////9ZWcsDA70DA70DA73R0e//////
+        ///d3fMDA70DA70DA70DA70DA7309Pv///////////9+ftQDA70DA70DA70DA72rq+L///////////9+
+        ftQDA70DA70DA72Ojtn////////////////////R0e8DA70DA70DA70DA72Ojtn/////////////////
+        //////////9sbNADA70DA70DA70DA73R0e/////////////////////p6fcDA70DA70DA70DA70DA73p
+        6ff////09PsDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71ERMfd3fP/////////
+        ///09PsDA70DA70DA70DA73Fxer///////////8pKcIDA70DA70DA71sbND///////////8pKcIDA70D
+        A70DA70DA73R0e////////////+dnd0DA70DA70DA70DA72dnd3///////////+dnd0DA70DA70DA71Z
+        Wcv///////////////////+OjtkDA70DA70DA70DA71ZWcv////////////////////////////R0e8D
+        A70DA70DA70DA71+ftT////////////////////R0e8DA70DA70DA70DA70pKcL///////////9ERMcD
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70pKcLp6ff///////////9ERMcDA70D
+        A70DA72rq+L////////p6fcDA70DA70DA70DA70DA73R0e////////9ZWcsDA70DA70DA70DA72rq+L/
+        //////////+4uOYDA70DA70DA70DA71sbND///////////+4uOYDA70DA70DA70DA73/////////////
+        ///09PsDA70DA70DA70DA70DA70pKcL///////////////////////////////9sbNADA70DA70DA70D
+        A72rq+Krq+Krq+Krq+Krq+J+ftQDA70DA70DA70DA71ZWcv///////////9+ftQDA70DA70DA70DA73F
+        xer////////d3fOOjtkDA70DA70DA70DA70DA71sbND///////////9+ftQDA70DA70DA71+ftT/////
+        ///FxeoDA70DA70DA70DA70DA71sbND///////+dnd0DA70DA70DA70DA72dnd3////////////d3fMD
+        A70DA70DA70DA70pKcL////////////d3fMDA70DA70DA70DA73d3fP///////////+rq+IDA70DA70D
+        A70DA70DA70DA73d3fP////////////////////////////R0e8DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA72Ojtn///////////+dnd0DA70DA70DA70DA72rq+L/////////////
+        //+rq+IDA70DA70DA70DA70DA73R0e////////+dnd0DA70DA70DA71ZWcv///////+rq+IDA70DA70D
+        A70DA70DA70DA73R0e////+rq+IDA70DA70DA70DA71sbND///////////////8DA70DA70DA70DA70D
+        A73p6ff////////09PsDA70DA70DA70DA73Fxer///////////9ERMcDA70DA70DA70DA70DA70DA73F
+        xer///////////////////////////////9sbNADA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA72rq+L///////////+4uOYDA70DA70DA70DA72Ojtn///////////////////9ZWcsDA70D
+        A70DA70DA71+ftT////////FxeoDA70DA70DA70DA73///////+OjtkDA70DA70DA70DA70DA70DA71s
+        bND////R0e8DA70DA70DA70DA70pKcL///////////////9ZWcsDA70DA70DA70DA73Fxer/////////
+        //9ZWcsDA70DA70DA72rq+L////////FxeoDA70DA70DA70DA70DA70DA70DA72rq+L/////////////
+        ///////////////////R0e8DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA73Fxer/
+        ///////////d3fMDA70DA70DA70DA71ZWcv///////////////////+rq+IDA70DA70DA70DA70DA730
+        9Pv////d3fMDA70DA70DA70DA73d3fP///9ZWcsDA70DA70DA70DA70DA70DA70DA73R0e/09PsDA70D
+        A70DA70DA70DA73p6ff///////////9+ftQDA70DA70DA70DA72rq+L///////////9+ftQDA70DA70D
+        A71+ftT///////9sbNADA70DA70DA70DA70DA70DA70DA71+ftT/////////////////////////////
+        //////9sbNADA70DA70DA70pKcL09Pv///////8DA70DA70DA70DA70DA73p6ff///////////////8D
+        A70DA70DA70DA70pKcL////////////////////09PsDA70DA70DA70DA70DA73d3fP///////8DA70D
+        A70DA70DA724uOb///8pKcIDA70DA70DA70DA70DA70DA70DA71sbND///8pKcIDA70DA70DA70DA73F
+        xer///////////+rq+IDA70DA70DA70DA72Ojtn///////////+rq+IDA70DA70DA71ERMf////p6fcD
+        A70DA70DA70DA70DA70DA70DA70DA71ZWcv////////////////////////////////////R0e8DA70D
+        A70DA70DA724uOb////d3fMDA70DA70DA70DA70pKcL///////////////////9ZWcsDA70DA70DA70D
+        A73d3fP///////////////////8pKcIDA70DA70DA70DA73Fxer///////9ZWcsDA70DA70DA72dnd3p
+        6fcDA70DA70DA70DA71ZWcsDA70DA70DA70DA73p6fdsbNADA70DA70DA70DA72rq+L////////////F
+        xeoDA70DA70DA70DA71ZWcv////////////FxeoDA70DA70DA70DA7309Pudnd0DA70DA70DA70DA70p
+        KcIDA70DA70DA70DA7309Pv///////////////////////////////////9sbNADA70DA70DA71ERMf/
+        ///FxeoDA70DA70DA70DA71ZWcv///////////////////9+ftQDA70DA70DA70DA73Fxer/////////
+        //////////9ERMcDA70DA70DA70DA724uOb///////+OjtkDA70DA70DA71+ftTFxeoDA70DA70DA70D
+        A724uOZsbNADA70DA70DA72Ojtmdnd0DA70DA70DA70DA72Ojtn////////////d3fMDA70DA70DA70D
+        A70pKcL////////////d3fMDA70DA70DA70DA73R0e8pKcIDA70DA70DA70DA72rq+IDA70DA70DA70D
+        A73d3fP////////////////////////////////////R0e8DA70DA70DA70DA73Fxeqrq+IDA70DA70D
+        A70DA72Ojtn///////////////////+rq+IDA70DA70DA70DA72rq+L///////////////////9ERMcD
+        A70DA70DA70DA73Fxer///////+rq+IDA70DA70DA71ERMerq+IDA70DA70DA70DA73d3fPR0e8DA70D
+        A70DA70DA72rq+IDA70DA70DA70DA71ZWcv///////////////8pKcIDA70DA70DA70DA73d3fP/////
+        //////8DA70DA70DA70DA71+ftQDA70DA70DA70DA71ERMf///8pKcIDA70DA70DA724uOb/////////
+        //////////////////////////////9sbNADA70DA70DA71sbNCdnd0DA70DA70DA70DA72rq+L/////
+        ///////////////FxeoDA70DA70DA70DA71+ftT///////////////////8DA70DA70DA70DA70DA73d
+        3fP////////FxeoDA70DA70DA70DA71sbNADA70DA70DA70DA7309Pv///9sbNADA70DA70DA71ZWcsD
+        A70DA70DA70DA70pKcL///////////////9ZWcsDA70DA70DA70DA73Fxer///////////9ZWcsDA70D
+        A70DA70DA70DA70DA70DA70DA72rq+L///9ZWcsDA70DA70DA72dnd3/////////////////////////
+        ///////////////FxeoDA70DA70DA70DA70pKcIDA70DA70DA70DA73Fxer////////////////////p
+        6fcDA70DA70DA70DA71ZWcv///////////////+4uOYDA70DA70DA70DA70pKcL09Pv////////p6fcD
+        A70DA70DA70DA70DA70DA70DA70DA71ERMf////////R0e8DA70DA70DA70DA70DA70DA70DA70DA70D
+        A73d3fP///////////+OjtkDA70DA70DA70DA72rq+L///////////+OjtkDA70DA70DA70DA70DA70D
+        A70DA70DA73p6ff///+dnd0DA70DA70DA71sbND/////////////////////////////////////////
+        //9ERMcDA70DA70DA70DA70DA70DA70DA70DA73p6ff///////////////////////8pKcIDA70DA70D
+        A70DA73////////////p6fdERMcDA70DA70DA70DA72Ojtn///////////////8pKcIDA70DA70DA70D
+        A70DA70DA70DA71sbND///////////9sbNADA70DA70DA70DA70DA70DA70DA70DA73Fxer/////////
+        //+rq+IDA70DA70DA70DA71+ftT///////////+rq+IDA70DA70DA70DA70DA70DA70DA71+ftT/////
+        //+rq+IDA70DA70DA70pKcL///////////////////////////////////////////+4uOYDA70DA70D
+        A70DA70DA70DA70DA70pKcL///////////////////////////9ZWcsDA70DA70DA70DA72dnd2rq+Kd
+        nd0DA70DA70DA70DA70DA70DA73p6ff///////////////9sbNADA70DA70DA70DA70DA70DA70DA72d
+        nd3////////////R0e8DA70DA70DA70DA70DA70DA70DA70DA72rq+L////////////FxeoDA70DA70D
+        A70DA71ZWcv////////////FxeoDA70DA70DA70DA70DA70DA70DA73R0e/////////R0e8DA70DA70D
+        A70DA7309Pv///////////////////////////////////////////9ERMcDA70DA70DA70DA70DA70D
+        A71ZWcv///////////////////////////+OjtkDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA72rq+L///////////////////+dnd0DA70DA70DA70DA70DA70DA70DA72rq+L/////////////
+        //9sbNADA70DA70DA70DA70DA70DA70DA71+ftT////////////p6fcDA70DA70DA70DA70DA73/////
+        ///////p6fcDA70DA70DA70DA70DA70DA71ERMf////////////09PsDA70DA70DA70DA73Fxer/////
+        //////////////////////////////////////+4uOYDA70DA70DA70DA70DA70DA72Ojtn/////////
+        //////////////////+rq+IDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72rq+L/////////
+        //////////////+rq+IDA70DA70DA70DA70DA70DA70DA73R0e/////////////////R0e8DA70DA70D
+        A70DA70DA70DA70DA71ZWcv///////////////8pKcIDA70DA70DA70DA73d3fP///////////8pKcID
+        A70DA70DA70DA70DA72rq+L///////////////9ERMcDA70DA70DA72rq+L/////////////////////
+        //////////////////////////9ERMcDA70DA70DA70DA70DA72rq+L/////////////////////////
+        ///FxeoDA70DA70DA70DA70DA70DA70DA70DA71ERMerq+Ld3fP////////////////////////////d
+        3fMDA70DA70DA70DA70DA70DA70DA73p6ff///////////////////9sbNADA70DA70DA70DA70DA70D
+        A70DA73///////////////9sbNADA70DA70DA70DA724uOb///////////9ZWcsDA70DA70DA70DA70p
+        KcL09Pv///////////////9+ftQDA70DA70DA72Ojtn/////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////////////////////////////////////////////////////////////8AAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAA=
+</value>
+  </data>
+</root>
\ No newline at end of file
diff --git a/UID/Mitarbeiter/frmMitarbTimas.vb b/UID/Mitarbeiter/frmMitarbTimas.vb
new file mode 100644
index 0000000..6c6fb2d
--- /dev/null
+++ b/UID/Mitarbeiter/frmMitarbTimas.vb
@@ -0,0 +1,315 @@
+
+Imports System.DirectoryServices
+Imports System.Globalization
+Imports System.IO
+Imports System.Net
+Imports System.Net.Http
+Imports System.Net.WebRequestMethods
+Imports System.Security.Policy
+Imports System.Text
+Imports System.Text.RegularExpressions
+Imports System.Windows
+Imports System.Windows.Forms.VisualStyles.VisualStyleElement.StartPanel
+Imports DAKOSY_Worker.DEERRE
+Imports DocumentFormat.OpenXml.Spreadsheet
+Imports GrapeCity.ActiveReports.ReportsCore.Tools
+Imports itextsharp.text.pdf.codec.wmf
+Imports Microsoft.VisualBasic.ApplicationServices
+Imports Newtonsoft.Json
+Imports VERAG_PROG_ALLGEMEIN
+
+Public Class frmMitarbTimas
+
+    Public mid As Integer = -1
+    Public isUpdate As Boolean = False
+    Dim emp As cTimasEmployee
+    Dim timas As cTimasAPI
+    Dim dtTimas As New DataTable
+
+    Sub New()
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+
+    End Sub
+
+
+    Private Sub frmMitarbDetails_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+
+        txtPwd.Visible = False
+        cbxEinsteigsDat.Checked = False
+        cbxGebDat.Checked = False
+
+
+        txtGebDat.Format = DateTimePickerFormat.Custom
+        txtGebDat.CustomFormat = "dd.MM.yyyy"
+        datGekuendigtAm.Format = DateTimePickerFormat.Custom
+        datGekuendigtAm.CustomFormat = "dd.MM.yyyy"
+        datEinstiegsdatum.Format = DateTimePickerFormat.Custom
+        datEinstiegsdatum.CustomFormat = "dd.MM.yyyy"
+
+
+        If mid > 0 Then
+            initMitarbeiter(mid)
+        Else
+            MsgBox("Fehler beim Laden der Daten!")
+        End If
+
+    End Sub
+    Private Sub initMitarbeiter(Optional _isUpdate As Boolean = True)
+        timas = New cTimasAPI
+        emp = timas.getEmployee(mid)
+
+        timas.getAllGroups(dtTimas)
+
+        initDGV(dtTimas)
+
+        isUpdate = _isUpdate
+        Label48.Text = emp.externid
+        txtUsername.Text = emp.login
+        txtVname.Text = emp.firstname
+        txtNname.Text = emp.lastname
+        txtPwd.Text = emp.password
+        If emp.gender = "male" Then rbtnGeschlechtM.Checked = True
+        If emp.gender = "female" Then rbtnGeschlechtW.Checked = True
+
+        If emp.birthdayDate = "null" Then
+            cbxGebDat.Checked = False
+        Else
+            cbxGebDat.Checked = True : txtGebDat.Text = emp.birthdayDate
+        End If
+        txtStrasse.Text = emp.street
+        txtLohn.Text = emp.pnr1
+        txtPlz.Text = emp.zipcode
+        txtCard.Text = emp.card
+        txtOrt.Text = emp.city
+        txtInfo.Text = emp.info
+        'cboNiederlassung.changeItem(mitarbeiter.mit_niederlassung)
+        'cboAbteilung.changeItem(mitarbeiter.mit_abteilung)
+        txtTelNr.Text = emp.phone1
+        txtEmail.Text = emp.email
+        txtMobiltel.Text = emp.phone2
+
+        'txtPersonalNr.Text = emp.pnr1
+
+        cbxAccount.Checked = emp.loginActive
+
+        If emp.entryDate Is Nothing Then
+            cbxEinsteigsDat.Checked = False
+        Else
+            cbxEinsteigsDat.Checked = True : datEinstiegsdatum.Text = emp.entryDate
+        End If
+
+
+        If emp.exitDate IsNot Nothing Then
+            cbxGekuendigt.Checked = True
+            datGekuendigtAm.Text = emp.exitDate
+        Else
+            cbxGekuendigt.Checked = False
+        End If
+
+        If emp.birthdayDate Is Nothing Then
+            cbxGebDat.Checked = False
+        Else
+            cbxGebDat.Checked = True : txtGebDat.Text = emp.birthdayDate
+        End If
+
+
+    End Sub
+
+
+    Private Sub btnCancel_Click(sender As Object, e As EventArgs) Handles btnCancel.Click
+        Me.Close()
+    End Sub
+
+    Private Sub btnOK_Click(sender As Object, e As EventArgs) Handles btnOK.Click
+        Dim newMid As Integer = 0
+        If txtVname.Text = "" And txtNname.Text = "" Then MsgBox("Bitte geben Sie einen Namen ein!") : Exit Sub
+        getMitarbeiter()
+        Me.Refresh()
+
+    End Sub
+
+
+    Private Sub getMitarbeiter()
+
+        emp.login = txtUsername.Text
+        emp.password = txtPwd.Text
+        If rbtnGeschlechtM.Checked Then emp.gender = "male"
+        If rbtnGeschlechtW.Checked Then emp.gender = "female"
+        emp.firstname = txtVname.Text
+        emp.lastname = txtNname.Text
+        If cbxGebDat.Checked Then emp.birthdayDate = txtGebDat.Text Else emp.birthdayDate = "null"
+        emp.street = txtStrasse.Text
+        emp.zipcode = txtPlz.Text
+        emp.street = txtOrt.Text
+
+        emp.phone1 = txtTelNr.Text & " " & txtDurchwahl.Text
+        emp.email = txtEmail.Text
+        emp.phone2 = txtMobiltel.Text
+        emp.info = txtInfo.Text
+
+
+        If cbxEinsteigsDat.Checked Then emp.entryDate = datEinstiegsdatum.Text Else emp.entryDate = "null"
+        If cbxGekuendigt.Checked Then emp.exitDate = datGekuendigtAm.Text Else emp.exitDate = "null"
+        If cbxGebDat.Checked Then emp.birthdayDate = txtGebDat.Text Else emp.birthdayDate = "null"
+
+        'mitarbeiter.mit_TESTonly = cbxTestaccount.Checked
+        If checkMandatoryFields() Then
+            timas.updateEmployee(emp, dgvData)
+        End If
+
+
+
+    End Sub
+
+
+    Private Sub Label8_Click_1(sender As Object, e As EventArgs)
+        txtPwd.Visible = True
+        Label8.Visible = False
+    End Sub
+
+    Private Sub btnSave_Click(sender As Object, e As EventArgs)
+        If txtVname.Text = "" And txtNname.Text = "" Then MsgBox("Bitte geben Sie einen Namen ein!") : Exit Sub
+        getMitarbeiter()
+        If isUpdate Then
+            emp.ID = mid
+            'If UID.updateMitarbeiter(mitarbeiter) Then Me.Close()
+        End If
+    End Sub
+
+    Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs)
+        datEinstiegsdatum.Enabled = cbxEinsteigsDat.Checked
+    End Sub
+
+    Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs)
+        txtGebDat.Enabled = cbxGebDat.Checked
+    End Sub
+
+
+    Private Sub cbxGekuendigt_CheckedChanged(sender As Object, e As EventArgs)
+        datGekuendigtAm.Enabled = cbxGekuendigt.Checked
+    End Sub
+
+
+
+    Private Sub cboNiederlassung_SelectedIndexChanged(sender As Object, e As EventArgs)
+
+    End Sub
+
+    Private Sub Button5_Click(sender As Object, e As EventArgs)
+        Dim frmBenutzerBerGruppen As New frmBenutzerBerGruppen(mid, 3, "DISPO")
+        frmBenutzerBerGruppen.Show(Me)
+    End Sub
+
+    Private Sub lkl_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles lkl.LinkClicked
+        If vbYes = MsgBox("Möchten Sie das Kennwort wirklich zurücksetzen? " & vbNewLine & "Der Benutzer wird beim nächsten Login zur Eingabe aufgefordert.", vbYesNoCancel) Then
+            '  txtPwd.Text = "0000"
+            getMitarbeiter()
+            emp.password = "null"
+            If checkMandatoryFields() Then
+                timas.updateEmployee(emp, Nothing)
+            End If
+        End If
+    End Sub
+
+
+
+    Private Function checkMandatoryFields() As Boolean
+
+
+        If Not cbxEinsteigsDat.Checked Or emp.entryDate = "" Then
+            MsgBox("Einstiegsdatum prüfen!")
+            Return False
+        End If
+
+        If CDate(emp.entryDate).ToShortDateString <= DateTime.Parse("01/01/2000") Then
+            MsgBox("Einstiegsdatum darf nicht vor 01.01.2000 liegen!")
+            Return False
+        End If
+
+
+
+        If emp.firstname = "" Or emp.lastname = "" Then
+            MsgBox("Vor- und Nachnamen angeben!")
+            Return False
+        End If
+
+        If emp.info = "" Then
+            MsgBox("Firma/Info angeben!")
+            Return False
+        End If
+
+        Return True
+
+    End Function
+
+    Sub initDGV(dt As DataTable)
+
+
+        If dtTimas.Columns.Count > 0 Then
+
+            If TabControl1.TabCount = 0 Then
+                For Each row As DataRow In dt.DefaultView.ToTable(True, "groupType").Rows
+                    Dim TabIndex As Integer                                         'Anzahl der erstellten Tabs, bei keinem Tab ist der Index 0
+                    TabIndex = TabControl1.TabCount
+                    TabControl1.TabPages.Add(row("groupType"))
+                    If TabIndex = 0 Then
+                        Dim tab As TabPage = Me.TabControl1.SelectedTab
+                        Dim dv = New DataView(dt)
+                        dv.RowFilter = "groupType = '" & tab.Text & "'"
+                        dgvData.DataSource = dv
+                        If dgvData.Columns.Count > 0 Then
+                            With dgvData
+                                .RowHeadersWidth = 10
+                                .Columns("id").Visible = True
+                                .Columns("name").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
+                                .Columns("groupType").Visible = False
+                                .Columns("info").Width = 200
+                                .Columns("set").Width = 20
+                                .Columns("set").HeaderText = "X"
+                                .Dock = DockStyle.Fill
+
+                                For Each r As DataGridViewRow In dgvData.Rows
+                                    For Each i As cTimasGruppe In emp.Gruppen
+                                        If r.Cells("id").Value = i.Id Then r.Cells("set").Value = True
+                                    Next
+                                Next
+                            End With
+                            tab.Controls.Add(Me.dgvData)
+                        End If
+                    End If
+
+                Next
+            End If
+        End If
+
+
+    End Sub
+
+    Private Sub PictureBox9_Click_1(sender As Object, e As EventArgs)
+        Dim webAddress As String = "https://zeit.verag.ag/"
+        Process.Start(webAddress)
+    End Sub
+
+    Private Sub TabControl1_SelectedIndexChanged_1(sender As Object, e As EventArgs) Handles TabControl1.SelectedIndexChanged
+        If dgvData Is Nothing And dgvData.Rows.Count < 1 Then Exit Sub
+        Dim tab As TabPage = Me.TabControl1.SelectedTab
+        If ((Not tab Is Nothing) AndAlso (Not tab.Controls.Contains(Me.dgvData))) Then
+            Dim dv = New DataView(dtTimas)
+            dv.RowFilter = "groupType = '" & tab.Text & "'"
+            dgvData.DataSource = dv
+            If dgvData.Columns.Count > 0 Then
+                tab.Controls.Add(Me.dgvData)
+            End If
+
+
+        End If
+    End Sub
+
+
+
+End Class
+
diff --git a/UID/Mitarbeiter/usrCntlMitarbeiter.Designer.vb b/UID/Mitarbeiter/usrCntlMitarbeiter.Designer.vb
index e3ad354..7dad38a 100644
--- a/UID/Mitarbeiter/usrCntlMitarbeiter.Designer.vb
+++ b/UID/Mitarbeiter/usrCntlMitarbeiter.Designer.vb
@@ -31,21 +31,13 @@ Partial Class usrCntlMitarbeiter
         Me.Button3 = New System.Windows.Forms.Button()
         Me.TabControl1 = New System.Windows.Forms.TabControl()
         Me.TabPage1 = New System.Windows.Forms.TabPage()
-        Me.dgvVERAG = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
         Me.TabPage2 = New System.Windows.Forms.TabPage()
-        Me.dgvATILLA = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
         Me.TabPage3 = New System.Windows.Forms.TabPage()
-        Me.dgvIMEX = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
         Me.TabPage4 = New System.Windows.Forms.TabPage()
-        Me.dgvUNISPED = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
         Me.TabPage5 = New System.Windows.Forms.TabPage()
-        Me.dgvAMBAR = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
         Me.TabPage6 = New System.Windows.Forms.TabPage()
-        Me.dgvFRONTOFFICE = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
         Me.TabPage7 = New System.Windows.Forms.TabPage()
-        Me.dgvVERIMEX = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
         Me.TabPage8 = New System.Windows.Forms.TabPage()
-        Me.dgvTimasNew = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
         Me.Panel1 = New System.Windows.Forms.Panel()
         Me.cbx = New System.Windows.Forms.CheckBox()
         Me.txtSuche = New System.Windows.Forms.TextBox()
@@ -57,27 +49,35 @@ Partial Class usrCntlMitarbeiter
         Me.UserKopierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.BerechtigungenSetzenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.dgvVERAG = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.dgvATILLA = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.dgvIMEX = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.dgvUNISPED = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.dgvAMBAR = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.dgvFRONTOFFICE = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.dgvVERIMEX = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.dgvTimasNew = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
         Me.Panel2.SuspendLayout()
         Me.TabControl1.SuspendLayout()
         Me.TabPage1.SuspendLayout()
-        CType(Me.dgvVERAG, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.TabPage2.SuspendLayout()
-        CType(Me.dgvATILLA, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.TabPage3.SuspendLayout()
-        CType(Me.dgvIMEX, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.TabPage4.SuspendLayout()
-        CType(Me.dgvUNISPED, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.TabPage5.SuspendLayout()
-        CType(Me.dgvAMBAR, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.TabPage6.SuspendLayout()
-        CType(Me.dgvFRONTOFFICE, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.TabPage7.SuspendLayout()
-        CType(Me.dgvVERIMEX, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.TabPage8.SuspendLayout()
-        CType(Me.dgvTimasNew, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.Panel1.SuspendLayout()
         Me.Panel3.SuspendLayout()
         Me.ContextMenuStrip1.SuspendLayout()
+        CType(Me.dgvVERAG, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.dgvATILLA, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.dgvIMEX, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.dgvUNISPED, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.dgvAMBAR, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.dgvFRONTOFFICE, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.dgvVERIMEX, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.dgvTimasNew, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
         '
         'Button6
@@ -175,16 +175,6 @@ Partial Class usrCntlMitarbeiter
         Me.TabPage1.Text = "VERAG"
         Me.TabPage1.UseVisualStyleBackColor = True
         '
-        'dgvVERAG
-        '
-        Me.dgvVERAG.AKTUALISIERUNGS_INTERVALL = -1
-        Me.dgvVERAG.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.dgvVERAG.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.dgvVERAG.Location = New System.Drawing.Point(3, 3)
-        Me.dgvVERAG.Name = "dgvVERAG"
-        Me.dgvVERAG.Size = New System.Drawing.Size(875, 616)
-        Me.dgvVERAG.TabIndex = 24
-        '
         'TabPage2
         '
         Me.TabPage2.Controls.Add(Me.dgvATILLA)
@@ -196,16 +186,6 @@ Partial Class usrCntlMitarbeiter
         Me.TabPage2.Text = "ATILLA"
         Me.TabPage2.UseVisualStyleBackColor = True
         '
-        'dgvATILLA
-        '
-        Me.dgvATILLA.AKTUALISIERUNGS_INTERVALL = -1
-        Me.dgvATILLA.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.dgvATILLA.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.dgvATILLA.Location = New System.Drawing.Point(3, 3)
-        Me.dgvATILLA.Name = "dgvATILLA"
-        Me.dgvATILLA.Size = New System.Drawing.Size(875, 616)
-        Me.dgvATILLA.TabIndex = 25
-        '
         'TabPage3
         '
         Me.TabPage3.Controls.Add(Me.dgvIMEX)
@@ -217,16 +197,6 @@ Partial Class usrCntlMitarbeiter
         Me.TabPage3.Text = "IMEX"
         Me.TabPage3.UseVisualStyleBackColor = True
         '
-        'dgvIMEX
-        '
-        Me.dgvIMEX.AKTUALISIERUNGS_INTERVALL = -1
-        Me.dgvIMEX.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.dgvIMEX.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.dgvIMEX.Location = New System.Drawing.Point(3, 3)
-        Me.dgvIMEX.Name = "dgvIMEX"
-        Me.dgvIMEX.Size = New System.Drawing.Size(875, 616)
-        Me.dgvIMEX.TabIndex = 25
-        '
         'TabPage4
         '
         Me.TabPage4.Controls.Add(Me.dgvUNISPED)
@@ -238,16 +208,6 @@ Partial Class usrCntlMitarbeiter
         Me.TabPage4.Text = "UNISPED"
         Me.TabPage4.UseVisualStyleBackColor = True
         '
-        'dgvUNISPED
-        '
-        Me.dgvUNISPED.AKTUALISIERUNGS_INTERVALL = -1
-        Me.dgvUNISPED.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.dgvUNISPED.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.dgvUNISPED.Location = New System.Drawing.Point(3, 3)
-        Me.dgvUNISPED.Name = "dgvUNISPED"
-        Me.dgvUNISPED.Size = New System.Drawing.Size(875, 616)
-        Me.dgvUNISPED.TabIndex = 25
-        '
         'TabPage5
         '
         Me.TabPage5.Controls.Add(Me.dgvAMBAR)
@@ -259,16 +219,6 @@ Partial Class usrCntlMitarbeiter
         Me.TabPage5.Text = "AMBAR"
         Me.TabPage5.UseVisualStyleBackColor = True
         '
-        'dgvAMBAR
-        '
-        Me.dgvAMBAR.AKTUALISIERUNGS_INTERVALL = -1
-        Me.dgvAMBAR.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.dgvAMBAR.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.dgvAMBAR.Location = New System.Drawing.Point(3, 3)
-        Me.dgvAMBAR.Name = "dgvAMBAR"
-        Me.dgvAMBAR.Size = New System.Drawing.Size(875, 616)
-        Me.dgvAMBAR.TabIndex = 25
-        '
         'TabPage6
         '
         Me.TabPage6.Controls.Add(Me.dgvFRONTOFFICE)
@@ -280,16 +230,6 @@ Partial Class usrCntlMitarbeiter
         Me.TabPage6.Text = "FRONT-OFFICE"
         Me.TabPage6.UseVisualStyleBackColor = True
         '
-        'dgvFRONTOFFICE
-        '
-        Me.dgvFRONTOFFICE.AKTUALISIERUNGS_INTERVALL = -1
-        Me.dgvFRONTOFFICE.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.dgvFRONTOFFICE.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.dgvFRONTOFFICE.Location = New System.Drawing.Point(3, 3)
-        Me.dgvFRONTOFFICE.Name = "dgvFRONTOFFICE"
-        Me.dgvFRONTOFFICE.Size = New System.Drawing.Size(875, 616)
-        Me.dgvFRONTOFFICE.TabIndex = 26
-        '
         'TabPage7
         '
         Me.TabPage7.Controls.Add(Me.dgvVERIMEX)
@@ -301,16 +241,6 @@ Partial Class usrCntlMitarbeiter
         Me.TabPage7.Text = "VERIMEX"
         Me.TabPage7.UseVisualStyleBackColor = True
         '
-        'dgvVERIMEX
-        '
-        Me.dgvVERIMEX.AKTUALISIERUNGS_INTERVALL = -1
-        Me.dgvVERIMEX.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.dgvVERIMEX.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.dgvVERIMEX.Location = New System.Drawing.Point(3, 3)
-        Me.dgvVERIMEX.Name = "dgvVERIMEX"
-        Me.dgvVERIMEX.Size = New System.Drawing.Size(875, 616)
-        Me.dgvVERIMEX.TabIndex = 27
-        '
         'TabPage8
         '
         Me.TabPage8.Controls.Add(Me.dgvTimasNew)
@@ -321,16 +251,6 @@ Partial Class usrCntlMitarbeiter
         Me.TabPage8.Text = "Zeiterfassung"
         Me.TabPage8.UseVisualStyleBackColor = True
         '
-        'dgvTimasNew
-        '
-        Me.dgvTimasNew.AKTUALISIERUNGS_INTERVALL = -1
-        Me.dgvTimasNew.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.dgvTimasNew.Location = New System.Drawing.Point(3, 3)
-        Me.dgvTimasNew.Name = "dgvTimasNew"
-        Me.dgvTimasNew.ReadOnly = True
-        Me.dgvTimasNew.Size = New System.Drawing.Size(875, 616)
-        Me.dgvTimasNew.TabIndex = 0
-        '
         'Panel1
         '
         Me.Panel1.Controls.Add(Me.cbx)
@@ -421,6 +341,87 @@ Partial Class usrCntlMitarbeiter
         Me.ContextMenuStrip2.Name = "ContextMenuStrip2"
         Me.ContextMenuStrip2.Size = New System.Drawing.Size(61, 4)
         '
+        'dgvVERAG
+        '
+        Me.dgvVERAG.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvVERAG.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvVERAG.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvVERAG.Location = New System.Drawing.Point(3, 3)
+        Me.dgvVERAG.Name = "dgvVERAG"
+        Me.dgvVERAG.Size = New System.Drawing.Size(875, 616)
+        Me.dgvVERAG.TabIndex = 24
+        '
+        'dgvATILLA
+        '
+        Me.dgvATILLA.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvATILLA.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvATILLA.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvATILLA.Location = New System.Drawing.Point(3, 3)
+        Me.dgvATILLA.Name = "dgvATILLA"
+        Me.dgvATILLA.Size = New System.Drawing.Size(875, 616)
+        Me.dgvATILLA.TabIndex = 25
+        '
+        'dgvIMEX
+        '
+        Me.dgvIMEX.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvIMEX.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvIMEX.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvIMEX.Location = New System.Drawing.Point(3, 3)
+        Me.dgvIMEX.Name = "dgvIMEX"
+        Me.dgvIMEX.Size = New System.Drawing.Size(875, 616)
+        Me.dgvIMEX.TabIndex = 25
+        '
+        'dgvUNISPED
+        '
+        Me.dgvUNISPED.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvUNISPED.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvUNISPED.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvUNISPED.Location = New System.Drawing.Point(3, 3)
+        Me.dgvUNISPED.Name = "dgvUNISPED"
+        Me.dgvUNISPED.Size = New System.Drawing.Size(875, 616)
+        Me.dgvUNISPED.TabIndex = 25
+        '
+        'dgvAMBAR
+        '
+        Me.dgvAMBAR.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvAMBAR.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvAMBAR.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvAMBAR.Location = New System.Drawing.Point(3, 3)
+        Me.dgvAMBAR.Name = "dgvAMBAR"
+        Me.dgvAMBAR.Size = New System.Drawing.Size(875, 616)
+        Me.dgvAMBAR.TabIndex = 25
+        '
+        'dgvFRONTOFFICE
+        '
+        Me.dgvFRONTOFFICE.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvFRONTOFFICE.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvFRONTOFFICE.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvFRONTOFFICE.Location = New System.Drawing.Point(3, 3)
+        Me.dgvFRONTOFFICE.Name = "dgvFRONTOFFICE"
+        Me.dgvFRONTOFFICE.Size = New System.Drawing.Size(875, 616)
+        Me.dgvFRONTOFFICE.TabIndex = 26
+        '
+        'dgvVERIMEX
+        '
+        Me.dgvVERIMEX.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvVERIMEX.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvVERIMEX.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvVERIMEX.Location = New System.Drawing.Point(3, 3)
+        Me.dgvVERIMEX.Name = "dgvVERIMEX"
+        Me.dgvVERIMEX.Size = New System.Drawing.Size(875, 616)
+        Me.dgvVERIMEX.TabIndex = 27
+        '
+        'dgvTimasNew
+        '
+        Me.dgvTimasNew.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvTimasNew.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvTimasNew.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvTimasNew.Location = New System.Drawing.Point(0, 0)
+        Me.dgvTimasNew.Name = "dgvTimasNew"
+        Me.dgvTimasNew.ReadOnly = True
+        Me.dgvTimasNew.Size = New System.Drawing.Size(881, 622)
+        Me.dgvTimasNew.TabIndex = 0
+        '
         'usrCntlMitarbeiter
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -434,25 +435,25 @@ Partial Class usrCntlMitarbeiter
         Me.Panel2.ResumeLayout(False)
         Me.TabControl1.ResumeLayout(False)
         Me.TabPage1.ResumeLayout(False)
-        CType(Me.dgvVERAG, System.ComponentModel.ISupportInitialize).EndInit()
         Me.TabPage2.ResumeLayout(False)
-        CType(Me.dgvATILLA, System.ComponentModel.ISupportInitialize).EndInit()
         Me.TabPage3.ResumeLayout(False)
-        CType(Me.dgvIMEX, System.ComponentModel.ISupportInitialize).EndInit()
         Me.TabPage4.ResumeLayout(False)
-        CType(Me.dgvUNISPED, System.ComponentModel.ISupportInitialize).EndInit()
         Me.TabPage5.ResumeLayout(False)
-        CType(Me.dgvAMBAR, System.ComponentModel.ISupportInitialize).EndInit()
         Me.TabPage6.ResumeLayout(False)
-        CType(Me.dgvFRONTOFFICE, System.ComponentModel.ISupportInitialize).EndInit()
         Me.TabPage7.ResumeLayout(False)
-        CType(Me.dgvVERIMEX, System.ComponentModel.ISupportInitialize).EndInit()
         Me.TabPage8.ResumeLayout(False)
-        CType(Me.dgvTimasNew, System.ComponentModel.ISupportInitialize).EndInit()
         Me.Panel1.ResumeLayout(False)
         Me.Panel1.PerformLayout()
         Me.Panel3.ResumeLayout(False)
         Me.ContextMenuStrip1.ResumeLayout(False)
+        CType(Me.dgvVERAG, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.dgvATILLA, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.dgvIMEX, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.dgvUNISPED, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.dgvAMBAR, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.dgvFRONTOFFICE, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.dgvVERIMEX, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.dgvTimasNew, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
 
     End Sub
diff --git a/UID/Mitarbeiter/usrCntlMitarbeiter.vb b/UID/Mitarbeiter/usrCntlMitarbeiter.vb
index f415aa0..d58fcd6 100644
--- a/UID/Mitarbeiter/usrCntlMitarbeiter.vb
+++ b/UID/Mitarbeiter/usrCntlMitarbeiter.vb
@@ -200,7 +200,7 @@ Public Class usrCntlMitarbeiter
         If dt.Columns.Count > 0 Then
 
             If txtSuche.Text <> "" Then
-                dt.DefaultView.RowFilter = "lastname like '%" & txtSuche.Text & "%'  or firstname like '%" & txtSuche.Text & "%' or pnr1 like '%" & txtSuche.Text & "%'  or info like '%" & txtSuche.Text & "%'"
+                dt.DefaultView.RowFilter = "Vorname like '%" & txtSuche.Text & "%'  or Nachname like '%" & txtSuche.Text & "%' or 'Personal-Nr (Lohn)' like '%" & txtSuche.Text & "%'  or Info like '%" & txtSuche.Text & "%'"
             Else
                 dt.DefaultView.RowFilter = Nothing
             End If
@@ -226,6 +226,7 @@ Public Class usrCntlMitarbeiter
             .RowHeadersVisible = False
             .SelectionMode = DataGridViewSelectionMode.FullRowSelect
             .AllowUserToOrderColumns = True
+            .Columns(6).AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
         End With
 
 
@@ -824,7 +825,14 @@ Public Class usrCntlMitarbeiter
     End Function
 
 
+    Private Sub dgvTimasNew_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgvTimasNew.CellDoubleClick
+        Me.Cursor = Cursors.WaitCursor
+        'neue GUI für Änderungen im Timas
 
-
-
+        Dim frmMitarbDetails As New frmMitarbTimas()
+        frmMitarbDetails.mid = sender.CurrentRow.Cells(0).Value
+        frmMitarbDetails.Show(Me)
+        sender.RELOAD()
+        Me.Cursor = Cursors.Default
+    End Sub
 End Class
diff --git a/UID/cSqlDb.vb b/UID/cSqlDb.vb
index 443f032..ac8e6dc 100644
--- a/UID/cSqlDb.vb
+++ b/UID/cSqlDb.vb
@@ -1550,8 +1550,8 @@ Public Class cMitarbeiter
 
         'Änderung
         Dim sql = "INSERT INTO tblMitarbeiter " &
-                       "(mit_username,mit_abweichenderAnzeigename, mit_pwd, mit_geschlecht, mit_affix, mit_vname, mit_nname, mit_gebdat, mit_strasse,mit_hausnr,mit_land,mit_plz,mit_ort,mit_niederlassung, mit_abteilung, mit_position, mit_durchwahl, mit_email, mit_mobiltel, mit_allowAnruf,mit_info, mit_einstiegsdatum, mit_gekuendigt, mit_kuendigungsdatum, mit_foto,mit_firma,mit_firmaFMZoll,mit_FMZollPersID,mit_FMZollPersIDKasseIsnotSpedBuch,mit_FMZollPersIDSpedBuch,mit_standartFiliale,mit_DpUserStandardDP,mit_EZOLL_SB,mit_ATLAS_SB,mit_FirmenDatenAnzeige,mit_DAKOSY_SB,mit_DAKOSY_SBFull,mit_DpUserStandardFirma,mit_DpUserStandardFirma2,mit_TESTonly,mit_PasswortChanged,mit_TELOTEC_SB,mit_AliasAD_Domain,mit_AliasAD_Username,mit_AliasAD_Domain2,mit_AliasAD_Username2,mit_teamId,mit_ChatBenutzer,mit_FirmaHaupt,mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname,mit_foto_DocId,mit_MAVerzeichnis_Motto,mit_sprache,mit_fakturierungsgruppe, mit_CSuser, mit_CSpwd, mit_PersonalNr, mit_telefonnr,mit_ATGRNAccessCode_AT51FP7,mit_ATGRNAccessCode_AT52VA6 ) OUTPUT INSERTED.mit_id VALUES " &
-                       "(@mit_username,@mit_abweichenderAnzeigename,@mit_pwd,@mit_geschlecht,@mit_affix,@mit_vname,@mit_nname,@mit_gebdat,@mit_strasse,@mit_hausnr,@mit_land,@mit_plz,@mit_ort,@mit_niederlassung,@mit_abteilung,@mit_position,@mit_durchwahl,@mit_email,@mit_mobiltel,@mit_allowAnruf,@mit_info,@mit_einstiegsdatum,@mit_gekuendigt,@mit_kuendigungsdatum,@mit_foto,@mit_firma,@mit_firmaFMZoll,@mit_FMZollPersID,@mit_FMZollPersIDKasseIsnotSpedBuch,@mit_FMZollPersIDSpedBuch,@mit_standartFiliale,@mit_DpUserStandardDP,@mit_EZOLL_SB,@mit_ATLAS_SB,@mit_FirmenDatenAnzeige,@mit_DAKOSY_SB,@mit_DAKOSY_SBFull,@mit_DpUserStandardFirma,@mit_DpUserStandardFirma2,@mit_TESTonly,@mit_PasswortChanged,@mit_TELOTEC_SB,@mit_AliasAD_Domain,@mit_AliasAD_Username,@mit_AliasAD_Domain2,@mit_AliasAD_Username2,@mit_teamId,@mit_ChatBenutzer,@mit_FirmaHaupt,@mit_ChatEasteregg,@mit_MAVerzeichnis_SettingsTstmp,@mit_MAVerzeichnis_allowGebDat,@mit_MAVerzeichnis_allowWohnadresse,@mit_MAVerzeichnis_allowGebDatOhneJahr,@mit_MAVerzeichnis_Spitzname,@mit_foto_DocId,@mit_MAVerzeichnis_Motto ,@mit_sprache,@mit_fakturierungsgruppe, @mit_CSuser, @mit_CSpwd, @mit_PersonalNr, @mit_telefonnr,@mit_ATGRNAccessCode_AT51FP7 ,@mit_ATGRNAccessCode_AT52VA6)"
+                       "(mit_username,mit_abweichenderAnzeigename, mit_pwd, mit_geschlecht, mit_affix, mit_vname, mit_nname, mit_gebdat, mit_strasse,mit_hausnr,mit_land,mit_plz,mit_ort,mit_niederlassung, mit_abteilung, mit_position, mit_durchwahl, mit_email, mit_mobiltel, mit_allowAnruf,mit_info, mit_einstiegsdatum, mit_gekuendigt, mit_kuendigungsdatum, mit_foto,mit_firma,mit_firmaFMZoll,mit_FMZollPersID,mit_FMZollPersIDKasseIsnotSpedBuch,mit_FMZollPersIDSpedBuch,mit_standartFiliale,mit_DpUserStandardDP,mit_EZOLL_SB,mit_ATLAS_SB,mit_FirmenDatenAnzeige,mit_DAKOSY_SB,mit_DAKOSY_SBFull,mit_DpUserStandardFirma,mit_DpUserStandardFirma2,mit_TESTonly,mit_PasswortChanged,mit_TELOTEC_SB,mit_AliasAD_Domain,mit_AliasAD_Username,mit_AliasAD_Domain2,mit_AliasAD_Username2,mit_teamId,mit_ChatBenutzer,mit_FirmaHaupt,mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname,mit_foto_DocId,mit_MAVerzeichnis_Motto,mit_sprache,mit_fakturierungsgruppe, mit_CSuser, mit_CSpwd, mit_PersonalNr, mit_telefonnr,mit_ATGRNAccessCode_AT51FP7,mit_ATGRNAccessCode_AT52VA6 , mit_Sprachkentnisse) OUTPUT INSERTED.mit_id VALUES " &
+                       "(@mit_username,@mit_abweichenderAnzeigename,@mit_pwd,@mit_geschlecht,@mit_affix,@mit_vname,@mit_nname,@mit_gebdat,@mit_strasse,@mit_hausnr,@mit_land,@mit_plz,@mit_ort,@mit_niederlassung,@mit_abteilung,@mit_position,@mit_durchwahl,@mit_email,@mit_mobiltel,@mit_allowAnruf,@mit_info,@mit_einstiegsdatum,@mit_gekuendigt,@mit_kuendigungsdatum,@mit_foto,@mit_firma,@mit_firmaFMZoll,@mit_FMZollPersID,@mit_FMZollPersIDKasseIsnotSpedBuch,@mit_FMZollPersIDSpedBuch,@mit_standartFiliale,@mit_DpUserStandardDP,@mit_EZOLL_SB,@mit_ATLAS_SB,@mit_FirmenDatenAnzeige,@mit_DAKOSY_SB,@mit_DAKOSY_SBFull,@mit_DpUserStandardFirma,@mit_DpUserStandardFirma2,@mit_TESTonly,@mit_PasswortChanged,@mit_TELOTEC_SB,@mit_AliasAD_Domain,@mit_AliasAD_Username,@mit_AliasAD_Domain2,@mit_AliasAD_Username2,@mit_teamId,@mit_ChatBenutzer,@mit_FirmaHaupt,@mit_ChatEasteregg,@mit_MAVerzeichnis_SettingsTstmp,@mit_MAVerzeichnis_allowGebDat,@mit_MAVerzeichnis_allowWohnadresse,@mit_MAVerzeichnis_allowGebDatOhneJahr,@mit_MAVerzeichnis_Spitzname,@mit_foto_DocId,@mit_MAVerzeichnis_Motto ,@mit_sprache,@mit_fakturierungsgruppe, @mit_CSuser, @mit_CSpwd, @mit_PersonalNr, @mit_telefonnr,@mit_ATGRNAccessCode_AT51FP7 ,@mit_ATGRNAccessCode_AT52VA6, @mit_Sprachkentnisse)"
 
 
 
@@ -1628,6 +1628,7 @@ Public Class cMitarbeiter
                 cmd.Parameters.AddWithValue("@mit_telefonnr", If(m.mit_telefonnr, DBNull.Value))
                 cmd.Parameters.AddWithValue("@mit_ATGRNAccessCode_AT51FP7 ", If(m.mit_ATGRNAccessCode_AT51FP7, DBNull.Value))
                 cmd.Parameters.AddWithValue("@mit_ATGRNAccessCode_AT52VA6 ", If(m.mit_ATGRNAccessCode_AT52VA6, DBNull.Value))
+                cmd.Parameters.AddWithValue("@mit_Sprachkentnisse ", If(m.mit_Sprachkentnisse, DBNull.Value))
 
                 Try
                     mid = cmd.ExecuteScalar()
@@ -1646,7 +1647,7 @@ Public Class cMitarbeiter
 
         Dim sql = "UPDATE tblMitarbeiter " &
                      "SET mit_username=@mit_username, mit_abweichenderAnzeigename=@mit_abweichenderAnzeigename,mit_pwd=@mit_pwd, mit_geschlecht=@mit_geschlecht, mit_affix=@mit_affix, mit_vname=@mit_vname, mit_nname=@mit_nname, mit_gebdat=@mit_gebdat, mit_strasse=@mit_strasse, mit_hausnr=@mit_hausnr, mit_land=@mit_land, mit_plz=@mit_plz, mit_ort=@mit_ort, mit_niederlassung=@mit_niederlassung, mit_abteilung=@mit_abteilung, mit_position=@mit_position, mit_durchwahl=@mit_durchwahl, mit_email=@mit_email, mit_mobiltel=@mit_mobiltel, mit_allowAnruf=@mit_allowAnruf, mit_info=@mit_info, mit_einstiegsdatum=@mit_einstiegsdatum, mit_gekuendigt=@mit_gekuendigt, mit_kuendigungsdatum=@mit_kuendigungsdatum, mit_foto=@mit_foto, mit_firma=@mit_firma,mit_firmaFMZoll=@mit_firmaFMZoll,mit_FMZollPersID=@mit_FMZollPersID, mit_FMZollPersIDKasseIsnotSpedBuch=@mit_FMZollPersIDKasseIsnotSpedBuch,mit_FMZollPersIDSpedBuch=@mit_FMZollPersIDSpedBuch,mit_standartFiliale=@mit_standartFiliale,mit_standardPreisliste=@mit_standardPreisliste,mit_DpUserStandardDP=@mit_DpUserStandardDP, mit_EZOLL_SB=@mit_EZOLL_SB, mit_ATLAS_SB=@mit_ATLAS_SB,mit_FirmenDatenAnzeige=@mit_FirmenDatenAnzeige,mit_DAKOSY_SB=@mit_DAKOSY_SB, mit_DAKOSY_SBFull=@mit_DAKOSY_SBFull ,mit_DpUserStandardFirma=@mit_DpUserStandardFirma,mit_DpUserStandardFirma2=@mit_DpUserStandardFirma2, mit_TESTonly=@mit_TESTonly,mit_PasswortChanged=@mit_PasswortChanged,mit_TELOTEC_SB=@mit_TELOTEC_SB,mit_AliasAD_Domain=@mit_AliasAD_Domain,mit_AliasAD_Username=@mit_AliasAD_Username,mit_AliasAD_Domain2=@mit_AliasAD_Domain2,mit_AliasAD_Username2=@mit_AliasAD_Username2,mit_teamId=@mit_teamId,mit_ChatBenutzer=@mit_ChatBenutzer,mit_FirmaHaupt=@mit_FirmaHaupt " &
-                     " ,mit_ChatEasteregg=@mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp=@mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat=@mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse=@mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr=@mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname=@mit_MAVerzeichnis_Spitzname,mit_foto_DocId=@mit_foto_DocId,mit_MAVerzeichnis_Motto=@mit_MAVerzeichnis_Motto,mit_sprache=@mit_sprache,mit_fakturierungsgruppe=@mit_fakturierungsgruppe, mit_CSuser=@mit_CSuser, mit_CSpwd=@mit_CSpwd, mit_PersonalNr = @mit_PersonalNr, mit_telefonnr = @mit_telefonnr, mit_ATGRNAccessCode_AT51FP7 =@mit_ATGRNAccessCode_AT51FP7 ,mit_ATGRNAccessCode_AT52VA6=@mit_ATGRNAccessCode_AT52VA6 " &
+                     " ,mit_ChatEasteregg=@mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp=@mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat=@mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse=@mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr=@mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname=@mit_MAVerzeichnis_Spitzname,mit_foto_DocId=@mit_foto_DocId,mit_MAVerzeichnis_Motto=@mit_MAVerzeichnis_Motto,mit_sprache=@mit_sprache,mit_fakturierungsgruppe=@mit_fakturierungsgruppe, mit_CSuser=@mit_CSuser, mit_CSpwd=@mit_CSpwd, mit_PersonalNr = @mit_PersonalNr, mit_telefonnr = @mit_telefonnr, mit_ATGRNAccessCode_AT51FP7 =@mit_ATGRNAccessCode_AT51FP7 ,mit_ATGRNAccessCode_AT52VA6=@mit_ATGRNAccessCode_AT52VA6, mit_Sprachkentnisse=@mit_Sprachkentnisse" &
                      " WHERE mit_id=@mit_id "
 
 
@@ -1724,6 +1725,7 @@ Public Class cMitarbeiter
                 cmd.Parameters.AddWithValue("@mit_telefonnr", If(m.mit_telefonnr, DBNull.Value))
                 cmd.Parameters.AddWithValue("@mit_ATGRNAccessCode_AT51FP7 ", If(m.mit_ATGRNAccessCode_AT51FP7, DBNull.Value))
                 cmd.Parameters.AddWithValue("@mit_ATGRNAccessCode_AT52VA6 ", If(m.mit_ATGRNAccessCode_AT52VA6, DBNull.Value))
+                cmd.Parameters.AddWithValue("@mit_Sprachkentnisse", If(m.mit_Sprachkentnisse, DBNull.Value))
 
 
 
diff --git a/initATLASAufschubkonten/RoutineManager.vbproj b/initATLASAufschubkonten/RoutineManager.vbproj
index b09063b..e1cc0c8 100644
--- a/initATLASAufschubkonten/RoutineManager.vbproj
+++ b/initATLASAufschubkonten/RoutineManager.vbproj
@@ -146,6 +146,7 @@
   <ItemGroup>
     <Compile Include="ApplicationEvents.vb" />
     <Compile Include="AtlasAufschubDatenEinlesen.vb" />
+    <Compile Include="cAsfinag.vb" />
     <Compile Include="cBuergschaften.vb" />
     <Compile Include="cEDI.vb" />
     <Compile Include="cGetMsgType.vb" />
@@ -170,6 +171,12 @@
     <Compile Include="frmTRNCTS_NachrichtenVerarbeitung_ATEZ.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="frmAsfinag_NachrichtenVerarbeitung.Designer.vb">
+      <DependentUpon>frmAsfinag_NachrichtenVerarbeitung.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmAsfinag_NachrichtenVerarbeitung.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="frmTRNCTS_NachrichtenVerarbeitung_OREGON.Designer.vb">
       <DependentUpon>frmTRNCTS_NachrichtenVerarbeitung_OREGON.vb</DependentUpon>
     </Compile>
@@ -244,6 +251,9 @@
     <EmbeddedResource Include="frmTRNCTS_NachrichtenVerarbeitung_ATEZ.resx">
       <DependentUpon>frmTRNCTS_NachrichtenVerarbeitung_ATEZ.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmAsfinag_NachrichtenVerarbeitung.resx">
+      <DependentUpon>frmAsfinag_NachrichtenVerarbeitung.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="frmTRNCTS_NachrichtenVerarbeitung_OREGON.resx">
       <DependentUpon>frmTRNCTS_NachrichtenVerarbeitung_OREGON.vb</DependentUpon>
     </EmbeddedResource>
diff --git a/initATLASAufschubkonten/cAsfinag.vb b/initATLASAufschubkonten/cAsfinag.vb
new file mode 100644
index 0000000..faf57b2
--- /dev/null
+++ b/initATLASAufschubkonten/cAsfinag.vb
@@ -0,0 +1,1237 @@
+Imports System.Data.SqlClient
+Imports System.IO
+Imports System.Reflection
+Imports System.Security.Cryptography
+Imports com.itextpdf.text.pdf
+Imports DocumentFormat.OpenXml.VariantTypes
+Imports RoutineManager.cAsfinag
+
+Public Class cAsfinag
+
+    Public Class CLFHeader
+
+        Property PKFileName As Object = Nothing
+        Property recordType As String
+        Property fileVersion As Integer
+        Property fileNumber As Integer
+        Property indcator As Object = Nothing
+        Property senderID As Object = Nothing
+        Property receiverID As Object = Nothing
+        Property fileCreationDate As DateTime
+        Property fileCreationTime As DateTime
+        Property ISOCountryCode As Object = Nothing
+        Property creationName As Object = Nothing
+
+        Public hasEntry = False
+
+        Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+
+        Sub New(PKFileName, fileNumber)
+            Me.PKFileName = PKFileName
+            Me.fileNumber = fileNumber
+            LOAD()
+        End Sub
+
+        Sub New()
+
+        End Sub
+
+        Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileNumber", fileNumber))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordType", recordType))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileVersion", fileVersion))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("indcator", indcator))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("senderID", senderID))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("receiverID", receiverID))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileCreationDate", fileCreationDate))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileCreationTime", fileCreationTime))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ISOCountryCode", ISOCountryCode))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("creationName", creationName))
+
+            Return list
+        End Function
+
+        Public Function SAVE() As Boolean
+            Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+            Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM CLFHeader  WHERE PKFileName=@PKFileName AND fileNumber = @fileNumber) " &
+                       " BEGIN " & getUpdateCmd() & " End " &
+                       " Else " &
+                       " BEGIN " & getInsertCmd() & " End " &
+                       " commit tran "
+
+            Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
+        End Function
+
+        Public Sub LOAD()
+            Try
+                hasEntry = False
+                Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
+                    Using cmd As New SqlCommand("Select * FROM CLFHeader WHERE PKFileName=@PKFileName AND fileNumber = @fileNumber", conn)
+                        cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
+                        cmd.Parameters.AddWithValue("@filenumber", fileNumber)
+                        Dim dr = cmd.ExecuteReader()
+                        If dr.Read Then
+                            For Each li In getParameterList()
+                                Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
+
+                                If dr.Item(li.Text) Is DBNull.Value Then
+                                    propInfo.SetValue(Me, Nothing)
+                                Else
+                                    propInfo.SetValue(Me, dr.Item(li.Text))
+                                End If
+
+                            Next
+                            hasEntry = True
+                        End If
+                        dr.Close()
+                    End Using
+                End Using
+            Catch ex As Exception
+                MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+        End Sub
+
+
+
+        Public Function getUpdateCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+                Dim str As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                Return (" UPDATE [CLFHeader] SET " & str & " WHERE PKFileName=@PKFileName ")
+
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+
+        Public Function getInsertCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+                Dim str As String = ""
+                Dim values As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "],"
+                        values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                values = values.Substring(0, values.Length - 1) 'wg. ','
+                Return (" INSERT INTO CLFHeader  (" & str & ") VALUES(" & values & ")  ")
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+    End Class
+
+    Public Class CLFBody
+
+        Property PKFileName As Object = Nothing
+        Property RecordType As String
+        Property fileVersion As Integer
+        Property fileNumber As Integer
+        Property cardNumber As String
+        Property validTo As Integer
+        Property OBUID As Object = Nothing
+        Property vehicleLicensePlate As Object = Nothing
+        Property nationality As Object = Nothing
+        Property vehicleCategory As Object = Nothing
+        Property emissionCategory As Object = Nothing
+        Property status As Object = Nothing
+        Property contractDate As Object = Nothing
+        Property PKLine As Long
+
+        Public hasEntry = False
+
+        Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+
+        Sub New(PKFileName, PKLine)
+            Me.PKFileName = PKFileName
+            Me.PKLine = PKLine
+            LOAD()
+        End Sub
+        Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKLine", PKLine))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("RecordType", RecordType))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileVersion", fileVersion))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileNumber", fileNumber))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("cardNumber", cardNumber))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("validTo", validTo))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("OBUID", OBUID))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("vehicleLicensePlate", vehicleLicensePlate))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("nationality", nationality))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("vehicleCategory", vehicleCategory))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("emissionCategory", emissionCategory))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("status", status))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("contractDate", contractDate))
+
+
+            Return list
+        End Function
+
+        Public Function SAVE() As Boolean
+            Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+            Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM CLFBody WHERE PKFileName=@PKFileName AND PKLine = @PKLine) " &
+                       " BEGIN " & getUpdateCmd() & " End " &
+                       " Else " &
+                       " BEGIN " & getInsertCmd() & " End " &
+                       " commit tran "
+
+            Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
+        End Function
+
+        Public Sub LOAD()
+            Try
+                hasEntry = False
+                Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
+                    Using cmd As New SqlCommand("Select * FROM CLFBody WHERE PKFileName=@PKFileName AND PKLine = @PKLine  ", conn)
+                        cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
+                        cmd.Parameters.AddWithValue("@PKLine", PKLine)
+                        Dim dr = cmd.ExecuteReader()
+                        If dr.Read Then
+                            For Each li In getParameterList()
+                                Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
+
+                                If dr.Item(li.Text) Is DBNull.Value Then
+                                    propInfo.SetValue(Me, Nothing)
+                                Else
+                                    propInfo.SetValue(Me, dr.Item(li.Text))
+                                End If
+
+                            Next
+                            hasEntry = True
+                        End If
+                        dr.Close()
+                    End Using
+                End Using
+            Catch ex As Exception
+                MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+        End Sub
+
+
+
+        Public Function getUpdateCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+                Dim str As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                Return (" UPDATE [CLFBody] SET " & str & " WHERE PKFileName=@PKFileName AND PKLine  = @PKLine ")
+
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+
+        Public Function getInsertCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+                Dim str As String = ""
+                Dim values As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "],"
+                        values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                values = values.Substring(0, values.Length - 1) 'wg. ','
+                Return (" INSERT INTO CLFBody  (" & str & ") VALUES(" & values & ")  ")
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+
+
+
+
+    End Class
+
+    Public Class CLFTrailer
+
+        Property PKFileName As Object = Nothing
+        Property recordType As String
+        Property fileVersion As Integer
+        Property fileNumber As Integer
+        Property recordCount As Integer
+
+
+
+        Public hasEntry = False
+
+        Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+
+        Sub New(PKFileName)
+            Me.PKFileName = PKFileName
+            LOAD()
+        End Sub
+        Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordType", recordType))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileVersion", fileVersion))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileNumber", fileNumber))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordCount", recordCount))
+
+            Return list
+        End Function
+
+        Public Function SAVE() As Boolean
+            Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+            Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM CLFTrailer  WHERE PKFileName=@PKFileName) " &
+                       " BEGIN " & getUpdateCmd() & " End " &
+                       " Else " &
+                       " BEGIN " & getInsertCmd() & " End " &
+                       " commit tran "
+
+            Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
+        End Function
+
+        Public Sub LOAD()
+            Try
+                hasEntry = False
+                Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
+                    Using cmd As New SqlCommand("Select * FROM CLFTrailer WHERE PKFileName=@PKFileName", conn)
+                        cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
+                        Dim dr = cmd.ExecuteReader()
+                        If dr.Read Then
+                            For Each li In getParameterList()
+                                Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
+
+                                If dr.Item(li.Text) Is DBNull.Value Then
+                                    propInfo.SetValue(Me, Nothing)
+                                Else
+                                    propInfo.SetValue(Me, dr.Item(li.Text))
+                                End If
+
+                            Next
+                            hasEntry = True
+                        End If
+                        dr.Close()
+                    End Using
+                End Using
+            Catch ex As Exception
+                MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+        End Sub
+
+
+
+        Public Function getUpdateCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+                Dim str As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                Return (" UPDATE [CLFTrailer] SET " & str & " WHERE PKFileName=@PKFileName")
+
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+
+        Public Function getInsertCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+                Dim str As String = ""
+                Dim values As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "],"
+                        values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                values = values.Substring(0, values.Length - 1) 'wg. ','
+                Return (" INSERT INTO CLFTrailer  (" & str & ") VALUES(" & values & ")  ")
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+
+
+    End Class
+
+
+    Public Class TTRHeader
+
+        Property PKFileName As Object = Nothing
+        Property recordType As Integer
+        Property fileVersion As Integer
+        Property fileNumber As Integer
+        Property senderID As Object = Nothing
+        Property receiverID As Object = Nothing
+        Property fileCreationDate As DateTime
+        Property fileCreationTime As DateTime
+        Property ISOCountryCode As Object = Nothing
+        Property description As Object = Nothing
+        Property currencyCode As Object = Nothing
+
+        Public hasEntry = False
+
+        Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+
+        Sub New(PKFileName, filenummer)
+            Me.PKFileName = PKFileName
+            Me.fileNumber = filenummer
+            LOAD()
+        End Sub
+        Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordType", recordType))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileVersion", fileVersion))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileNumber", fileNumber))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("senderID", senderID))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("receiverID", receiverID))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileCreationDate", fileCreationDate))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileCreationTime", fileCreationTime))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ISOCountryCode", ISOCountryCode))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("description", description))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("currencyCode", currencyCode))
+
+            Return list
+        End Function
+
+        Public Function SAVE() As Boolean
+            Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+            Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM TTRHeader  WHERE PKFileName=@PKFileName AND fileNumber = @fileNumber) " &
+                       " BEGIN " & getUpdateCmd() & " End " &
+                       " Else " &
+                       " BEGIN " & getInsertCmd() & " End " &
+                       " commit tran "
+
+            Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
+        End Function
+
+        Public Sub LOAD()
+            Try
+                hasEntry = False
+                Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
+                    Using cmd As New SqlCommand("Select * FROM TTRHeader WHERE PKFileName=@PKFileName AND fileNumber = @fileNumber ", conn)
+                        cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
+                        cmd.Parameters.AddWithValue("@fileNumber", fileNumber)
+                        Dim dr = cmd.ExecuteReader()
+                        If dr.Read Then
+                            For Each li In getParameterList()
+                                Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
+
+                                If dr.Item(li.Text) Is DBNull.Value Then
+                                    propInfo.SetValue(Me, Nothing)
+                                Else
+                                    propInfo.SetValue(Me, dr.Item(li.Text))
+                                End If
+
+                            Next
+                            hasEntry = True
+                        End If
+                        dr.Close()
+                    End Using
+                End Using
+            Catch ex As Exception
+                MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+        End Sub
+
+
+
+        Public Function getUpdateCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+                Dim str As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                Return (" UPDATE [TTRHeader] SET " & str & " WHERE PKFileName=@PKFileName AND filenumber = @filenumber")
+
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+
+        Public Function getInsertCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+                Dim str As String = ""
+                Dim values As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "],"
+                        values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                values = values.Substring(0, values.Length - 1) 'wg. ','
+                Return (" INSERT INTO TTRHeader  (" & str & ") VALUES(" & values & ")  ")
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+    End Class
+
+    Public Class TTRBody
+
+        Property PKFileName As Object = Nothing
+        Property recordType As Integer
+        Property fileVersion As Integer
+        Property siteId As String
+        Property fileNumber As Integer
+        Property cardNumber As String
+        Property fileCreationDate As Date
+        Property deliveryNoteNumber As Integer
+        Property deliveryDate As Date
+        Property deliveryTime As Date
+        Property transactionType As Integer
+        Property productCode As Integer
+        Property productQuantity As Double
+        Property amountInclVAT As Double
+        Property VATrate As Double
+        Property VATamount As Double
+        Property PKLine As Integer
+        Property km As Integer
+        Property driverId As Integer
+        Property receiptNumber As String
+        Property OBUID As String
+
+        Public hasEntry = False
+
+        Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+
+        Sub New()
+
+        End Sub
+
+        Sub New(PKFileName, PKLine)
+            Me.PKFileName = PKFileName
+            Me.PKLine = PKLine
+            LOAD()
+        End Sub
+        Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKLine", PKLine))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileVersion", fileVersion))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordType", recordType))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("siteId", siteId))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileNumber", fileNumber))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileCreationDate", fileCreationDate))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("deliveryNoteNumber", deliveryNoteNumber))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("cardNumber", cardNumber))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("deliveryDate", deliveryDate))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("deliveryTime", deliveryTime))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("transactionType", transactionType))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("productCode", productCode))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("km", km))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("driverId", driverId))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("productQuantity", productQuantity))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("amountInclVAT", amountInclVAT))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("VATrate", VATrate))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("VATamount", VATamount))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("receiptNumber", receiptNumber))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("OBUID", OBUID))
+
+            Return list
+        End Function
+
+        Public Function SAVE() As Boolean
+            Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+            Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM TTRBody  WHERE PKFileName=@PKFileName AND  PKLine = @PKLine) " &
+                       " BEGIN " & getUpdateCmd() & " End " &
+                       " Else " &
+                       " BEGIN " & getInsertCmd() & " End " &
+                       " commit tran "
+
+            Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
+        End Function
+
+        Public Sub LOAD()
+            Try
+                hasEntry = False
+                Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
+                    Using cmd As New SqlCommand("Select * FROM TTRBody WHERE PKFileName=@PKFileName AND PKLine = @PKLine  ", conn)
+                        cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
+                        cmd.Parameters.AddWithValue("@PKLine", PKLine)
+                        Dim dr = cmd.ExecuteReader()
+                        If dr.Read Then
+                            For Each li In getParameterList()
+                                Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
+
+                                If dr.Item(li.Text) Is DBNull.Value Then
+                                    propInfo.SetValue(Me, Nothing)
+                                Else
+                                    propInfo.SetValue(Me, dr.Item(li.Text))
+                                End If
+
+                            Next
+                            hasEntry = True
+                        End If
+                        dr.Close()
+                    End Using
+                End Using
+            Catch ex As Exception
+                MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+        End Sub
+
+
+
+        Public Function getUpdateCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+                Dim str As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                Return (" UPDATE [TTRBody] SET " & str & " WHERE PKFileName=@PKFileName AND PKLine = @PKLine ")
+
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+
+        Public Function getInsertCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+                Dim str As String = ""
+                Dim values As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "],"
+                        values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                values = values.Substring(0, values.Length - 1) 'wg. ','
+                Return (" INSERT INTO TTRBody  (" & str & ") VALUES(" & values & ")  ")
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+
+
+
+
+    End Class
+
+    Public Class TTRTrailer
+
+        Property PKFileName As Object = Nothing
+        Property recordType As Integer
+        Property fileVersion As Integer
+        Property recordCount As Integer
+        Property checksumProductQuantity As Double
+        Property checksumAmounntInclVAT As Double
+
+        Public hasEntry = False
+
+        Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+
+        Sub New(PKFileName)
+            Me.PKFileName = PKFileName
+            LOAD()
+        End Sub
+        Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordType", recordType))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileVersion", fileVersion))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordCount", recordCount))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("checksumProductQuantity", checksumProductQuantity))
+            list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("checksumAmounntInclVAT", checksumAmounntInclVAT))
+
+            Return list
+        End Function
+
+        Public Function SAVE() As Boolean
+            Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+            Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM TTRTrailer WHERE PKFileName=@PKFileName) " &
+                       " BEGIN " & getUpdateCmd() & " End " &
+                       " Else " &
+                       " BEGIN " & getInsertCmd() & " End " &
+                       " commit tran "
+
+            Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
+        End Function
+
+        Public Sub LOAD()
+            Try
+                hasEntry = False
+                Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
+                    Using cmd As New SqlCommand("Select * FROM TTRTrailer WHERE PKFileName=@PKFileName", conn)
+                        cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
+                        Dim dr = cmd.ExecuteReader()
+                        If dr.Read Then
+                            For Each li In getParameterList()
+                                Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
+
+                                If dr.Item(li.Text) Is DBNull.Value Then
+                                    propInfo.SetValue(Me, Nothing)
+                                Else
+                                    propInfo.SetValue(Me, dr.Item(li.Text))
+                                End If
+
+                            Next
+                            hasEntry = True
+                        End If
+                        dr.Close()
+                    End Using
+                End Using
+            Catch ex As Exception
+                MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+        End Sub
+
+
+
+        Public Function getUpdateCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+                Dim str As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                Return (" UPDATE [TTRTrailer] SET " & str & " WHERE PKFileName=@PKFileName")
+
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+
+        Public Function getInsertCmd() As String
+            Try
+                Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+                Dim str As String = ""
+                Dim values As String = ""
+                For Each i In list
+                    If Not i.isPrimaryParam Then
+                        str &= "[" & i.Text & "],"
+                        values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+                    End If
+                Next
+                str = str.Substring(0, str.Length - 1) 'wg. ','
+                values = values.Substring(0, values.Length - 1) 'wg. ','
+                Return (" INSERT INTO TTRTrailer  (" & str & ") VALUES(" & values & ")  ")
+            Catch ex As Exception
+                MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+            End Try
+            Return ""
+        End Function
+
+
+
+    End Class
+
+    Public Class Paramter
+        Shared SQL As New VERAG_PROG_ALLGEMEIN.SQL
+
+        Shared Function GET_PARAM_ByName(tcParam_name, TESTSYSTEM) As String
+            Return SQL.getValueTxtBySql("SELECT TOP 1 [Param_value]  FROM [tblPartnersystem_Paramter] WHERE  Param_system='ASFINAG' AND [Param_name]='" & tcParam_name & "'", , , SQL.GetNewOpenConnectionFMZOLL_SYSTEM(TESTSYSTEM))
+        End Function
+    End Class
+
+
+    Shared Function fktMod10Prüfziffer(strNummer As String) As String
+        ' Der Funktion wird im Feld strNummer der Wert ohne Prüfziffer übergeben.
+        ' Die Funktion berechnet und liefert die Prüfziffer zurück.
+
+        Dim intIX As Integer
+        Dim intZSum As Integer
+        Dim intSum As Integer
+        Dim boo1 As Boolean
+
+        For intIX = Len(strNummer) To 1 Step -1
+            intZSum = IIf(boo1, Mid(strNummer, intIX, 1) * 1, Mid(strNummer, intIX, 1) * 2)
+            If intZSum < 10 Then
+                intSum = intSum + intZSum
+            Else
+                intSum = intSum + ((intZSum Mod 10) + ((intZSum - (intZSum Mod 10)) / 10))
+            End If
+            boo1 = Not boo1
+        Next intIX
+
+        fktMod10Prüfziffer = CStr((10 - (intSum Mod 10)) Mod 10)
+
+    End Function
+
+    Public Class Exportist
+
+        Structure Header                  ' Format    Muss    von     bis     Kommentar
+            Dim SortField As String             ' N3        Y       1       3       "000"
+            Dim RecordID As String              ' N2        Y       4       5       "00"
+            Dim FileName As String             ' C3        Y       6       8       "TBL"
+            Dim LiveTestIndicator As String    ' C1        Y       9       9       "L" oder "T"
+            Dim FileCreationDate As String ' N8        Y       10      17      YYYYMMDD
+            Dim FileCreationTime As String       ' N4        Y       18      21      HHMM (24hr)
+            Dim RunNumber As String         ' N3        Y       22      24      Laufende Nummer pro File-Type
+            Dim SenderID As String ' C2        Y       25      26      "VG"
+            Dim ReceiverID As String           ' C2        Y       27      28      "EP"
+            Dim Filler As String                ' C3        Y       29      31      Leerzeichen
+        End Structure
+
+        Structure Body                    ' Format    Muss    von     bis     Kommentar
+            Dim SortField As String             ' N3        Y       1       3       "000"
+            Dim RecordID As String              ' N2        Y       4       5       "50"
+            Dim ISOCountryCode As String        ' N3        Y       6       8       "040" (Österreich)
+            Dim CardNumber As String            ' C22       Y       9       30      Komplette Tankkartennummer
+            'onlyBlacklist
+            Dim StopType As String               ' N1        Y       31      31      "3" Stopped for Post-Pay
+            'only Whitelist
+            Dim ValidFrom As String            ' N8        Y       31      38      YYYYMMDD
+            Dim ValidTo As String                ' N8        Y       39      46      YYYYMMDD
+            Dim NewCardNumber As String        ' N22       N       47      68      Tankkartennummer der Folge- oder Ersatzkarte
+            Dim NewValidFrom As String           ' N8        N       69      76      YYYYMMDD der Folge- oder Ersatzkarte
+            Dim NewValidTo As String
+        End Structure
+
+        Private Structure Trailer                 ' Format    Muss    von     bis     Kommentar
+            Dim SortField As String             ' N3        Y       1       3       "999"
+            Dim RecordID As String              ' N2        Y       4       5       "99"
+            Dim FileName As String              ' C3        Y       6       8       "TBL"
+            Dim RunNumber As String             ' N3        Y       9       11      Gleiche Nr. wie im Header
+            Dim RecordCount As String            ' N7        Y       12      18      Anzahl der Sätze inkl. Header und Trailer
+            Dim Filler As String                ' C13       Y       19      31      Leerzeichen
+        End Structure
+
+
+
+        '        Private Type TWLHeader                  ' Format    Muss    von     bis     Kommentar
+        '    SortField As String * 3             ' N3        Y       1       3       "000"
+        '    RecordID As String * 2              ' N2        Y       4       5       "00"
+        '    FileName As String * 3              ' C3        Y       6       8       "TWL"
+        '    LiveTestIndicator As String * 1     ' C1        Y       9       9       "L" oder "T"
+        '    FileCreationDate As String * 8      ' N8        Y       10      17      YYYYMMDD
+        '    FileCreationTime As String * 4      ' N4        Y       18      21      HHMM (24hr)
+        '    RunNumber As String * 3             ' N3        Y       22      24      Laufende Nummer pro File-Type
+        '    SenderID As String * 2              ' C2        Y       25      26      "VG"
+        '    ReceiverID As String * 2            ' C2        Y       27      28      "EP"
+        '    Filler As String * 56               ' C56       Y       29      84      Leerzeichen
+        'End Type
+
+        'Private Type TWLBody                    ' Format    Muss    von     bis     Kommentar
+        '    SortField As String * 3             ' N3        Y       1       3       "000"
+        '    RecordID As String * 2              ' N2        Y       4       5       "40"
+        '    ISOCountryCode As String * 3        ' N3        Y       6       8       "040" (Österreich)
+        '    CardNumber As String * 22           ' N22       Y       9       30      Komplette Tankkartennummer
+        '    ValidFrom As String * 8             ' N8        Y       31      38      YYYYMMDD
+        '    ValidTo As String * 8               ' N8        Y       39      46      YYYYMMDD
+        '    NewCardNumber As String * 22        ' N22       N       47      68      Tankkartennummer der Folge- oder Ersatzkarte
+        '    NewValidFrom As String * 8          ' N8        N       69      76      YYYYMMDD der Folge- oder Ersatzkarte
+        '    NewValidTo As String * 8            ' N8        N       77      84      YYYYMMDD der Folge- oder Ersatzkarte
+        'End Type
+
+        'Private Type TWLTrailer                 ' Format    Muss    von     bis     Kommentar
+        '    SortField As String * 3             ' N3        Y       1       3       "999"
+        '    RecordID As String * 2              ' N2        Y       4       5       "99"
+        '    FileName As String * 3              ' C3        Y       6       8       "TWL"
+        '    RunNumber As String * 3             ' N3        Y       9       11      Gleiche Nr. wie im Header
+        '    RecordCount As String * 7           ' N7        Y       12      18      Anzahl der Sätze inkl. Header und Trailer
+        '    Filler As String * 66               ' C66       Y       19      84      Leerzeichen
+        'End Type
+
+
+
+        Dim ASFINAG_PFAD, FTP_PFAD_TEST, FTP_PFAD
+        Dim sw As StreamWriter
+        Dim Dateiname = ""
+
+        Public Function initPFad()
+
+            ASFINAG_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("BEREITSTELLUNGS_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
+            FTP_PFAD_TEST = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path_Out_Test", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
+            FTP_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path_Out", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
+
+            If Not IO.Directory.Exists(ASFINAG_PFAD) Then IO.Directory.CreateDirectory(ASFINAG_PFAD)
+            If Not IO.Directory.Exists(FTP_PFAD_TEST) Then IO.Directory.CreateDirectory(FTP_PFAD_TEST)
+
+
+
+        End Function
+
+        Public Function exportiereBlackList() As Boolean
+
+            Dim fileName = "TBL"
+            Dim sucess = False
+            Dim Header As Header
+            Dim Body As Body
+            Dim Trailer As Trailer
+            Dim intRunNumber As Integer = 1
+            Dim lngAnzahlSätze As Long
+
+
+            Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+            'qryExportiereBlackList
+            Dim sqlstr As String = "
+            SELECT Kreditkarten.KartenNr AS CardNumber, Kreditkarten.Kartensperre AS StopType FROM Kreditkarten 
+            LEFT JOIN Kreditkarten AS Kreditkarten_1 ON Kreditkarten.NeueKartenNr = Kreditkarten_1.KartenNr 
+            WHERE Kreditkarten.Kartensperre > 0
+            AND ((Kreditkarten.Kartensperrdatum)<=GETDATE()) 
+            AND ((Left([Kreditkarten].[KartenNr],6))='990001') 
+            AND [Kreditkarten].[Kartenfreischaltungsdatum] <= GETDATE() 
+            And [Kreditkarten].[Kartenfreischaltungsdatum] <> '' 
+            AND DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))) >= GETDATE()
+            AND DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))) <> ''
+            AND (Kreditkarten_1.Kartenfreischaltungsdatum) Is Null Or (Kreditkarten_1.Kartenfreischaltungsdatum) > GETDATE() 
+            ORDER BY Kreditkarten.KartenNr"
+
+
+            Dim dt As DataTable = SQL.loadDgvBySql_Param(sqlstr, "FMZOLL")
+            'qry_ASFINAG_FileInfo_TBL
+            Dim currentFileNr As Integer = SQL.getValueTxtBySql("SELECT fileVersion FROM [FileINfo]  where [filename]='" & fileName & "'", "ASFINAG")
+            If currentFileNr = 999 Then currentFileNr = 0
+            currentFileNr = currentFileNr + 1
+            Dim preFilename As String = ""
+            If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
+                preFilename = "LVGEP"
+            Else
+                preFilename = "TVGEP"
+            End If
+
+            Dim strFile As String = ASFINAG_PFAD & "\" & preFilename & fileName & "." & currentFileNr
+
+            Try
+
+
+                'Dim fileExists As Boolean = File.Exists(ASFINAG_PFAD & "\" & strFile)
+
+                Using sw As New StreamWriter(File.Open(strFile, FileMode.OpenOrCreate))
+
+
+                    With Header
+                        .SortField = "000"
+                        .RecordID = "00"
+                        .FileName = fileName
+                        .LiveTestIndicator = "L" 'T für Testfile, L Livesystem
+                        .FileCreationDate = Today.ToString("yyyymmdd")
+                        .FileCreationTime = Now().ToString("hhmm")
+                        .RunNumber = Format(currentFileNr, "000")
+                        .SenderID = "VG"
+                        .ReceiverID = "EP"
+                        .Filler = New String(" ", 3)
+                        sw.Write(Header.SortField)
+                        sw.Write(Header.RecordID)
+                        sw.Write(Header.FileName)
+                        sw.Write(Header.LiveTestIndicator)
+                        sw.Write(Header.FileCreationDate)
+                        sw.Write(Header.FileCreationTime)
+                        sw.Write(Header.RunNumber)
+                        sw.Write(Header.SenderID)
+                        sw.Write(Header.ReceiverID)
+                        sw.Write(Header.Filler)
+                        sw.WriteLine()
+                    End With
+
+                    lngAnzahlSätze = 1
+                    For Each row As DataRow In dt.Rows
+
+                        lngAnzahlSätze = lngAnzahlSätze + 1
+                        With Body
+                            .SortField = "000"
+                            .RecordID = "50"
+                            .ISOCountryCode = "040"
+                            .CardNumber = row.Item("CardNumber") + New String(" ", 22 - Len(row.Item("CardNumber")))
+                            .StopType = row.Item("StopType")
+                            sw.Write(Body.SortField)
+                            sw.Write(Body.RecordID)
+                            sw.Write(Body.ISOCountryCode)
+                            sw.Write(Body.CardNumber)
+                            sw.Write(Body.StopType)
+                            sw.WriteLine()
+                        End With
+                    Next
+
+                    lngAnzahlSätze = lngAnzahlSätze + 1
+                    With Trailer
+                        .SortField = "999"
+                        .RecordID = "99"
+                        .FileName = "TBL"
+                        .RunNumber = Format(currentFileNr, "000")
+                        .RecordCount = Format(lngAnzahlSätze, "0000000")
+                        .Filler = New String(" ", 13)
+                        sw.Write(Trailer.SortField)
+                        sw.Write(Trailer.RecordID)
+                        sw.Write(Trailer.FileName)
+                        sw.Write(Trailer.RunNumber)
+                        sw.Write(Trailer.RecordCount)
+                        sw.Write(Trailer.Filler)
+                        sw.WriteLine()
+                    End With
+                    sw.Close()
+
+                    SQL.doSQL("UPDATE [dbo].[FileINfo] SET FileVersion=" & currentFileNr & " WHERE [filename]='" & fileName & "'", "ASFINAG")
+                    MsgBox("Files uploaded: " & uploadListToFTP(fileName))
+                    Return True
+
+                End Using
+            Catch ex As Exception
+                MsgBox(ex.Message)
+            End Try
+
+        End Function
+
+        Public Function exportiereWhiteList() As Boolean
+
+            Dim fileName = "TWL"
+            Dim sucess = False
+            Dim Header As Header
+            Dim Body As Body
+            Dim Trailer As Trailer
+            Dim intRunNumber As Integer = 1
+            Dim lngAnzahlSätze As Long
+
+
+            Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+            'qryExportiereWhiteList
+            Dim sqlstr As String = "
+                SELECT Kreditkarten.KartenNr AS CardNumber, 
+                CONVERT(varchar, [Kreditkarten].[Kartenfreischaltungsdatum],112) AS ValidFrom, 
+                CONVERT(varchar,DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))),112) AS ValidTo, 
+                Kreditkarten_1.KartenNr AS NewCardNumber, 
+                IIf(Not IsNull(Kreditkarten_1.KartenNr,0) <> 0 ,CONVERT(varchar,[Kreditkarten_1].[Kartenfreischaltungsdatum],112),'') AS NewValidFrom, 
+                IIf(Not IsNull(Kreditkarten_1.KartenNr,0) <> 0,CONVERT(varchar, DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))),112),'') AS NewValidTo,
+                 Kreditkarten.NeueKartenNrGemeldet
+                FROM Kreditkarten AS Kreditkarten_1 
+                RIGHT JOIN Kreditkarten ON Kreditkarten_1.KartenNr = Kreditkarten.NeueKartenNr
+                WHERE (([Kreditkarten].[Kartenfreischaltungsdatum])<= GETDATE() And ([Kreditkarten].[Kartenfreischaltungsdatum] <>'') 
+                AND DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))) >= GETDATE()
+                AND ((Kreditkarten_1.KartenNr) Is Null)) OR (((Kreditkarten_1.KartenNr) Is Not Null) AND ((Kreditkarten.NeueKartenNrGemeldet)= 0))
+                ORDER BY Kreditkarten.KartenNr, [Kreditkarten].[Kartenfreischaltungsdatum], CONVERT(varchar, DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))))
+                "
+
+            Dim dt As DataTable = SQL.loadDgvBySql_Param(sqlstr, "FMZOLL")
+            'qry_ASFINAG_FileInfo_TWL
+            Dim currentFileNr As Integer = SQL.getValueTxtBySql("SELECT fileVersion FROM [FileINfo]  where [filename]='" & fileName & "'", "ASFINAG")
+            If currentFileNr = 999 Then currentFileNr = 0
+            currentFileNr = currentFileNr + 1
+            Dim preFilename As String = ""
+            If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
+                preFilename = "LVGEP"
+            Else
+                preFilename = "TVGEP"
+            End If
+
+            Dim strFile As String = ASFINAG_PFAD & "\" & preFilename & fileName & "." & currentFileNr
+
+            Try
+
+
+                Using sw As New StreamWriter(File.Open(strFile, FileMode.OpenOrCreate))
+
+
+                    With Header
+                        .SortField = "000"
+                        .RecordID = "00"
+                        .FileName = fileName
+                        .LiveTestIndicator = "L" 'T für Testfile, L Livesystem
+                        .FileCreationDate = Today.ToString("yyyymmdd")
+                        .FileCreationTime = Now().ToString("hhmm")
+                        .RunNumber = Format(currentFileNr, "000")
+                        .SenderID = "VG"
+                        .ReceiverID = "EP"
+                        .Filler = New String(" ", 56)
+                        sw.Write(Header.SortField)
+                        sw.Write(Header.RecordID)
+                        sw.Write(Header.FileName)
+                        sw.Write(Header.LiveTestIndicator)
+                        sw.Write(Header.FileCreationDate)
+                        sw.Write(Header.FileCreationTime)
+                        sw.Write(Header.RunNumber)
+                        sw.Write(Header.SenderID)
+                        sw.Write(Header.ReceiverID)
+                        sw.Write(Header.Filler)
+                        sw.WriteLine()
+                    End With
+
+                    lngAnzahlSätze = 1
+                    For Each row As DataRow In dt.Rows
+
+                        lngAnzahlSätze = lngAnzahlSätze + 1
+                        With Body
+                            If Not IsDBNull(row.Item("NewCardNumber")) Then
+                                If Not row.Item("NeueKartenNrGemeldet") Then
+
+                                    lngAnzahlSätze = lngAnzahlSätze + 1
+                                    .SortField = "000"
+                                    .RecordID = "40"
+                                    .ISOCountryCode = "040"
+                                    .CardNumber = row.Item("CardNumber") + New String(" ", 22 - Len(row.Item("CardNumber")))
+                                    .ValidFrom = row.Item("ValidFrom")
+                                    .ValidTo = row.Item("ValidTo")
+                                    .NewCardNumber = row.Item("NewCardNumber") + New String(" ", 22 - Len(row.Item("NewCardNumber")))
+                                    .NewValidFrom = row.Item("NewValidFrom")
+                                    .NewValidTo = row.Item("NewValidTo")
+                                    sw.Write(.SortField)
+                                    sw.Write(.RecordID)
+                                    sw.Write(.ISOCountryCode)
+                                    sw.Write(.CardNumber)
+                                    sw.Write(.ValidFrom)
+                                    sw.Write(.ValidTo)
+                                    sw.Write(.NewCardNumber)
+                                    sw.Write(.NewValidFrom)
+                                    sw.Write(.NewValidTo)
+                                    sw.WriteLine()
+                                    row.Item("NeueKartenNrGemeldet") = True
+                                End If
+                            Else
+                                lngAnzahlSätze = lngAnzahlSätze + 1
+                                .SortField = "000"
+                                .RecordID = "40"
+                                .ISOCountryCode = "040"
+                                .CardNumber = row.Item("CardNumber") + New String(" ", 22 - Len(row.Item("CardNumber")))
+                                .ValidFrom = row.Item("ValidFrom")
+                                .ValidTo = row.Item("ValidTo")
+                                .NewCardNumber = "0000000000000000000000"
+                                .NewValidFrom = "00000000"
+                                .NewValidTo = "00000000"
+                                sw.Write(.SortField)
+                                sw.Write(.RecordID)
+                                sw.Write(.ISOCountryCode)
+                                sw.Write(.CardNumber)
+                                sw.Write(.ValidFrom)
+                                sw.Write(.ValidTo)
+                                sw.Write(.NewCardNumber)
+                                sw.Write(.NewValidFrom)
+                                sw.Write(.NewValidTo)
+                                sw.WriteLine()
+                            End If
+                        End With
+                    Next
+
+                    lngAnzahlSätze = lngAnzahlSätze + 1
+                    With Trailer
+                        .SortField = "999"
+                        .RecordID = "99"
+                        .FileName = "TBL"
+                        .RunNumber = Format(currentFileNr, "000")
+                        .RecordCount = Format(lngAnzahlSätze, "0000000")
+                        .Filler = New String(" ", 13)
+                        sw.Write(Trailer.SortField)
+                        sw.Write(Trailer.RecordID)
+                        sw.Write(Trailer.FileName)
+                        sw.Write(Trailer.RunNumber)
+                        sw.Write(Trailer.RecordCount)
+                        sw.Write(Trailer.Filler)
+                        sw.WriteLine()
+                    End With
+                    sw.Close()
+
+
+                    SQL.doSQL("UPDATE [dbo].[FileINfo] SET FileVersion=" & currentFileNr & " WHERE [filename]='" & fileName & "'", "ASFINAG")
+
+                    MsgBox("Files uploaded: " & uploadListToFTP(fileName))
+                    Return True
+
+                End Using
+            Catch ex As Exception
+                MsgBox(ex.Message)
+            End Try
+
+        End Function
+
+        Public Function uploadListToFTP(filename As String) As Integer
+
+            Dim cnt = 0
+            Try
+                Dim SERVER_Path = ""
+
+                If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
+
+                    SERVER_Path = Me.FTP_PFAD_TEST
+                Else
+
+                    SERVER_Path = Me.FTP_PFAD
+                End If
+
+                For Each f In IO.Directory.GetFiles(ASFINAG_PFAD)
+                    Dim fi As New IO.FileInfo(f)
+
+                    If Not fi.Name.StartsWith(".") AndAlso fi.Name.Contains(filename) Then
+                        Dim zielPfad = SERVER_Path
+                        'While IO.File.Exists(zielPfad)
+                        '    zielPfad = SERVER_Path & "\" & Now.ToString("yyyyMMdd_HHmmss_") & fi.Name
+                        'End While
+                        IO.File.Copy(f, zielPfad & "\" & fi.Name)
+                        If Not VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
+                            If IO.File.Exists(zielPfad) Then IO.File.Delete(f)
+                        End If
+                        cnt += 1
+                    End If
+
+                Next
+
+
+                Return cnt
+
+            Catch ex As Exception
+                VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
+            End Try
+
+            Return cnt
+
+
+        End Function
+
+    End Class
+
+End Class
diff --git a/initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.Designer.vb b/initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.Designer.vb
new file mode 100644
index 0000000..7154f4d
--- /dev/null
+++ b/initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.Designer.vb
@@ -0,0 +1,260 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmAsfinag_NachrichtenVerabeitung
+    Inherits System.Windows.Forms.Form
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()>
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()>
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAsfinag_NachrichtenVerabeitung))
+        Me.btn = New System.Windows.Forms.Button()
+        Me.pnl = New System.Windows.Forms.Panel()
+        Me.lblDatenCnt = New System.Windows.Forms.Label()
+        Me.dgvEinarbeitung = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.Label9 = New System.Windows.Forms.Label()
+        Me.Button2 = New System.Windows.Forms.Button()
+        Me.Label7 = New System.Windows.Forms.Label()
+        Me.ListBox3 = New System.Windows.Forms.ListBox()
+        Me.Label6 = New System.Windows.Forms.Label()
+        Me.Label5 = New System.Windows.Forms.Label()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.btnOK = New System.Windows.Forms.Button()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.clmnArt = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.Column1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.pnl.SuspendLayout()
+        CType(Me.dgvEinarbeitung, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'btn
+        '
+        Me.btn.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btn.BackColor = System.Drawing.Color.Red
+        Me.btn.FlatAppearance.BorderColor = System.Drawing.Color.Gray
+        Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btn.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.btn.ForeColor = System.Drawing.Color.White
+        Me.btn.Location = New System.Drawing.Point(379, -1)
+        Me.btn.Margin = New System.Windows.Forms.Padding(0)
+        Me.btn.Name = "btn"
+        Me.btn.Size = New System.Drawing.Size(75, 22)
+        Me.btn.TabIndex = 6
+        Me.btn.Text = "X"
+        Me.btn.UseVisualStyleBackColor = False
+        '
+        'pnl
+        '
+        Me.pnl.BackColor = System.Drawing.Color.White
+        Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.pnl.Controls.Add(Me.lblDatenCnt)
+        Me.pnl.Controls.Add(Me.dgvEinarbeitung)
+        Me.pnl.Controls.Add(Me.Label9)
+        Me.pnl.Controls.Add(Me.Button2)
+        Me.pnl.Controls.Add(Me.Label7)
+        Me.pnl.Controls.Add(Me.ListBox3)
+        Me.pnl.Controls.Add(Me.Label6)
+        Me.pnl.Controls.Add(Me.Label5)
+        Me.pnl.Controls.Add(Me.Button1)
+        Me.pnl.Controls.Add(Me.btnOK)
+        Me.pnl.Controls.Add(Me.Label2)
+        Me.pnl.Controls.Add(Me.Label1)
+        Me.pnl.Controls.Add(Me.btn)
+        Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.pnl.Location = New System.Drawing.Point(0, 0)
+        Me.pnl.Name = "pnl"
+        Me.pnl.Size = New System.Drawing.Size(456, 319)
+        Me.pnl.TabIndex = 1
+        '
+        'lblDatenCnt
+        '
+        Me.lblDatenCnt.AutoSize = True
+        Me.lblDatenCnt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblDatenCnt.Location = New System.Drawing.Point(309, 132)
+        Me.lblDatenCnt.Name = "lblDatenCnt"
+        Me.lblDatenCnt.Size = New System.Drawing.Size(13, 13)
+        Me.lblDatenCnt.TabIndex = 19
+        Me.lblDatenCnt.Text = "0"
+        Me.lblDatenCnt.Visible = False
+        '
+        'dgvEinarbeitung
+        '
+        Me.dgvEinarbeitung.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvEinarbeitung.AllowUserToAddRows = False
+        Me.dgvEinarbeitung.AllowUserToDeleteRows = False
+        Me.dgvEinarbeitung.AllowUserToOrderColumns = True
+        Me.dgvEinarbeitung.AllowUserToResizeColumns = False
+        Me.dgvEinarbeitung.AllowUserToResizeRows = False
+        Me.dgvEinarbeitung.BackgroundColor = System.Drawing.Color.White
+        Me.dgvEinarbeitung.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvEinarbeitung.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnArt, Me.Column1})
+        Me.dgvEinarbeitung.Location = New System.Drawing.Point(12, 164)
+        Me.dgvEinarbeitung.Name = "dgvEinarbeitung"
+        Me.dgvEinarbeitung.RowHeadersVisible = False
+        Me.dgvEinarbeitung.Size = New System.Drawing.Size(291, 145)
+        Me.dgvEinarbeitung.TabIndex = 18
+        '
+        'Label9
+        '
+        Me.Label9.AutoSize = True
+        Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label9.Location = New System.Drawing.Point(306, 103)
+        Me.Label9.Name = "Label9"
+        Me.Label9.Size = New System.Drawing.Size(44, 13)
+        Me.Label9.TabIndex = 17
+        Me.Label9.Text = "läuft..."
+        Me.Label9.Visible = False
+        '
+        'Button2
+        '
+        Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button2.Location = New System.Drawing.Point(309, 50)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(141, 50)
+        Me.Button2.TabIndex = 16
+        Me.Button2.Text = "Einlesen"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
+        'Label7
+        '
+        Me.Label7.AutoSize = True
+        Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label7.Location = New System.Drawing.Point(8, 34)
+        Me.Label7.Name = "Label7"
+        Me.Label7.Size = New System.Drawing.Size(90, 13)
+        Me.Label7.TabIndex = 13
+        Me.Label7.Text = "Daten sichern:"
+        '
+        'ListBox3
+        '
+        Me.ListBox3.FormattingEnabled = True
+        Me.ListBox3.Location = New System.Drawing.Point(11, 50)
+        Me.ListBox3.Name = "ListBox3"
+        Me.ListBox3.Size = New System.Drawing.Size(292, 95)
+        Me.ListBox3.TabIndex = 12
+        '
+        'Label6
+        '
+        Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label6.Location = New System.Drawing.Point(306, 240)
+        Me.Label6.Name = "Label6"
+        Me.Label6.Size = New System.Drawing.Size(144, 37)
+        Me.Label6.TabIndex = 11
+        Me.Label6.Text = "0 Datensätze nicht " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "erkannt."
+        Me.Label6.Visible = False
+        '
+        'Label5
+        '
+        Me.Label5.AutoSize = True
+        Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label5.Location = New System.Drawing.Point(306, 217)
+        Me.Label5.Name = "Label5"
+        Me.Label5.Size = New System.Drawing.Size(44, 13)
+        Me.Label5.TabIndex = 10
+        Me.Label5.Text = "läuft..."
+        Me.Label5.Visible = False
+        '
+        'Button1
+        '
+        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button1.Location = New System.Drawing.Point(309, 164)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(141, 50)
+        Me.Button1.TabIndex = 9
+        Me.Button1.Text = "Einarbeiten"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'btnOK
+        '
+        Me.btnOK.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnOK.Location = New System.Drawing.Point(309, 280)
+        Me.btnOK.Name = "btnOK"
+        Me.btnOK.Size = New System.Drawing.Size(141, 29)
+        Me.btnOK.TabIndex = 9
+        Me.btnOK.Text = "Schließen"
+        Me.btnOK.UseVisualStyleBackColor = True
+        Me.btnOK.Visible = False
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label2.Location = New System.Drawing.Point(8, 8)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(231, 13)
+        Me.Label2.TabIndex = 8
+        Me.Label2.Text = "Einarbeitung der Nachrichtendaten von Asfinag"
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label1.Location = New System.Drawing.Point(8, 148)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(82, 13)
+        Me.Label1.TabIndex = 8
+        Me.Label1.Text = "Einarbeitung:"
+        '
+        'clmnArt
+        '
+        Me.clmnArt.HeaderText = "Dateiname"
+        Me.clmnArt.Name = "clmnArt"
+        Me.clmnArt.Width = 150
+        '
+        'Column1
+        '
+        Me.Column1.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.Column1.HeaderText = "Status"
+        Me.Column1.Name = "Column1"
+        '
+        'frmAsfinag_NachrichtenVerabeitung
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(456, 319)
+        Me.Controls.Add(Me.pnl)
+        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.Name = "frmAsfinag_NachrichtenVerabeitung"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "DY NachrichtenVerarbeitung"
+        Me.pnl.ResumeLayout(False)
+        Me.pnl.PerformLayout()
+        CType(Me.dgvEinarbeitung, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+
+    End Sub
+    Friend WithEvents btn As System.Windows.Forms.Button
+    Friend WithEvents pnl As System.Windows.Forms.Panel
+    Friend WithEvents Label2 As System.Windows.Forms.Label
+    Friend WithEvents Label1 As System.Windows.Forms.Label
+    Friend WithEvents Button1 As System.Windows.Forms.Button
+    Friend WithEvents btnOK As System.Windows.Forms.Button
+    Friend WithEvents Label5 As System.Windows.Forms.Label
+    Friend WithEvents Label6 As System.Windows.Forms.Label
+    Friend WithEvents Label7 As System.Windows.Forms.Label
+    Friend WithEvents ListBox3 As System.Windows.Forms.ListBox
+    Friend WithEvents Label9 As System.Windows.Forms.Label
+    Friend WithEvents Button2 As System.Windows.Forms.Button
+    Friend WithEvents dgvEinarbeitung As VERAG_PROG_ALLGEMEIN.MyDatagridview
+    Friend WithEvents lblDatenCnt As Label
+    Friend WithEvents clmnArt As DataGridViewTextBoxColumn
+    Friend WithEvents Column1 As DataGridViewTextBoxColumn
+End Class
diff --git a/initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.resx b/initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.resx
new file mode 100644
index 0000000..25e30ca
--- /dev/null
+++ b/initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.resx
@@ -0,0 +1,986 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <metadata name="clmnArt.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="Column1.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAABAAEAgIAAAAEAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMgAAMQOAADEDgAAAAAAAAAA
+        AACRbEd5TB+CWC59USZ8USV9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ8USV9USaCWC55TB+RbEd4Sx5mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB4Sx5/VClmMwBuPg5r
+        OglrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOgluPg5mMwB/VCl0RhhmMwBmMwBnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFmMwBmMwB0RhhzRBVmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBz
+        RBV3Sh1mMwBnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBnNQJmMwB3Sh18UCRmMwBqOQdnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFqOQdmMwB8UCR9USZmMwBrOQhn
+        NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwDm4N3/////////
+        ///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////////////
+        //////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwB0SSb39fT/
+        //////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+YfWtmMwBmMwBm
+        MwBmMwB0SSbu6+n////////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
+        ///////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5zUy8X////////////////L
+        v7itmo1mMwBmMwCYfWv///////90SSZmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
+        NAFmMwBmMwBmMwB0SSb////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwDu6+n///////////////////////////////////////////////////////////+j
+        jH1mMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwC3p5z/
+        ///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwCYfWv////////////////Bs6pmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwB0SSb///////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCt
+        mo3////////////////////////////////////m4N2Mbli3p5z///////+jjH1mMwBmMwBmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwCMblj///////////////////////////+M
+        blhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////
+        ///////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////+3
+        p5xmMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDU
+        y8X///////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////90SSZm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////////////////////////////////39fTm
+        4N3///////+3p5xmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwC3
+        p5z////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
+        p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwCjjH3////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXUL///////////////////90
+        SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwC3p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////U
+        y8WAXUJmMwBmMwC3p5z39fT////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwBmMwBmMwDBs6r////////////////u6+n///////////+tmo1mMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////////m4N1mMwBmMwBmMwBm
+        MwBmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
+        ///////////////////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwD39fT////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXULu6+n////////////////39fRm
+        MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwDm4N3/////////////
+        //+jjH3////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////
+        //////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD3
+        9fT///////////////90SSZmMwBmMwBmMwBmMwDm4N3///////////////+jjH1mMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwDu6+n/////////////////////////////////////////////////////
+        //////+3p5xmMwBmMwBmMwBmMwBmMwBmMwCjjH3///////////////////+MblhmMwBmMwBmMwBmMwBm
+        MwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
+        NAFmMwBmMwBmMwD39fT///////////////9mMwDLv7j///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwDm4N3////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwCAXUL/////////
+        ///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////
+        //////////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
+        //////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+jjH1mMwBmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwCMblj////////////////m4N1mMwCAXUL39fT/
+        ///////39fSAXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////Uy8VmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////
+        ///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwDUy8X////////////u6+lmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBm
+        MwBmMwBmMwBmMwBmMwC3p5z///////////////////9mMwBmMwBmMwB0SSb/////////////////////
+        //////////////+3p5xmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwCjjH3/
+        ///////////////Uy8VmMwBmMwC3p5z////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwC3p5z////////////////////////////////////////////////////m4N1mMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwCjjH3////////////////////////////////////////////////////////////d
+        1tGMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo1mMwBmMwBmMwCt
+        mo3////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z///////////////////90SSZm
+        MwBmMwBmMwDm4N3////////////////////////////////Uy8VmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwBmMwC3p5z///////////////+3p5xmMwBmMwB0SSb39fT///////////+Y
+        fWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////////
+        //////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////
+        //////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
+        p5z////////////39fR0SSZmMwBmMwDBs6r////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwCjjH3///////////////////+jjH1mMwBmMwBmMwDBs6r////////////////////////////////3
+        9fRmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwDUy8X///////////////+t
+        mo1mMwBmMwBmMwCtmo3////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
+        //////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwDu6+n///////////////90SSZmMwBmMwBmMwBmMwBmMwCjjH3m4N3////////////////39fR0SSZm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////+3p5xmMwBmMwDUy8X/////////////
+        //+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////////Bs6pmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
+        NAFmMwBmMwDu6+n///////////////+MblhmMwBmMwBmMwBmMwDu6+n///////////+tmo1mMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwBmMwBmMwBm
+        MwB0SSbu6+n///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////
+        ///39fSAXUJmMwD39fT///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////
+        ///////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////Uy8W3p5y3p5yYfWtmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwB0SSb///////////////////90SSZmMwBmMwBmMwBm
+        MwCtmo3////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////m4N1m
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
+        //////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////Bs6pmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwDUy8X////////////Lv7h0SSb///////////////////90SSZmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDu
+        6+n///////////////+jjH1mMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwCYfWv/////
+        ///////////u6+lmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwCjjH3///////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwCYfWv////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////
+        //////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo3/
+        ///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////
+        //+YfWtmMwBmMwBmMwBmMwBmMwCtmo3////////////////u6+lmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////
+        //////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+MblhmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////u6+lmMwBm
+        MwBmMwBmMwBmMwCAXULLv7j///////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwC3p5z////////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwDd1tH///////////////////+3p5x0SSZmMwBmMwC3p5z///////////////////+t
+        mo1mMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwDLv7j////////////////Bs6pm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/
+        //////////////////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBm
+        MwBmMwDm4N3////////////////////////////////////////////////////////////Bs6pmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////////////////////+3
+        p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////
+        ///////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
+        NAFmMwDm4N3///////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+Y
+        fWtmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////////////////////////
+        //////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////
+        ///////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCj
+        jH3///////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwCtmo339fT///////////////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAF0SSb///////////////////+MblhmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwDLv7j////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwC3p5z/////////////////
+        //////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////
+        ///////////////////////////////////////m4N23p5yMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////9mMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH23p5z39fT////////////////Uy8W3
+        p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
+        NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ8UCRmMwBqOQdn
+        NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBnNAFqOQdmMwB8UCR3Sh1mMwBnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNQJmMwB3Sh1zRBVmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBz
+        RBV0RhhmMwBmMwBnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFmMwBmMwB0Rhh/VClmMwBuPg5rOglrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOgluPg5mMwB/VCl4Sx5mMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwB4Sx6RbEd5TB+CWC59USZ8USV9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ8USV9USaCWC55TB+RbEf/////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////////////////////////////////p6ferq+Kr
+        q+Krq+Krq+Krq+Krq+LFxer/////////////////////////////////////////////////////////
+        //////////+4uOarq+Krq+Krq+Krq+Krq+Ld3fP/////////////////////////////////////////
+        //////////////////////////////+4uOarq+Krq+Krq+Krq+Krq+Ld3fP/////////////////////
+        //////////////////////+rq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Kr
+        q+Krq+K4uOb////////////////////////////////Fxeqrq+Krq+Krq+Krq+Krq+Krq+Lp6ff/////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////d3fMDA70DA70DA70DA70DA70DA71ZWcv/////////////////////////
+        ///////////////////////////////R0e9sbNADA70DA70DA70DA70DA70DA70DA70DA70DA72dnd30
+        9Pv////////////////////////////////////////////////R0e9sbNADA70DA70DA70DA70DA70D
+        A70DA70DA70DA72dnd309Pv///////////////////////////////8pKcIDA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70pKcL///////////////////+4uOZsbNADA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA72dnd3p6ff/////////////////////////////////////////
+        //////////////////////////////////////////////////////////8pKcIDA70DA70DA70DA70D
+        A70DA73///////////////////////////////////////////////////+dnd0DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA724uOb///////////////////////////////////////+d
+        nd0DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA724uOb/////////////////////
+        //////9ZWcsDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA7309Pv/
+        ///////p6fdZWcsDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72rq+L/////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////9sbNADA70DA70DA70DA70DA70DA73d3fP/////////////////////////////////////
+        //////9+ftQDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72rq+L/////
+        //////////////////////////9+ftQDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA72rq+L///////////////////////+OjtkDA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA73d3fP////p6fcpKcIDA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA72dnd3/////////////////////////////////////////////////
+        //////////////////////////////////////////+dnd0DA70DA70DA70DA70DA70DA73Fxer/////
+        //////////////////////////////////+rq+IDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA72rq+L///////////////////////+rq+IDA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72rq+L///////////////////+rq+IDA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA724uOb///9ZWcsDA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA73Fxer/////////////
+        //////////////////////////////////////////////////////////////////////////+rq+ID
+        A70DA70DA70DA70DA70DA72dnd3////////////////////////////////////p6fcDA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA73d3fP/////////////
+        ///p6fcDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A73d3fP////////////////R0e8DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA72rq+K4uOYDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA71ZWcv/////////////////////////////////////////////////////////////
+        ///////////////////////////d3fMDA70DA70DA70DA70DA70DA71+ftT/////////////////////
+        //////////////+rq+IDA70DA70DA70DA70DA70DA70DA72dnd309Pv////R0e9+ftQDA70DA70DA70D
+        A70DA70DA70DA71sbND///////////////+rq+IDA70DA70DA70DA70DA70DA70DA72dnd309Pv////R
+        0e9+ftQDA70DA70DA70DA70DA70DA70DA71sbND////////////////09PsDA70DA70DA70DA70DA70D
+        A71ZWcv///////////////////////////////////////9sbNADA70DA70DA70DA70DA70DA70DA72d
+        nd3d3fP////////d3fN+ftQDA70DA70DA70DA70DA70DA70DA73d3fP/////////////////////////
+        ///////////////////////////////////////////////////////////09PsDA70DA70DA70DA70D
+        A70DA71ERMf///////////////////////////////////9ZWcsDA70DA70DA70DA70DA70DA72rq+L/
+        //////////////////+dnd0DA70DA70DA70DA70DA70DA70DA73Fxer///////////9ZWcsDA70DA70D
+        A70DA70DA70DA72rq+L///////////////////+dnd0DA70DA70DA70DA70DA70DA70DA73Fxer/////
+        //////////8pKcIDA70DA70DA70DA70DA70DA73////////////////////////////////////09PsD
+        A70DA70DA70DA70DA70DA70DA73d3fP///////////////////////9sbNADA70DA70DA70DA70DA70D
+        A73Fxer/////////////////////////////////////////////////////////////////////////
+        //////////////9ZWcsDA70DA70DA70DA70DA70DA7309Pv////////////////////////////09PsD
+        A70DA70DA70DA70DA70DA71ERMf///////////////////////////9ZWcsDA70DA70DA70DA70DA70D
+        A71sbND////////09PsDA70DA70DA70DA70DA70DA71ERMf///////////////////////////9ZWcsD
+        A70DA70DA70DA70DA70DA71sbND///////////////9+ftQDA70DA70DA70DA70DA70DA73d3fP/////
+        ///////////////////////////09Purq+Krq+Krq+JsbNADA70DA72Ojtn/////////////////////
+        //////9ZWcsDA70DA70DA70DA70DA70DA724uOb/////////////////////////////////////////
+        //////////////////////////////////////////////9+ftQDA70DA70DA70DA70DA70DA73R0e//
+        ///////////////////////////d3fMDA70DA70DA70DA70DA70DA71+ftT/////////////////////
+        //////+4uOYDA70DA70DA70DA70DA70DA70DA7309Pv////d3fMDA70DA70DA70DA70DA70DA71+ftT/
+        //////////////////////////+4uOYDA70DA70DA70DA70DA70DA70DA7309Pv///////////+dnd0D
+        A70DA70DA70DA70DA70DA73Fxer/////////////////////////////////////////////////////
+        ///////////////////////////d3fOrq+IpKcIDA70DA70DA70DA70DA70DA70DA73Fxer/////////
+        //////////////////////////////////////////////////////////////////////////////+r
+        q+IDA70DA70DA70DA70DA70DA72rq+L////////////////////////////R0e8DA70DA70DA70DA70D
+        A70DA72Ojtn///////////////////////////////8pKcIDA70DA70DA70DA70DA70DA73Fxer////R
+        0e8DA70DA70DA70DA70DA70DA72Ojtn///////////////////////////////8pKcIDA70DA70DA70D
+        A70DA70DA73Fxer///////////+4uOYDA70DA70DA70DA70DA70DA72rq+L/////////////////////
+        //////////////////////////////////////////////+4uOarq+IDA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA7309Pv/////////////////////////////////////////////////////////
+        ///////////////////////////////FxeoDA70DA70DA70DA70DA70DA72dnd3/////////////////
+        ///////////R0e8DA70DA70DA70DA70DA70DA72Ojtn///////////////////////////////9+ftQD
+        A70DA70DA70DA70DA70DA72rq+L////R0e8DA70DA70DA70DA70DA70DA72Ojtn/////////////////
+        //////////////9+ftQDA70DA70DA70DA70DA70DA72rq+L////////////d3fMDA70DA70DA70DA70D
+        A70DA71+ftT////////////////////////////////////////////////////////p6fednd0DA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71sbND/////////////////////////////
+        ///////////////////////////////////////////////////////////////p6fcDA70DA70DA70D
+        A70DA70DA71ZWcv////////////////////////////p6fcDA70DA70DA70DA70DA70DA71ZWcv/////
+        //////////////////////////+rq+IDA70DA70DA70DA70DA70DA72Ojtn////p6fcDA70DA70DA70D
+        A70DA70DA71ZWcv///////////////////////////////+rq+IDA70DA70DA70DA70DA70DA72Ojtn/
+        ///////////09PsDA70DA70DA70DA70DA70DA71ERMf/////////////////////////////////////
+        ///////////////FxeoDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70pKcLp
+        6ff/////////////////////////////////////////////////////////////////////////////
+        //////////////////8pKcIDA70DA70DA70DA70DA70pKcL////////////////////////////09PsD
+        A70DA70DA70DA70DA70DA70pKcL////////////////////////////////d3fMDA70DA70DA70DA70D
+        A70DA71sbND////09PsDA70DA70DA70DA70DA70DA70pKcL////////////////////////////////d
+        3fMDA70DA70DA70DA70DA70DA71sbND///////////////9ZWcsDA70DA70DA70DA70DA70DA7309Pv/
+        ///////////////////////////////////////////FxeoDA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA71ERMfd3fP/////////////////////////////////////////////////
+        //////////////////////////////////////////////////9ZWcsDA70DA70DA70DA70DA70DA73d
+        3fP///////////////////////////8pKcIDA70DA70DA70DA70DA70DA73R0e//////////////////
+        ///////////p6fcDA70DA70DA70DA70DA70DA71sbND///////8pKcIDA70DA70DA70DA70DA70DA73R
+        0e/////////////////////////////p6fcDA70DA70DA70DA70DA70DA71sbND///////////////9+
+        ftQDA70DA70DA70DA70DA70DA73d3fP////////////////////////////////////////09PspKcID
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71ZWcurq+L/////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //+dnd0DA70DA70DA70DA70DA70DA73Fxer///////////////////////////9+ftQDA70DA70DA70D
+        A70DA70DA72Ojtn////////////////////////////p6fcDA70DA70DA70DA70DA70DA71+ftT/////
+        //9+ftQDA70DA70DA70DA70DA70DA72Ojtn////////////////////////////p6fcDA70DA70DA70D
+        A70DA70DA71+ftT///////////////+rq+IDA70DA70DA70DA70DA70DA724uOb/////////////////
+        ///////////////////////FxeoDA70DA70DA70DA70DA70DA70DA70DA70DA70DA71sbNCrq+Lp6ff/
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////////////////////////////+rq+IDA70DA70DA70DA70DA70DA72rq+L/////////////
+        ///////////////FxeoDA70DA70DA70DA70DA70DA70DA73p6ff////////////////////////FxeoD
+        A70DA70DA70DA70DA70DA72Ojtn////////FxeoDA70DA70DA70DA70DA70DA70DA73p6ff/////////
+        ///////////////FxeoDA70DA70DA70DA70DA70DA72Ojtn////////////////FxeoDA70DA70DA70D
+        A70DA70DA72dnd3///////////////////////////////////////+rq+IDA70DA70DA70DA70DA70D
+        A70DA72Ojtm4uOb/////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////////////////////////////d3fMDA70DA70D
+        A70DA70DA70DA71+ftT///////////////////////////////8pKcIDA70DA70DA70DA70DA70DA71+
+        ftT///////////////////////+OjtkDA70DA70DA70DA70DA70DA72rq+L///////////8pKcIDA70D
+        A70DA70DA70DA70DA71+ftT///////////////////////+OjtkDA70DA70DA70DA70DA70DA72rq+L/
+        ///////////////d3fMDA70DA70DA70DA70DA70DA71sbND/////////////////////////////////
+        //////+rq+IDA70DA70DA70DA70DA70DA73d3fP////////////////////p6ferq+Krq+L09Pv/////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////09PsDA70DA70DA70DA70DA70DA71ERMf/////////////////////////////
+        //+rq+IDA70DA70DA70DA70DA70DA70DA71+ftT///////////////+4uOYDA70DA70DA70DA70DA70D
+        A70DA73d3fP///////////+rq+IDA70DA70DA70DA70DA70DA70DA71+ftT///////////////+4uOYD
+        A70DA70DA70DA70DA70DA70DA73d3fP///////////////////8pKcIDA70DA70DA70DA70DA70pKcL/
+        //////////////////////////////////////+rq+IDA70DA70DA70DA70DA70DA724uOb/////////
+        ///////09PtZWcsDA70DA70DA70DA71sbNCrq+L09Pv/////////////////////////////////////
+        ///////////////////////////09Purq+Krq+Krq+Krq+Krq+Krq+IpKcIDA70DA70DA70DA70DA70D
+        A72rq+Krq+Krq+Krq+Krq+Krq+LR0e////////9ERMcDA70DA70DA70DA70DA70DA70DA70DA72rq+Kr
+        q+JZWcsDA70DA70DA70DA70DA70DA70DA71ZWcv///////////////////9ERMcDA70DA70DA70DA70D
+        A70DA70DA70DA72rq+Krq+JZWcsDA70DA70DA70DA70DA70DA70DA71ZWcv/////////////////////
+        //9ZWcsDA70DA70DA70DA70DA70DA7309Pv////////////////////////////////////R0e8DA70D
+        A70DA70DA70DA70DA70DA71ZWcurq+Krq+J+ftQDA70DA70DA70DA70DA70DA70DA70pKcL09Pv/////
+        ///////////////////////////////////////////////////////////09PsDA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72Ojtn////////d3fMDA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA73R0e//////////
+        ///////////d3fMDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA73R0e////////////////////////+OjtkDA70DA70DA70DA70DA70DA73R0e//////////////
+        //////////////////////////9ERMcDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA72rq+L/////////////////////////////////////////////////////////
+        //////////////8pKcIDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA71ZWcv///////////+4uOYDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA72dnd3///////////////////////////+4uOYDA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA72dnd3///////////////////////////+rq+IDA70DA70D
+        A70DA70DA70DA72rq+L////////////////////////////////////////d3fMDA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71ZWcv/////////////////////////////
+        //////////////////////////////////////////////9sbNADA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70pKcL///////////////+4uOYDA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71+ftT/////////////////////////////////
+        //+4uOYDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71+ftT/////////////
+        ///////////////////R0e8DA70DA70DA70DA70DA70DA72Ojtn/////////////////////////////
+        //////////////+4uOYDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71ZWcvp
+        6ff///////////////////////////////////////////////////////////////////////////+d
+        nd0DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA73p
+        6ff////////////////d3fNZWcsDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA724uOb/////
+        ///////////////////////////////////////d3fNZWcsDA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA724uOb////////////////////////////////////09PsDA70DA70DA70DA70DA70DA71Z
+        Wcv////////////////////////////////////////////////R0e9ERMcDA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA72Ojtn/////////////////////////////////////////////////////
+        //////////////////////////////+rq+IDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
+        A70DA70DA70DA70DA70DA70DA70DA73R0e/////////////////////////R0e+rq+IpKcIDA70DA70D
+        A70DA70DA72Ojtmrq+L////////////////////////////////////////////////////////////R
+        0e+rq+IpKcIDA70DA70DA70DA70DA72Ojtmrq+L/////////////////////////////////////////
+        //////8pKcIDA70DA70DA70DA70DA70DA73/////////////////////////////////////////////
+        //////////+4uOarq+IDA70DA70DA70DA70DA70DA71+ftSrq+L09Pv/////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////////////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==
+</value>
+  </data>
+</root>
\ No newline at end of file
diff --git a/initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.vb b/initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.vb
new file mode 100644
index 0000000..47897b9
--- /dev/null
+++ b/initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.vb
@@ -0,0 +1,667 @@
+Imports System.IO
+Imports System.Globalization
+Imports System.Xml
+Imports Renci.SshNet
+Imports System.Net
+Imports System.Text
+Imports System.ComponentModel
+Imports RoutineManager.cAsfinag
+Imports DocumentFormat.OpenXml.Drawing.Charts
+Imports DocumentFormat.OpenXml.VariantTypes
+
+Public Class frmAsfinag_NachrichtenVerabeitung
+    Dim cntDatenEingelesen As Integer = 0
+    Dim dsNichtErkannt As Integer = 0
+    Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+    Dim allowClose = False
+    '  Dim DY_PFAD = "C:\Users\DEVELOPER1\Desktop\test\TEST\"
+
+    Dim ASFINAG_PFAD = "" '"C:\Users\DEVELOPER1\Desktop\test\TEST\Nachrichtendaten_Einarbeitung\"
+    Dim VERARBEITUNGS_PFAD = "" '"C:\Users\DEVELOPER1\Desktop\test\TEST\Nachrichtendaten_Einarbeitung\"
+    Dim ZIEL_PFAD = "" '"C:\Users\DEVELOPER1\Desktop\test\TEST\Nachrichtendaten_Ablage\"
+    Dim ERROR_PFAD = "" '"C:\Users\DEVELOPER1\Desktop\test\TEST\Nachrichtendaten_ERROR\"
+    Dim PARTNERSYSTEM = "ASFINAG"
+    Dim SERVER_Path = ""
+    Dim SERVER_Path_TEST = ""
+    Dim FileType As String
+
+    Dim Dateiname = ""
+
+    Sub New(FileType)
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+        Me.FileType = FileType
+    End Sub
+    Sub New(FileType, allowClose) 'autostart
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+        FileType = FileType
+        Me.allowClose = allowClose
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+
+    End Sub
+
+    Sub initPfade()
+        Me.SERVER_Path = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path_In", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
+        Me.SERVER_Path_TEST = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path_In_Test", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
+        Me.ASFINAG_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("BEREITSTELLUNGS_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
+        Me.VERARBEITUNGS_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("VERARBEITUNGS_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
+        Me.ZIEL_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("ZIEL_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
+        Me.ERROR_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("ERROR_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
+
+        If Not IO.Directory.Exists(VERARBEITUNGS_PFAD) Then IO.Directory.CreateDirectory(VERARBEITUNGS_PFAD)
+        If Not IO.Directory.Exists(ZIEL_PFAD) Then IO.Directory.CreateDirectory(ZIEL_PFAD)
+        If Not IO.Directory.Exists(ERROR_PFAD) Then IO.Directory.CreateDirectory(ERROR_PFAD)
+
+
+
+        'Me.BOX_VERSION = NCTSTR_Worker.cDY_Paramter.GET_PARAM_ByName("BOX_VERSION", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
+
+    End Sub
+
+
+    Private Sub frmDYNachrichtenVerarbeitung_Load(sender As Object, e As EventArgs) Handles Me.Load
+        initPfade()
+
+        If FileType <> "" Then
+
+            Label2.Text &= " " & FileType.ToUpper
+
+            For Each d In System.IO.Directory.GetFiles(VERARBEITUNGS_PFAD)
+                Dim filename = frmStartOptions.cut_file(d)
+                If filename.ToLower.Contains(FileType) Then
+                    ListBox3.Items.Add(filename)
+                End If
+
+                Me.Refresh()
+            Next
+        End If
+
+    End Sub
+
+    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
+        Me.Enabled = False
+        Try
+            Label9.Visible = True
+            Dim cnt = getNachrichtenDatenFromFTP()
+            Label9.Text = cnt & " Datensätze empfangen."
+
+        Catch ex As Exception
+            VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
+        End Try
+        Me.Enabled = True
+
+    End Sub
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        Me.Enabled = False
+        Try
+            Label5.Visible = True
+
+            DatenEinlesen() '<<<<------------
+
+            If dsNichtErkannt > 0 Then
+
+                Label6.Text = dsNichtErkannt & " Datensätze nicht " & vbNewLine & "erkannt."
+                Label6.Visible = True
+            End If
+        Catch ex As Exception
+            VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
+        End Try
+        Me.Enabled = True
+        Label5.Text = cntDatenEingelesen & " Datensätze verarbeitet."
+
+    End Sub
+
+
+    Function getNachrichtenDatenFromFTP() As Integer
+        Dim cnt = 0
+        Try
+            Dim SERVERPath = ""
+
+            If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
+
+                SERVERPath = Me.SERVER_Path '"\\ftps.verag.ag\FTP\MAVI\IN\"
+            Else
+
+                SERVERPath = Me.SERVER_Path_TEST '"\\ftps.verag.ag\FTP\MAVI\IN\"
+            End If
+
+
+            For Each f In IO.Directory.GetFiles(SERVER_Path)
+                Dim fi As New IO.FileInfo(f)
+                If fi.Name.ToLower.Contains(FileType) Then
+                    If Not fi.Name.StartsWith(".") Then
+                        Dim zielPfad = VERARBEITUNGS_PFAD & "\" & fi.Name
+                        While IO.File.Exists(zielPfad)
+                            zielPfad = VERARBEITUNGS_PFAD & "\" & Now.ToString("yyyyMMdd_HHmmss_") & fi.Name
+                        End While
+                        IO.File.Copy(f, zielPfad)
+                        If Not VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
+                            If IO.File.Exists(zielPfad) Then IO.File.Delete(f)
+                        End If
+
+                        Dim filename = frmStartOptions.cut_file((New FileInfo(zielPfad)).Name)
+                        If filename.ToLower.Contains(FileType) Then
+                            ListBox3.Items.Add(filename)
+                            cnt += 1
+                        End If
+
+                    End If
+                End If
+
+            Next
+
+
+            Return cnt
+
+        Catch ex As Exception
+            VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
+        End Try
+
+        Return cnt
+    End Function
+
+
+
+    Sub DatenEinlesen()
+
+        VERAG_PROG_ALLGEMEIN.cAllgemein.ERR_OP_GLOBAL = VERAG_PROG_ALLGEMEIN.ERROR_OP.SHOW
+
+        If ListBox3.Items.Count = 0 Then
+            Label6.Text = "Keine Daten zum Einlesen vorhanden."
+            Label6.Visible = True
+            Exit Sub
+        End If
+
+
+        For Each d In System.IO.Directory.GetFiles(VERARBEITUNGS_PFAD)
+
+            Try
+                Dim correctFile As Boolean = False
+                For Each i In ListBox3.Items
+                    Dim fileName As FileInfo = New FileInfo(d)
+                    If Equals(fileName.Name, i) Then
+                        correctFile = True
+                        Exit For
+                    End If
+                Next
+
+
+                Dim found = False
+                Dateiname = d
+                If IO.File.Exists(d) And correctFile Then
+
+
+                    Dim nr_id As Integer = -1
+
+                    Dim fi As FileInfo = New FileInfo(d)
+                    If Not fi.Name.StartsWith(".") Then
+
+                        Dim alreadyMoved = False
+
+                        Dim objFileRead As StreamReader = New StreamReader(d)
+
+                        If objFileRead.Peek() = -1 Then
+
+                            MsgBox("Datei hat keinen Inhalt!",
+                                       MsgBoxStyle.Information,
+                                       MsgBoxStyle.DefaultButton2 = MsgBoxStyle.OkOnly)
+                            Exit Sub
+
+                        ElseIf FileType = "clf" Then
+
+                            If readAndSaveCLF(objFileRead, fi) Then
+                                addDGVEinarbeitung(fi.Name, "OK")
+                                found = True
+                            Else
+                                addDGVEinarbeitung(fi.Name, "Fehler")
+                            End If
+
+
+                        ElseIf FileType = "ttr" Then
+
+                            If readAndSaveTTR(objFileRead, fi) Then
+                                addDGVEinarbeitung(fi.Name, "OK")
+                                found = True
+                            Else
+                                addDGVEinarbeitung(fi.Name, "Fehler")
+                            End If
+
+                        End If
+
+                    End If
+
+                    If found Then
+                        If Not IO.Directory.Exists(ZIEL_PFAD & "\" & Now.Year & "\" & Now.ToString("MMdd") & "\") Then IO.Directory.CreateDirectory(ZIEL_PFAD & "\" & Now.Year & "\" & Now.ToString("MMdd") & "\")
+                        frmStartOptions.moveFile(d, ZIEL_PFAD & "\" & Now.Year & "\" & Now.ToString("MMdd") & "\", VERARBEITUNGS_PFAD)
+                        cntDatenEingelesen += 1
+                    Else
+                        If Not found Then
+                            frmStartOptions.moveFile(d, ERROR_PFAD, VERARBEITUNGS_PFAD) ' nciht gefunden, oder durch ERROR nicht eingearbt,.
+                            dsNichtErkannt += 1
+                        End If
+                    End If
+                    Me.Refresh()
+
+                End If
+
+
+            Catch ex As Exception
+                VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
+            End Try
+        Next
+
+    End Sub
+
+    Private Sub btnOK_Click(sender As Object, e As EventArgs) Handles btnOK.Click
+        Me.Close()
+    End Sub
+
+    Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click
+        Me.Close()
+    End Sub
+
+
+
+    Sub addDGVEinarbeitung(art, BezugsNr)
+        dgvEinarbeitung.Rows.Add(art, BezugsNr)
+        Try
+            dgvEinarbeitung.FirstDisplayedScrollingRowIndex = dgvEinarbeitung.RowCount - 1
+        Catch ex As Exception
+        End Try
+    End Sub
+
+
+    Public Function readAndSaveCLF(objFileRead As StreamReader, fi As FileInfo) As Boolean
+
+        Dim booHeaderVorhanden = False
+        Dim booPrüfziffernfehler = False
+        Dim booInTransaktion = False
+        Dim booTrailerVorhanden = False
+
+        Dim lngPKLine As Long = 0
+        Dim lngRecordCount As Long
+
+        Do While (objFileRead.Peek() > -1)
+            Dim strZeile = objFileRead.ReadLine()
+            lngRecordCount = lngRecordCount + 1
+
+            Select Case Mid(strZeile, 1, 2)
+                Case "10"
+                    booHeaderVorhanden = True
+                    Dim ext = CInt(fi.Extension.Remove(0, 1))
+                    Dim clfHeader As New cAsfinag.CLFHeader(fi.Name.ToString, ext)
+                    With clfHeader
+                        .PKFileName = fi.Name
+                        .recordType = Mid(strZeile, 1, 2)
+                        .fileVersion = Mid(strZeile, 3, 2)
+                        .indcator = Trim(Mid(strZeile, 9, 1))
+                        .senderID = Trim(Mid(strZeile, 10, 6))
+                        .receiverID = Trim(Mid(strZeile, 16, 6))
+                        .fileCreationDate = DateSerial(Mid(strZeile, 22, 4), Mid(strZeile, 26, 2), Mid(strZeile, 28, 2))
+                        .fileCreationTime = Now()
+                        '.fileCreationTime = DateSerial(Mid(strZeile, 22, 4), Mid(strZeile, 26, 2), Mid(strZeile, 28, 2)) & " " & TimeSerial(Mid(strZeile, 30, 2), Mid(strZeile, 32, 2), Mid(strZeile, 34, 2))
+                        .ISOCountryCode = Trim(Mid(strZeile, 62, 3))
+                        .SAVE()
+                    End With
+
+                Case "20"
+                    ' Meldung bei nicht vorhandenen Haeder.
+                    If Not booHeaderVorhanden Then
+                        MsgBox("Datei kann wegen fehlenden Header nicht verarbeitet werden.")
+                        objFileRead.Close()
+                        Return False
+                    End If
+
+                    Dim clfBody As New cAsfinag.CLFBody(fi.Name, lngPKLine)
+                    With clfBody
+                        .PKFileName = fi.Name
+                        lngPKLine = lngPKLine + 1
+                        .RecordType = Trim(Mid(strZeile, 1, 2))
+                        .fileVersion = Trim(Mid(strZeile, 3, 2))
+                        .fileNumber = Trim(Mid(strZeile, 5, 3))
+                        .cardNumber = Trim(Mid(strZeile, 9, 22))
+                        .validTo = Trim(Mid(strZeile, 31, 4))
+                        .OBUID = Trim(Mid(strZeile, 35, 18))
+                        .vehicleLicensePlate = Trim(Mid(strZeile, 53, 10))
+                        .nationality = Trim(Mid(strZeile, 63, 3))
+                        .vehicleCategory = Trim(Mid(strZeile, 66, 1))
+                        .emissionCategory = Trim(Mid(strZeile, 67, 2))
+                        .status = Trim(Mid(strZeile, 69, 2))
+                        .contractDate = DateSerial(Mid(strZeile, 71, 4), Mid(strZeile, 75, 2), Mid(strZeile, 77, 2))
+                        .SAVE()
+                    End With
+                    'CardNumber prüfen.
+                    If (Right(clfBody.cardNumber, 1)) <> cAsfinag.fktMod10Prüfziffer(Left(clfBody.cardNumber, Len(clfBody.cardNumber) - 1)) Then
+                        booPrüfziffernfehler = True
+                    End If
+
+
+                    'strSQL = "SELECT * FROM CLFArchiv WHERE (OBUID = N'" & Trim(Mid(strZeile, 37, 18)) & "')"
+                    'rstCLFArchiv.Open strSQL, cnnASFINAG, adOpenStatic, adLockOptimistic, adCmdText
+
+
+                    'With rstCLFArchiv
+                    '    If .EOF Then
+                    '        .AddNew
+                    '        !OBUID = Trim(Mid(strZeile, 37, 18))
+                    '    End If
+                    '    !FileName = strPKFileName
+                    '    !RecordType = Trim(Mid(strZeile, 1, 2))
+                    '    !RunNumber = Trim(Mid(strZeile, 3, 8))
+                    '    !CardNumber = Trim(Mid(strZeile, 11, 22))
+                    '    !ValidTo = Trim(Mid(strZeile, 33, 4))
+                    '    !KfzKennzeichen = Trim(Mid(strZeile, 55, 10))
+                    '    !Nationalität = Trim(Mid(strZeile, 65, 3))
+                    '    !Kategorie = Trim(Mid(strZeile, 68, 1))
+                    '    !Schadstoffklasse = Trim(Mid(strZeile, 69, 2))
+                    '    !Status = Trim(Mid(strZeile, 71, 2))
+                    '    !DatumVertragsabschluss = DateSerial(Mid(strZeile, 73, 4), Mid(strZeile, 77, 2), Mid(strZeile, 79, 2))
+                    '    .Update
+                    '    .Close
+                    'End With
+
+                    ' Meldung bei Prüfziffernfehler.
+                    If booPrüfziffernfehler Then
+                        MsgBox("Prüfziffernfehler in Zeile " & CStr(lngRecordCount) & vbCrLf & "Datei kann nicht verarbeitet werden. " & vbNewLine & " " & fi.Name.ToString)
+                        booInTransaktion = False
+                        Return False
+
+                    End If
+                Case "90"
+                    ' Meldung bei nicht vorhandenen Haeder.
+                    If Not booHeaderVorhanden Then
+                        MsgBox("Datei kann wegen fehlenden Header nicht verarbeitet werden.")
+                        objFileRead.Close()
+                        Return False
+                    End If
+
+                    booTrailerVorhanden = True
+                    Dim clfTrailer As New cAsfinag.CLFTrailer(fi.Name)
+
+                    With clfTrailer
+                        .PKFileName = fi.Name
+                        .recordType = Trim(Mid(strZeile, 1, 2))
+                        .fileVersion = Trim(Mid(strZeile, 3, 2))
+                        .fileNumber = Trim(Mid(strZeile, 5, 4))
+                        .recordCount = Trim(Mid(strZeile, 9, 7))
+                        .SAVE()
+                    End With
+                    ' Prüfsumme Anzahl der Sätze im File ohne Header und Trailer.
+                    If clfTrailer.recordCount <> (lngRecordCount) Then
+                        MsgBox("Record Count: " & clfTrailer.recordCount & vbCrLf & "Prüfsumme: " & (lngRecordCount) & vbCrLf)
+                        objFileRead.Close()
+                        Return False
+                    End If
+
+
+                    ' Meldung bei Prüfsummenfehler.
+                    If booPrüfziffernfehler Then
+                        MsgBox("Datei kann wegen Prüfsummenfehler nicht verarbeitet werden.")
+                        objFileRead.Close()
+                        '    MsgBox strPrompt, , strPKFileName
+                        '    ' Zurücksetzen der Transaktion.
+                        'cnnASFINAG.RollbackTrans
+                        '    booInTransaktion = False
+                    End If
+                Case Else
+                    ' Andere RecordNumber überlesen.
+            End Select
+
+        Loop
+
+        objFileRead.Close()
+
+        Return True
+
+    End Function
+
+
+
+
+    Public Function readAndSaveTTR(objFileRead As StreamReader, fi As FileInfo) As Boolean
+
+        Dim booHeaderVorhanden = False
+        Dim booPrüfziffernfehler = False
+        Dim booInTransaktion = False
+        Dim booTrailerVorhanden = False
+        Dim dblCheckSumQuantity As Double
+        Dim curCheckSumAmount As Double
+
+        Dim lngPKLine As Long = 0
+        Dim lngRecordCount As Long
+
+        Do While (objFileRead.Peek() > -1)
+            Dim strZeile = objFileRead.ReadLine()
+            lngRecordCount = lngRecordCount + 1
+
+            Select Case Mid(strZeile, 1, 2)
+                Case "10"
+                    booHeaderVorhanden = True
+                    Dim ext = CInt(fi.Extension.Remove(0, 1))
+                    Dim ttrHeader As New cAsfinag.TTRHeader(fi.Name.ToString, ext)
+                    With ttrHeader
+                        .PKFileName = fi.Name
+                        .recordType = Trim(Mid(strZeile, 1, 2))
+                        .fileVersion = Trim(Mid(strZeile, 3, 2))
+                        .senderID = Trim(Mid(strZeile, 5, 6))
+                        .receiverID = Trim(Mid(strZeile, 11, 6))
+                        .fileCreationDate = DateSerial(Mid(strZeile, 17, 4), Mid(strZeile, 21, 2), Mid(strZeile, 23, 2))
+                        .fileCreationTime = DateSerial(Mid(strZeile, 17, 4), Mid(strZeile, 21, 2), Mid(strZeile, 23, 2)) & " " & TimeSerial(Mid(strZeile, 25, 2), Mid(strZeile, 27, 2), 0)
+                        .fileNumber = Trim(Mid(strZeile, 29, 4))
+                        .currencyCode = Trim(Mid(strZeile, 33, 3))
+                        .description = IIf(Trim(Mid(strZeile, 36, 25)) = "", Nothing, Trim(Mid(strZeile, 36, 25)))
+                        .ISOCountryCode = Trim(Mid(strZeile, 61, 3))
+                        .SAVE()
+                    End With
+
+                Case "20"
+                    ' Meldung bei nicht vorhandenen Haeder.
+                    If Not booHeaderVorhanden Then
+                        MsgBox("Datei kann wegen fehlenden Header nicht verarbeitet werden.")
+                        objFileRead.Close()
+                        Return False
+                    End If
+
+
+                    Dim ttrBody As New cAsfinag.TTRBody(fi.Name, lngPKLine)
+
+                    With ttrBody
+                        .PKFileName = fi.Name
+                        .recordType = Trim(Mid(strZeile, 1, 2))
+                        lngPKLine = lngPKLine + 1
+                        .PKLine = lngPKLine
+                        .fileVersion = Trim(Mid(strZeile, 3, 2))
+                        .siteId = IIf(Trim(Mid(strZeile, 7, 15)) = "", Nothing, Trim(Mid(strZeile, 7, 15)))
+                        .fileNumber = Trim(Mid(strZeile, 22, 4))
+                        .fileCreationDate = DateSerial(Mid(strZeile, 26, 4), Mid(strZeile, 30, 2), Mid(strZeile, 32, 2))
+                        .deliveryNoteNumber = IIf(Trim(Mid(strZeile, 35, 8)) = "", Nothing, Trim(Mid(strZeile, 35, 8)))
+                        .cardNumber = Trim(Mid(strZeile, 43, 22))
+                        .deliveryDate = DateSerial(Mid(strZeile, 65, 4), Mid(strZeile, 69, 2), Mid(strZeile, 71, 2))
+                        .deliveryTime = IIf(Trim(Mid(strZeile, 73, 4)) = "", Nothing, DateSerial(Mid(strZeile, 65, 4), Mid(strZeile, 69, 2), Mid(strZeile, 71, 2)) & " " & TimeSerial(Mid(strZeile, 73, 2), Mid(strZeile, 75, 2), 0))
+                        .transactionType = Trim(Mid(strZeile, 77, 2))
+                        .productCode = Trim(Mid(strZeile, 79, 4))
+                        .km = IIf(Trim(Mid(strZeile, 83, 7)) = "", Nothing, Trim(Mid(strZeile, 83, 7)))
+                        .driverId = IIf(Trim(Mid(strZeile, 90, 4)) = "", Nothing, Trim(Mid(strZeile, 90, 4)))
+                        .productQuantity = Trim(Mid(strZeile, 94, 6)) / 100
+                        .amountInclVAT = Trim(Mid(strZeile, 100, 10)) / 100
+                        .VATrate = Trim(Mid(strZeile, 155, 4)) / 100
+                        .VATamount = Trim(Mid(strZeile, 159, 10)) / 100
+                        .OBUID = Trim(Mid(strZeile, 130, 25))
+                        .receiptNumber = Trim(Mid(strZeile, 110, 20))
+
+                        ' Bei den Checksummen wird unabhängig vom TransactionType immer der positive Betrag aufsummiert.
+                        dblCheckSumQuantity = dblCheckSumQuantity + ttrBody.productQuantity
+                        curCheckSumAmount = curCheckSumAmount + ttrBody.amountInclVAT
+                        ' Bei TransactionType 03 .......Credit-Transaktion (negativ)
+
+                        If ttrBody.transactionType = 3 Then
+                            ' Vorzeichenänderung
+                            ttrBody.km = 0 - ttrBody.km
+                            ttrBody.productQuantity = 0 - ttrBody.productQuantity
+                            ttrBody.amountInclVAT = 0 - ttrBody.amountInclVAT
+                            ttrBody.VATamount = 0 - ttrBody.VATamount
+                        End If
+
+                        ' CardNumber prüfen.
+                        If (Right(ttrBody.cardNumber, 1)) <> (fktMod10Prüfziffer(Left(ttrBody.cardNumber, Len(ttrBody.cardNumber) - 1))) Then
+                            booPrüfziffernfehler = True
+                        End If
+                        .SAVE()
+
+                    End With
+
+                    'strSQL = "SELECT * FROM CLFArchiv WHERE (OBUID = N'" & Trim(Mid(strZeile, 37, 18)) & "')"
+                    'rstCLFArchiv.Open strSQL, cnnASFINAG, adOpenStatic, adLockOptimistic, adCmdText
+
+
+                    'With rstCLFArchiv
+                    '    If .EOF Then
+                    '        .AddNew
+                    '        !OBUID = Trim(Mid(strZeile, 37, 18))
+                    '    End If
+                    '    !FileName = strPKFileName
+                    '    !RecordType = Trim(Mid(strZeile, 1, 2))
+                    '    !RunNumber = Trim(Mid(strZeile, 3, 8))
+                    '    !CardNumber = Trim(Mid(strZeile, 11, 22))
+                    '    !ValidTo = Trim(Mid(strZeile, 33, 4))
+                    '    !KfzKennzeichen = Trim(Mid(strZeile, 55, 10))
+                    '    !Nationalität = Trim(Mid(strZeile, 65, 3))
+                    '    !Kategorie = Trim(Mid(strZeile, 68, 1))
+                    '    !Schadstoffklasse = Trim(Mid(strZeile, 69, 2))
+                    '    !Status = Trim(Mid(strZeile, 71, 2))
+                    '    !DatumVertragsabschluss = DateSerial(Mid(strZeile, 73, 4), Mid(strZeile, 77, 2), Mid(strZeile, 79, 2))
+                    '    .Update
+                    '    .Close
+                    'End With
+
+                    ' Meldung bei Prüfziffernfehler.
+                    If booPrüfziffernfehler Then
+                        MsgBox("Prüfziffernfehler in Zeile " & CStr(lngRecordCount) & vbCrLf & "Datei kann nicht verarbeitet werden. " & vbNewLine & " " & fi.Name.ToString)
+                        booInTransaktion = False
+                        objFileRead.Close()
+                        Return False
+                    End If
+
+
+                Case "90"
+                    ' Meldung bei nicht vorhandenen Haeder.
+                    If Not booHeaderVorhanden Then
+                        MsgBox("Datei kann wegen fehlenden Header nicht verarbeitet werden.")
+                        objFileRead.Close()
+                        Return False
+                    End If
+
+                    booTrailerVorhanden = True
+
+
+                    Dim ttrTrailer As New cAsfinag.TTRTrailer(fi.Name)
+                    With ttrTrailer
+                        .PKFileName = fi.Name
+                        .recordType = Trim(Mid(strZeile, 1, 2))
+                        .fileVersion = Trim(Mid(strZeile, 3, 2))
+                        '.fileNumber = Trim(Mid(strZeile, 5, 4))
+                        .recordCount = Trim(Mid(strZeile, 5, 9))
+                        .checksumProductQuantity = Trim(Mid(strZeile, 14, 15)) / 100
+                        .checksumAmounntInclVAT = Trim(Mid(strZeile, 29, 15)) / 100
+                        .SAVE()
+
+                        Dim strPrompt
+                        If ttrTrailer.recordCount <> lngRecordCount Then
+                            strPrompt = strPrompt & "Record Count: " & ttrTrailer.recordCount & vbCrLf &
+                                "Prüfsumme: " & lngRecordCount & vbCrLf
+                        End If
+                        ' Prüfsumme Menge.
+                        If ttrTrailer.checksumProductQuantity <> dblCheckSumQuantity Then
+                            strPrompt = strPrompt & "Check Sum Quantity: " & ttrTrailer.checksumProductQuantity & vbCrLf &
+                                "Prüfsumme: " & dblCheckSumQuantity & vbCrLf
+                        End If
+                        ' Prüfsumme Betrag.
+                        If ttrTrailer.checksumAmounntInclVAT <> Math.Round(curCheckSumAmount, 2) Then
+                            strPrompt = strPrompt & "Check Sum Amount: " & ttrTrailer.checksumAmounntInclVAT & vbCrLf &
+                                "Prüfsumme: " & curCheckSumAmount & vbCrLf
+                        End If
+
+                        If strPrompt <> "" Then
+                            MsgBox(strPrompt)
+                            objFileRead.Close()
+                            Return False
+                        End If
+
+                    End With
+                    ' Prüfsumme Anzahl der Sätze im File ohne Header und Trailer.
+
+                    If ttrTrailer.recordCount <> (lngRecordCount) Then
+                        MsgBox("Record Count: " & ttrTrailer.recordCount & vbCrLf & "Prüfsumme: " & (lngRecordCount) & vbCrLf)
+                        objFileRead.Close()
+                        Return False
+                    End If
+
+
+                    ' Meldung bei Prüfsummenfehler.
+                    If booPrüfziffernfehler Then
+                        MsgBox("Datei kann wegen Prüfsummenfehler nicht verarbeitet werden.")
+                        objFileRead.Close()
+                        Return False
+                        '    MsgBox strPrompt, , strPKFileName
+                        '    ' Zurücksetzen der Transaktion.
+                        'cnnASFINAG.RollbackTrans
+                        '    booInTransaktion = False
+                    End If
+                Case Else
+                    ' Andere RecordNumber überlesen.
+            End Select
+
+        Loop
+
+        objFileRead.Close()
+
+        Return True
+
+    End Function
+
+
+
+
+    Private Sub dgvEinarbeitung_SelectionChanged(sender As Object, e As EventArgs) Handles dgvEinarbeitung.SelectionChanged
+        dgvEinarbeitung.ClearSelection()
+
+    End Sub
+
+    Private Sub frmTCNachrichtenVerarbeitung_Shown(sender As Object, e As EventArgs) Handles Me.Shown
+        If allowClose Then
+            Me.Refresh()
+
+            Button2.PerformClick()
+            Button1.PerformClick()
+
+            System.Threading.Thread.Sleep(2000)
+
+            Me.Close()
+        End If
+    End Sub
+
+    Private Sub pnl_Paint(sender As Object, e As PaintEventArgs) Handles pnl.Paint
+
+    End Sub
+
+
+    Public Shadows Function Right(ByVal sText As String,
+    ByVal nLen As Integer) As String
+
+        If nLen > sText.Length Then nLen = sText.Length
+        Return (sText.Substring(sText.Length - nLen))
+    End Function
+
+    Public Shadows Function Left(ByVal sText As String,
+    ByVal nLen As Integer) As String
+
+        If nLen > sText.Length Then nLen = sText.Length
+        Return (sText.Substring(0, nLen))
+    End Function
+End Class
+
diff --git a/initATLASAufschubkonten/frmStartOptions.Designer.vb b/initATLASAufschubkonten/frmStartOptions.Designer.vb
index 86f2ed7..7eab82a 100644
--- a/initATLASAufschubkonten/frmStartOptions.Designer.vb
+++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb
@@ -38,20 +38,18 @@ Partial Class frmStartOptions
         Me.Label20 = New System.Windows.Forms.Label()
         Me.Label19 = New System.Windows.Forms.Label()
         Me.Label18 = New System.Windows.Forms.Label()
-        Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
         Me.LinkLabel36 = New System.Windows.Forms.LinkLabel()
         Me.Button13 = New System.Windows.Forms.Button()
         Me.Button12 = New System.Windows.Forms.Button()
         Me.cbxSyskaWdh = New System.Windows.Forms.CheckBox()
-        Me.txtSyskaWdhDateiname = New VERAG_PROG_ALLGEMEIN.MyTextBox()
         Me.Button10 = New System.Windows.Forms.Button()
         Me.piceZollAnh = New System.Windows.Forms.PictureBox()
         Me.txtEZOLLAnhDat = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.piceZollAnh = New System.Windows.Forms.PictureBox()
         Me.lblEZOLLDat = New System.Windows.Forms.LinkLabel()
         Me.Button6 = New System.Windows.Forms.Button()
         Me.CheckBox6 = New System.Windows.Forms.CheckBox()
         Me.Button7 = New System.Windows.Forms.Button()
-        Me.cboSYSKAFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
         Me.CheckBox7 = New System.Windows.Forms.CheckBox()
         Me.Label16 = New System.Windows.Forms.Label()
         Me.LinkLabel33 = New System.Windows.Forms.LinkLabel()
@@ -60,7 +58,6 @@ Partial Class frmStartOptions
         Me.Button4 = New System.Windows.Forms.Button()
         Me.CheckBox5 = New System.Windows.Forms.CheckBox()
         Me.Button3 = New System.Windows.Forms.Button()
-        Me.cboBMDUnispedFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
         Me.CheckBox4 = New System.Windows.Forms.CheckBox()
         Me.Label13 = New System.Windows.Forms.Label()
         Me.CheckBox3 = New System.Windows.Forms.CheckBox()
@@ -153,6 +150,15 @@ Partial Class frmStartOptions
         Me.LinkLabel29 = New System.Windows.Forms.LinkLabel()
         Me.LinkLabel30 = New System.Windows.Forms.LinkLabel()
         Me.Label11 = New System.Windows.Forms.Label()
+        Me.TabPage4 = New System.Windows.Forms.TabPage()
+        Me.PictureBox19 = New System.Windows.Forms.PictureBox()
+        Me.PictureBox18 = New System.Windows.Forms.PictureBox()
+        Me.LinkLabel41 = New System.Windows.Forms.LinkLabel()
+        Me.LinkLabel42 = New System.Windows.Forms.LinkLabel()
+        Me.Label23 = New System.Windows.Forms.Label()
+        Me.LinkLabel43 = New System.Windows.Forms.LinkLabel()
+        Me.LinkLabel44 = New System.Windows.Forms.LinkLabel()
+        Me.Label24 = New System.Windows.Forms.Label()
         Me.CheckBox2 = New System.Windows.Forms.CheckBox()
         Me.LinkLabel25 = New System.Windows.Forms.LinkLabel()
         Me.CheckBox1 = New System.Windows.Forms.CheckBox()
@@ -160,6 +166,7 @@ Partial Class frmStartOptions
         Me.cbxKd = New System.Windows.Forms.CheckBox()
         Me.Button9 = New System.Windows.Forms.Button()
         Me.Label3 = New System.Windows.Forms.Label()
+        Me.PictureBox12 = New System.Windows.Forms.PictureBox()
         Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
         Me.PictureBox12 = New System.Windows.Forms.PictureBox()
         Me.LinkLabel20 = New System.Windows.Forms.LinkLabel()
@@ -176,6 +183,23 @@ Partial Class frmStartOptions
         Me.LinkLabel3 = New System.Windows.Forms.LinkLabel()
         Me.lklAufschubkontenATLASEZOLL = New System.Windows.Forms.LinkLabel()
         Me.lblRoutineManager = New System.Windows.Forms.Label()
+        Me.LinkLabel45 = New System.Windows.Forms.LinkLabel()
+        Me.PictureBox20 = New System.Windows.Forms.PictureBox()
+        Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.txtSyskaWdhDateiname = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.txtEZOLLAnhDat = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.cboSYSKAFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.cboBMDUnispedFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.dgvMRN = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.clmnMRN = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.txtVRGOut_MRN = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.txtVRGOut_FilialenNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.txtVRGOut_AbfertigungsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.txtVRGOutEZA_BezugsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.txtVRGOut_BezugsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
         Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox()
         Me.Button21 = New System.Windows.Forms.Button()
         Me.pnl.SuspendLayout()
@@ -199,10 +223,16 @@ Partial Class frmStartOptions
         CType(Me.PictureBox15, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.PictureBox14, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.TabPage3.SuspendLayout()
+        Me.TabPage3.SuspendLayout()
+        Me.TabPage4.SuspendLayout()
+        CType(Me.PictureBox19, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.PictureBox18, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.PictureBox12, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.PictureBox10, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.PictureBox20, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.dgvMRN, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
         '
         'pnl
@@ -423,29 +453,6 @@ Partial Class frmStartOptions
         Me.Label18.TabIndex = 64
         Me.Label18.Text = "Max"
         '
-        'MyTextBox2
-        '
-        Me.MyTextBox2._DateTimeOnly = False
-        Me.MyTextBox2._numbersOnly = True
-        Me.MyTextBox2._numbersOnlyKommastellen = ""
-        Me.MyTextBox2._numbersOnlyTrennzeichen = True
-        Me.MyTextBox2._Prozent = False
-        Me.MyTextBox2._ShortDateNew = False
-        Me.MyTextBox2._ShortDateOnly = False
-        Me.MyTextBox2._TimeOnly = False
-        Me.MyTextBox2._TimeOnly_Seconds = False
-        Me.MyTextBox2._value = ""
-        Me.MyTextBox2._Waehrung = False
-        Me.MyTextBox2._WaehrungZeichen = True
-        Me.MyTextBox2.ForeColor = System.Drawing.Color.Red
-        Me.MyTextBox2.Location = New System.Drawing.Point(151, 152)
-        Me.MyTextBox2.MaxLineLength = -1
-        Me.MyTextBox2.MaxLines_Warning = ""
-        Me.MyTextBox2.MaxLines_Warning_Label = Nothing
-        Me.MyTextBox2.Name = "MyTextBox2"
-        Me.MyTextBox2.Size = New System.Drawing.Size(53, 20)
-        Me.MyTextBox2.TabIndex = 63
-        '
         'LinkLabel36
         '
         Me.LinkLabel36.AutoSize = True
@@ -492,30 +499,6 @@ Partial Class frmStartOptions
         Me.cbxSyskaWdh.Text = "Buchungen wiederh."
         Me.cbxSyskaWdh.UseVisualStyleBackColor = True
         '
-        'txtSyskaWdhDateiname
-        '
-        Me.txtSyskaWdhDateiname._DateTimeOnly = False
-        Me.txtSyskaWdhDateiname._numbersOnly = False
-        Me.txtSyskaWdhDateiname._numbersOnlyKommastellen = ""
-        Me.txtSyskaWdhDateiname._numbersOnlyTrennzeichen = True
-        Me.txtSyskaWdhDateiname._Prozent = False
-        Me.txtSyskaWdhDateiname._ShortDateNew = False
-        Me.txtSyskaWdhDateiname._ShortDateOnly = False
-        Me.txtSyskaWdhDateiname._TimeOnly = False
-        Me.txtSyskaWdhDateiname._TimeOnly_Seconds = False
-        Me.txtSyskaWdhDateiname._value = ""
-        Me.txtSyskaWdhDateiname._Waehrung = False
-        Me.txtSyskaWdhDateiname._WaehrungZeichen = True
-        Me.txtSyskaWdhDateiname.ForeColor = System.Drawing.Color.Black
-        Me.txtSyskaWdhDateiname.Location = New System.Drawing.Point(687, 295)
-        Me.txtSyskaWdhDateiname.MaxLength = 50
-        Me.txtSyskaWdhDateiname.MaxLineLength = -1
-        Me.txtSyskaWdhDateiname.MaxLines_Warning = ""
-        Me.txtSyskaWdhDateiname.MaxLines_Warning_Label = Nothing
-        Me.txtSyskaWdhDateiname.Name = "txtSyskaWdhDateiname"
-        Me.txtSyskaWdhDateiname.Size = New System.Drawing.Size(136, 20)
-        Me.txtSyskaWdhDateiname.TabIndex = 58
-        '
         'Button10
         '
         Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat
@@ -564,6 +547,17 @@ Partial Class frmStartOptions
         Me.txtEZOLLAnhDat.Size = New System.Drawing.Size(87, 20)
         Me.txtEZOLLAnhDat.TabIndex = 55
         '
+        'piceZollAnh
+        '
+        Me.piceZollAnh.BackgroundImage = CType(resources.GetObject("piceZollAnh.BackgroundImage"), System.Drawing.Image)
+        Me.piceZollAnh.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.piceZollAnh.Location = New System.Drawing.Point(500, 190)
+        Me.piceZollAnh.Name = "piceZollAnh"
+        Me.piceZollAnh.Size = New System.Drawing.Size(18, 18)
+        Me.piceZollAnh.TabIndex = 56
+        Me.piceZollAnh.TabStop = False
+        Me.piceZollAnh.Visible = False
+        '
         'lblEZOLLDat
         '
         Me.lblEZOLLDat.AutoSize = True
@@ -612,17 +606,6 @@ Partial Class frmStartOptions
         Me.Button7.Text = "Buchungen --> Syska"
         Me.Button7.UseVisualStyleBackColor = True
         '
-        'cboSYSKAFirma
-        '
-        Me.cboSYSKAFirma._allowedValuesFreiText = Nothing
-        Me.cboSYSKAFirma._allowFreiText = False
-        Me.cboSYSKAFirma._value = ""
-        Me.cboSYSKAFirma.FormattingEnabled = True
-        Me.cboSYSKAFirma.Location = New System.Drawing.Point(559, 276)
-        Me.cboSYSKAFirma.Name = "cboSYSKAFirma"
-        Me.cboSYSKAFirma.Size = New System.Drawing.Size(129, 21)
-        Me.cboSYSKAFirma.TabIndex = 51
-        '
         'CheckBox7
         '
         Me.CheckBox7.AutoSize = True
@@ -715,17 +698,6 @@ Partial Class frmStartOptions
         Me.Button3.Text = "Buchungen --> BMD"
         Me.Button3.UseVisualStyleBackColor = True
         '
-        'cboBMDUnispedFirma
-        '
-        Me.cboBMDUnispedFirma._allowedValuesFreiText = Nothing
-        Me.cboBMDUnispedFirma._allowFreiText = False
-        Me.cboBMDUnispedFirma._value = ""
-        Me.cboBMDUnispedFirma.FormattingEnabled = True
-        Me.cboBMDUnispedFirma.Location = New System.Drawing.Point(268, 276)
-        Me.cboBMDUnispedFirma.Name = "cboBMDUnispedFirma"
-        Me.cboBMDUnispedFirma.Size = New System.Drawing.Size(124, 21)
-        Me.cboBMDUnispedFirma.TabIndex = 42
-        '
         'CheckBox4
         '
         Me.CheckBox4.AutoSize = True
@@ -762,6 +734,7 @@ Partial Class frmStartOptions
         Me.tbcntr.Controls.Add(Me.TabPage1)
         Me.tbcntr.Controls.Add(Me.TabPage2)
         Me.tbcntr.Controls.Add(Me.TabPage3)
+        Me.tbcntr.Controls.Add(Me.TabPage4)
         Me.tbcntr.Dock = System.Windows.Forms.DockStyle.Bottom
         Me.tbcntr.Location = New System.Drawing.Point(0, 404)
         Me.tbcntr.Name = "tbcntr"
@@ -776,6 +749,8 @@ Partial Class frmStartOptions
         Me.TabPage1.Controls.Add(Me.Button19)
         Me.TabPage1.Controls.Add(Me.Label23)
         Me.TabPage1.Controls.Add(Me.Button18)
+        Me.TabPage1.Controls.Add(Me.PictureBox20)
+        Me.TabPage1.Controls.Add(Me.LinkLabel45)
         Me.TabPage1.Controls.Add(Me.Button17)
         Me.TabPage1.Controls.Add(Me.LinkLabel38)
         Me.TabPage1.Controls.Add(Me.PictureBox17)
@@ -887,7 +862,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel38.AutoSize = True
         Me.LinkLabel38.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel38.Location = New System.Drawing.Point(475, 125)
+        Me.LinkLabel38.Location = New System.Drawing.Point(475, 65)
         Me.LinkLabel38.Name = "LinkLabel38"
         Me.LinkLabel38.Size = New System.Drawing.Size(141, 13)
         Me.LinkLabel38.TabIndex = 59
@@ -905,11 +880,22 @@ Partial Class frmStartOptions
         Me.PictureBox17.TabStop = False
         Me.PictureBox17.Visible = False
         '
+        'PictureBox17
+        '
+        Me.PictureBox17.BackgroundImage = CType(resources.GetObject("PictureBox17.BackgroundImage"), System.Drawing.Image)
+        Me.PictureBox17.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox17.Location = New System.Drawing.Point(630, 60)
+        Me.PictureBox17.Name = "PictureBox17"
+        Me.PictureBox17.Size = New System.Drawing.Size(18, 18)
+        Me.PictureBox17.TabIndex = 60
+        Me.PictureBox17.TabStop = False
+        Me.PictureBox17.Visible = False
+        '
         'LinkLabel37
         '
         Me.LinkLabel37.AutoSize = True
         Me.LinkLabel37.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel37.Location = New System.Drawing.Point(295, 125)
+        Me.LinkLabel37.Location = New System.Drawing.Point(290, 97)
         Me.LinkLabel37.Name = "LinkLabel37"
         Me.LinkLabel37.Size = New System.Drawing.Size(94, 13)
         Me.LinkLabel37.TabIndex = 57
@@ -927,6 +913,17 @@ Partial Class frmStartOptions
         Me.PictureBox16.TabStop = False
         Me.PictureBox16.Visible = False
         '
+        'PictureBox16
+        '
+        Me.PictureBox16.BackgroundImage = CType(resources.GetObject("PictureBox16.BackgroundImage"), System.Drawing.Image)
+        Me.PictureBox16.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox16.Location = New System.Drawing.Point(395, 92)
+        Me.PictureBox16.Name = "PictureBox16"
+        Me.PictureBox16.Size = New System.Drawing.Size(18, 18)
+        Me.PictureBox16.TabIndex = 58
+        Me.PictureBox16.TabStop = False
+        Me.PictureBox16.Visible = False
+        '
         'Button15
         '
         Me.Button15.FlatStyle = System.Windows.Forms.FlatStyle.Flat
@@ -955,7 +952,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel28.AutoSize = True
         Me.LinkLabel28.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel28.Location = New System.Drawing.Point(13, 234)
+        Me.LinkLabel28.Location = New System.Drawing.Point(13, 254)
         Me.LinkLabel28.Name = "LinkLabel28"
         Me.LinkLabel28.Size = New System.Drawing.Size(197, 13)
         Me.LinkLabel28.TabIndex = 55
@@ -1010,7 +1007,7 @@ Partial Class frmStartOptions
         '
         Me.Label2.AutoSize = True
         Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label2.Location = New System.Drawing.Point(11, 158)
+        Me.Label2.Location = New System.Drawing.Point(11, 178)
         Me.Label2.Name = "Label2"
         Me.Label2.Size = New System.Drawing.Size(205, 13)
         Me.Label2.TabIndex = 11
@@ -1020,7 +1017,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel5.AutoSize = True
         Me.LinkLabel5.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel5.Location = New System.Drawing.Point(11, 185)
+        Me.LinkLabel5.Location = New System.Drawing.Point(11, 205)
         Me.LinkLabel5.Name = "LinkLabel5"
         Me.LinkLabel5.Size = New System.Drawing.Size(177, 13)
         Me.LinkLabel5.TabIndex = 12
@@ -1031,7 +1028,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel6.AutoSize = True
         Me.LinkLabel6.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel6.Location = New System.Drawing.Point(295, 185)
+        Me.LinkLabel6.Location = New System.Drawing.Point(295, 205)
         Me.LinkLabel6.Name = "LinkLabel6"
         Me.LinkLabel6.Size = New System.Drawing.Size(180, 13)
         Me.LinkLabel6.TabIndex = 13
@@ -1042,7 +1039,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel23.AutoSize = True
         Me.LinkLabel23.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel23.Location = New System.Drawing.Point(295, 313)
+        Me.LinkLabel23.Location = New System.Drawing.Point(295, 333)
         Me.LinkLabel23.Name = "LinkLabel23"
         Me.LinkLabel23.Size = New System.Drawing.Size(180, 13)
         Me.LinkLabel23.TabIndex = 21
@@ -1064,7 +1061,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel24.AutoSize = True
         Me.LinkLabel24.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel24.Location = New System.Drawing.Point(295, 288)
+        Me.LinkLabel24.Location = New System.Drawing.Point(295, 308)
         Me.LinkLabel24.Name = "LinkLabel24"
         Me.LinkLabel24.Size = New System.Drawing.Size(177, 13)
         Me.LinkLabel24.TabIndex = 19
@@ -1086,7 +1083,7 @@ Partial Class frmStartOptions
         '
         Me.Label5.AutoSize = True
         Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label5.Location = New System.Drawing.Point(295, 261)
+        Me.Label5.Location = New System.Drawing.Point(295, 281)
         Me.Label5.Name = "Label5"
         Me.Label5.Size = New System.Drawing.Size(184, 13)
         Me.Label5.TabIndex = 17
@@ -1096,7 +1093,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel8.AutoSize = True
         Me.LinkLabel8.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel8.Location = New System.Drawing.Point(295, 37)
+        Me.LinkLabel8.Location = New System.Drawing.Point(13, 156)
         Me.LinkLabel8.Name = "LinkLabel8"
         Me.LinkLabel8.Size = New System.Drawing.Size(120, 13)
         Me.LinkLabel8.TabIndex = 2
@@ -1107,7 +1104,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel21.AutoSize = True
         Me.LinkLabel21.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel21.Location = New System.Drawing.Point(11, 313)
+        Me.LinkLabel21.Location = New System.Drawing.Point(11, 333)
         Me.LinkLabel21.Name = "LinkLabel21"
         Me.LinkLabel21.Size = New System.Drawing.Size(180, 13)
         Me.LinkLabel21.TabIndex = 20
@@ -1125,11 +1122,22 @@ Partial Class frmStartOptions
         Me.PictureBox2.TabStop = False
         Me.PictureBox2.Visible = False
         '
+        'PictureBox2
+        '
+        Me.PictureBox2.BackgroundImage = CType(resources.GetObject("PictureBox2.BackgroundImage"), System.Drawing.Image)
+        Me.PictureBox2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox2.Location = New System.Drawing.Point(139, 151)
+        Me.PictureBox2.Name = "PictureBox2"
+        Me.PictureBox2.Size = New System.Drawing.Size(18, 18)
+        Me.PictureBox2.TabIndex = 14
+        Me.PictureBox2.TabStop = False
+        Me.PictureBox2.Visible = False
+        '
         'LinkLabel22
         '
         Me.LinkLabel22.AutoSize = True
         Me.LinkLabel22.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel22.Location = New System.Drawing.Point(11, 288)
+        Me.LinkLabel22.Location = New System.Drawing.Point(11, 308)
         Me.LinkLabel22.Name = "LinkLabel22"
         Me.LinkLabel22.Size = New System.Drawing.Size(177, 13)
         Me.LinkLabel22.TabIndex = 18
@@ -1140,7 +1148,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel9.AutoSize = True
         Me.LinkLabel9.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel9.Location = New System.Drawing.Point(11, 210)
+        Me.LinkLabel9.Location = New System.Drawing.Point(11, 230)
         Me.LinkLabel9.Name = "LinkLabel9"
         Me.LinkLabel9.Size = New System.Drawing.Size(180, 13)
         Me.LinkLabel9.TabIndex = 14
@@ -1151,7 +1159,7 @@ Partial Class frmStartOptions
         '
         Me.Label4.AutoSize = True
         Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label4.Location = New System.Drawing.Point(11, 261)
+        Me.Label4.Location = New System.Drawing.Point(11, 281)
         Me.Label4.Name = "Label4"
         Me.Label4.Size = New System.Drawing.Size(211, 13)
         Me.Label4.TabIndex = 16
@@ -1161,7 +1169,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel10.AutoSize = True
         Me.LinkLabel10.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel10.Location = New System.Drawing.Point(295, 65)
+        Me.LinkLabel10.Location = New System.Drawing.Point(290, 37)
         Me.LinkLabel10.Name = "LinkLabel10"
         Me.LinkLabel10.Size = New System.Drawing.Size(104, 13)
         Me.LinkLabel10.TabIndex = 5
@@ -1189,11 +1197,22 @@ Partial Class frmStartOptions
         Me.PictureBox3.TabStop = False
         Me.PictureBox3.Visible = False
         '
+        'PictureBox3
+        '
+        Me.PictureBox3.BackgroundImage = CType(resources.GetObject("PictureBox3.BackgroundImage"), System.Drawing.Image)
+        Me.PictureBox3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox3.Location = New System.Drawing.Point(400, 32)
+        Me.PictureBox3.Name = "PictureBox3"
+        Me.PictureBox3.Size = New System.Drawing.Size(18, 18)
+        Me.PictureBox3.TabIndex = 17
+        Me.PictureBox3.TabStop = False
+        Me.PictureBox3.Visible = False
+        '
         'LinkLabel11
         '
         Me.LinkLabel11.AutoSize = True
         Me.LinkLabel11.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel11.Location = New System.Drawing.Point(475, 65)
+        Me.LinkLabel11.Location = New System.Drawing.Point(287, 156)
         Me.LinkLabel11.Name = "LinkLabel11"
         Me.LinkLabel11.Size = New System.Drawing.Size(202, 13)
         Me.LinkLabel11.TabIndex = 6
@@ -1211,11 +1230,22 @@ Partial Class frmStartOptions
         Me.PictureBox4.TabStop = False
         Me.PictureBox4.Visible = False
         '
+        'PictureBox4
+        '
+        Me.PictureBox4.BackgroundImage = CType(resources.GetObject("PictureBox4.BackgroundImage"), System.Drawing.Image)
+        Me.PictureBox4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox4.Location = New System.Drawing.Point(495, 151)
+        Me.PictureBox4.Name = "PictureBox4"
+        Me.PictureBox4.Size = New System.Drawing.Size(18, 18)
+        Me.PictureBox4.TabIndex = 19
+        Me.PictureBox4.TabStop = False
+        Me.PictureBox4.Visible = False
+        '
         'LinkLabel12
         '
         Me.LinkLabel12.AutoSize = True
         Me.LinkLabel12.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel12.Location = New System.Drawing.Point(475, 37)
+        Me.LinkLabel12.Location = New System.Drawing.Point(287, 125)
         Me.LinkLabel12.Name = "LinkLabel12"
         Me.LinkLabel12.Size = New System.Drawing.Size(159, 13)
         Me.LinkLabel12.TabIndex = 3
@@ -1233,6 +1263,17 @@ Partial Class frmStartOptions
         Me.PictureBox5.TabStop = False
         Me.PictureBox5.Visible = False
         '
+        'PictureBox5
+        '
+        Me.PictureBox5.BackgroundImage = CType(resources.GetObject("PictureBox5.BackgroundImage"), System.Drawing.Image)
+        Me.PictureBox5.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox5.Location = New System.Drawing.Point(452, 120)
+        Me.PictureBox5.Name = "PictureBox5"
+        Me.PictureBox5.Size = New System.Drawing.Size(18, 18)
+        Me.PictureBox5.TabIndex = 21
+        Me.PictureBox5.TabStop = False
+        Me.PictureBox5.Visible = False
+        '
         'LinkLabel13
         '
         Me.LinkLabel13.AutoSize = True
@@ -1259,7 +1300,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel14.AutoSize = True
         Me.LinkLabel14.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel14.Location = New System.Drawing.Point(295, 95)
+        Me.LinkLabel14.Location = New System.Drawing.Point(290, 67)
         Me.LinkLabel14.Name = "LinkLabel14"
         Me.LinkLabel14.Size = New System.Drawing.Size(99, 13)
         Me.LinkLabel14.TabIndex = 8
@@ -1277,11 +1318,22 @@ Partial Class frmStartOptions
         Me.PictureBox7.TabStop = False
         Me.PictureBox7.Visible = False
         '
+        'PictureBox7
+        '
+        Me.PictureBox7.BackgroundImage = CType(resources.GetObject("PictureBox7.BackgroundImage"), System.Drawing.Image)
+        Me.PictureBox7.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox7.Location = New System.Drawing.Point(395, 62)
+        Me.PictureBox7.Name = "PictureBox7"
+        Me.PictureBox7.Size = New System.Drawing.Size(18, 18)
+        Me.PictureBox7.TabIndex = 25
+        Me.PictureBox7.TabStop = False
+        Me.PictureBox7.Visible = False
+        '
         'LinkLabel15
         '
         Me.LinkLabel15.AutoSize = True
         Me.LinkLabel15.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel15.Location = New System.Drawing.Point(295, 210)
+        Me.LinkLabel15.Location = New System.Drawing.Point(295, 230)
         Me.LinkLabel15.Name = "LinkLabel15"
         Me.LinkLabel15.Size = New System.Drawing.Size(183, 13)
         Me.LinkLabel15.TabIndex = 15
@@ -1292,7 +1344,7 @@ Partial Class frmStartOptions
         '
         Me.LinkLabel16.AutoSize = True
         Me.LinkLabel16.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel16.Location = New System.Drawing.Point(475, 95)
+        Me.LinkLabel16.Location = New System.Drawing.Point(475, 37)
         Me.LinkLabel16.Name = "LinkLabel16"
         Me.LinkLabel16.Size = New System.Drawing.Size(149, 13)
         Me.LinkLabel16.TabIndex = 9
@@ -1310,6 +1362,17 @@ Partial Class frmStartOptions
         Me.PictureBox8.TabStop = False
         Me.PictureBox8.Visible = False
         '
+        'PictureBox8
+        '
+        Me.PictureBox8.BackgroundImage = CType(resources.GetObject("PictureBox8.BackgroundImage"), System.Drawing.Image)
+        Me.PictureBox8.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox8.Location = New System.Drawing.Point(630, 32)
+        Me.PictureBox8.Name = "PictureBox8"
+        Me.PictureBox8.Size = New System.Drawing.Size(18, 18)
+        Me.PictureBox8.TabIndex = 29
+        Me.PictureBox8.TabStop = False
+        Me.PictureBox8.Visible = False
+        '
         'TabPage2
         '
         Me.TabPage2.Controls.Add(Me.Button11)
@@ -1878,6 +1941,108 @@ Partial Class frmStartOptions
         Me.Label11.TabIndex = 22
         Me.Label11.Text = "MAVI Nachrichtenverarbeitung (NCTS TR):"
         '
+        'TabPage4
+        '
+        Me.TabPage4.Controls.Add(Me.PictureBox19)
+        Me.TabPage4.Controls.Add(Me.PictureBox18)
+        Me.TabPage4.Controls.Add(Me.LinkLabel41)
+        Me.TabPage4.Controls.Add(Me.LinkLabel42)
+        Me.TabPage4.Controls.Add(Me.Label23)
+        Me.TabPage4.Controls.Add(Me.LinkLabel43)
+        Me.TabPage4.Controls.Add(Me.LinkLabel44)
+        Me.TabPage4.Controls.Add(Me.Label24)
+        Me.TabPage4.Location = New System.Drawing.Point(4, 22)
+        Me.TabPage4.Name = "TabPage4"
+        Me.TabPage4.Size = New System.Drawing.Size(851, 395)
+        Me.TabPage4.TabIndex = 3
+        Me.TabPage4.Text = "Asfinag"
+        Me.TabPage4.UseVisualStyleBackColor = True
+        '
+        'PictureBox19
+        '
+        Me.PictureBox19.BackgroundImage = CType(resources.GetObject("PictureBox19.BackgroundImage"), System.Drawing.Image)
+        Me.PictureBox19.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox19.Location = New System.Drawing.Point(110, 165)
+        Me.PictureBox19.Name = "PictureBox19"
+        Me.PictureBox19.Size = New System.Drawing.Size(18, 18)
+        Me.PictureBox19.TabIndex = 37
+        Me.PictureBox19.TabStop = False
+        Me.PictureBox19.Visible = False
+        '
+        'PictureBox18
+        '
+        Me.PictureBox18.BackgroundImage = CType(resources.GetObject("PictureBox18.BackgroundImage"), System.Drawing.Image)
+        Me.PictureBox18.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox18.Location = New System.Drawing.Point(110, 135)
+        Me.PictureBox18.Name = "PictureBox18"
+        Me.PictureBox18.Size = New System.Drawing.Size(18, 18)
+        Me.PictureBox18.TabIndex = 36
+        Me.PictureBox18.TabStop = False
+        Me.PictureBox18.Visible = False
+        '
+        'LinkLabel41
+        '
+        Me.LinkLabel41.AutoSize = True
+        Me.LinkLabel41.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.LinkLabel41.Location = New System.Drawing.Point(17, 165)
+        Me.LinkLabel41.Name = "LinkLabel41"
+        Me.LinkLabel41.Size = New System.Drawing.Size(82, 13)
+        Me.LinkLabel41.TabIndex = 35
+        Me.LinkLabel41.TabStop = True
+        Me.LinkLabel41.Text = "Black-List (TBL)"
+        '
+        'LinkLabel42
+        '
+        Me.LinkLabel42.AutoSize = True
+        Me.LinkLabel42.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.LinkLabel42.Location = New System.Drawing.Point(17, 140)
+        Me.LinkLabel42.Name = "LinkLabel42"
+        Me.LinkLabel42.Size = New System.Drawing.Size(87, 13)
+        Me.LinkLabel42.TabIndex = 34
+        Me.LinkLabel42.TabStop = True
+        Me.LinkLabel42.Text = "White-List (TWL)"
+        '
+        'Label23
+        '
+        Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label23.Location = New System.Drawing.Point(17, 113)
+        Me.Label23.Name = "Label23"
+        Me.Label23.Size = New System.Drawing.Size(296, 16)
+        Me.Label23.TabIndex = 33
+        Me.Label23.Text = "Export"
+        '
+        'LinkLabel43
+        '
+        Me.LinkLabel43.AutoSize = True
+        Me.LinkLabel43.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.LinkLabel43.Location = New System.Drawing.Point(17, 68)
+        Me.LinkLabel43.Name = "LinkLabel43"
+        Me.LinkLabel43.Size = New System.Drawing.Size(102, 13)
+        Me.LinkLabel43.TabIndex = 32
+        Me.LinkLabel43.TabStop = True
+        Me.LinkLabel43.Text = "Contractdaten (CLF)"
+        '
+        'LinkLabel44
+        '
+        Me.LinkLabel44.AutoSize = True
+        Me.LinkLabel44.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.LinkLabel44.Location = New System.Drawing.Point(17, 43)
+        Me.LinkLabel44.Name = "LinkLabel44"
+        Me.LinkLabel44.Size = New System.Drawing.Size(126, 13)
+        Me.LinkLabel44.TabIndex = 31
+        Me.LinkLabel44.TabStop = True
+        Me.LinkLabel44.Text = "Transaktionsdaten (TTR)"
+        '
+        'Label24
+        '
+        Me.Label24.AutoSize = True
+        Me.Label24.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label24.Location = New System.Drawing.Point(17, 16)
+        Me.Label24.Name = "Label24"
+        Me.Label24.Size = New System.Drawing.Size(42, 13)
+        Me.Label24.TabIndex = 30
+        Me.Label24.Text = "Import"
+        '
         'CheckBox2
         '
         Me.CheckBox2.AutoSize = True
@@ -2148,6 +2313,304 @@ Partial Class frmStartOptions
         Me.lblRoutineManager.TabIndex = 1
         Me.lblRoutineManager.Text = "Routine Manager"
         '
+        'LinkLabel45
+        '
+        Me.LinkLabel45.AutoSize = True
+        Me.LinkLabel45.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.LinkLabel45.Location = New System.Drawing.Point(475, 95)
+        Me.LinkLabel45.Name = "LinkLabel45"
+        Me.LinkLabel45.Size = New System.Drawing.Size(112, 13)
+        Me.LinkLabel45.TabIndex = 61
+        Me.LinkLabel45.TabStop = True
+        Me.LinkLabel45.Text = "Wechselkurse EZOLL"
+        '
+        'PictureBox20
+        '
+        Me.PictureBox20.BackgroundImage = CType(resources.GetObject("PictureBox20.BackgroundImage"), System.Drawing.Image)
+        Me.PictureBox20.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox20.Location = New System.Drawing.Point(586, 90)
+        Me.PictureBox20.Name = "PictureBox20"
+        Me.PictureBox20.Size = New System.Drawing.Size(18, 18)
+        Me.PictureBox20.TabIndex = 62
+        Me.PictureBox20.TabStop = False
+        Me.PictureBox20.Visible = False
+        '
+        'MyTextBox2
+        '
+        Me.MyTextBox2._DateTimeOnly = False
+        Me.MyTextBox2._numbersOnly = True
+        Me.MyTextBox2._numbersOnlyKommastellen = ""
+        Me.MyTextBox2._numbersOnlyTrennzeichen = True
+        Me.MyTextBox2._Prozent = False
+        Me.MyTextBox2._ShortDateNew = False
+        Me.MyTextBox2._ShortDateOnly = False
+        Me.MyTextBox2._TimeOnly = False
+        Me.MyTextBox2._TimeOnly_Seconds = False
+        Me.MyTextBox2._value = ""
+        Me.MyTextBox2._Waehrung = False
+        Me.MyTextBox2._WaehrungZeichen = True
+        Me.MyTextBox2.ForeColor = System.Drawing.Color.Red
+        Me.MyTextBox2.Location = New System.Drawing.Point(151, 152)
+        Me.MyTextBox2.MaxLineLength = -1
+        Me.MyTextBox2.MaxLines_Warning = ""
+        Me.MyTextBox2.MaxLines_Warning_Label = Nothing
+        Me.MyTextBox2.Name = "MyTextBox2"
+        Me.MyTextBox2.Size = New System.Drawing.Size(53, 20)
+        Me.MyTextBox2.TabIndex = 63
+        '
+        'txtSyskaWdhDateiname
+        '
+        Me.txtSyskaWdhDateiname._DateTimeOnly = False
+        Me.txtSyskaWdhDateiname._numbersOnly = False
+        Me.txtSyskaWdhDateiname._numbersOnlyKommastellen = ""
+        Me.txtSyskaWdhDateiname._numbersOnlyTrennzeichen = True
+        Me.txtSyskaWdhDateiname._Prozent = False
+        Me.txtSyskaWdhDateiname._ShortDateNew = False
+        Me.txtSyskaWdhDateiname._ShortDateOnly = False
+        Me.txtSyskaWdhDateiname._TimeOnly = False
+        Me.txtSyskaWdhDateiname._TimeOnly_Seconds = False
+        Me.txtSyskaWdhDateiname._value = ""
+        Me.txtSyskaWdhDateiname._Waehrung = False
+        Me.txtSyskaWdhDateiname._WaehrungZeichen = True
+        Me.txtSyskaWdhDateiname.ForeColor = System.Drawing.Color.Black
+        Me.txtSyskaWdhDateiname.Location = New System.Drawing.Point(687, 295)
+        Me.txtSyskaWdhDateiname.MaxLength = 50
+        Me.txtSyskaWdhDateiname.MaxLineLength = -1
+        Me.txtSyskaWdhDateiname.MaxLines_Warning = ""
+        Me.txtSyskaWdhDateiname.MaxLines_Warning_Label = Nothing
+        Me.txtSyskaWdhDateiname.Name = "txtSyskaWdhDateiname"
+        Me.txtSyskaWdhDateiname.Size = New System.Drawing.Size(136, 20)
+        Me.txtSyskaWdhDateiname.TabIndex = 58
+        '
+        'txtEZOLLAnhDat
+        '
+        Me.txtEZOLLAnhDat._DateTimeOnly = False
+        Me.txtEZOLLAnhDat._numbersOnly = False
+        Me.txtEZOLLAnhDat._numbersOnlyKommastellen = ""
+        Me.txtEZOLLAnhDat._numbersOnlyTrennzeichen = True
+        Me.txtEZOLLAnhDat._Prozent = False
+        Me.txtEZOLLAnhDat._ShortDateNew = True
+        Me.txtEZOLLAnhDat._ShortDateOnly = False
+        Me.txtEZOLLAnhDat._TimeOnly = False
+        Me.txtEZOLLAnhDat._TimeOnly_Seconds = False
+        Me.txtEZOLLAnhDat._value = ""
+        Me.txtEZOLLAnhDat._Waehrung = False
+        Me.txtEZOLLAnhDat._WaehrungZeichen = True
+        Me.txtEZOLLAnhDat.ForeColor = System.Drawing.Color.Black
+        Me.txtEZOLLAnhDat.Location = New System.Drawing.Point(408, 190)
+        Me.txtEZOLLAnhDat.MaxLength = 10
+        Me.txtEZOLLAnhDat.MaxLineLength = -1
+        Me.txtEZOLLAnhDat.MaxLines_Warning = ""
+        Me.txtEZOLLAnhDat.MaxLines_Warning_Label = Nothing
+        Me.txtEZOLLAnhDat.Name = "txtEZOLLAnhDat"
+        Me.txtEZOLLAnhDat.Size = New System.Drawing.Size(87, 20)
+        Me.txtEZOLLAnhDat.TabIndex = 55
+        '
+        'cboSYSKAFirma
+        '
+        Me.cboSYSKAFirma._allowedValuesFreiText = Nothing
+        Me.cboSYSKAFirma._allowFreiText = False
+        Me.cboSYSKAFirma._value = ""
+        Me.cboSYSKAFirma.FormattingEnabled = True
+        Me.cboSYSKAFirma.Location = New System.Drawing.Point(559, 276)
+        Me.cboSYSKAFirma.Name = "cboSYSKAFirma"
+        Me.cboSYSKAFirma.Size = New System.Drawing.Size(129, 21)
+        Me.cboSYSKAFirma.TabIndex = 51
+        '
+        'cboBMDUnispedFirma
+        '
+        Me.cboBMDUnispedFirma._allowedValuesFreiText = Nothing
+        Me.cboBMDUnispedFirma._allowFreiText = False
+        Me.cboBMDUnispedFirma._value = ""
+        Me.cboBMDUnispedFirma.FormattingEnabled = True
+        Me.cboBMDUnispedFirma.Location = New System.Drawing.Point(268, 276)
+        Me.cboBMDUnispedFirma.Name = "cboBMDUnispedFirma"
+        Me.cboBMDUnispedFirma.Size = New System.Drawing.Size(124, 21)
+        Me.cboBMDUnispedFirma.TabIndex = 42
+        '
+        'dgvMRN
+        '
+        Me.dgvMRN.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvMRN.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvMRN.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnMRN})
+        Me.dgvMRN.Location = New System.Drawing.Point(637, 63)
+        Me.dgvMRN.Name = "dgvMRN"
+        Me.dgvMRN.RowHeadersWidth = 62
+        Me.dgvMRN.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+        Me.dgvMRN.Size = New System.Drawing.Size(207, 134)
+        Me.dgvMRN.TabIndex = 75
+        '
+        'clmnMRN
+        '
+        Me.clmnMRN.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.clmnMRN.HeaderText = "MRN"
+        Me.clmnMRN.MinimumWidth = 8
+        Me.clmnMRN.Name = "clmnMRN"
+        '
+        'txtVRGOut_MRN
+        '
+        Me.txtVRGOut_MRN._DateTimeOnly = False
+        Me.txtVRGOut_MRN._numbersOnly = False
+        Me.txtVRGOut_MRN._numbersOnlyKommastellen = ""
+        Me.txtVRGOut_MRN._numbersOnlyTrennzeichen = True
+        Me.txtVRGOut_MRN._Prozent = False
+        Me.txtVRGOut_MRN._ShortDateNew = False
+        Me.txtVRGOut_MRN._ShortDateOnly = False
+        Me.txtVRGOut_MRN._TimeOnly = False
+        Me.txtVRGOut_MRN._TimeOnly_Seconds = False
+        Me.txtVRGOut_MRN._value = ""
+        Me.txtVRGOut_MRN._Waehrung = False
+        Me.txtVRGOut_MRN._WaehrungZeichen = False
+        Me.txtVRGOut_MRN.ForeColor = System.Drawing.Color.Red
+        Me.txtVRGOut_MRN.Location = New System.Drawing.Point(359, 84)
+        Me.txtVRGOut_MRN.MaxLineLength = -1
+        Me.txtVRGOut_MRN.MaxLines_Warning = ""
+        Me.txtVRGOut_MRN.MaxLines_Warning_Label = Nothing
+        Me.txtVRGOut_MRN.Name = "txtVRGOut_MRN"
+        Me.txtVRGOut_MRN.Size = New System.Drawing.Size(153, 20)
+        Me.txtVRGOut_MRN.TabIndex = 73
+        '
+        'txtVRGOut_FilialenNr
+        '
+        Me.txtVRGOut_FilialenNr._DateTimeOnly = False
+        Me.txtVRGOut_FilialenNr._numbersOnly = False
+        Me.txtVRGOut_FilialenNr._numbersOnlyKommastellen = ""
+        Me.txtVRGOut_FilialenNr._numbersOnlyTrennzeichen = True
+        Me.txtVRGOut_FilialenNr._Prozent = False
+        Me.txtVRGOut_FilialenNr._ShortDateNew = False
+        Me.txtVRGOut_FilialenNr._ShortDateOnly = False
+        Me.txtVRGOut_FilialenNr._TimeOnly = False
+        Me.txtVRGOut_FilialenNr._TimeOnly_Seconds = False
+        Me.txtVRGOut_FilialenNr._value = ""
+        Me.txtVRGOut_FilialenNr._Waehrung = False
+        Me.txtVRGOut_FilialenNr._WaehrungZeichen = False
+        Me.txtVRGOut_FilialenNr.ForeColor = System.Drawing.Color.Red
+        Me.txtVRGOut_FilialenNr.Location = New System.Drawing.Point(398, 176)
+        Me.txtVRGOut_FilialenNr.MaxLineLength = -1
+        Me.txtVRGOut_FilialenNr.MaxLines_Warning = ""
+        Me.txtVRGOut_FilialenNr.MaxLines_Warning_Label = Nothing
+        Me.txtVRGOut_FilialenNr.Multiline = True
+        Me.txtVRGOut_FilialenNr.Name = "txtVRGOut_FilialenNr"
+        Me.txtVRGOut_FilialenNr.Size = New System.Drawing.Size(56, 21)
+        Me.txtVRGOut_FilialenNr.TabIndex = 71
+        '
+        'txtVRGOut_AbfertigungsNr
+        '
+        Me.txtVRGOut_AbfertigungsNr._DateTimeOnly = False
+        Me.txtVRGOut_AbfertigungsNr._numbersOnly = False
+        Me.txtVRGOut_AbfertigungsNr._numbersOnlyKommastellen = ""
+        Me.txtVRGOut_AbfertigungsNr._numbersOnlyTrennzeichen = True
+        Me.txtVRGOut_AbfertigungsNr._Prozent = False
+        Me.txtVRGOut_AbfertigungsNr._ShortDateNew = False
+        Me.txtVRGOut_AbfertigungsNr._ShortDateOnly = False
+        Me.txtVRGOut_AbfertigungsNr._TimeOnly = False
+        Me.txtVRGOut_AbfertigungsNr._TimeOnly_Seconds = False
+        Me.txtVRGOut_AbfertigungsNr._value = ""
+        Me.txtVRGOut_AbfertigungsNr._Waehrung = False
+        Me.txtVRGOut_AbfertigungsNr._WaehrungZeichen = False
+        Me.txtVRGOut_AbfertigungsNr.ForeColor = System.Drawing.Color.Red
+        Me.txtVRGOut_AbfertigungsNr.Location = New System.Drawing.Point(453, 176)
+        Me.txtVRGOut_AbfertigungsNr.MaxLineLength = -1
+        Me.txtVRGOut_AbfertigungsNr.MaxLines_Warning = ""
+        Me.txtVRGOut_AbfertigungsNr.MaxLines_Warning_Label = Nothing
+        Me.txtVRGOut_AbfertigungsNr.Multiline = True
+        Me.txtVRGOut_AbfertigungsNr.Name = "txtVRGOut_AbfertigungsNr"
+        Me.txtVRGOut_AbfertigungsNr.Size = New System.Drawing.Size(137, 21)
+        Me.txtVRGOut_AbfertigungsNr.TabIndex = 70
+        '
+        'MyComboBox2
+        '
+        Me.MyComboBox2._allowedValuesFreiText = Nothing
+        Me.MyComboBox2._allowFreiText = False
+        Me.MyComboBox2._value = ""
+        Me.MyComboBox2.FormattingEnabled = True
+        Me.MyComboBox2.Location = New System.Drawing.Point(298, 252)
+        Me.MyComboBox2.Name = "MyComboBox2"
+        Me.MyComboBox2.Size = New System.Drawing.Size(62, 21)
+        Me.MyComboBox2.TabIndex = 64
+        '
+        'txtVRGOutEZA_BezugsNr
+        '
+        Me.txtVRGOutEZA_BezugsNr._DateTimeOnly = False
+        Me.txtVRGOutEZA_BezugsNr._numbersOnly = False
+        Me.txtVRGOutEZA_BezugsNr._numbersOnlyKommastellen = ""
+        Me.txtVRGOutEZA_BezugsNr._numbersOnlyTrennzeichen = True
+        Me.txtVRGOutEZA_BezugsNr._Prozent = False
+        Me.txtVRGOutEZA_BezugsNr._ShortDateNew = False
+        Me.txtVRGOutEZA_BezugsNr._ShortDateOnly = False
+        Me.txtVRGOutEZA_BezugsNr._TimeOnly = False
+        Me.txtVRGOutEZA_BezugsNr._TimeOnly_Seconds = False
+        Me.txtVRGOutEZA_BezugsNr._value = ""
+        Me.txtVRGOutEZA_BezugsNr._Waehrung = False
+        Me.txtVRGOutEZA_BezugsNr._WaehrungZeichen = False
+        Me.txtVRGOutEZA_BezugsNr.ForeColor = System.Drawing.Color.Red
+        Me.txtVRGOutEZA_BezugsNr.Location = New System.Drawing.Point(359, 252)
+        Me.txtVRGOutEZA_BezugsNr.MaxLineLength = -1
+        Me.txtVRGOutEZA_BezugsNr.MaxLines_Warning = ""
+        Me.txtVRGOutEZA_BezugsNr.MaxLines_Warning_Label = Nothing
+        Me.txtVRGOutEZA_BezugsNr.Multiline = True
+        Me.txtVRGOutEZA_BezugsNr.Name = "txtVRGOutEZA_BezugsNr"
+        Me.txtVRGOutEZA_BezugsNr.Size = New System.Drawing.Size(153, 21)
+        Me.txtVRGOutEZA_BezugsNr.TabIndex = 65
+        '
+        'MyComboBox1
+        '
+        Me.MyComboBox1._allowedValuesFreiText = Nothing
+        Me.MyComboBox1._allowFreiText = False
+        Me.MyComboBox1._value = ""
+        Me.MyComboBox1.FormattingEnabled = True
+        Me.MyComboBox1.Location = New System.Drawing.Point(298, 62)
+        Me.MyComboBox1.Name = "MyComboBox1"
+        Me.MyComboBox1.Size = New System.Drawing.Size(62, 21)
+        Me.MyComboBox1.TabIndex = 4
+        '
+        'txtVRGOut_BezugsNr
+        '
+        Me.txtVRGOut_BezugsNr._DateTimeOnly = False
+        Me.txtVRGOut_BezugsNr._numbersOnly = False
+        Me.txtVRGOut_BezugsNr._numbersOnlyKommastellen = ""
+        Me.txtVRGOut_BezugsNr._numbersOnlyTrennzeichen = True
+        Me.txtVRGOut_BezugsNr._Prozent = False
+        Me.txtVRGOut_BezugsNr._ShortDateNew = False
+        Me.txtVRGOut_BezugsNr._ShortDateOnly = False
+        Me.txtVRGOut_BezugsNr._TimeOnly = False
+        Me.txtVRGOut_BezugsNr._TimeOnly_Seconds = False
+        Me.txtVRGOut_BezugsNr._value = ""
+        Me.txtVRGOut_BezugsNr._Waehrung = False
+        Me.txtVRGOut_BezugsNr._WaehrungZeichen = False
+        Me.txtVRGOut_BezugsNr.ForeColor = System.Drawing.Color.Red
+        Me.txtVRGOut_BezugsNr.Location = New System.Drawing.Point(359, 62)
+        Me.txtVRGOut_BezugsNr.MaxLineLength = -1
+        Me.txtVRGOut_BezugsNr.MaxLines_Warning = ""
+        Me.txtVRGOut_BezugsNr.MaxLines_Warning_Label = Nothing
+        Me.txtVRGOut_BezugsNr.Name = "txtVRGOut_BezugsNr"
+        Me.txtVRGOut_BezugsNr.Size = New System.Drawing.Size(153, 20)
+        Me.txtVRGOut_BezugsNr.TabIndex = 5
+        '
+        'MyTextBox1
+        '
+        Me.MyTextBox1._DateTimeOnly = False
+        Me.MyTextBox1._numbersOnly = True
+        Me.MyTextBox1._numbersOnlyKommastellen = ""
+        Me.MyTextBox1._numbersOnlyTrennzeichen = True
+        Me.MyTextBox1._Prozent = False
+        Me.MyTextBox1._ShortDateNew = False
+        Me.MyTextBox1._ShortDateOnly = False
+        Me.MyTextBox1._TimeOnly = False
+        Me.MyTextBox1._TimeOnly_Seconds = False
+        Me.MyTextBox1._value = "100000"
+        Me.MyTextBox1._Waehrung = False
+        Me.MyTextBox1._WaehrungZeichen = True
+        Me.MyTextBox1.ForeColor = System.Drawing.Color.Black
+        Me.MyTextBox1.Location = New System.Drawing.Point(151, 132)
+        Me.MyTextBox1.MaxLineLength = -1
+        Me.MyTextBox1.MaxLines_Warning = ""
+        Me.MyTextBox1.MaxLines_Warning_Label = Nothing
+        Me.MyTextBox1.Name = "MyTextBox1"
+        Me.MyTextBox1.Size = New System.Drawing.Size(53, 20)
+        Me.MyTextBox1.TabIndex = 11
+        Me.MyTextBox1.Text = "100000"
+        '
         'txtGJ_UNISPED
         '
         Me.txtGJ_UNISPED._DateTimeOnly = False
@@ -2222,10 +2685,18 @@ Partial Class frmStartOptions
         CType(Me.PictureBox14, System.ComponentModel.ISupportInitialize).EndInit()
         Me.TabPage3.ResumeLayout(False)
         Me.TabPage3.PerformLayout()
+        Me.TabPage3.ResumeLayout(False)
+        Me.TabPage3.PerformLayout()
+        Me.TabPage4.ResumeLayout(False)
+        Me.TabPage4.PerformLayout()
+        CType(Me.PictureBox19, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.PictureBox18, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.PictureBox12, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.PictureBox10, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.PictureBox20, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.dgvMRN, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
 
     End Sub
@@ -2377,6 +2848,17 @@ Partial Class frmStartOptions
     Friend WithEvents LinkLabel40 As LinkLabel
     Friend WithEvents Label22 As Label
     Friend WithEvents cbxVermerk As CheckBox
+    Friend WithEvents TabPage4 As TabPage
+    Friend WithEvents LinkLabel41 As LinkLabel
+    Friend WithEvents LinkLabel42 As LinkLabel
+    Friend WithEvents Label23 As Label
+    Friend WithEvents LinkLabel43 As LinkLabel
+    Friend WithEvents LinkLabel44 As LinkLabel
+    Friend WithEvents Label24 As Label
+    Friend WithEvents PictureBox19 As PictureBox
+    Friend WithEvents PictureBox18 As PictureBox
+    Friend WithEvents LinkLabel45 As LinkLabel
+    Friend WithEvents PictureBox20 As PictureBox
     Friend WithEvents Button17 As Button
     Friend WithEvents Label23 As Label
     Friend WithEvents Button18 As Button
diff --git a/initATLASAufschubkonten/frmStartOptions.resx b/initATLASAufschubkonten/frmStartOptions.resx
index e674afa..5fd8635 100644
--- a/initATLASAufschubkonten/frmStartOptions.resx
+++ b/initATLASAufschubkonten/frmStartOptions.resx
@@ -140,6 +140,30 @@
         WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
         nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
         CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="PictureBox20.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
+        oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
+        QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
+        j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
+        VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
+        XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
+        9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
+        VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
+        42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
+        pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
+        lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
+        d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
+        hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
+        LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
+        8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
+        NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
+        ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
+        WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
+        nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
+        CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
 </value>
   </data>
   <data name="PictureBox17.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -479,6 +503,57 @@
         WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
         nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
         CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
+</value>
+  </data>
+  <metadata name="clmnMRN.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <data name="PictureBox19.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
+        oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
+        QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
+        j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
+        VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
+        XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
+        9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
+        VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
+        42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
+        pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
+        lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
+        d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
+        hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
+        LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
+        8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
+        NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
+        ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
+        WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
+        nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
+        CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="PictureBox18.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
+        oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
+        QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
+        j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
+        VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
+        XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
+        9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
+        VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
+        42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
+        pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
+        lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
+        d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
+        hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
+        LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
+        8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
+        NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
+        ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
+        WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
+        nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
+        CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
 </value>
   </data>
   <data name="PictureBox12.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb
index 6b89517..2d13df1 100644
--- a/initATLASAufschubkonten/frmStartOptions.vb
+++ b/initATLASAufschubkonten/frmStartOptions.vb
@@ -1,10 +1,13 @@
 Imports System.Data.OleDb
+Imports System.DirectoryServices.ActiveDirectory
 Imports System.IO
 Imports System.Net
 Imports System.Text
 Imports System.Xml
 Imports DocumentFormat.OpenXml.Drawing.Diagrams
 Imports DocumentFormat.OpenXml.Wordprocessing
+Imports iTextSharp.text.pdf.qrcode.Version
+Imports Org.BouncyCastle.Asn1.Pkcs
 Imports Renci.SshNet
 Imports VERAG_PROG_ALLGEMEIN
 
@@ -1962,6 +1965,9 @@ Public Class frmStartOptions
         PictureBox12.Visible = False
         PictureBox13.Visible = False
         PictureBox14.Visible = False
+        PictureBox18.Visible = False
+        PictureBox19.Visible = False
+        PictureBox20.Visible = False
 
     End Sub
 
@@ -3437,6 +3443,133 @@ Public Class frmStartOptions
         VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(cbxDatevOpen.Checked, cbxDatevDebitoren.Checked, cbxDatevBuchungen.Checked)
     End Sub
 
+    Private Sub LinkLabel44_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel44.LinkClicked
+        Me.Visible = False
+        VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True
+        Dim f As New frmAsfinag_NachrichtenVerabeitung("ttr")
+        f.ShowDialog()
+        Me.Visible = True
+    End Sub
+
+    Private Sub LinkLabel43_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel43.LinkClicked
+        Me.Visible = False
+        VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True
+        Dim f As New frmAsfinag_NachrichtenVerabeitung("clf")
+        f.ShowDialog()
+        Me.Visible = True
+    End Sub
+
+    Private Sub LinkLabel42_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel42.LinkClicked
+        VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True
+        Me.Cursor = Cursors.WaitCursor
+        Dim blt = New cAsfinag.Exportist
+        blt.initPFad()
+        showPic(blt.exportiereWhiteList, PictureBox18)
+        Me.Cursor = Cursors.Default
+    End Sub
+
+    Private Sub LinkLabel41_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel41.LinkClicked
+        VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True
+        Me.Cursor = Cursors.WaitCursor
+        Dim blt = New cAsfinag.Exportist
+        blt.initPFad()
+        showPic(blt.exportiereBlackList, PictureBox19)
+        Me.Cursor = Cursors.Default
+    End Sub
+
+    Private Sub LinkLabel45_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel45.LinkClicked
+
+        Dim MyData As String = ""
+        Dim SQL = New SQL
+        Dim erg = True
+
+        Dim firstDaycurrentMonth = DateTime.Now.AddMonths(0)
+        firstDaycurrentMonth = New DateTime(firstDaycurrentMonth.Year, firstDaycurrentMonth.Month, 1)
+
+        Dim lastDaycurrentMonth = DateTime.Now.AddMonths(1)
+        lastDaycurrentMonth = New DateTime(lastDaycurrentMonth.Year, lastDaycurrentMonth.Month, 1).AddDays(-1)
+
+        Dim kursart = "1" 'notirete Währung
+        Dim startdatum_tag2 = firstDaycurrentMonth.Day
+        Dim startdatum_monat2 = firstDaycurrentMonth.Month
+        Dim startdatum_jahr2 = firstDaycurrentMonth.Year
+        Dim enddatum_tag2 = lastDaycurrentMonth.Day
+        Dim enddatum_monat2 = lastDaycurrentMonth.Month
+        Dim enddatum_jahr2 = lastDaycurrentMonth.Year
+
+        Try
+            System.Net.ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12
+
+            Using WC As New System.Net.WebClient()
+                ' C0008_URL()
+                WC.Encoding = ASCIIEncoding.UTF8
+                Dim URL = "https://www.zoll.de/SiteGlobals/Functions/Kurse/KursExport.xml?view=xmlexportkursesearchresultZOLLWeb&kursart=" & kursart &
+                    "&startdatum_tag2=" & startdatum_tag2 &
+                    "&startdatum_monat2=" & startdatum_monat2 &
+                    "&startdatum_jahr2=" & startdatum_jahr2 &
+                    "&enddatum_tag2=" & enddatum_tag2 &
+                    "&enddatum_monat2=" & enddatum_monat2 &
+                    "&enddatum_jahr2=" & enddatum_jahr2 &
+                    "&sort=asc&spalte=gueltigkeit"
+                If URL = String.Empty Then Exit Sub
+
+                MyData = WC.DownloadString(URL)
+                Dim doc As New XmlDocument()
+                doc.LoadXml(MyData)
+                If doc.HasChildNodes Then
+
+                    If doc.GetElementsByTagName("kurs").Count > 0 Then
+                        Dim endDatum, startDatum
+                        Dim count As Integer = 1
+                        For Each node As XmlElement In doc.GetElementsByTagName("kurs")
+                            Dim wk As New cFremdwaehrungskurse()
+                            If node.Attributes("id") IsNot Nothing Then wk.fw_id = node.Attributes("id").Value
+                            If node.HasChildNodes Then
+                                For Each element As XmlElement In node.ChildNodes
+                                    If element.Name = "land" AndAlso element.InnerText <> "" Then wk.fw_land = element.InnerText
+                                    If element.Name = "iso2" AndAlso element.InnerText <> "" Then wk.fw_iso2 = element.InnerText
+                                    If element.Name = "iso3" AndAlso element.InnerText <> "" Then wk.fw_iso3 = element.InnerText
+                                    If element.Name = "kurswert" AndAlso element.InnerText <> "" Then wk.fw_kurswert = element.InnerText
+                                    If element.Name = "startdatum" AndAlso element.InnerText <> "" Then
+                                        wk.fw_startdatum = element.InnerText
+                                        startDatum = wk.fw_startdatum
+                                    End If
+                                    If element.Name = "enddatum" AndAlso element.InnerText <> "" Then
+                                        wk.fw_enddatum = element.InnerText
+                                        endDatum = wk.fw_enddatum
+                                    End If
+                                Next
+                                count = count + 1
+                                wk.SAVE()
+                            End If
+                        Next
+                        Dim wk_euro As New cFremdwaehrungskurse()
+                        wk_euro.fw_id = 0
+                        wk_euro.fw_land = "Europa"
+                        wk_euro.fw_kurswert = 1
+                        wk_euro.fw_iso3 = "EUR"
+                        wk_euro.fw_iso2 = "EU"
+                        wk_euro.fw_startdatum = firstDaycurrentMonth.ToShortDateString()
+                        wk_euro.fw_enddatum = lastDaycurrentMonth.ToShortDateString()
+                        wk_euro.SAVE()
+
+
+
+                        Dim sqlCount = SQL.getValueTxtBySqlVarList("SELECT isnull(count(*),0) FROM tblZOLL_Wechselkurse WHERE [fw_startdatum]='" & startDatum & "' AND fw_enddatum='" & endDatum & "'", "FMZOLL")
+                        If count <> sqlCount Then
+                            MsgBox("Anzahl der Importierten Datensätze:" & sqlCount & vbNewLine & "Anzahl Datensätze in Datei: " & count)
+                            erg = False
+                        End If
+                    End If
+                    showPic(erg, PictureBox20)
+                End If
+
+            End Using
+
+        Catch ex As Exception
+            MsgBox(ex.Message & ex.StackTrace)
+        End Try
+    End Sub
     Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click
         Dim f As New frmDatenarchivarchiv
         f.ShowDialog()