update 20200123

2020-01-23 23:18:17 +01:00
parent 1d61c1103a
commit 195d4d6ec7
398 changed files with 32032 additions and 34622 deletions
--- a/.vs/DPM2016/v14/.suo
+++ b/.vs/DPM2016/v14/.suo
--- a/.vs/DPM2016/v15/.suo
+++ b/.vs/DPM2016/v15/.suo
--- a/.vs/DPM2016/v15/Server/sqlite3/storage.ide
+++ b/.vs/DPM2016/v15/Server/sqlite3/storage.ide
--- a/.vs/DPM2016/v16/.suo
+++ b/.vs/DPM2016/v16/.suo
--- a/CryptoEditor/obj/Debug/CryptoEditor.vbprojAssemblyReference.cache
+++ b/CryptoEditor/obj/Debug/CryptoEditor.vbprojAssemblyReference.cache
--- a/CryptoEditor/obj/Release/CryptoEditor.vbprojAssemblyReference.cache
+++ b/CryptoEditor/obj/Release/CryptoEditor.vbprojAssemblyReference.cache
--- a/DPM2016/Auswertungen/FrmSearchDialog.Designer.vb
+++ b/DPM2016/Auswertungen/FrmSearchDialog.Designer.vb
@@ -0,0 +1,221 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class FrmSearchDialog
+    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(FrmSearchDialog))
+        Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
+        Me.tsbtnquit = New System.Windows.Forms.ToolStripButton()
+        Me.tsbtnSave = New System.Windows.Forms.ToolStripButton()
+        Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
+        Me.DateiToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.SchliessenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Button2 = New System.Windows.Forms.Button()
+        Me.GroupBox1 = New System.Windows.Forms.GroupBox()
+        Me.c1daten = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
+        Me.GroupBox2 = New System.Windows.Forms.GroupBox()
+        Me.TextBox1 = New System.Windows.Forms.TextBox()
+        Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.AuswählenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStrip1.SuspendLayout()
+        Me.MenuStrip1.SuspendLayout()
+        Me.GroupBox1.SuspendLayout()
+        CType(Me.c1daten, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.GroupBox2.SuspendLayout()
+        Me.ContextMenuStrip1.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'ToolStrip1
+        '
+        Me.ToolStrip1.AllowDrop = True
+        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbtnquit, Me.tsbtnSave})
+        Me.ToolStrip1.Location = New System.Drawing.Point(0, 24)
+        Me.ToolStrip1.Name = "ToolStrip1"
+        Me.ToolStrip1.Size = New System.Drawing.Size(664, 25)
+        Me.ToolStrip1.TabIndex = 19
+        Me.ToolStrip1.Text = "ToolStrip1"
+        '
+        'tsbtnquit
+        '
+        Me.tsbtnquit.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.tsbtnquit.Image = CType(resources.GetObject("tsbtnquit.Image"), System.Drawing.Image)
+        Me.tsbtnquit.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.tsbtnquit.Name = "tsbtnquit"
+        Me.tsbtnquit.Size = New System.Drawing.Size(23, 22)
+        Me.tsbtnquit.Text = "Schliessen"
+        '
+        'tsbtnSave
+        '
+        Me.tsbtnSave.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.tsbtnSave.Image = CType(resources.GetObject("tsbtnSave.Image"), System.Drawing.Image)
+        Me.tsbtnSave.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.tsbtnSave.Name = "tsbtnSave"
+        Me.tsbtnSave.Size = New System.Drawing.Size(23, 22)
+        Me.tsbtnSave.Text = "Zahlungsdatei öffnen und verarbeiten"
+        Me.tsbtnSave.Visible = False
+        '
+        'MenuStrip1
+        '
+        Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiToolStripMenuItem})
+        Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
+        Me.MenuStrip1.Name = "MenuStrip1"
+        Me.MenuStrip1.Size = New System.Drawing.Size(664, 24)
+        Me.MenuStrip1.TabIndex = 18
+        Me.MenuStrip1.Text = "MenuStrip1"
+        '
+        'DateiToolStripMenuItem
+        '
+        Me.DateiToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.SchliessenToolStripMenuItem})
+        Me.DateiToolStripMenuItem.Name = "DateiToolStripMenuItem"
+        Me.DateiToolStripMenuItem.Size = New System.Drawing.Size(46, 20)
+        Me.DateiToolStripMenuItem.Text = "&Datei"
+        '
+        'SchliessenToolStripMenuItem
+        '
+        Me.SchliessenToolStripMenuItem.Name = "SchliessenToolStripMenuItem"
+        Me.SchliessenToolStripMenuItem.Size = New System.Drawing.Size(128, 22)
+        Me.SchliessenToolStripMenuItem.Text = "Schliessen"
+        '
+        'Button1
+        '
+        Me.Button1.Location = New System.Drawing.Point(577, 336)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(75, 23)
+        Me.Button1.TabIndex = 20
+        Me.Button1.Text = "OK"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'Button2
+        '
+        Me.Button2.Location = New System.Drawing.Point(12, 336)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(75, 23)
+        Me.Button2.TabIndex = 21
+        Me.Button2.Text = "Abbruch"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
+        'GroupBox1
+        '
+        Me.GroupBox1.Controls.Add(Me.c1daten)
+        Me.GroupBox1.Dock = System.Windows.Forms.DockStyle.Top
+        Me.GroupBox1.Location = New System.Drawing.Point(0, 49)
+        Me.GroupBox1.Name = "GroupBox1"
+        Me.GroupBox1.Size = New System.Drawing.Size(664, 212)
+        Me.GroupBox1.TabIndex = 22
+        Me.GroupBox1.TabStop = False
+        Me.GroupBox1.Text = "Daten"
+        '
+        'c1daten
+        '
+        Me.c1daten.AllowDrop = True
+        Me.c1daten.AllowUpdate = False
+        Me.c1daten.AlternatingRows = True
+        Me.c1daten.ContextMenuStrip = Me.ContextMenuStrip1
+        Me.c1daten.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.c1daten.FilterBar = True
+        Me.c1daten.GroupByCaption = "Drag a column header here to group by that column"
+        Me.c1daten.Images.Add(CType(resources.GetObject("c1daten.Images"), System.Drawing.Image))
+        Me.c1daten.Location = New System.Drawing.Point(3, 16)
+        Me.c1daten.Name = "c1daten"
+        Me.c1daten.PreviewInfo.Location = New System.Drawing.Point(0, 0)
+        Me.c1daten.PreviewInfo.Size = New System.Drawing.Size(0, 0)
+        Me.c1daten.PreviewInfo.ZoomFactor = 75.0R
+        Me.c1daten.PrintInfo.PageSettings = CType(resources.GetObject("c1daten.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
+        Me.c1daten.Size = New System.Drawing.Size(658, 193)
+        Me.c1daten.TabIndex = 6
+        Me.c1daten.Text = "C1TrueDBGrid1"
+        Me.c1daten.PropBag = resources.GetString("c1daten.PropBag")
+        '
+        'GroupBox2
+        '
+        Me.GroupBox2.Controls.Add(Me.TextBox1)
+        Me.GroupBox2.Dock = System.Windows.Forms.DockStyle.Top
+        Me.GroupBox2.Location = New System.Drawing.Point(0, 261)
+        Me.GroupBox2.Name = "GroupBox2"
+        Me.GroupBox2.Size = New System.Drawing.Size(664, 69)
+        Me.GroupBox2.TabIndex = 23
+        Me.GroupBox2.TabStop = False
+        Me.GroupBox2.Text = "Ausgewählte Daten"
+        '
+        'TextBox1
+        '
+        Me.TextBox1.Location = New System.Drawing.Point(7, 20)
+        Me.TextBox1.Name = "TextBox1"
+        Me.TextBox1.Size = New System.Drawing.Size(651, 20)
+        Me.TextBox1.TabIndex = 0
+        '
+        'ContextMenuStrip1
+        '
+        Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AuswählenToolStripMenuItem})
+        Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
+        Me.ContextMenuStrip1.Size = New System.Drawing.Size(133, 26)
+        '
+        'AuswählenToolStripMenuItem
+        '
+        Me.AuswählenToolStripMenuItem.Name = "AuswählenToolStripMenuItem"
+        Me.AuswählenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.AuswählenToolStripMenuItem.Text = "Auswählen"
+        '
+        'FrmSearchDialog
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(664, 371)
+        Me.Controls.Add(Me.GroupBox2)
+        Me.Controls.Add(Me.GroupBox1)
+        Me.Controls.Add(Me.Button2)
+        Me.Controls.Add(Me.Button1)
+        Me.Controls.Add(Me.ToolStrip1)
+        Me.Controls.Add(Me.MenuStrip1)
+        Me.Name = "FrmSearchDialog"
+        Me.Text = "Suche"
+        Me.ToolStrip1.ResumeLayout(False)
+        Me.ToolStrip1.PerformLayout()
+        Me.MenuStrip1.ResumeLayout(False)
+        Me.MenuStrip1.PerformLayout()
+        Me.GroupBox1.ResumeLayout(False)
+        CType(Me.c1daten, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.GroupBox2.ResumeLayout(False)
+        Me.GroupBox2.PerformLayout()
+        Me.ContextMenuStrip1.ResumeLayout(False)
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents ToolStrip1 As ToolStrip
+    Friend WithEvents tsbtnquit As ToolStripButton
+    Friend WithEvents tsbtnSave As ToolStripButton
+    Friend WithEvents MenuStrip1 As MenuStrip
+    Friend WithEvents DateiToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents SchliessenToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents Button1 As Button
+    Friend WithEvents Button2 As Button
+    Friend WithEvents GroupBox1 As GroupBox
+    Friend WithEvents c1daten As C1.Win.C1TrueDBGrid.C1TrueDBGrid
+    Friend WithEvents GroupBox2 As GroupBox
+    Friend WithEvents TextBox1 As TextBox
+    Friend WithEvents ContextMenuStrip1 As ContextMenuStrip
+    Friend WithEvents AuswählenToolStripMenuItem As ToolStripMenuItem
+End Class
--- a/DPM2016/Auswertungen/FrmSearchDialog.resx
+++ b/DPM2016/Auswertungen/FrmSearchDialog.resx
@@ -0,0 +1,210 @@
+<?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="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>231, 17</value>
+  </metadata>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="tsbtnquit.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAK2SURBVDhPnZLdS1NhHMcfCPoDuummi+gyunJg0QviNrd5
+        PDtzc7Z5ztl20pUzo6I3yFIrS9N8K7Qih6lUFJVaGWXZi6KRoZSFmCuyi+iiiCKILgo+HTUWu7QffOD5
+        PfB8eL6/5xH/U1+mh4IzM+O/Ovdm8Hdrvi5X5PR2H86ht2oWKUnPEYkr5XYexXfyebKfTxO3+P5mkIv7
+        ramCngqZtDV2Vq+zsWbDP9LXWVllWc+PRD+J3krGWv18TTzm8kFHqqC7TCbD6sRml7A7XEmsWU7S19t4
+        3Rlh7JzO6Okgn1/d5dqh7FSBo1kg1Swi2+5DcilI2W4kScblktlglZjsMBg9G+JJS5CPYz1zUf8eFcJ2
+        XJD42IXTlORkaridARTJjyJ7kd0eMh1uXsbDjLTqDDYXMDN8idvVyrzAViOYeN9Gx6Ago1pgbxA4Twnk
+        sqV4lSCeXD9ZOT7Gz2kMntT5cWc5UwPt3K31Ilx1gqfvqomPCNqGzfXbIp69i/D8Q3hOku8Jk5cXRPIE
+        eHZa5WGTxs/+Fby63cpAg39e8CCxh/i4ID4maH8p6JgUvPgWwXFSEMwrYmMghDtPY6QlwEBjkLY9Tp73
+        HOdxc2AugsVuRuib2kxXQpA5G+GEwNEkyC1fhq5GUXUDX9BgqNnPvfp8rh9WeHqpguEWNTlES1atoPet
+        D2ejwAjswtBKMcLFGEaUiFFIIBTlYYOXO3U++mq8DJ3fzeiZUMozWpzmlZW6xUSN7USLSiiKFs9RaKJt
+        inG/zkNfdS43jnrob40x3hZJEYjO0rVsKSmlJLaDkq3bksRMCou3c69W5uYxhe4qNzfrQ0y0FyJ0XUfX
+        QmhaGFWdxVyrmtmrSVSz31igsy8W4EKFYv5AmatHcpns2jw/xIVSpqfvrzyw8vf0hVhqhAXUEpM0IYTl
+        DzXbwlLPDlfpAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="tsbtnSave.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAP4SURBVEhLnZVtbFN1FMaZGkWFMMMnY4LGT6jBGBN1Wepu
+        23Vx4kyUOF2c0ZCYIB/2xaAmRh2RIRCp8hIE18UI3QtJY93mMpwiGAGBUpu2rpNo1rTdZINtrLWsr/fe
+        x3Nu779c7oCR/ZMnZ2vufX7nOef2dok4AwMDD2ez2cuk2Uwmk4xE4/KWc1OQBv9UpKERRRoMKWvdQXXt
+        4Dia3H41NjaWisfjp3t6eh6SJOkOFtlUlNyuc9xu96OgMzU1pRYVFZ+ciGPVfj9W7DqL5SSuq93n0dx5
+        Eh3dHjWdTmN6ehrDw8Oy0+mUHA7HitbW1tt0u/nH5XI9LgCX5opo7o3h/t1hVO4MovLzACqdIdg9CXy2
+        5wBmZmZQLBY1JZNJhEIhpaOj4wOCrKIkS8luXpKK9vb2JxjAJ5mVsemXJNa4LuKRryex+sAEHvvmMt70
+        xOHctRuKomhiACdJpVIIBoMKebzHkIaGhnvMaTSAqqqlG2UV7QEZ9k4ZloNFPHuoCOthYKN3jAB7y92z
+        aF8aQEBaWlpetdvtD9TX199lhJQBsiyD63d/qXjJA1jdQG0n4GBA7wVs/3KfZlwoFJBIJBCJRBAIBBAO
+        h7W/fT7feE1NzVO1tbUrGxsbb9f9rwKEfhpV8UYvIB0CJQFs3cD6vlls3+PSmhDiHfCyeS/RaBR+v1+m
+        BBtsNtuDBLhT9782AY/Jf0HBxkFKoAOsXUCTN40d+91a9yyRhGs+n9dgDCHzTZRiTVVV1d26fwkglseK
+        plR8/BuNh4xtnIDqa30qnK6e8vyNElAeG41nM6V4sq6u7l7dvwS4kpNxJZNFNpfDyPgstp7K43maPe+B
+        IU1HgH3fejQj7piNuYr/c3SfDmjjPcwDpLIKfIkMnEP/YOfP43j/aB4v06IlHbCuD/jKewKZbA5zWTIs
+        0FOUKwHY3Ayg78Qy3f/qiApFGb5JFdvOAu8eBV7/XgeQHJ0q3v4hh21nFOwNqOiPpDE5mymPh3VTAC+Y
+        Y3P9418Zn54E3vmx9JgyhEf1AiXacBz4yBPE+fhFretbTsDGfLGo4YkC2mgP67xAzUHgOdrHW0PAF97T
+        mLg0XTYW86cX5cIAkULoVOhvfHjsP7xC34n1/Rn0+hLlrtnYrFtKIJ4OoV/PjWDrGRW/R9PlrkXn3LWo
+        CyYQxmbA3FxpkeYnRhiLuiiAGIfZ1GjMn/NLj7UggM2uJwE0SkCNuilAGHE13sSfmbs2di7qggmMHQuY
+        WUawUQJ6Q0BXV9eLRtMbmYhqljEB/artoJfd09XV1ct1/yUV9B5vjsVi2gWL1ejoqCYy32K1Wp+5BmCx
+        WO6jSBZSG+kwXdC/SHXT/ZtLI5KW/Q9WITc4r+w9eQAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>338, 17</value>
+  </metadata>
+  <metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>453, 17</value>
+  </metadata>
+  <data name="c1daten.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
+        vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="c1daten.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj00LjAuMC4wLCBDdWx0
+        dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
+        d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
+        emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
+        c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
+        bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
+        dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
+        LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
+        U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
+        d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
+        AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
+        cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
+        eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
+        bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
+        ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
+        AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
+        bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
+        ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
+        RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
+        9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
+        AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
+        BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
+        AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
+        QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
+        ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
+</value>
+  </data>
+  <data name="c1daten.PropBag" xml:space="preserve">
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 656, 191&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 656, 191&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+  </data>
+</root>
--- a/DPM2016/Auswertungen/FrmSearchDialog.vb
+++ b/DPM2016/Auswertungen/FrmSearchDialog.vb
@@ -0,0 +1,43 @@
+Public Class FrmSearchDialog
+    Private Sub FrmSearchDialog_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        Dim db As New clsDB
+        db.Get_Tabledata("Patienten", "", "select NrPrivat as Nr, Name, Vorname, Strasse, PLZ, Ort from privat order by Name, Vorname, plz")
+        Me.c1daten.DataSource = db.dsDaten.Tables(0)
+        Me.c1daten.DataMember = db.dsDaten.Tables(0).TableName
+        For i = 0 To Me.c1daten.Splits(0).DisplayColumns.Count - 1
+            Me.c1daten.Splits(0).DisplayColumns(i).AutoSize()
+        Next
+    End Sub
+
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        Me.DialogResult = DialogResult.OK
+        Me.Close()
+    End Sub
+
+    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
+        Me.Close()
+    End Sub
+
+    Private Sub c1daten_DoubleClick(sender As Object, e As EventArgs) Handles c1daten.DoubleClick
+        If Me.TextBox1.Text <> "" Then
+            Me.TextBox1.Text = Me.TextBox1.Text + ","
+        End If
+        Me.TextBox1.Text = Me.TextBox1.Text + c1daten.Columns(0).Value.ToString
+    End Sub
+
+    Private Sub c1daten_Click(sender As Object, e As EventArgs) Handles c1daten.Click
+
+    End Sub
+
+    Private Sub AuswählenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AuswählenToolStripMenuItem.Click
+        c1daten_DoubleClick(sender, e)
+    End Sub
+
+    Private Sub c1daten_MouseDown(sender As Object, e As MouseEventArgs) Handles c1daten.MouseDown
+        Try
+            c1daten.Bookmark = c1daten.RowContaining(e.Y)
+        Catch
+        End Try
+
+    End Sub
+End Class
--- a/DPM2016/Behandlung/Behandlung.Designer.vb
+++ b/DPM2016/Behandlung/Behandlung.Designer.vb
@@ -34,6 +34,8 @@ Partial Class Behandlung
        Me.NeueBehandlungToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripSeparator()
        Me.BehandlungabschliessenToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.AbschlussMitRecallAnzeigeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.AbshlussOhneRecallAnzeigeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.BehandlungZurücksetzenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.BehandlungKopierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolStripMenuItem4 = New System.Windows.Forms.ToolStripSeparator()
@@ -74,8 +76,8 @@ Partial Class Behandlung
        Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
        Me.tsbtnbehandlungdelete = New System.Windows.Forms.ToolStrip()
        Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
-        Me.Behandungdetail1 = New DPM2016.Benhandungdetail()
        Me.Leistungen1 = New DPM2016.Leistungen()
+        Me.Behandungdetail1 = New DPM2016.Benhandungdetail()
        Me.tsbtndelete.SuspendLayout()
        Me.GroupBox1.SuspendLayout()
        CType(Me.treebehandlungen, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -92,10 +94,11 @@ Partial Class Behandlung
        '
        'tsbtndelete
        '
+        Me.tsbtndelete.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.tsbtndelete.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbtnnewbehandlung, Me.tsbtndeletebehandlung, Me.ToolStripButton2})
        Me.tsbtndelete.Location = New System.Drawing.Point(0, 0)
        Me.tsbtndelete.Name = "tsbtndelete"
-        Me.tsbtndelete.Size = New System.Drawing.Size(1285, 25)
+        Me.tsbtndelete.Size = New System.Drawing.Size(1713, 31)
        Me.tsbtndelete.TabIndex = 1
        Me.tsbtndelete.Text = "ToolStrip1"
        '
@@ -105,7 +108,7 @@ Partial Class Behandlung
        Me.tsbtnnewbehandlung.Image = CType(resources.GetObject("tsbtnnewbehandlung.Image"), System.Drawing.Image)
        Me.tsbtnnewbehandlung.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.tsbtnnewbehandlung.Name = "tsbtnnewbehandlung"
-        Me.tsbtnnewbehandlung.Size = New System.Drawing.Size(23, 22)
+        Me.tsbtnnewbehandlung.Size = New System.Drawing.Size(29, 28)
        Me.tsbtnnewbehandlung.Text = "Neue Behandlung"
        '
        'tsbtndeletebehandlung
@@ -114,7 +117,7 @@ Partial Class Behandlung
        Me.tsbtndeletebehandlung.Image = CType(resources.GetObject("tsbtndeletebehandlung.Image"), System.Drawing.Image)
        Me.tsbtndeletebehandlung.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.tsbtndeletebehandlung.Name = "tsbtndeletebehandlung"
-        Me.tsbtndeletebehandlung.Size = New System.Drawing.Size(23, 22)
+        Me.tsbtndeletebehandlung.Size = New System.Drawing.Size(29, 28)
        Me.tsbtndeletebehandlung.Text = "Behandlung löschen"
        '
        'ToolStripButton2
@@ -123,16 +126,18 @@ Partial Class Behandlung
        Me.ToolStripButton2.Image = CType(resources.GetObject("ToolStripButton2.Image"), System.Drawing.Image)
        Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton2.Name = "ToolStripButton2"
-        Me.ToolStripButton2.Size = New System.Drawing.Size(23, 22)
+        Me.ToolStripButton2.Size = New System.Drawing.Size(29, 28)
        Me.ToolStripButton2.Text = "Aktualisieren"
        '
        'GroupBox1
        '
        Me.GroupBox1.Controls.Add(Me.treebehandlungen)
        Me.GroupBox1.Dock = System.Windows.Forms.DockStyle.Left
-        Me.GroupBox1.Location = New System.Drawing.Point(0, 25)
+        Me.GroupBox1.Location = New System.Drawing.Point(0, 31)
+        Me.GroupBox1.Margin = New System.Windows.Forms.Padding(4)
        Me.GroupBox1.Name = "GroupBox1"
-        Me.GroupBox1.Size = New System.Drawing.Size(220, 813)
+        Me.GroupBox1.Padding = New System.Windows.Forms.Padding(4)
+        Me.GroupBox1.Size = New System.Drawing.Size(293, 1000)
        Me.GroupBox1.TabIndex = 2
        Me.GroupBox1.TabStop = False
        Me.GroupBox1.Text = "Behandlungen"
@@ -155,138 +160,153 @@ Partial Class Behandlung
        Me.treebehandlungen.DragDropNodeCopyEnabled = False
        Me.treebehandlungen.ImageList = Me.ImageList1
        Me.treebehandlungen.LicenseKey = "F962CEC7-CD8F-4911-A9E9-CAB39962FC1F"
-        Me.treebehandlungen.Location = New System.Drawing.Point(3, 16)
+        Me.treebehandlungen.Location = New System.Drawing.Point(4, 19)
+        Me.treebehandlungen.Margin = New System.Windows.Forms.Padding(4)
        Me.treebehandlungen.Name = "treebehandlungen"
        Me.treebehandlungen.Nodes.AddRange(New DevComponents.AdvTree.Node() {Me.Node2})
        Me.treebehandlungen.NodesConnector = Me.NodeConnector1
        Me.treebehandlungen.NodeStyle = Me.ElementStyle1
        Me.treebehandlungen.PathSeparator = ";"
-        Me.treebehandlungen.Size = New System.Drawing.Size(214, 794)
+        Me.treebehandlungen.Size = New System.Drawing.Size(285, 977)
        Me.treebehandlungen.Styles.Add(Me.ElementStyle1)
        Me.treebehandlungen.TabIndex = 0
        Me.treebehandlungen.Text = "AdvTree1"
        '
        'ctxmenubehandlung
        '
+        Me.ctxmenubehandlung.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.ctxmenubehandlung.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NeueBehandlungToolStripMenuItem1, Me.ToolStripMenuItem2, Me.BehandlungabschliessenToolStripMenuItem1, Me.BehandlungZurücksetzenToolStripMenuItem, Me.BehandlungKopierenToolStripMenuItem, Me.ToolStripMenuItem4, Me.SofortRechnungDruckenToolStripMenuItem, Me.KopieErstellenToolStripMenuItem, Me.ToolStripMenuItem3, Me.BehandlungLöschenToolStripMenuItem1, Me.ToolStripMenuItem5, Me.RechungKVVorschauToolStripMenuItem, Me.RechnungKVEntwurfToolStripMenuItem})
        Me.ctxmenubehandlung.Name = "ContextMenuStrip1"
-        Me.ctxmenubehandlung.Size = New System.Drawing.Size(212, 226)
+        Me.ctxmenubehandlung.Size = New System.Drawing.Size(247, 244)
        '
        'NeueBehandlungToolStripMenuItem1
        '
        Me.NeueBehandlungToolStripMenuItem1.Name = "NeueBehandlungToolStripMenuItem1"
-        Me.NeueBehandlungToolStripMenuItem1.Size = New System.Drawing.Size(211, 22)
+        Me.NeueBehandlungToolStripMenuItem1.Size = New System.Drawing.Size(246, 24)
        Me.NeueBehandlungToolStripMenuItem1.Text = "&Neue Behandlung"
        '
        'ToolStripMenuItem2
        '
        Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2"
-        Me.ToolStripMenuItem2.Size = New System.Drawing.Size(208, 6)
+        Me.ToolStripMenuItem2.Size = New System.Drawing.Size(243, 6)
        '
        'BehandlungabschliessenToolStripMenuItem1
        '
+        Me.BehandlungabschliessenToolStripMenuItem1.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AbschlussMitRecallAnzeigeToolStripMenuItem, Me.AbshlussOhneRecallAnzeigeToolStripMenuItem})
        Me.BehandlungabschliessenToolStripMenuItem1.Name = "BehandlungabschliessenToolStripMenuItem1"
-        Me.BehandlungabschliessenToolStripMenuItem1.Size = New System.Drawing.Size(211, 22)
+        Me.BehandlungabschliessenToolStripMenuItem1.Size = New System.Drawing.Size(246, 24)
        Me.BehandlungabschliessenToolStripMenuItem1.Text = "Behandlung &abschliessen"
        '
+        'AbschlussMitRecallAnzeigeToolStripMenuItem
+        '
+        Me.AbschlussMitRecallAnzeigeToolStripMenuItem.Name = "AbschlussMitRecallAnzeigeToolStripMenuItem"
+        Me.AbschlussMitRecallAnzeigeToolStripMenuItem.Size = New System.Drawing.Size(290, 26)
+        Me.AbschlussMitRecallAnzeigeToolStripMenuItem.Text = "Abschluss mit Recall-Anzeige"
+        '
+        'AbshlussOhneRecallAnzeigeToolStripMenuItem
+        '
+        Me.AbshlussOhneRecallAnzeigeToolStripMenuItem.Name = "AbshlussOhneRecallAnzeigeToolStripMenuItem"
+        Me.AbshlussOhneRecallAnzeigeToolStripMenuItem.Size = New System.Drawing.Size(290, 26)
+        Me.AbshlussOhneRecallAnzeigeToolStripMenuItem.Text = "Abshluss ohne Recall-Anzeige"
+        '
        'BehandlungZurücksetzenToolStripMenuItem
        '
        Me.BehandlungZurücksetzenToolStripMenuItem.Name = "BehandlungZurücksetzenToolStripMenuItem"
-        Me.BehandlungZurücksetzenToolStripMenuItem.Size = New System.Drawing.Size(211, 22)
+        Me.BehandlungZurücksetzenToolStripMenuItem.Size = New System.Drawing.Size(246, 24)
        Me.BehandlungZurücksetzenToolStripMenuItem.Text = "Behandlung zurücksetzen"
        '
        'BehandlungKopierenToolStripMenuItem
        '
        Me.BehandlungKopierenToolStripMenuItem.Name = "BehandlungKopierenToolStripMenuItem"
-        Me.BehandlungKopierenToolStripMenuItem.Size = New System.Drawing.Size(211, 22)
+        Me.BehandlungKopierenToolStripMenuItem.Size = New System.Drawing.Size(246, 24)
        Me.BehandlungKopierenToolStripMenuItem.Text = "Behandlung kopieren"
        '
        'ToolStripMenuItem4
        '
        Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4"
-        Me.ToolStripMenuItem4.Size = New System.Drawing.Size(208, 6)
+        Me.ToolStripMenuItem4.Size = New System.Drawing.Size(243, 6)
        '
        'SofortRechnungDruckenToolStripMenuItem
        '
        Me.SofortRechnungDruckenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.VorschauToolStripMenuItem, Me.EntwurfToolStripMenuItem, Me.ToolStripMenuItem6, Me.AlsPdfToolStripMenuItem1, Me.AlsMailToolStripMenuItem})
        Me.SofortRechnungDruckenToolStripMenuItem.Name = "SofortRechnungDruckenToolStripMenuItem"
-        Me.SofortRechnungDruckenToolStripMenuItem.Size = New System.Drawing.Size(211, 22)
+        Me.SofortRechnungDruckenToolStripMenuItem.Size = New System.Drawing.Size(246, 24)
        Me.SofortRechnungDruckenToolStripMenuItem.Text = "Sofort-Rechnung drucken"
        '
        'VorschauToolStripMenuItem
        '
        Me.VorschauToolStripMenuItem.Name = "VorschauToolStripMenuItem"
-        Me.VorschauToolStripMenuItem.Size = New System.Drawing.Size(202, 22)
+        Me.VorschauToolStripMenuItem.Size = New System.Drawing.Size(252, 26)
        Me.VorschauToolStripMenuItem.Text = "Vorschau"
        '
        'EntwurfToolStripMenuItem
        '
        Me.EntwurfToolStripMenuItem.Name = "EntwurfToolStripMenuItem"
-        Me.EntwurfToolStripMenuItem.Size = New System.Drawing.Size(202, 22)
+        Me.EntwurfToolStripMenuItem.Size = New System.Drawing.Size(252, 26)
        Me.EntwurfToolStripMenuItem.Text = "Entwurf"
        '
        'ToolStripMenuItem6
        '
        Me.ToolStripMenuItem6.Name = "ToolStripMenuItem6"
-        Me.ToolStripMenuItem6.Size = New System.Drawing.Size(199, 6)
+        Me.ToolStripMenuItem6.Size = New System.Drawing.Size(249, 6)
        '
        'AlsPdfToolStripMenuItem1
        '
        Me.AlsPdfToolStripMenuItem1.Name = "AlsPdfToolStripMenuItem1"
-        Me.AlsPdfToolStripMenuItem1.Size = New System.Drawing.Size(202, 22)
+        Me.AlsPdfToolStripMenuItem1.Size = New System.Drawing.Size(252, 26)
        Me.AlsPdfToolStripMenuItem1.Text = "als PDF"
        '
        'AlsMailToolStripMenuItem
        '
        Me.AlsMailToolStripMenuItem.Name = "AlsMailToolStripMenuItem"
-        Me.AlsMailToolStripMenuItem.Size = New System.Drawing.Size(202, 22)
+        Me.AlsMailToolStripMenuItem.Size = New System.Drawing.Size(252, 26)
        Me.AlsMailToolStripMenuItem.Text = "als PDF an Outlook-Mail"
        '
        'KopieErstellenToolStripMenuItem
        '
        Me.KopieErstellenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AlsPDFToolStripMenuItem, Me.ÜberDruckerToolStripMenuItem})
        Me.KopieErstellenToolStripMenuItem.Name = "KopieErstellenToolStripMenuItem"
-        Me.KopieErstellenToolStripMenuItem.Size = New System.Drawing.Size(211, 22)
+        Me.KopieErstellenToolStripMenuItem.Size = New System.Drawing.Size(246, 24)
        Me.KopieErstellenToolStripMenuItem.Text = "Rechnungskopie erstellen"
        '
        'AlsPDFToolStripMenuItem
        '
        Me.AlsPDFToolStripMenuItem.Name = "AlsPDFToolStripMenuItem"
-        Me.AlsPDFToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.AlsPDFToolStripMenuItem.Size = New System.Drawing.Size(177, 26)
        Me.AlsPDFToolStripMenuItem.Text = "als PDF"
        '
        'ÜberDruckerToolStripMenuItem
        '
        Me.ÜberDruckerToolStripMenuItem.Name = "ÜberDruckerToolStripMenuItem"
-        Me.ÜberDruckerToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.ÜberDruckerToolStripMenuItem.Size = New System.Drawing.Size(177, 26)
        Me.ÜberDruckerToolStripMenuItem.Text = "über Drucker"
        '
        'ToolStripMenuItem3
        '
        Me.ToolStripMenuItem3.Name = "ToolStripMenuItem3"
-        Me.ToolStripMenuItem3.Size = New System.Drawing.Size(208, 6)
+        Me.ToolStripMenuItem3.Size = New System.Drawing.Size(243, 6)
        '
        'BehandlungLöschenToolStripMenuItem1
        '
        Me.BehandlungLöschenToolStripMenuItem1.Name = "BehandlungLöschenToolStripMenuItem1"
-        Me.BehandlungLöschenToolStripMenuItem1.Size = New System.Drawing.Size(211, 22)
+        Me.BehandlungLöschenToolStripMenuItem1.Size = New System.Drawing.Size(246, 24)
        Me.BehandlungLöschenToolStripMenuItem1.Text = "&Behandlung löschen"
        '
        'ToolStripMenuItem5
        '
        Me.ToolStripMenuItem5.Name = "ToolStripMenuItem5"
-        Me.ToolStripMenuItem5.Size = New System.Drawing.Size(208, 6)
+        Me.ToolStripMenuItem5.Size = New System.Drawing.Size(243, 6)
        '
        'RechungKVVorschauToolStripMenuItem
        '
        Me.RechungKVVorschauToolStripMenuItem.Name = "RechungKVVorschauToolStripMenuItem"
-        Me.RechungKVVorschauToolStripMenuItem.Size = New System.Drawing.Size(211, 22)
+        Me.RechungKVVorschauToolStripMenuItem.Size = New System.Drawing.Size(246, 24)
        Me.RechungKVVorschauToolStripMenuItem.Text = "Rechung/KV Vorschau"
        '
        'RechnungKVEntwurfToolStripMenuItem
        '
        Me.RechnungKVEntwurfToolStripMenuItem.Name = "RechnungKVEntwurfToolStripMenuItem"
-        Me.RechnungKVEntwurfToolStripMenuItem.Size = New System.Drawing.Size(211, 22)
+        Me.RechnungKVEntwurfToolStripMenuItem.Size = New System.Drawing.Size(246, 24)
        Me.RechnungKVEntwurfToolStripMenuItem.Text = "Rechnung/KV Entwurf"
        '
        'ImageList1
@@ -316,42 +336,42 @@ Partial Class Behandlung
        'NeueBehandlungToolStripMenuItem
        '
        Me.NeueBehandlungToolStripMenuItem.Name = "NeueBehandlungToolStripMenuItem"
-        Me.NeueBehandlungToolStripMenuItem.Size = New System.Drawing.Size(243, 22)
+        Me.NeueBehandlungToolStripMenuItem.Size = New System.Drawing.Size(288, 24)
        Me.NeueBehandlungToolStripMenuItem.Text = "&Neue Behandlung"
        '
        'BehandlungAbschliessenToolStripMenuItem
        '
        Me.BehandlungAbschliessenToolStripMenuItem.Name = "BehandlungAbschliessenToolStripMenuItem"
-        Me.BehandlungAbschliessenToolStripMenuItem.Size = New System.Drawing.Size(243, 22)
+        Me.BehandlungAbschliessenToolStripMenuItem.Size = New System.Drawing.Size(288, 24)
        Me.BehandlungAbschliessenToolStripMenuItem.Text = "&Behandlung abschliessen"
        '
        'BehandlungLöschenToolStripMenuItem
        '
        Me.BehandlungLöschenToolStripMenuItem.Name = "BehandlungLöschenToolStripMenuItem"
-        Me.BehandlungLöschenToolStripMenuItem.Size = New System.Drawing.Size(243, 22)
+        Me.BehandlungLöschenToolStripMenuItem.Size = New System.Drawing.Size(288, 24)
        Me.BehandlungLöschenToolStripMenuItem.Text = "Behandlung &löschen"
        '
        'ToolStripMenuItem1
        '
        Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1"
-        Me.ToolStripMenuItem1.Size = New System.Drawing.Size(240, 6)
+        Me.ToolStripMenuItem1.Size = New System.Drawing.Size(285, 6)
        '
        'NeuerKostenvoranschlagToolStripMenuItem
        '
        Me.NeuerKostenvoranschlagToolStripMenuItem.Name = "NeuerKostenvoranschlagToolStripMenuItem"
-        Me.NeuerKostenvoranschlagToolStripMenuItem.Size = New System.Drawing.Size(243, 22)
+        Me.NeuerKostenvoranschlagToolStripMenuItem.Size = New System.Drawing.Size(288, 24)
        Me.NeuerKostenvoranschlagToolStripMenuItem.Text = "Neuer &Kostenvoranschlag"
        '
        'KostenvoranschlagAbschliessenToolStripMenuItem
        '
        Me.KostenvoranschlagAbschliessenToolStripMenuItem.Name = "KostenvoranschlagAbschliessenToolStripMenuItem"
-        Me.KostenvoranschlagAbschliessenToolStripMenuItem.Size = New System.Drawing.Size(243, 22)
+        Me.KostenvoranschlagAbschliessenToolStripMenuItem.Size = New System.Drawing.Size(288, 24)
        Me.KostenvoranschlagAbschliessenToolStripMenuItem.Text = "Kostenvoranschlag abschliessen"
        '
        'KostenvoranschlagLöschenToolStripMenuItem
        '
        Me.KostenvoranschlagLöschenToolStripMenuItem.Name = "KostenvoranschlagLöschenToolStripMenuItem"
-        Me.KostenvoranschlagLöschenToolStripMenuItem.Size = New System.Drawing.Size(243, 22)
+        Me.KostenvoranschlagLöschenToolStripMenuItem.Size = New System.Drawing.Size(288, 24)
        Me.KostenvoranschlagLöschenToolStripMenuItem.Text = "Kostenvoranschlag löschen"
        '
        'SuperTabControl1
@@ -373,12 +393,13 @@ Partial Class Behandlung
        Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel2)
        Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel3)
        Me.SuperTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.SuperTabControl1.Location = New System.Drawing.Point(220, 25)
+        Me.SuperTabControl1.Location = New System.Drawing.Point(293, 31)
+        Me.SuperTabControl1.Margin = New System.Windows.Forms.Padding(4)
        Me.SuperTabControl1.Name = "SuperTabControl1"
        Me.SuperTabControl1.ReorderTabsEnabled = True
        Me.SuperTabControl1.SelectedTabFont = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold)
        Me.SuperTabControl1.SelectedTabIndex = 0
-        Me.SuperTabControl1.Size = New System.Drawing.Size(1065, 813)
+        Me.SuperTabControl1.Size = New System.Drawing.Size(1420, 1000)
        Me.SuperTabControl1.TabFont = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.SuperTabControl1.TabIndex = 9
        Me.SuperTabControl1.Tabs.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.STBehandlung, Me.STLeistung})
@@ -388,9 +409,10 @@ Partial Class Behandlung
        '
        Me.SuperTabControlPanel1.Controls.Add(Me.Panel2)
        Me.SuperTabControlPanel1.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.SuperTabControlPanel1.Location = New System.Drawing.Point(0, 25)
+        Me.SuperTabControlPanel1.Location = New System.Drawing.Point(0, 28)
+        Me.SuperTabControlPanel1.Margin = New System.Windows.Forms.Padding(4)
        Me.SuperTabControlPanel1.Name = "SuperTabControlPanel1"
-        Me.SuperTabControlPanel1.Size = New System.Drawing.Size(1065, 788)
+        Me.SuperTabControlPanel1.Size = New System.Drawing.Size(1420, 972)
        Me.SuperTabControlPanel1.TabIndex = 1
        Me.SuperTabControlPanel1.TabItem = Me.STBehandlung
        '
@@ -398,8 +420,9 @@ Partial Class Behandlung
        '
        Me.Panel2.Controls.Add(Me.Behandungdetail1)
        Me.Panel2.Location = New System.Drawing.Point(0, 0)
+        Me.Panel2.Margin = New System.Windows.Forms.Padding(4)
        Me.Panel2.Name = "Panel2"
-        Me.Panel2.Size = New System.Drawing.Size(1062, 788)
+        Me.Panel2.Size = New System.Drawing.Size(1416, 970)
        Me.Panel2.TabIndex = 9
        '
        'STBehandlung
@@ -413,9 +436,10 @@ Partial Class Behandlung
        '
        Me.SuperTabControlPanel2.Controls.Add(Me.Panel1)
        Me.SuperTabControlPanel2.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.SuperTabControlPanel2.Location = New System.Drawing.Point(0, 25)
+        Me.SuperTabControlPanel2.Location = New System.Drawing.Point(0, 28)
+        Me.SuperTabControlPanel2.Margin = New System.Windows.Forms.Padding(4)
        Me.SuperTabControlPanel2.Name = "SuperTabControlPanel2"
-        Me.SuperTabControlPanel2.Size = New System.Drawing.Size(1065, 788)
+        Me.SuperTabControlPanel2.Size = New System.Drawing.Size(1420, 972)
        Me.SuperTabControlPanel2.TabIndex = 0
        Me.SuperTabControlPanel2.TabItem = Me.STLeistung
        '
@@ -424,8 +448,9 @@ Partial Class Behandlung
        Me.Panel1.Controls.Add(Me.Leistungen1)
        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill
        Me.Panel1.Location = New System.Drawing.Point(0, 0)
+        Me.Panel1.Margin = New System.Windows.Forms.Padding(4)
        Me.Panel1.Name = "Panel1"
-        Me.Panel1.Size = New System.Drawing.Size(1065, 788)
+        Me.Panel1.Size = New System.Drawing.Size(1420, 972)
        Me.Panel1.TabIndex = 1
        '
        'STLeistung
@@ -439,8 +464,9 @@ Partial Class Behandlung
        '
        Me.SuperTabControlPanel3.Dock = System.Windows.Forms.DockStyle.Fill
        Me.SuperTabControlPanel3.Location = New System.Drawing.Point(0, 0)
+        Me.SuperTabControlPanel3.Margin = New System.Windows.Forms.Padding(4)
        Me.SuperTabControlPanel3.Name = "SuperTabControlPanel3"
-        Me.SuperTabControlPanel3.Size = New System.Drawing.Size(1065, 813)
+        Me.SuperTabControlPanel3.Size = New System.Drawing.Size(1420, 1000)
        Me.SuperTabControlPanel3.TabIndex = 0
        '
        'tsbtnnew
@@ -449,7 +475,7 @@ Partial Class Behandlung
        Me.tsbtnnew.Image = CType(resources.GetObject("tsbtnnew.Image"), System.Drawing.Image)
        Me.tsbtnnew.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.tsbtnnew.Name = "tsbtnnew"
-        Me.tsbtnnew.Size = New System.Drawing.Size(23, 22)
+        Me.tsbtnnew.Size = New System.Drawing.Size(29, 22)
        Me.tsbtnnew.Text = "Neue Behandlung"
        '
        'ToolStripButton1
@@ -458,11 +484,12 @@ Partial Class Behandlung
        Me.ToolStripButton1.Image = CType(resources.GetObject("ToolStripButton1.Image"), System.Drawing.Image)
        Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton1.Name = "ToolStripButton1"
-        Me.ToolStripButton1.Size = New System.Drawing.Size(23, 22)
+        Me.ToolStripButton1.Size = New System.Drawing.Size(29, 22)
        Me.ToolStripButton1.Text = "ToolStripButton1"
        '
        'tsbtnbehandlungdelete
        '
+        Me.tsbtnbehandlungdelete.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.tsbtnbehandlungdelete.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbtnnew, Me.ToolStripButton1})
        Me.tsbtnbehandlungdelete.Location = New System.Drawing.Point(0, 0)
        Me.tsbtnbehandlungdelete.Name = "tsbtnbehandlungdelete"
@@ -472,20 +499,10 @@ Partial Class Behandlung
        '
        'ContextMenuStrip1
        '
+        Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NeueBehandlungToolStripMenuItem, Me.BehandlungAbschliessenToolStripMenuItem, Me.BehandlungLöschenToolStripMenuItem, Me.ToolStripMenuItem1, Me.NeuerKostenvoranschlagToolStripMenuItem, Me.KostenvoranschlagAbschliessenToolStripMenuItem, Me.KostenvoranschlagLöschenToolStripMenuItem})
        Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
-        Me.ContextMenuStrip1.Size = New System.Drawing.Size(244, 142)
-        '
-        'Behandungdetail1
-        '
-        Me.Behandungdetail1.Behandlungsnr = 0
-        Me.Behandungdetail1.Behandlungsstatus = 0
-        Me.Behandungdetail1.HasChanges = False
-        Me.Behandungdetail1.Location = New System.Drawing.Point(3, 6)
-        Me.Behandungdetail1.Name = "Behandungdetail1"
-        Me.Behandungdetail1.Patientnr = 0
-        Me.Behandungdetail1.Size = New System.Drawing.Size(1059, 779)
-        Me.Behandungdetail1.TabIndex = 0
+        Me.ContextMenuStrip1.Size = New System.Drawing.Size(289, 154)
        '
        'Leistungen1
        '
@@ -496,19 +513,33 @@ Partial Class Behandlung
        Me.Leistungen1.Dock = System.Windows.Forms.DockStyle.Fill
        Me.Leistungen1.Frankenwert = 0R
        Me.Leistungen1.Location = New System.Drawing.Point(0, 0)
+        Me.Leistungen1.Margin = New System.Windows.Forms.Padding(5)
        Me.Leistungen1.Name = "Leistungen1"
-        Me.Leistungen1.Size = New System.Drawing.Size(1065, 788)
+        Me.Leistungen1.Size = New System.Drawing.Size(1420, 972)
        Me.Leistungen1.TabIndex = 0
        '
+        'Behandungdetail1
+        '
+        Me.Behandungdetail1.Behandlungsnr = 0
+        Me.Behandungdetail1.Behandlungsstatus = 0
+        Me.Behandungdetail1.HasChanges = False
+        Me.Behandungdetail1.Location = New System.Drawing.Point(4, 7)
+        Me.Behandungdetail1.Margin = New System.Windows.Forms.Padding(5)
+        Me.Behandungdetail1.Name = "Behandungdetail1"
+        Me.Behandungdetail1.Patientnr = 0
+        Me.Behandungdetail1.Size = New System.Drawing.Size(1412, 959)
+        Me.Behandungdetail1.TabIndex = 0
+        '
        'Behandlung
        '
-        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.Controls.Add(Me.SuperTabControl1)
        Me.Controls.Add(Me.GroupBox1)
        Me.Controls.Add(Me.tsbtndelete)
+        Me.Margin = New System.Windows.Forms.Padding(4)
        Me.Name = "Behandlung"
-        Me.Size = New System.Drawing.Size(1285, 838)
+        Me.Size = New System.Drawing.Size(1713, 1031)
        Me.tsbtndelete.ResumeLayout(False)
        Me.tsbtndelete.PerformLayout()
        Me.GroupBox1.ResumeLayout(False)
@@ -579,4 +610,6 @@ Partial Class Behandlung
    Friend WithEvents ToolStripMenuItem6 As ToolStripSeparator
    Friend WithEvents AlsPdfToolStripMenuItem1 As ToolStripMenuItem
    Friend WithEvents AlsMailToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents AbschlussMitRecallAnzeigeToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents AbshlussOhneRecallAnzeigeToolStripMenuItem As ToolStripMenuItem
 End Class
--- a/DPM2016/Behandlung/Behandlung.resx
+++ b/DPM2016/Behandlung/Behandlung.resx
@@ -124,7 +124,7 @@
  <data name="tsbtnnewbehandlung.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAINSURBVDhPY6AVYAyc67K/+XD1/SYg9p3quAQqTiQIZWAO
+        YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAINSURBVDhPY6AVYAyc67K/+XD1/SYg9p3quAQqTiQIZWAO
        Wu75Zu6Nuf9nX5/9322S/TmoDJEAaIDnctc3k69M/D/hSt9/p0nm56EyRAKwATZveq+0/O++0gg0wAiP
        AfUMTOYLtWx81tnYB0CxZZ+ak88myw9dV8v/d1wp+e88T++2/XxtB591FvYeQOyyzsTeYJGyFVi/cAGn
        Se6J5P99V5v+T7ze8H/Szbr/U27V/O++kfe/43rm/9Zr6f87r+f+775e9L/tSsH/hot5/yvPZf8P2Ov6
@@ -139,7 +139,7 @@
  <data name="tsbtndeletebehandlung.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAJASURBVDhPfZNLSxtRFMdn5Suah0oChhiJmlGj8RGfiKIi
+        YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAJASURBVDhPfZNLSxtRFMdn5Suah0oChhiJmlGj8RGfiKIi
        gouAEPULuMlSxe+Rrbt8hKEWGfJobNq5k0ZaJ7Vgq90ILW5auiiFLv8955oJiU37hwPDPfd3/ufMvVex
        VTk4SF0mEprmcrmrS39JCwbdpZ0dzdjeTlWXHvUhmUw/nJ7i7e4uspGIxRurqZqqsPXp5ATG4iJyo6Np
        mWBnCScSMNfXIVZXoatqQ5EafHwMMTcHY2ZGRkZVUwq3zc42LJaXYSwtQQ+HZZEafHQEEYtBTE3VQh8a
@@ -155,7 +155,7 @@
  <data name="ToolStripButton2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAAMgAAADICAYAAACtWK6eAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAA+oSURBVHhe7Z0J8H5THcYp2cJky5IpCqP8LSnrVBSViBiy
+        YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAA+oSURBVHhe7Z0J8H5THcYp2cJky5IpCqP8LSnrVBSViBiy
        VfaQrMkSypYskbQRZQuhKSRbY6eikq1sWcJEEWXLlup5+P/G6/W87+++7znn3nvOfT4zn2nS796cc+/7
        vvee812mMcYYY4wxxhhjjDHGGGOMMcYYY4wxxhhjjDHGGGOMMcYYY4wxxhhjjDHGGGOMKZN54FJwVbgR
        3BHuAw+Ah8Aj4Dfh4VP/2V5wZ7gZXB3yWJ7jddCYLJkWLgY/DQ+FP4U3wafg/yL5PLwdngsPg1vC98A3
@@ -236,7 +236,7 @@
        AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
        LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
        ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABO
-        DQAAAk1TRnQBSQFMAgEBBQEAASABAwEgAQMBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
+        DQAAAk1TRnQBSQFMAgEBBQEAAWABAwFgAQMBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
        AwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
        AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
        AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
@@ -298,7 +298,7 @@
  <data name="tsbtnnew.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAINSURBVDhPY6AVYAyc67K/+XD1/SYg9p3quAQqTiQIZWAO
+        YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAINSURBVDhPY6AVYAyc67K/+XD1/SYg9p3quAQqTiQIZWAO
        Wu75Zu6Nuf9nX5/9322S/TmoDJEAaIDnctc3k69M/D/hSt9/p0nm56EyRAKwATZveq+0/O++0gg0wAiP
        AfUMTOYLtWx81tnYB0CxZZ+ak88myw9dV8v/d1wp+e88T++2/XxtB591FvYeQOyyzsTeYJGyFVi/cAGn
        Se6J5P99V5v+T7ze8H/Szbr/U27V/O++kfe/43rm/9Zr6f87r+f+775e9L/tSsH/hot5/yvPZf8P2Ov6
@@ -313,7 +313,7 @@
  <data name="ToolStripButton1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAJASURBVDhPfZNLSxtRFMdn5Suah0oChhiJmlGj8RGfiKIi
+        YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAJASURBVDhPfZNLSxtRFMdn5Suah0oChhiJmlGj8RGfiKIi
        gouAEPULuMlSxe+Rrbt8hKEWGfJobNq5k0ZaJ7Vgq90ILW5auiiFLv8955oJiU37hwPDPfd3/ufMvVex
        VTk4SF0mEprmcrmrS39JCwbdpZ0dzdjeTlWXHvUhmUw/nJ7i7e4uspGIxRurqZqqsPXp5ATG4iJyo6Np
        mWBnCScSMNfXIVZXoatqQ5EafHwMMTcHY2ZGRkZVUwq3zc42LJaXYSwtQQ+HZZEafHQEEYtBTE3VQh8a
--- a/DPM2016/Behandlung/Behandlung.vb
+++ b/DPM2016/Behandlung/Behandlung.vb
@@ -565,9 +565,15 @@ Public Class Behandlung
    End Sub

    Private Sub BehandlungabschliessenToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles BehandlungabschliessenToolStripMenuItem1.Click
+        Application.DoEvents()
+        Me.ctxmenubehandlung.Close()
        ' If MsgBox("Behandlung/KV abschliessen?", vbYesNo + vbQuestion) = vbYes Then
+        Try
+            If DB.Get_Option(10001) = True Then Globals.Recall_Bei_Abschluss = True Else Globals.Recall_Bei_Abschluss = False
+        Catch
+        End Try

-        Behandlung_Abschliessen(Me.treebehandlungen.SelectedNode.Tag.ToString)
+        Behandlung_Abschliessen(Me.treebehandlungen.SelectedNode.Tag.ToString, Globals.Recall_Bei_Abschluss)
        'End If
    End Sub

@@ -760,7 +766,7 @@ Public Class Behandlung

    End Sub

-    Sub Behandlung_Abschliessen(ByVal nrbehandlung)
+    Sub Behandlung_Abschliessen(ByVal nrbehandlung As Integer, Optional show_recall As Boolean = True)
        Globals.InAbschluss = 0
        Dim istKV As Boolean = False
        Dim db As New clsDB
@@ -775,7 +781,22 @@ Public Class Behandlung
            istKV = True
            Messagetext = "Kostenvoranschlag"
        End If
+        If db.dsDaten.Tables(0).Rows(0).Item("rgdatum").ToString < Now.ToString And db.dsDaten.Tables(0).Rows(0).Item("rgdatum").ToString <> "" Then
+            Dim d As New frmMsgbox
+            d.set_text("Das Rechnungsdatum liegt in der Vergangenheit.", "Löschen und weiter", "weiter", "Abbruch")
+            Dim res As DialogResult
+            res = d.ShowDialog
+            Select Case res
+                Case DialogResult.Yes
+                    db.dsDaten.Tables(0).Rows(0).Item("rgdatum") = System.DBNull.Value
+                    db.Update_Data()
+                Case DialogResult.No

+                Case DialogResult.Abort, DialogResult.Cancel
+                    Exit Sub
+            End Select
+
+        End If
        If MsgBox(Messagetext + " abschliessen?", vbYesNo + vbQuestion) = vbYes Then
            Me.Behandungdetail1.Save_Data()

@@ -800,6 +821,7 @@ Public Class Behandlung
            Me.nodeselected()

            If istKV Then Exit Sub
+            If show_recall = False Then Exit Sub
            Dim pat As New clsDB
            pat.Get_Tabledata("Privat", "where nrprivat=" + Me.PatientNr.ToString)
            Try
@@ -1017,6 +1039,14 @@ Public Class Behandlung
        Behandungdetail1.Sofortrechnung_als_pdf(True)
    End Sub

+    Private Sub AbschlussMitRecallAnzeigeToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AbschlussMitRecallAnzeigeToolStripMenuItem.Click
+        Behandlung_Abschliessen(Me.treebehandlungen.SelectedNode.Tag.ToString, True)
+    End Sub
+
+    Private Sub AbshlussOhneRecallAnzeigeToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AbshlussOhneRecallAnzeigeToolStripMenuItem.Click
+        Behandlung_Abschliessen(Me.treebehandlungen.SelectedNode.Tag.ToString, False)
+    End Sub
+



--- a/DPM2016/Behandlung/Benhandungdetail.Designer.vb
+++ b/DPM2016/Behandlung/Benhandungdetail.Designer.vb
@@ -742,7 +742,7 @@ Partial Class Benhandungdetail
        'txtAnzahlraten
        '
        Me.txtAnzahlraten.BackGroundColor = System.Drawing.SystemColors.Window
-        Me.txtAnzahlraten.BeforeTouchSize = New System.Drawing.Size(61, 20)
+        Me.txtAnzahlraten.BeforeTouchSize = New System.Drawing.Size(100, 20)
        Me.txtAnzahlraten.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.txtAnzahlraten.DoubleValue = 0R
        Me.txtAnzahlraten.Location = New System.Drawing.Point(93, 19)
@@ -759,7 +759,7 @@ Partial Class Benhandungdetail
        'mtxtRatenzuschlag
        '
        Me.mtxtRatenzuschlag.BackGroundColor = System.Drawing.SystemColors.Window
-        Me.mtxtRatenzuschlag.BeforeTouchSize = New System.Drawing.Size(61, 20)
+        Me.mtxtRatenzuschlag.BeforeTouchSize = New System.Drawing.Size(100, 20)
        Me.mtxtRatenzuschlag.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.mtxtRatenzuschlag.DoubleValue = 1.0R
        Me.mtxtRatenzuschlag.Location = New System.Drawing.Point(93, 51)
@@ -1113,7 +1113,7 @@ Partial Class Benhandungdetail
        'mtxtRabatt
        '
        Me.mtxtRabatt.BackGroundColor = System.Drawing.SystemColors.Window
-        Me.mtxtRabatt.BeforeTouchSize = New System.Drawing.Size(61, 20)
+        Me.mtxtRabatt.BeforeTouchSize = New System.Drawing.Size(100, 20)
        Me.mtxtRabatt.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.mtxtRabatt.DoubleValue = 1.0R
        Me.mtxtRabatt.Location = New System.Drawing.Point(190, 163)
@@ -1129,7 +1129,7 @@ Partial Class Benhandungdetail
        'mtxtTaxpunktwert
        '
        Me.mtxtTaxpunktwert.BackGroundColor = System.Drawing.SystemColors.Window
-        Me.mtxtTaxpunktwert.BeforeTouchSize = New System.Drawing.Size(61, 20)
+        Me.mtxtTaxpunktwert.BeforeTouchSize = New System.Drawing.Size(100, 20)
        Me.mtxtTaxpunktwert.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.mtxtTaxpunktwert.DoubleValue = 1.0R
        Me.mtxtTaxpunktwert.Location = New System.Drawing.Point(190, 109)
--- a/DPM2016/Behandlung/Leistungen.Designer.vb
+++ b/DPM2016/Behandlung/Leistungen.Designer.vb
@@ -105,14 +105,14 @@ Partial Class Leistungen
        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tslabelbhtotal})
        Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
        Me.ToolStrip1.Name = "ToolStrip1"
-        Me.ToolStrip1.Size = New System.Drawing.Size(1079, 25)
+        Me.ToolStrip1.Size = New System.Drawing.Size(1439, 25)
        Me.ToolStrip1.TabIndex = 0
        Me.ToolStrip1.Text = "ToolStrip1"
        '
        'tslabelbhtotal
        '
        Me.tslabelbhtotal.Name = "tslabelbhtotal"
-        Me.tslabelbhtotal.Size = New System.Drawing.Size(87, 22)
+        Me.tslabelbhtotal.Size = New System.Drawing.Size(113, 22)
        Me.tslabelbhtotal.Text = "ToolStripLabel1"
        '
        'GrpTarif
@@ -120,8 +120,10 @@ Partial Class Leistungen
        Me.GrpTarif.Controls.Add(Me.TabTarife)
        Me.GrpTarif.Dock = System.Windows.Forms.DockStyle.Left
        Me.GrpTarif.Location = New System.Drawing.Point(0, 0)
+        Me.GrpTarif.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.GrpTarif.Name = "GrpTarif"
-        Me.GrpTarif.Size = New System.Drawing.Size(729, 284)
+        Me.GrpTarif.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
+        Me.GrpTarif.Size = New System.Drawing.Size(972, 350)
        Me.GrpTarif.TabIndex = 1
        Me.GrpTarif.TabStop = False
        Me.GrpTarif.Text = "Tarife"
@@ -131,10 +133,11 @@ Partial Class Leistungen
        Me.TabTarife.Controls.Add(Me.TabPage1)
        Me.TabTarife.Controls.Add(Me.TabPage2)
        Me.TabTarife.Dock = System.Windows.Forms.DockStyle.Left
-        Me.TabTarife.Location = New System.Drawing.Point(3, 16)
+        Me.TabTarife.Location = New System.Drawing.Point(4, 19)
+        Me.TabTarife.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.TabTarife.Name = "TabTarife"
        Me.TabTarife.SelectedIndex = 0
-        Me.TabTarife.Size = New System.Drawing.Size(720, 265)
+        Me.TabTarife.Size = New System.Drawing.Size(960, 327)
        Me.TabTarife.TabIndex = 0
        '
        'TabPage1
@@ -143,10 +146,11 @@ Partial Class Leistungen
        Me.TabPage1.Controls.Add(Me.ToolStrip2)
        Me.TabPage1.Controls.Add(Me.Panel4)
        Me.TabPage1.Controls.Add(Me.TreeTarifGruppen)
-        Me.TabPage1.Location = New System.Drawing.Point(4, 22)
+        Me.TabPage1.Location = New System.Drawing.Point(4, 25)
+        Me.TabPage1.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.TabPage1.Name = "TabPage1"
-        Me.TabPage1.Padding = New System.Windows.Forms.Padding(3)
-        Me.TabPage1.Size = New System.Drawing.Size(712, 239)
+        Me.TabPage1.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
+        Me.TabPage1.Size = New System.Drawing.Size(952, 298)
        Me.TabPage1.TabIndex = 0
        Me.TabPage1.Text = "Tarif"
        Me.TabPage1.UseVisualStyleBackColor = True
@@ -165,9 +169,10 @@ Partial Class Leistungen
        Me.lbtarif1.Dock = System.Windows.Forms.DockStyle.Fill
        Me.lbtarif1.DragDropSupport = True
        Me.lbtarif1.LicenseKey = "F962CEC7-CD8F-4911-A9E9-CAB39962FC1F"
-        Me.lbtarif1.Location = New System.Drawing.Point(196, 28)
+        Me.lbtarif1.Location = New System.Drawing.Point(261, 31)
+        Me.lbtarif1.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.lbtarif1.Name = "lbtarif1"
-        Me.lbtarif1.Size = New System.Drawing.Size(513, 208)
+        Me.lbtarif1.Size = New System.Drawing.Size(687, 263)
        Me.lbtarif1.TabIndex = 5
        Me.lbtarif1.Text = "ListBoxAdv1"
        '
@@ -176,21 +181,21 @@ Partial Class Leistungen
        Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TarifdetailsToolStripMenuItem})
        Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
-        Me.ContextMenuStrip1.Size = New System.Drawing.Size(131, 26)
+        Me.ContextMenuStrip1.Size = New System.Drawing.Size(151, 28)
        '
        'TarifdetailsToolStripMenuItem
        '
        Me.TarifdetailsToolStripMenuItem.Name = "TarifdetailsToolStripMenuItem"
-        Me.TarifdetailsToolStripMenuItem.Size = New System.Drawing.Size(130, 22)
+        Me.TarifdetailsToolStripMenuItem.Size = New System.Drawing.Size(150, 24)
        Me.TarifdetailsToolStripMenuItem.Text = "Tarifdetails"
        '
        'ToolStrip2
        '
        Me.ToolStrip2.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.ToolStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsDown, Me.tsUp, Me.ToolStripLabel1, Me.txtfilter})
-        Me.ToolStrip2.Location = New System.Drawing.Point(196, 3)
+        Me.ToolStrip2.Location = New System.Drawing.Point(261, 4)
        Me.ToolStrip2.Name = "ToolStrip2"
-        Me.ToolStrip2.Size = New System.Drawing.Size(513, 25)
+        Me.ToolStrip2.Size = New System.Drawing.Size(687, 27)
        Me.ToolStrip2.TabIndex = 6
        Me.ToolStrip2.Text = "ToolStrip2"
        '
@@ -200,7 +205,7 @@ Partial Class Leistungen
        Me.tsDown.Image = CType(resources.GetObject("tsDown.Image"), System.Drawing.Image)
        Me.tsDown.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.tsDown.Name = "tsDown"
-        Me.tsDown.Size = New System.Drawing.Size(24, 24)
+        Me.tsDown.Size = New System.Drawing.Size(29, 24)
        Me.tsDown.Text = "ToolStripButton2"
        Me.tsDown.Visible = False
        '
@@ -210,28 +215,29 @@ Partial Class Leistungen
        Me.tsUp.Image = CType(resources.GetObject("tsUp.Image"), System.Drawing.Image)
        Me.tsUp.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.tsUp.Name = "tsUp"
-        Me.tsUp.Size = New System.Drawing.Size(24, 24)
+        Me.tsUp.Size = New System.Drawing.Size(29, 24)
        Me.tsUp.Text = "ToolStripButton1"
        Me.tsUp.Visible = False
        '
        'ToolStripLabel1
        '
        Me.ToolStripLabel1.Name = "ToolStripLabel1"
-        Me.ToolStripLabel1.Size = New System.Drawing.Size(46, 22)
+        Me.ToolStripLabel1.Size = New System.Drawing.Size(56, 24)
        Me.ToolStripLabel1.Text = "Suchen"
        '
        'txtfilter
        '
        Me.txtfilter.Font = New System.Drawing.Font("Segoe UI", 9.0!)
        Me.txtfilter.Name = "txtfilter"
-        Me.txtfilter.Size = New System.Drawing.Size(100, 25)
+        Me.txtfilter.Size = New System.Drawing.Size(132, 27)
        '
        'Panel4
        '
        Me.Panel4.Dock = System.Windows.Forms.DockStyle.Left
-        Me.Panel4.Location = New System.Drawing.Point(181, 3)
+        Me.Panel4.Location = New System.Drawing.Point(241, 4)
+        Me.Panel4.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.Panel4.Name = "Panel4"
-        Me.Panel4.Size = New System.Drawing.Size(15, 233)
+        Me.Panel4.Size = New System.Drawing.Size(20, 290)
        Me.Panel4.TabIndex = 5
        '
        'TreeTarifGruppen
@@ -246,13 +252,14 @@ Partial Class Leistungen
        Me.TreeTarifGruppen.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square
        Me.TreeTarifGruppen.Dock = System.Windows.Forms.DockStyle.Left
        Me.TreeTarifGruppen.LicenseKey = "F962CEC7-CD8F-4911-A9E9-CAB39962FC1F"
-        Me.TreeTarifGruppen.Location = New System.Drawing.Point(3, 3)
+        Me.TreeTarifGruppen.Location = New System.Drawing.Point(4, 4)
+        Me.TreeTarifGruppen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.TreeTarifGruppen.Name = "TreeTarifGruppen"
        Me.TreeTarifGruppen.Nodes.AddRange(New DevComponents.AdvTree.Node() {Me.Node1})
        Me.TreeTarifGruppen.NodesConnector = Me.NodeConnector1
        Me.TreeTarifGruppen.NodeStyle = Me.ElementStyle1
        Me.TreeTarifGruppen.PathSeparator = ";"
-        Me.TreeTarifGruppen.Size = New System.Drawing.Size(178, 233)
+        Me.TreeTarifGruppen.Size = New System.Drawing.Size(237, 290)
        Me.TreeTarifGruppen.Styles.Add(Me.ElementStyle1)
        Me.TreeTarifGruppen.TabIndex = 7
        Me.TreeTarifGruppen.Text = "AdvTree1"
@@ -277,10 +284,11 @@ Partial Class Leistungen
        '
        Me.TabPage2.Controls.Add(Me.lbPakete)
        Me.TabPage2.Controls.Add(Me.Panel1)
-        Me.TabPage2.Location = New System.Drawing.Point(4, 22)
+        Me.TabPage2.Location = New System.Drawing.Point(4, 25)
+        Me.TabPage2.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.TabPage2.Name = "TabPage2"
-        Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
-        Me.TabPage2.Size = New System.Drawing.Size(712, 239)
+        Me.TabPage2.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
+        Me.TabPage2.Size = New System.Drawing.Size(952, 295)
        Me.TabPage2.TabIndex = 1
        Me.TabPage2.Text = "Leistungspaket"
        Me.TabPage2.UseVisualStyleBackColor = True
@@ -298,9 +306,10 @@ Partial Class Leistungen
        Me.lbPakete.Dock = System.Windows.Forms.DockStyle.Fill
        Me.lbPakete.DragDropSupport = True
        Me.lbPakete.LicenseKey = "F962CEC7-CD8F-4911-A9E9-CAB39962FC1F"
-        Me.lbPakete.Location = New System.Drawing.Point(3, 33)
+        Me.lbPakete.Location = New System.Drawing.Point(4, 41)
+        Me.lbPakete.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.lbPakete.Name = "lbPakete"
-        Me.lbPakete.Size = New System.Drawing.Size(706, 203)
+        Me.lbPakete.Size = New System.Drawing.Size(944, 250)
        Me.lbPakete.TabIndex = 2
        Me.lbPakete.Text = "ListBoxAdv1"
        '
@@ -310,16 +319,18 @@ Partial Class Leistungen
        Me.Panel1.Controls.Add(Me.intAnzahl)
        Me.Panel1.Controls.Add(Me.lblAnzahl)
        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
-        Me.Panel1.Location = New System.Drawing.Point(3, 3)
+        Me.Panel1.Location = New System.Drawing.Point(4, 4)
+        Me.Panel1.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.Panel1.Name = "Panel1"
-        Me.Panel1.Size = New System.Drawing.Size(706, 30)
+        Me.Panel1.Size = New System.Drawing.Size(944, 37)
        Me.Panel1.TabIndex = 1
        '
        'btnPaketeinfuegen
        '
-        Me.btnPaketeinfuegen.Location = New System.Drawing.Point(197, 3)
+        Me.btnPaketeinfuegen.Location = New System.Drawing.Point(263, 4)
+        Me.btnPaketeinfuegen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.btnPaketeinfuegen.Name = "btnPaketeinfuegen"
-        Me.btnPaketeinfuegen.Size = New System.Drawing.Size(75, 23)
+        Me.btnPaketeinfuegen.Size = New System.Drawing.Size(100, 28)
        Me.btnPaketeinfuegen.TabIndex = 1
        Me.btnPaketeinfuegen.Text = "Einfügen"
        Me.btnPaketeinfuegen.UseVisualStyleBackColor = True
@@ -332,19 +343,21 @@ Partial Class Leistungen
        Me.intAnzahl.BackgroundStyle.Class = "DateTimeInputBackground"
        Me.intAnzahl.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square
        Me.intAnzahl.ButtonFreeText.Shortcut = DevComponents.DotNetBar.eShortcut.F2
-        Me.intAnzahl.Location = New System.Drawing.Point(49, 5)
+        Me.intAnzahl.Location = New System.Drawing.Point(65, 6)
+        Me.intAnzahl.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.intAnzahl.Name = "intAnzahl"
        Me.intAnzahl.ShowUpDown = True
-        Me.intAnzahl.Size = New System.Drawing.Size(142, 20)
+        Me.intAnzahl.Size = New System.Drawing.Size(189, 22)
        Me.intAnzahl.TabIndex = 0
        Me.intAnzahl.Value = 1
        '
        'lblAnzahl
        '
        Me.lblAnzahl.AutoSize = True
-        Me.lblAnzahl.Location = New System.Drawing.Point(4, 8)
+        Me.lblAnzahl.Location = New System.Drawing.Point(5, 10)
+        Me.lblAnzahl.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
        Me.lblAnzahl.Name = "lblAnzahl"
-        Me.lblAnzahl.Size = New System.Drawing.Size(39, 13)
+        Me.lblAnzahl.Size = New System.Drawing.Size(51, 17)
        Me.lblAnzahl.TabIndex = 0
        Me.lblAnzahl.Text = "Anzahl"
        '
@@ -369,44 +382,50 @@ Partial Class Leistungen
        Me.grpLeistungsdetails.Controls.Add(Me.lblPosition)
        Me.grpLeistungsdetails.Controls.Add(Me.lbldatum)
        Me.grpLeistungsdetails.Controls.Add(Me.dtdatum)
-        Me.grpLeistungsdetails.Location = New System.Drawing.Point(735, 3)
+        Me.grpLeistungsdetails.Location = New System.Drawing.Point(980, 4)
+        Me.grpLeistungsdetails.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.grpLeistungsdetails.Name = "grpLeistungsdetails"
-        Me.grpLeistungsdetails.Size = New System.Drawing.Size(341, 275)
+        Me.grpLeistungsdetails.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
+        Me.grpLeistungsdetails.Size = New System.Drawing.Size(455, 338)
        Me.grpLeistungsdetails.TabIndex = 2
        Me.grpLeistungsdetails.TabStop = False
        Me.grpLeistungsdetails.Text = "Leistungsdetails"
        '
        'txtErgänzung
        '
-        Me.txtErgänzung.Location = New System.Drawing.Point(85, 166)
+        Me.txtErgänzung.Location = New System.Drawing.Point(113, 204)
+        Me.txtErgänzung.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.txtErgänzung.Multiline = True
        Me.txtErgänzung.Name = "txtErgänzung"
-        Me.txtErgänzung.Size = New System.Drawing.Size(177, 18)
+        Me.txtErgänzung.Size = New System.Drawing.Size(235, 21)
        Me.txtErgänzung.TabIndex = 4
        '
        'Label2
        '
        Me.Label2.AutoSize = True
-        Me.Label2.Location = New System.Drawing.Point(11, 169)
+        Me.Label2.Location = New System.Drawing.Point(15, 208)
+        Me.Label2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
        Me.Label2.Name = "Label2"
-        Me.Label2.Size = New System.Drawing.Size(58, 13)
+        Me.Label2.Size = New System.Drawing.Size(77, 17)
        Me.Label2.TabIndex = 24
        Me.Label2.Text = "Ergänzung"
        '
        'txtBezD
        '
-        Me.txtBezD.Location = New System.Drawing.Point(85, 115)
+        Me.txtBezD.Location = New System.Drawing.Point(113, 142)
+        Me.txtBezD.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.txtBezD.Multiline = True
        Me.txtBezD.Name = "txtBezD"
-        Me.txtBezD.Size = New System.Drawing.Size(177, 45)
+        Me.txtBezD.Size = New System.Drawing.Size(235, 54)
        Me.txtBezD.TabIndex = 3
        '
        'lblBeschreibung
        '
        Me.lblBeschreibung.AutoSize = True
-        Me.lblBeschreibung.Location = New System.Drawing.Point(11, 118)
+        Me.lblBeschreibung.Location = New System.Drawing.Point(15, 145)
+        Me.lblBeschreibung.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
        Me.lblBeschreibung.Name = "lblBeschreibung"
-        Me.lblBeschreibung.Size = New System.Drawing.Size(72, 13)
+        Me.lblBeschreibung.Size = New System.Drawing.Size(95, 17)
        Me.lblBeschreibung.TabIndex = 22
        Me.lblBeschreibung.Text = "Beschreibung"
        '
@@ -414,9 +433,10 @@ Partial Class Leistungen
        '
        Me.cbboxnrbehandler.Dataselection = Nothing
        Me.cbboxnrbehandler.Displaymember = Nothing
-        Me.cbboxnrbehandler.Location = New System.Drawing.Point(85, 61)
+        Me.cbboxnrbehandler.Location = New System.Drawing.Point(113, 75)
+        Me.cbboxnrbehandler.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.cbboxnrbehandler.Name = "cbboxnrbehandler"
-        Me.cbboxnrbehandler.Size = New System.Drawing.Size(177, 21)
+        Me.cbboxnrbehandler.Size = New System.Drawing.Size(235, 24)
        Me.cbboxnrbehandler.TabIndex = 1
        Me.cbboxnrbehandler.Table = Nothing
        Me.cbboxnrbehandler.TableAlias = ""
@@ -425,17 +445,19 @@ Partial Class Leistungen
        'lblbehandler
        '
        Me.lblbehandler.AutoSize = True
-        Me.lblbehandler.Location = New System.Drawing.Point(11, 63)
+        Me.lblbehandler.Location = New System.Drawing.Point(15, 78)
+        Me.lblbehandler.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
        Me.lblbehandler.Name = "lblbehandler"
-        Me.lblbehandler.Size = New System.Drawing.Size(55, 13)
+        Me.lblbehandler.Size = New System.Drawing.Size(73, 17)
        Me.lblbehandler.TabIndex = 14
        Me.lblbehandler.Text = "Behandler"
        '
        'BtnInsertLeistung
        '
-        Me.BtnInsertLeistung.Location = New System.Drawing.Point(194, 246)
+        Me.BtnInsertLeistung.Location = New System.Drawing.Point(259, 303)
+        Me.BtnInsertLeistung.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.BtnInsertLeistung.Name = "BtnInsertLeistung"
-        Me.BtnInsertLeistung.Size = New System.Drawing.Size(120, 23)
+        Me.BtnInsertLeistung.Size = New System.Drawing.Size(160, 28)
        Me.BtnInsertLeistung.TabIndex = 8
        Me.BtnInsertLeistung.Text = "Leistung einfügen"
        Me.BtnInsertLeistung.UseVisualStyleBackColor = True
@@ -443,10 +465,11 @@ Partial Class Leistungen
        'txtTotal
        '
        Me.txtTotal.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtTotal.Location = New System.Drawing.Point(49, 246)
+        Me.txtTotal.Location = New System.Drawing.Point(65, 303)
+        Me.txtTotal.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
        Me.txtTotal.Name = "txtTotal"
        Me.txtTotal.RightToLeft = System.Windows.Forms.RightToLeft.No
-        Me.txtTotal.Size = New System.Drawing.Size(92, 13)
+        Me.txtTotal.Size = New System.Drawing.Size(123, 16)
        Me.txtTotal.TabIndex = 12
        Me.txtTotal.Text = "0.00www"
        Me.txtTotal.TextAlign = System.Drawing.ContentAlignment.MiddleRight
@@ -455,18 +478,20 @@ Partial Class Leistungen
        '
        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(11, 246)
+        Me.Label1.Location = New System.Drawing.Point(15, 303)
+        Me.Label1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
        Me.Label1.Name = "Label1"
-        Me.Label1.Size = New System.Drawing.Size(36, 13)
+        Me.Label1.Size = New System.Drawing.Size(45, 17)
        Me.Label1.TabIndex = 10
        Me.Label1.Text = "Total"
        '
        'lblWert
        '
        Me.lblWert.AutoSize = True
-        Me.lblWert.Location = New System.Drawing.Point(11, 220)
+        Me.lblWert.Location = New System.Drawing.Point(15, 271)
+        Me.lblWert.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
        Me.lblWert.Name = "lblWert"
-        Me.lblWert.Size = New System.Drawing.Size(30, 13)
+        Me.lblWert.Size = New System.Drawing.Size(38, 17)
        Me.lblWert.TabIndex = 9
        Me.lblWert.Text = "Wert"
        '
@@ -479,18 +504,20 @@ Partial Class Leistungen
        Me.diwert.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square
        Me.diwert.ButtonFreeText.Shortcut = DevComponents.DotNetBar.eShortcut.F2
        Me.diwert.Increment = 1.0R
-        Me.diwert.Location = New System.Drawing.Point(85, 216)
+        Me.diwert.Location = New System.Drawing.Point(113, 266)
+        Me.diwert.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.diwert.Name = "diwert"
        Me.diwert.ShowUpDown = True
-        Me.diwert.Size = New System.Drawing.Size(68, 20)
+        Me.diwert.Size = New System.Drawing.Size(91, 22)
        Me.diwert.TabIndex = 7
        '
        'lblMenge
        '
        Me.lblMenge.AutoSize = True
-        Me.lblMenge.Location = New System.Drawing.Point(11, 193)
+        Me.lblMenge.Location = New System.Drawing.Point(15, 238)
+        Me.lblMenge.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
        Me.lblMenge.Name = "lblMenge"
-        Me.lblMenge.Size = New System.Drawing.Size(40, 13)
+        Me.lblMenge.Size = New System.Drawing.Size(51, 17)
        Me.lblMenge.TabIndex = 7
        Me.lblMenge.Text = "Menge"
        '
@@ -503,18 +530,20 @@ Partial Class Leistungen
        Me.DIMenge.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square
        Me.DIMenge.ButtonFreeText.Shortcut = DevComponents.DotNetBar.eShortcut.F2
        Me.DIMenge.Increment = 1.0R
-        Me.DIMenge.Location = New System.Drawing.Point(85, 190)
+        Me.DIMenge.Location = New System.Drawing.Point(113, 234)
+        Me.DIMenge.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.DIMenge.Name = "DIMenge"
        Me.DIMenge.ShowUpDown = True
-        Me.DIMenge.Size = New System.Drawing.Size(68, 20)
+        Me.DIMenge.Size = New System.Drawing.Size(91, 22)
        Me.DIMenge.TabIndex = 5
        '
        'lblTaxpunkte
        '
        Me.lblTaxpunkte.AutoSize = True
-        Me.lblTaxpunkte.Location = New System.Drawing.Point(159, 193)
+        Me.lblTaxpunkte.Location = New System.Drawing.Point(212, 238)
+        Me.lblTaxpunkte.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
        Me.lblTaxpunkte.Name = "lblTaxpunkte"
-        Me.lblTaxpunkte.Size = New System.Drawing.Size(41, 13)
+        Me.lblTaxpunkte.Size = New System.Drawing.Size(52, 17)
        Me.lblTaxpunkte.TabIndex = 5
        Me.lblTaxpunkte.Text = "Punkte"
        '
@@ -526,34 +555,38 @@ Partial Class Leistungen
        Me.DIPunkte.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square
        Me.DIPunkte.ButtonFreeText.Shortcut = DevComponents.DotNetBar.eShortcut.F2
        Me.DIPunkte.Increment = 1.0R
-        Me.DIPunkte.Location = New System.Drawing.Point(206, 190)
+        Me.DIPunkte.Location = New System.Drawing.Point(275, 234)
+        Me.DIPunkte.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.DIPunkte.Name = "DIPunkte"
        Me.DIPunkte.ShowUpDown = True
-        Me.DIPunkte.Size = New System.Drawing.Size(56, 20)
+        Me.DIPunkte.Size = New System.Drawing.Size(75, 22)
        Me.DIPunkte.TabIndex = 6
        '
        'txtPosition
        '
-        Me.txtPosition.Location = New System.Drawing.Point(85, 89)
+        Me.txtPosition.Location = New System.Drawing.Point(113, 110)
+        Me.txtPosition.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.txtPosition.Name = "txtPosition"
-        Me.txtPosition.Size = New System.Drawing.Size(56, 20)
+        Me.txtPosition.Size = New System.Drawing.Size(73, 22)
        Me.txtPosition.TabIndex = 2
        '
        'lblPosition
        '
        Me.lblPosition.AutoSize = True
-        Me.lblPosition.Location = New System.Drawing.Point(11, 92)
+        Me.lblPosition.Location = New System.Drawing.Point(15, 113)
+        Me.lblPosition.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
        Me.lblPosition.Name = "lblPosition"
-        Me.lblPosition.Size = New System.Drawing.Size(44, 13)
+        Me.lblPosition.Size = New System.Drawing.Size(58, 17)
        Me.lblPosition.TabIndex = 2
        Me.lblPosition.Text = "Position"
        '
        'lbldatum
        '
        Me.lbldatum.AutoSize = True
-        Me.lbldatum.Location = New System.Drawing.Point(11, 38)
+        Me.lbldatum.Location = New System.Drawing.Point(15, 47)
+        Me.lbldatum.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
        Me.lbldatum.Name = "lbldatum"
-        Me.lbldatum.Size = New System.Drawing.Size(38, 13)
+        Me.lbldatum.Size = New System.Drawing.Size(49, 17)
        Me.lbldatum.TabIndex = 1
        Me.lbldatum.Text = "Datum"
        '
@@ -567,7 +600,8 @@ Partial Class Leistungen
        Me.dtdatum.ButtonDropDown.Shortcut = DevComponents.DotNetBar.eShortcut.AltDown
        Me.dtdatum.ButtonDropDown.Visible = True
        Me.dtdatum.IsPopupCalendarOpen = False
-        Me.dtdatum.Location = New System.Drawing.Point(85, 35)
+        Me.dtdatum.Location = New System.Drawing.Point(113, 43)
+        Me.dtdatum.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        '
        '
        '
@@ -598,7 +632,7 @@ Partial Class Leistungen
        Me.dtdatum.MonthCalendar.NavigationBackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square
        Me.dtdatum.MonthCalendar.TodayButtonVisible = True
        Me.dtdatum.Name = "dtdatum"
-        Me.dtdatum.Size = New System.Drawing.Size(177, 20)
+        Me.dtdatum.Size = New System.Drawing.Size(236, 22)
        Me.dtdatum.Style = DevComponents.DotNetBar.eDotNetBarStyle.StyleManagerControlled
        Me.dtdatum.TabIndex = 0
        '
@@ -607,8 +641,10 @@ Partial Class Leistungen
        Me.GrpLeistungen.Controls.Add(Me.C1Leistungen)
        Me.GrpLeistungen.Dock = System.Windows.Forms.DockStyle.Fill
        Me.GrpLeistungen.Location = New System.Drawing.Point(0, 0)
+        Me.GrpLeistungen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.GrpLeistungen.Name = "GrpLeistungen"
-        Me.GrpLeistungen.Size = New System.Drawing.Size(1079, 158)
+        Me.GrpLeistungen.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
+        Me.GrpLeistungen.Size = New System.Drawing.Size(1439, 200)
        Me.GrpLeistungen.TabIndex = 3
        Me.GrpLeistungen.TabStop = False
        Me.GrpLeistungen.Text = "Leistungen"
@@ -621,13 +657,14 @@ Partial Class Leistungen
        Me.C1Leistungen.FilterBar = True
        Me.C1Leistungen.GroupByCaption = "Drag a column header here to group by that column"
        Me.C1Leistungen.Images.Add(CType(resources.GetObject("C1Leistungen.Images"), System.Drawing.Image))
-        Me.C1Leistungen.Location = New System.Drawing.Point(3, 16)
+        Me.C1Leistungen.Location = New System.Drawing.Point(4, 19)
+        Me.C1Leistungen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.C1Leistungen.Name = "C1Leistungen"
        Me.C1Leistungen.PreviewInfo.Location = New System.Drawing.Point(0, 0)
        Me.C1Leistungen.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.C1Leistungen.PreviewInfo.ZoomFactor = 75.0R
        Me.C1Leistungen.PrintInfo.PageSettings = CType(resources.GetObject("C1Leistungen.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
-        Me.C1Leistungen.Size = New System.Drawing.Size(1073, 139)
+        Me.C1Leistungen.Size = New System.Drawing.Size(1431, 177)
        Me.C1Leistungen.TabIndex = 2
        Me.C1Leistungen.Text = "C1TrueDBGrid1"
        Me.C1Leistungen.PropBag = resources.GetString("C1Leistungen.PropBag")
@@ -637,30 +674,30 @@ Partial Class Leistungen
        Me.ctxMenuLeistung.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.ctxMenuLeistung.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BearbeitenToolStripMenuItem, Me.LöschenToolStripMenuItem, Me.AnzeigenToolStripMenuItem, Me.LeistungsdatumÄndernToolStripMenuItem})
        Me.ctxMenuLeistung.Name = "ctxMenuLeistung"
-        Me.ctxMenuLeistung.Size = New System.Drawing.Size(200, 92)
+        Me.ctxMenuLeistung.Size = New System.Drawing.Size(233, 100)
        '
        'BearbeitenToolStripMenuItem
        '
        Me.BearbeitenToolStripMenuItem.Name = "BearbeitenToolStripMenuItem"
-        Me.BearbeitenToolStripMenuItem.Size = New System.Drawing.Size(199, 22)
+        Me.BearbeitenToolStripMenuItem.Size = New System.Drawing.Size(232, 24)
        Me.BearbeitenToolStripMenuItem.Text = "&Bearbeiten"
        '
        'LöschenToolStripMenuItem
        '
        Me.LöschenToolStripMenuItem.Name = "LöschenToolStripMenuItem"
-        Me.LöschenToolStripMenuItem.Size = New System.Drawing.Size(199, 22)
+        Me.LöschenToolStripMenuItem.Size = New System.Drawing.Size(232, 24)
        Me.LöschenToolStripMenuItem.Text = "&Löschen"
        '
        'AnzeigenToolStripMenuItem
        '
        Me.AnzeigenToolStripMenuItem.Name = "AnzeigenToolStripMenuItem"
-        Me.AnzeigenToolStripMenuItem.Size = New System.Drawing.Size(199, 22)
+        Me.AnzeigenToolStripMenuItem.Size = New System.Drawing.Size(232, 24)
        Me.AnzeigenToolStripMenuItem.Text = "Anzeigen"
        '
        'LeistungsdatumÄndernToolStripMenuItem
        '
        Me.LeistungsdatumÄndernToolStripMenuItem.Name = "LeistungsdatumÄndernToolStripMenuItem"
-        Me.LeistungsdatumÄndernToolStripMenuItem.Size = New System.Drawing.Size(199, 22)
+        Me.LeistungsdatumÄndernToolStripMenuItem.Size = New System.Drawing.Size(232, 24)
        Me.LeistungsdatumÄndernToolStripMenuItem.Text = "Leistungsdatum ändern"
        '
        'Panel2
@@ -669,28 +706,31 @@ Partial Class Leistungen
        Me.Panel2.Controls.Add(Me.grpLeistungsdetails)
        Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top
        Me.Panel2.Location = New System.Drawing.Point(0, 25)
+        Me.Panel2.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.Panel2.Name = "Panel2"
-        Me.Panel2.Size = New System.Drawing.Size(1079, 284)
+        Me.Panel2.Size = New System.Drawing.Size(1439, 350)
        Me.Panel2.TabIndex = 4
        '
        'Panel3
        '
        Me.Panel3.Controls.Add(Me.GrpLeistungen)
        Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.Panel3.Location = New System.Drawing.Point(0, 309)
+        Me.Panel3.Location = New System.Drawing.Point(0, 375)
+        Me.Panel3.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.Panel3.Name = "Panel3"
-        Me.Panel3.Size = New System.Drawing.Size(1079, 158)
+        Me.Panel3.Size = New System.Drawing.Size(1439, 200)
        Me.Panel3.TabIndex = 5
        '
        'Leistungen
        '
-        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.Controls.Add(Me.Panel3)
        Me.Controls.Add(Me.Panel2)
        Me.Controls.Add(Me.ToolStrip1)
+        Me.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
        Me.Name = "Leistungen"
-        Me.Size = New System.Drawing.Size(1079, 467)
+        Me.Size = New System.Drawing.Size(1439, 575)
        Me.ToolStrip1.ResumeLayout(False)
        Me.ToolStrip1.PerformLayout()
        Me.GrpTarif.ResumeLayout(False)
--- a/DPM2016/Behandlung/Leistungen.resx
+++ b/DPM2016/Behandlung/Leistungen.resx
@@ -130,7 +130,7 @@
  <data name="tsDown.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIDSURBVDhPpZLrS5NhGMb3j4SWh0oRQVExD4gonkDpg4hG
+        YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAIDSURBVDhPpZLrS5NhGMb3j4SWh0oRQVExD4gonkDpg4hG
        YKxG6WBogkMZKgPNCEVJFBGdGETEvgwyO9DJE5syZw3PIlPEE9pgBCLZ5XvdMB8Ew8gXbl54nuf63dd9
        0OGSnwCahxbPRNPAPMw9Xpg6ZmF46kZZ0xSKzJPIrhpDWsVnpBhGkKx3nAX8Pv7z1zg8OoY/cITdn4fw
        bf/C0kYAN3Ma/w3gWfZL5kzTKBxjWyK2DftwI9tyMYCZKXbNHaD91bLYJrDXsYbrWfUKwJrPE9M2M1Oc
@@ -145,7 +145,7 @@
  <data name="tsUp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIDSURBVDhPpZLrS5NhGMb3j4SWh0oRQVExD4gonkDpg4hG
+        YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAIDSURBVDhPpZLrS5NhGMb3j4SWh0oRQVExD4gonkDpg4hG
        YKxG6WBogkMZKgPNCEVJFBGdGETEvgwyO9DJE5syZw3PIlPEE9pgBCLZ5XvdMB8Ew8gXbl54nuf63dd9
        0OGSnwCahxbPRNPAPMw9Xpg6ZmF46kZZ0xSKzJPIrhpDWsVnpBhGkKx3nAX8Pv7z1zg8OoY/cITdn4fw
        bf/C0kYAN3Ma/w3gWfZL5kzTKBxjWyK2DftwI9tyMYCZKXbNHaD91bLYJrDXsYbrWfUKwJrPE9M2M1Oc
@@ -163,7 +163,7 @@
  <data name="C1Leistungen.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
+        YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
        vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
 </value>
  </data>
@@ -197,6 +197,6 @@
 </value>
  </data>
  <data name="C1Leistungen.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{ForeColor:ControlText;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 1071, 137&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 1071, 137&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="21" DefRecSelWidth="21" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 1429, 175&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;21&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 1429, 175&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
  </data>
 </root>
--- a/DPM2016/Behandlung/Leistungen.vb
+++ b/DPM2016/Behandlung/Leistungen.vb
@@ -88,6 +88,8 @@ Public Class Leistungen
        End Get
        Set(value As Integer)
            m_behandler = value
+
+
        End Set
    End Property

@@ -204,6 +206,11 @@ Public Class Leistungen
            Me.cbboxnrbehandler.Displaymember = "Name"
            Me.cbboxnrbehandler.Valuemember = "nrprivat"
            Load_Tarif()
+            Try
+                Me.cbboxnrbehandler.SelectedValue = Me.behandler
+            Catch ex As Exception
+
+            End Try
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
@@ -1282,4 +1289,12 @@ Public Class Leistungen
        End Try

    End Sub
+
+    Private Sub C1Leistungen_MouseDown(sender As Object, e As MouseEventArgs) Handles C1Leistungen.MouseDown
+        Try
+            Me.C1Leistungen.Bookmark = Me.C1Leistungen.RowContaining(e.Y)
+        Catch ex As Exception
+
+        End Try
+    End Sub
 End Class
--- a/DPM2016/Behandlung/frmPosition.Designer.vb
+++ b/DPM2016/Behandlung/frmPosition.Designer.vb
@@ -0,0 +1,130 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmPosition
+    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.TextBox1 = New System.Windows.Forms.TextBox()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Button2 = New System.Windows.Forms.Button()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.TextBox2 = New System.Windows.Forms.TextBox()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.TextBox3 = New System.Windows.Forms.TextBox()
+        Me.SuspendLayout()
+        '
+        'TextBox1
+        '
+        Me.TextBox1.Location = New System.Drawing.Point(104, 32)
+        Me.TextBox1.Name = "TextBox1"
+        Me.TextBox1.Size = New System.Drawing.Size(100, 20)
+        Me.TextBox1.TabIndex = 0
+        '
+        'Button1
+        '
+        Me.Button1.Location = New System.Drawing.Point(23, 185)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(75, 23)
+        Me.Button1.TabIndex = 1
+        Me.Button1.Text = "OK"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'Button2
+        '
+        Me.Button2.Location = New System.Drawing.Point(318, 181)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(75, 23)
+        Me.Button2.TabIndex = 2
+        Me.Button2.Text = "Abbruch"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Location = New System.Drawing.Point(27, 35)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(71, 13)
+        Me.Label1.TabIndex = 3
+        Me.Label1.Text = "SSO-Nummer"
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Location = New System.Drawing.Point(27, 64)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(69, 13)
+        Me.Label2.TabIndex = 4
+        Me.Label2.Text = "Bezeichnung"
+        '
+        'TextBox2
+        '
+        Me.TextBox2.Location = New System.Drawing.Point(104, 64)
+        Me.TextBox2.Multiline = True
+        Me.TextBox2.Name = "TextBox2"
+        Me.TextBox2.Size = New System.Drawing.Size(289, 61)
+        Me.TextBox2.TabIndex = 5
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Location = New System.Drawing.Point(29, 135)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(58, 13)
+        Me.Label3.TabIndex = 6
+        Me.Label3.Text = "Ergänzung"
+        '
+        'TextBox3
+        '
+        Me.TextBox3.Location = New System.Drawing.Point(104, 135)
+        Me.TextBox3.Name = "TextBox3"
+        Me.TextBox3.Size = New System.Drawing.Size(289, 20)
+        Me.TextBox3.TabIndex = 7
+        '
+        'frmPosition
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(416, 220)
+        Me.Controls.Add(Me.TextBox3)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.TextBox2)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.Button2)
+        Me.Controls.Add(Me.Button1)
+        Me.Controls.Add(Me.TextBox1)
+        Me.Name = "frmPosition"
+        Me.Text = "Position überschreiben"
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents TextBox1 As TextBox
+    Friend WithEvents Button1 As Button
+    Friend WithEvents Button2 As Button
+    Friend WithEvents Label1 As Label
+    Friend WithEvents Label2 As Label
+    Friend WithEvents TextBox2 As TextBox
+    Friend WithEvents Label3 As Label
+    Friend WithEvents TextBox3 As TextBox
+End Class
--- a/DPM2016/Behandlung/frmPosition.resx
+++ b/DPM2016/Behandlung/frmPosition.resx
@@ -0,0 +1,120 @@
+<?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>
+</root>
--- a/DPM2016/Behandlung/frmPosition.vb
+++ b/DPM2016/Behandlung/frmPosition.vb
@@ -0,0 +1,6 @@
+Public Class frmPosition
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        Me.DialogResult = DialogResult.OK
+        Me.Close()
+    End Sub
+End Class
--- a/DPM2016/DPM2016.vbproj
+++ b/DPM2016/DPM2016.vbproj
@@ -91,6 +91,7 @@
      <SpecificVersion>False</SpecificVersion>
      <HintPath>bin\Debug\C1.Data.2.dll</HintPath>
    </Reference>
+    <Reference Include="C1.Win.C1Command.2, Version=2.0.20153.110, Culture=neutral, PublicKeyToken=e808566f358766d8" />
    <Reference Include="C1.Win.C1Command.4, Version=4.0.20153.110, Culture=neutral, PublicKeyToken=e808566f358766d8, processorArchitecture=MSIL">
      <SpecificVersion>False</SpecificVersion>
      <HintPath>bin\Debug\C1.Win.C1Command.4.dll</HintPath>
@@ -177,17 +178,33 @@
      <SpecificVersion>False</SpecificVersion>
      <HintPath>..\DPMLizenzmanagement\SHUKeyGen\bin\Debug\SHUKeyGen.dll</HintPath>
    </Reference>
-    <Reference Include="Syncfusion.Compression.Base, Version=16.2350.0.41, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89, processorArchitecture=MSIL" />
-    <Reference Include="Syncfusion.Core.WinForms, Version=16.3460.0.21, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89" />
-    <Reference Include="Syncfusion.DataSource.WinForms, Version=16.3460.0.21, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89" />
-    <Reference Include="Syncfusion.GridCommon.WinForms, Version=16.3460.0.21, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89" />
-    <Reference Include="Syncfusion.Pdf.Base, Version=16.2350.0.41, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89" />
+    <Reference Include="Syncfusion.Compression.Base, Version=16.2350.0.41, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89, processorArchitecture=MSIL">
+      <Private>True</Private>
+    </Reference>
+    <Reference Include="Syncfusion.Core.WinForms, Version=16.3460.0.21, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89">
+      <Private>True</Private>
+    </Reference>
+    <Reference Include="Syncfusion.DataSource.WinForms, Version=16.3460.0.21, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89">
+      <Private>True</Private>
+    </Reference>
+    <Reference Include="Syncfusion.GridCommon.WinForms, Version=16.3460.0.21, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89">
+      <Private>True</Private>
+    </Reference>
+    <Reference Include="Syncfusion.Pdf.Base, Version=16.2350.0.41, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89">
+      <Private>True</Private>
+    </Reference>
    <Reference Include="Syncfusion.PdfViewer.Windows, Version=16.2350.0.41, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89, processorArchitecture=MSIL">
      <Private>True</Private>
    </Reference>
-    <Reference Include="Syncfusion.SfListView.WinForms, Version=16.3460.0.21, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89, processorArchitecture=MSIL" />
-    <Reference Include="Syncfusion.Shared.Base, Version=16.2350.0.41, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89, processorArchitecture=MSIL" />
-    <Reference Include="Syncfusion.Shared.Windows, Version=16.2350.0.41, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89, processorArchitecture=MSIL" />
+    <Reference Include="Syncfusion.SfListView.WinForms, Version=16.3460.0.21, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89, processorArchitecture=MSIL">
+      <Private>True</Private>
+    </Reference>
+    <Reference Include="Syncfusion.Shared.Base, Version=16.2350.0.41, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89, processorArchitecture=MSIL">
+      <Private>True</Private>
+    </Reference>
+    <Reference Include="Syncfusion.Shared.Windows, Version=16.2350.0.41, Culture=neutral, PublicKeyToken=3d67ed1f87d44c89, processorArchitecture=MSIL">
+      <Private>True</Private>
+    </Reference>
    <Reference Include="System" />
    <Reference Include="System.Data" />
    <Reference Include="System.Deployment" />
@@ -297,6 +314,12 @@
    <Compile Include="Diverses\frmDemoMode.vb">
      <SubType>Form</SubType>
    </Compile>
+    <Compile Include="Diverses\frmMsgbox.Designer.vb">
+      <DependentUpon>frmMsgbox.vb</DependentUpon>
+    </Compile>
+    <Compile Include="Diverses\frmMsgbox.vb">
+      <SubType>Form</SubType>
+    </Compile>
    <Compile Include="Diverses\frmprogress.Designer.vb">
      <DependentUpon>frmprogress.vb</DependentUpon>
    </Compile>
@@ -626,6 +649,9 @@
    <EmbeddedResource Include="Diverses\frmDemoMode.resx">
      <DependentUpon>frmDemoMode.vb</DependentUpon>
    </EmbeddedResource>
+    <EmbeddedResource Include="Diverses\frmMsgbox.resx">
+      <DependentUpon>frmMsgbox.vb</DependentUpon>
+    </EmbeddedResource>
    <EmbeddedResource Include="Diverses\frmprogress.resx">
      <DependentUpon>frmprogress.vb</DependentUpon>
    </EmbeddedResource>
--- a/DPM2016/Diverses/frmMsgbox.Designer.vb
+++ b/DPM2016/Diverses/frmMsgbox.Designer.vb
@@ -0,0 +1,89 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmMsgbox
+    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()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMsgbox))
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Button2 = New System.Windows.Forms.Button()
+        Me.Button3 = New System.Windows.Forms.Button()
+        Me.TextBox1 = New System.Windows.Forms.TextBox()
+        Me.SuspendLayout()
+        '
+        'Button1
+        '
+        Me.Button1.Location = New System.Drawing.Point(25, 176)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(182, 23)
+        Me.Button1.TabIndex = 0
+        Me.Button1.Text = "Button1"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'Button2
+        '
+        Me.Button2.Location = New System.Drawing.Point(25, 205)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(182, 23)
+        Me.Button2.TabIndex = 1
+        Me.Button2.Text = "Button2"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
+        'Button3
+        '
+        Me.Button3.Location = New System.Drawing.Point(25, 234)
+        Me.Button3.Name = "Button3"
+        Me.Button3.Size = New System.Drawing.Size(182, 23)
+        Me.Button3.TabIndex = 2
+        Me.Button3.Text = "Button3"
+        Me.Button3.UseVisualStyleBackColor = True
+        '
+        'TextBox1
+        '
+        Me.TextBox1.Location = New System.Drawing.Point(25, 12)
+        Me.TextBox1.Multiline = True
+        Me.TextBox1.Name = "TextBox1"
+        Me.TextBox1.ReadOnly = True
+        Me.TextBox1.Size = New System.Drawing.Size(182, 146)
+        Me.TextBox1.TabIndex = 3
+        '
+        'frmMsgbox
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(234, 275)
+        Me.Controls.Add(Me.TextBox1)
+        Me.Controls.Add(Me.Button3)
+        Me.Controls.Add(Me.Button2)
+        Me.Controls.Add(Me.Button1)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.Name = "frmMsgbox"
+        Me.Text = "Hinweis"
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents Button1 As Button
+    Friend WithEvents Button2 As Button
+    Friend WithEvents Button3 As Button
+    Friend WithEvents TextBox1 As TextBox
+End Class
--- a/DPM2016/Diverses/frmMsgbox.resx
+++ b/DPM2016/Diverses/frmMsgbox.resx
--- a/DPM2016/Diverses/frmMsgbox.vb
+++ b/DPM2016/Diverses/frmMsgbox.vb
@@ -0,0 +1,24 @@
+Public Class frmMsgbox
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        Me.DialogResult = DialogResult.Yes
+        Me.Close()
+    End Sub
+
+    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
+        Me.DialogResult = DialogResult.No
+        Me.Close()
+    End Sub
+
+    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
+        Me.DialogResult = DialogResult.Cancel
+
+    End Sub
+
+    Public Sub set_text(msg As String, button1 As String, button2 As String, button3 As String)
+        Me.TextBox1.Text = msg
+        Me.Button1.Text = button1
+        Me.Button2.Text = button2
+        Me.Button3.Text = button3
+
+    End Sub
+End Class
--- a/DPM2016/Dokumente/DokumentDetail.Designer.vb
+++ b/DPM2016/Dokumente/DokumentDetail.Designer.vb
@@ -153,11 +153,11 @@ Partial Class DokumentDetail
        '
        'btnAbbruch
        '
-        Me.btnAbbruch.Location = New System.Drawing.Point(724, 284)
+        Me.btnAbbruch.Location = New System.Drawing.Point(680, 284)
        Me.btnAbbruch.Name = "btnAbbruch"
-        Me.btnAbbruch.Size = New System.Drawing.Size(75, 23)
+        Me.btnAbbruch.Size = New System.Drawing.Size(119, 23)
        Me.btnAbbruch.TabIndex = 12
-        Me.btnAbbruch.Text = "Abbruch"
+        Me.btnAbbruch.Text = "Abbruch / Schliessen"
        Me.btnAbbruch.UseVisualStyleBackColor = True
        '
        'CheckBox1
--- a/DPM2016/Dokumente/Thumbviewer/ThumbViewer.designer.vb
+++ b/DPM2016/Dokumente/Thumbviewer/ThumbViewer.designer.vb
@@ -0,0 +1,637 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class ThumbViewer
+    Inherits System.Windows.Forms.UserControl
+
+    'UserControl ü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(ThumbViewer))
+        Dim FormatterSettings2 As Gnostice.Documents.FormatterSettings = New Gnostice.Documents.FormatterSettings()
+        Dim SpreadSheetFormatterSettings2 As Gnostice.Documents.Spreadsheet.SpreadSheetFormatterSettings = New Gnostice.Documents.Spreadsheet.SpreadSheetFormatterSettings()
+        Dim PageSettings3 As Gnostice.Documents.PageSettings = New Gnostice.Documents.PageSettings()
+        Dim Margins3 As Gnostice.Documents.Margins = New Gnostice.Documents.Margins()
+        Dim SheetOptions3 As Gnostice.Documents.Spreadsheet.SheetOptions = New Gnostice.Documents.Spreadsheet.SheetOptions()
+        Dim SheetOptions4 As Gnostice.Documents.Spreadsheet.SheetOptions = New Gnostice.Documents.Spreadsheet.SheetOptions()
+        Dim TxtFormatterSettings2 As Gnostice.Documents.TXTFormatterSettings = New Gnostice.Documents.TXTFormatterSettings()
+        Dim PageSettings4 As Gnostice.Documents.PageSettings = New Gnostice.Documents.PageSettings()
+        Dim Margins4 As Gnostice.Documents.Margins = New Gnostice.Documents.Margins()
+        Dim RenderingSettings2 As Gnostice.Graphics.RenderingSettings = New Gnostice.Graphics.RenderingSettings()
+        Dim ImageRenderingSettings2 As Gnostice.Graphics.ImageRenderingSettings = New Gnostice.Graphics.ImageRenderingSettings()
+        Dim LineArtRenderingSettings2 As Gnostice.Graphics.LineArtRenderingSettings = New Gnostice.Graphics.LineArtRenderingSettings()
+        Dim ResolutionSettings2 As Gnostice.Graphics.ResolutionSettings = New Gnostice.Graphics.ResolutionSettings()
+        Dim TextRenderingSettings2 As Gnostice.Graphics.TextRenderingSettings = New Gnostice.Graphics.TextRenderingSettings()
+        Dim PdfViewerPrinterSettings6 As Syncfusion.Windows.PdfViewer.PdfViewerPrinterSettings = New Syncfusion.Windows.PdfViewer.PdfViewerPrinterSettings()
+        Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
+        Me.ListView1 = New System.Windows.Forms.ListView()
+        Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
+        Me.TrackBar1 = New System.Windows.Forms.TrackBar()
+        Me.ToolStrip2 = New System.Windows.Forms.ToolStrip()
+        Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripButton3 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripButton4 = New System.Windows.Forms.ToolStripButton()
+        Me.GrpDokumentvorschauMail = New System.Windows.Forms.GroupBox()
+        Me.webBrowser1 = New System.Windows.Forms.WebBrowser()
+        Me.ToolStrip4 = New System.Windows.Forms.ToolStrip()
+        Me.PrintButton = New System.Windows.Forms.ToolStripButton()
+        Me.ForwardButton = New System.Windows.Forms.ToolStripButton()
+        Me.BackButton = New System.Windows.Forms.ToolStripButton()
+        Me.SaveAsTextButton = New System.Windows.Forms.ToolStripButton()
+        Me.grpdokumentvorschau = New System.Windows.Forms.GroupBox()
+        Me.DocumentViewer1 = New Gnostice.Documents.Controls.WinForms.DocumentViewer()
+        Me.ToolStrip3 = New System.Windows.Forms.ToolStrip()
+        Me.btnFirstPage = New System.Windows.Forms.ToolStripButton()
+        Me.btnPrvPage = New System.Windows.Forms.ToolStripButton()
+        Me.txtGoToPage = New System.Windows.Forms.ToolStripTextBox()
+        Me.btnNxtPage = New System.Windows.Forms.ToolStripButton()
+        Me.btnLastPage = New System.Windows.Forms.ToolStripButton()
+        Me.toolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
+        Me.tsActSize = New System.Windows.Forms.ToolStripButton()
+        Me.tsFitPage = New System.Windows.Forms.ToolStripButton()
+        Me.tsFitWidth = New System.Windows.Forms.ToolStripButton()
+        Me.tsZoomOut = New System.Windows.Forms.ToolStripButton()
+        Me.toolStripSeparator7 = New System.Windows.Forms.ToolStripSeparator()
+        Me.txtZoom = New System.Windows.Forms.ToolStripTextBox()
+        Me.toolStripPercentlabel = New System.Windows.Forms.ToolStripLabel()
+        Me.tsZoomIn = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripButton6 = New System.Windows.Forms.ToolStripButton()
+        Me.grpdokumentvorschaupdf = New System.Windows.Forms.GroupBox()
+        Me.pdfViewerControl1 = New Syncfusion.Windows.Forms.PdfViewer.PdfViewerControl()
+        Me.KpImageViewer1 = New KaiwaProjects.KpImageViewer()
+        Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
+        CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainer1.Panel1.SuspendLayout()
+        Me.SplitContainer1.Panel2.SuspendLayout()
+        Me.SplitContainer1.SuspendLayout()
+        CType(Me.TrackBar1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.ToolStrip2.SuspendLayout()
+        Me.GrpDokumentvorschauMail.SuspendLayout()
+        Me.ToolStrip4.SuspendLayout()
+        Me.grpdokumentvorschau.SuspendLayout()
+        Me.ToolStrip3.SuspendLayout()
+        Me.grpdokumentvorschaupdf.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'ToolStrip1
+        '
+        Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
+        Me.ToolStrip1.Name = "ToolStrip1"
+        Me.ToolStrip1.Size = New System.Drawing.Size(971, 25)
+        Me.ToolStrip1.TabIndex = 0
+        Me.ToolStrip1.Text = "ToolStrip1"
+        '
+        'ListView1
+        '
+        Me.ListView1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.ListView1.Location = New System.Drawing.Point(0, 25)
+        Me.ListView1.Name = "ListView1"
+        Me.ListView1.Size = New System.Drawing.Size(323, 546)
+        Me.ListView1.TabIndex = 1
+        Me.ListView1.UseCompatibleStateImageBehavior = False
+        '
+        'SplitContainer1
+        '
+        Me.SplitContainer1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.SplitContainer1.Location = New System.Drawing.Point(0, 25)
+        Me.SplitContainer1.Name = "SplitContainer1"
+        '
+        'SplitContainer1.Panel1
+        '
+        Me.SplitContainer1.Panel1.Controls.Add(Me.ListView1)
+        Me.SplitContainer1.Panel1.Controls.Add(Me.TrackBar1)
+        Me.SplitContainer1.Panel1.Controls.Add(Me.ToolStrip2)
+        '
+        'SplitContainer1.Panel2
+        '
+        Me.SplitContainer1.Panel2.Controls.Add(Me.GrpDokumentvorschauMail)
+        Me.SplitContainer1.Panel2.Controls.Add(Me.grpdokumentvorschau)
+        Me.SplitContainer1.Panel2.Controls.Add(Me.grpdokumentvorschaupdf)
+        Me.SplitContainer1.Panel2.Controls.Add(Me.KpImageViewer1)
+        Me.SplitContainer1.Size = New System.Drawing.Size(971, 571)
+        Me.SplitContainer1.SplitterDistance = 323
+        Me.SplitContainer1.TabIndex = 3
+        '
+        'TrackBar1
+        '
+        Me.TrackBar1.Location = New System.Drawing.Point(122, 3)
+        Me.TrackBar1.Name = "TrackBar1"
+        Me.TrackBar1.Size = New System.Drawing.Size(104, 45)
+        Me.TrackBar1.TabIndex = 3
+        '
+        'ToolStrip2
+        '
+        Me.ToolStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton1, Me.ToolStripButton2, Me.ToolStripButton3, Me.ToolStripSeparator1, Me.ToolStripButton4})
+        Me.ToolStrip2.Location = New System.Drawing.Point(0, 0)
+        Me.ToolStrip2.Name = "ToolStrip2"
+        Me.ToolStrip2.Size = New System.Drawing.Size(323, 25)
+        Me.ToolStrip2.TabIndex = 2
+        Me.ToolStrip2.Text = "ToolStrip2"
+        '
+        'ToolStripButton1
+        '
+        Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton1.Image = CType(resources.GetObject("ToolStripButton1.Image"), System.Drawing.Image)
+        Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton1.Name = "ToolStripButton1"
+        Me.ToolStripButton1.Size = New System.Drawing.Size(23, 22)
+        Me.ToolStripButton1.Text = "Grosse Symbole"
+        '
+        'ToolStripButton2
+        '
+        Me.ToolStripButton2.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton2.Image = CType(resources.GetObject("ToolStripButton2.Image"), System.Drawing.Image)
+        Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton2.Name = "ToolStripButton2"
+        Me.ToolStripButton2.Size = New System.Drawing.Size(23, 22)
+        Me.ToolStripButton2.Text = "Kleine Symbole"
+        '
+        'ToolStripButton3
+        '
+        Me.ToolStripButton3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton3.Image = CType(resources.GetObject("ToolStripButton3.Image"), System.Drawing.Image)
+        Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton3.Name = "ToolStripButton3"
+        Me.ToolStripButton3.Size = New System.Drawing.Size(23, 22)
+        Me.ToolStripButton3.Text = "Liste"
+        '
+        'ToolStripSeparator1
+        '
+        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
+        Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
+        '
+        'ToolStripButton4
+        '
+        Me.ToolStripButton4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton4.Image = CType(resources.GetObject("ToolStripButton4.Image"), System.Drawing.Image)
+        Me.ToolStripButton4.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton4.Name = "ToolStripButton4"
+        Me.ToolStripButton4.Size = New System.Drawing.Size(23, 22)
+        Me.ToolStripButton4.Text = "Grossansicht anzeigen / Ausblenden"
+        '
+        'GrpDokumentvorschauMail
+        '
+        Me.GrpDokumentvorschauMail.Controls.Add(Me.webBrowser1)
+        Me.GrpDokumentvorschauMail.Controls.Add(Me.ToolStrip4)
+        Me.GrpDokumentvorschauMail.Location = New System.Drawing.Point(56, 364)
+        Me.GrpDokumentvorschauMail.Name = "GrpDokumentvorschauMail"
+        Me.GrpDokumentvorschauMail.Size = New System.Drawing.Size(519, 242)
+        Me.GrpDokumentvorschauMail.TabIndex = 13
+        Me.GrpDokumentvorschauMail.TabStop = False
+        Me.GrpDokumentvorschauMail.Text = "Dokumentvorschau E-Mail"
+        '
+        'webBrowser1
+        '
+        Me.webBrowser1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.webBrowser1.Location = New System.Drawing.Point(3, 41)
+        Me.webBrowser1.Margin = New System.Windows.Forms.Padding(2)
+        Me.webBrowser1.MinimumSize = New System.Drawing.Size(10, 10)
+        Me.webBrowser1.Name = "webBrowser1"
+        Me.webBrowser1.Size = New System.Drawing.Size(513, 198)
+        Me.webBrowser1.TabIndex = 13
+        '
+        'ToolStrip4
+        '
+        Me.ToolStrip4.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.PrintButton, Me.ForwardButton, Me.BackButton, Me.SaveAsTextButton})
+        Me.ToolStrip4.Location = New System.Drawing.Point(3, 16)
+        Me.ToolStrip4.Name = "ToolStrip4"
+        Me.ToolStrip4.Padding = New System.Windows.Forms.Padding(0)
+        Me.ToolStrip4.Size = New System.Drawing.Size(513, 25)
+        Me.ToolStrip4.TabIndex = 1
+        Me.ToolStrip4.Text = "ToolStrip4"
+        '
+        'PrintButton
+        '
+        Me.PrintButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.PrintButton.Image = CType(resources.GetObject("PrintButton.Image"), System.Drawing.Image)
+        Me.PrintButton.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.PrintButton.Name = "PrintButton"
+        Me.PrintButton.Size = New System.Drawing.Size(23, 22)
+        Me.PrintButton.Text = "&Print"
+        '
+        'ForwardButton
+        '
+        Me.ForwardButton.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
+        Me.ForwardButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ForwardButton.Enabled = False
+        Me.ForwardButton.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ForwardButton.Name = "ForwardButton"
+        Me.ForwardButton.Size = New System.Drawing.Size(23, 22)
+        Me.ForwardButton.Text = "Go &forward"
+        '
+        'BackButton
+        '
+        Me.BackButton.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
+        Me.BackButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.BackButton.Enabled = False
+        Me.BackButton.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.BackButton.Name = "BackButton"
+        Me.BackButton.Size = New System.Drawing.Size(23, 22)
+        Me.BackButton.Text = "Go &back"
+        '
+        'SaveAsTextButton
+        '
+        Me.SaveAsTextButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.SaveAsTextButton.Image = CType(resources.GetObject("SaveAsTextButton.Image"), System.Drawing.Image)
+        Me.SaveAsTextButton.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.SaveAsTextButton.Name = "SaveAsTextButton"
+        Me.SaveAsTextButton.Size = New System.Drawing.Size(23, 22)
+        Me.SaveAsTextButton.Text = "Save as text"
+        Me.SaveAsTextButton.Visible = False
+        '
+        'grpdokumentvorschau
+        '
+        Me.grpdokumentvorschau.Controls.Add(Me.DocumentViewer1)
+        Me.grpdokumentvorschau.Controls.Add(Me.ToolStrip3)
+        Me.grpdokumentvorschau.Location = New System.Drawing.Point(219, 175)
+        Me.grpdokumentvorschau.Name = "grpdokumentvorschau"
+        Me.grpdokumentvorschau.Size = New System.Drawing.Size(371, 272)
+        Me.grpdokumentvorschau.TabIndex = 12
+        Me.grpdokumentvorschau.TabStop = False
+        Me.grpdokumentvorschau.Text = "Dokumentvorschau"
+        '
+        'DocumentViewer1
+        '
+        Me.DocumentViewer1.BackColor = System.Drawing.SystemColors.ControlDark
+        Me.DocumentViewer1.BorderWidth = 10
+        Me.DocumentViewer1.CurrentPage = 0
+        Me.DocumentViewer1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.DocumentViewer1.HScrollBar.LargeChange = 40
+        Me.DocumentViewer1.HScrollBar.SmallChange = 20
+        Me.DocumentViewer1.HScrollBar.Value = 0
+        Me.DocumentViewer1.HScrollBar.Visibility = Gnostice.Documents.Controls.WinForms.ScrollBarVisibility.Always
+        Me.DocumentViewer1.Location = New System.Drawing.Point(3, 41)
+        Me.DocumentViewer1.MouseMode = Gnostice.DOM.CursorPreferences.AreaSelection
+        Me.DocumentViewer1.Name = "DocumentViewer1"
+        '
+        '
+        '
+        Me.DocumentViewer1.NavigationPane.ActivePage = Nothing
+        Me.DocumentViewer1.NavigationPane.Location = New System.Drawing.Point(0, 0)
+        Me.DocumentViewer1.NavigationPane.Name = ""
+        Me.DocumentViewer1.NavigationPane.TabIndex = 0
+        Me.DocumentViewer1.NavigationPane.Visibility = Gnostice.Documents.Controls.WinForms.Visibility.[Auto]
+        Me.DocumentViewer1.NavigationPane.WidthPercentage = 20
+        Me.DocumentViewer1.PageLayout = Nothing
+        Me.DocumentViewer1.PageRotation = Gnostice.Documents.Controls.WinForms.RotationAngle.Zero
+        Me.DocumentViewer1.Preferences.Cursor = Gnostice.DOM.CursorPreferences.Pan
+        SpreadSheetFormatterSettings2.FormattingMode = Gnostice.DOM.FormattingMode.PreferDocumentSettings
+        SpreadSheetFormatterSettings2.PageOrder = Gnostice.Documents.Spreadsheet.LayoutDirection.BackwardN
+        PageSettings3.Height = 11.6929!
+        Margins3.Bottom = 1.0!
+        Margins3.Footer = 0!
+        Margins3.Header = 0!
+        Margins3.Left = 1.0!
+        Margins3.Right = 1.0!
+        Margins3.Top = 1.0!
+        PageSettings3.Margin = Margins3
+        PageSettings3.Orientation = Gnostice.Graphics.Orientation.Portrait
+        PageSettings3.PageSize = Gnostice.Documents.PageSize.A4
+        PageSettings3.Width = 8.2677!
+        SpreadSheetFormatterSettings2.PageSettings = PageSettings3
+        SheetOptions3.Print = False
+        SheetOptions3.View = False
+        SpreadSheetFormatterSettings2.ShowGridlines = SheetOptions3
+        SheetOptions4.Print = False
+        SheetOptions4.View = False
+        SpreadSheetFormatterSettings2.ShowHeadings = SheetOptions4
+        FormatterSettings2.SpreadSheet = SpreadSheetFormatterSettings2
+        TxtFormatterSettings2.Font = New System.Drawing.Font("Calibri", 12.0!)
+        PageSettings4.Height = 11.6929!
+        Margins4.Bottom = 1.0!
+        Margins4.Footer = 0!
+        Margins4.Header = 0!
+        Margins4.Left = 1.0!
+        Margins4.Right = 1.0!
+        Margins4.Top = 1.0!
+        PageSettings4.Margin = Margins4
+        PageSettings4.Orientation = Gnostice.Graphics.Orientation.Portrait
+        PageSettings4.PageSize = Gnostice.Documents.PageSize.A4
+        PageSettings4.Width = 8.2677!
+        TxtFormatterSettings2.PageSettings = PageSettings4
+        FormatterSettings2.TXT = TxtFormatterSettings2
+        Me.DocumentViewer1.Preferences.FormatterSettings = FormatterSettings2
+        Me.DocumentViewer1.Preferences.KeyNavigation = True
+        ImageRenderingSettings2.CompositingMode = Gnostice.Graphics.CompositingMode.SourceOver
+        ImageRenderingSettings2.CompositingQuality = Gnostice.Graphics.CompositingQuality.[Default]
+        ImageRenderingSettings2.InterpolationMode = Gnostice.Graphics.InterpolationMode.Bilinear
+        ImageRenderingSettings2.PixelOffsetMode = Gnostice.Graphics.PixelOffsetMode.[Default]
+        RenderingSettings2.Image = ImageRenderingSettings2
+        LineArtRenderingSettings2.SmoothingMode = Gnostice.Graphics.SmoothingMode.AntiAlias
+        RenderingSettings2.LineArt = LineArtRenderingSettings2
+        ResolutionSettings2.DpiX = 96.0!
+        ResolutionSettings2.DpiY = 96.0!
+        ResolutionSettings2.ResolutionMode = Gnostice.Graphics.ResolutionMode.UseSource
+        RenderingSettings2.Resolution = ResolutionSettings2
+        TextRenderingSettings2.TextContrast = 3
+        TextRenderingSettings2.TextRenderingHint = Gnostice.Graphics.TextRenderingHint.AntiAlias
+        RenderingSettings2.Text = TextRenderingSettings2
+        Me.DocumentViewer1.Preferences.RenderingSettings = RenderingSettings2
+        Me.DocumentViewer1.Preferences.Units = Gnostice.Graphics.MeasurementUnit.Inches
+        Me.DocumentViewer1.Size = New System.Drawing.Size(365, 228)
+        Me.DocumentViewer1.TabIndex = 7
+        Me.DocumentViewer1.VScrollBar.LargeChange = 40
+        Me.DocumentViewer1.VScrollBar.SmallChange = 20
+        Me.DocumentViewer1.VScrollBar.Value = 0
+        Me.DocumentViewer1.VScrollBar.Visibility = Gnostice.Documents.Controls.WinForms.ScrollBarVisibility.Always
+        Me.DocumentViewer1.Zoom.ZoomMode = Gnostice.Documents.Controls.WinForms.ZoomMode.ActualSize
+        Me.DocumentViewer1.Zoom.ZoomPercent = 100.0R
+        '
+        'ToolStrip3
+        '
+        Me.ToolStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.btnFirstPage, Me.btnPrvPage, Me.txtGoToPage, Me.btnNxtPage, Me.btnLastPage, Me.toolStripSeparator4, Me.tsActSize, Me.tsFitPage, Me.tsFitWidth, Me.tsZoomOut, Me.toolStripSeparator7, Me.txtZoom, Me.toolStripPercentlabel, Me.tsZoomIn, Me.ToolStripButton5, Me.ToolStripButton6})
+        Me.ToolStrip3.Location = New System.Drawing.Point(3, 16)
+        Me.ToolStrip3.Name = "ToolStrip3"
+        Me.ToolStrip3.Size = New System.Drawing.Size(365, 25)
+        Me.ToolStrip3.TabIndex = 8
+        Me.ToolStrip3.Text = "ToolStrip3"
+        '
+        'btnFirstPage
+        '
+        Me.btnFirstPage.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.btnFirstPage.Image = CType(resources.GetObject("btnFirstPage.Image"), System.Drawing.Image)
+        Me.btnFirstPage.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.btnFirstPage.Name = "btnFirstPage"
+        Me.btnFirstPage.Size = New System.Drawing.Size(23, 22)
+        Me.btnFirstPage.Text = "toolStripButton1"
+        Me.btnFirstPage.ToolTipText = "Erste Seite"
+        '
+        'btnPrvPage
+        '
+        Me.btnPrvPage.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.btnPrvPage.Image = CType(resources.GetObject("btnPrvPage.Image"), System.Drawing.Image)
+        Me.btnPrvPage.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.btnPrvPage.Name = "btnPrvPage"
+        Me.btnPrvPage.Size = New System.Drawing.Size(23, 22)
+        Me.btnPrvPage.ToolTipText = "Vorherige Seite"
+        '
+        'txtGoToPage
+        '
+        Me.txtGoToPage.Name = "txtGoToPage"
+        Me.txtGoToPage.Size = New System.Drawing.Size(40, 25)
+        '
+        'btnNxtPage
+        '
+        Me.btnNxtPage.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.btnNxtPage.Image = CType(resources.GetObject("btnNxtPage.Image"), System.Drawing.Image)
+        Me.btnNxtPage.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.btnNxtPage.Name = "btnNxtPage"
+        Me.btnNxtPage.Size = New System.Drawing.Size(23, 22)
+        Me.btnNxtPage.Text = "toolStripButton1"
+        Me.btnNxtPage.ToolTipText = "Nächste Seite"
+        '
+        'btnLastPage
+        '
+        Me.btnLastPage.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.btnLastPage.Image = CType(resources.GetObject("btnLastPage.Image"), System.Drawing.Image)
+        Me.btnLastPage.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.btnLastPage.Name = "btnLastPage"
+        Me.btnLastPage.Size = New System.Drawing.Size(23, 22)
+        Me.btnLastPage.ToolTipText = "Letzte Seite"
+        '
+        'toolStripSeparator4
+        '
+        Me.toolStripSeparator4.Name = "toolStripSeparator4"
+        Me.toolStripSeparator4.Size = New System.Drawing.Size(6, 25)
+        '
+        'tsActSize
+        '
+        Me.tsActSize.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
+        Me.tsActSize.Image = CType(resources.GetObject("tsActSize.Image"), System.Drawing.Image)
+        Me.tsActSize.ImageTransparentColor = System.Drawing.Color.White
+        Me.tsActSize.Name = "tsActSize"
+        Me.tsActSize.Size = New System.Drawing.Size(108, 22)
+        Me.tsActSize.Text = "Aktuelle Grüsse"
+        '
+        'tsFitPage
+        '
+        Me.tsFitPage.Image = CType(resources.GetObject("tsFitPage.Image"), System.Drawing.Image)
+        Me.tsFitPage.ImageTransparentColor = System.Drawing.Color.White
+        Me.tsFitPage.Name = "tsFitPage"
+        Me.tsFitPage.Size = New System.Drawing.Size(86, 22)
+        Me.tsFitPage.Text = "ganze Seite"
+        '
+        'tsFitWidth
+        '
+        Me.tsFitWidth.Image = CType(resources.GetObject("tsFitWidth.Image"), System.Drawing.Image)
+        Me.tsFitWidth.ImageTransparentColor = System.Drawing.Color.Transparent
+        Me.tsFitWidth.Name = "tsFitWidth"
+        Me.tsFitWidth.Size = New System.Drawing.Size(57, 20)
+        Me.tsFitWidth.Text = "Breite"
+        '
+        'tsZoomOut
+        '
+        Me.tsZoomOut.Image = CType(resources.GetObject("tsZoomOut.Image"), System.Drawing.Image)
+        Me.tsZoomOut.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.tsZoomOut.Name = "tsZoomOut"
+        Me.tsZoomOut.Size = New System.Drawing.Size(85, 20)
+        Me.tsZoomOut.Text = "verkleinern"
+        '
+        'toolStripSeparator7
+        '
+        Me.toolStripSeparator7.Name = "toolStripSeparator7"
+        Me.toolStripSeparator7.Size = New System.Drawing.Size(6, 25)
+        '
+        'txtZoom
+        '
+        Me.txtZoom.MaxLength = 4
+        Me.txtZoom.Name = "txtZoom"
+        Me.txtZoom.Size = New System.Drawing.Size(35, 23)
+        Me.txtZoom.Text = "100"
+        Me.txtZoom.ToolTipText = "Key in the zoom value and press enter"
+        '
+        'toolStripPercentlabel
+        '
+        Me.toolStripPercentlabel.Name = "toolStripPercentlabel"
+        Me.toolStripPercentlabel.Size = New System.Drawing.Size(17, 15)
+        Me.toolStripPercentlabel.Text = "%"
+        '
+        'tsZoomIn
+        '
+        Me.tsZoomIn.Image = CType(resources.GetObject("tsZoomIn.Image"), System.Drawing.Image)
+        Me.tsZoomIn.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.tsZoomIn.Name = "tsZoomIn"
+        Me.tsZoomIn.Size = New System.Drawing.Size(88, 20)
+        Me.tsZoomIn.Text = "vergrössern"
+        '
+        'ToolStripButton5
+        '
+        Me.ToolStripButton5.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton5.Image = CType(resources.GetObject("ToolStripButton5.Image"), System.Drawing.Image)
+        Me.ToolStripButton5.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton5.Name = "ToolStripButton5"
+        Me.ToolStripButton5.Size = New System.Drawing.Size(23, 20)
+        Me.ToolStripButton5.Text = "ToolStripButton1"
+        Me.ToolStripButton5.ToolTipText = "90 Grad gegen Urzeigersinn"
+        '
+        'ToolStripButton6
+        '
+        Me.ToolStripButton6.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton6.Image = CType(resources.GetObject("ToolStripButton6.Image"), System.Drawing.Image)
+        Me.ToolStripButton6.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton6.Name = "ToolStripButton6"
+        Me.ToolStripButton6.Size = New System.Drawing.Size(23, 20)
+        Me.ToolStripButton6.Text = "ToolStripButton2"
+        Me.ToolStripButton6.ToolTipText = "90 Grad im Uhrzeigersinn"
+        '
+        'grpdokumentvorschaupdf
+        '
+        Me.grpdokumentvorschaupdf.Controls.Add(Me.pdfViewerControl1)
+        Me.grpdokumentvorschaupdf.Location = New System.Drawing.Point(381, 77)
+        Me.grpdokumentvorschaupdf.Name = "grpdokumentvorschaupdf"
+        Me.grpdokumentvorschaupdf.Size = New System.Drawing.Size(319, 242)
+        Me.grpdokumentvorschaupdf.TabIndex = 11
+        Me.grpdokumentvorschaupdf.TabStop = False
+        Me.grpdokumentvorschaupdf.Text = "Dokumentvorschau"
+        '
+        'pdfViewerControl1
+        '
+        Me.pdfViewerControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.pdfViewerControl1.EnableContextMenu = True
+        Me.pdfViewerControl1.EnableNotificationBar = True
+        Me.pdfViewerControl1.IsBookmarkEnabled = True
+        Me.pdfViewerControl1.Location = New System.Drawing.Point(3, 16)
+        Me.pdfViewerControl1.Name = "pdfViewerControl1"
+        Me.pdfViewerControl1.PageBorderThickness = 1
+        PdfViewerPrinterSettings6.PrintLocation = CType(resources.GetObject("PdfViewerPrinterSettings6.PrintLocation"), System.Drawing.PointF)
+        Me.pdfViewerControl1.PrinterSettings = PdfViewerPrinterSettings6
+        Me.pdfViewerControl1.ReferencePath = Nothing
+        Me.pdfViewerControl1.RenderingEngine = Syncfusion.Windows.Forms.PdfViewer.PdfRenderingEngine.SfPdf
+        Me.pdfViewerControl1.ScrollDisplacementValue = 0
+        Me.pdfViewerControl1.ShowHorizontalScrollBar = True
+        Me.pdfViewerControl1.ShowToolBar = True
+        Me.pdfViewerControl1.ShowVerticalScrollBar = True
+        Me.pdfViewerControl1.Size = New System.Drawing.Size(313, 223)
+        Me.pdfViewerControl1.SpaceBetweenPages = 8
+        Me.pdfViewerControl1.TabIndex = 4
+        Me.pdfViewerControl1.Text = "pdfViewerControl1"
+        Me.pdfViewerControl1.VisualStyle = Syncfusion.Windows.Forms.PdfViewer.VisualStyle.[Default]
+        Me.pdfViewerControl1.ZoomMode = Syncfusion.Windows.Forms.PdfViewer.ZoomMode.[Default]
+        '
+        'KpImageViewer1
+        '
+        Me.KpImageViewer1.BackgroundColor = System.Drawing.SystemColors.ControlLight
+        Me.KpImageViewer1.ForeColor = System.Drawing.SystemColors.ControlText
+        Me.KpImageViewer1.GifAnimation = False
+        Me.KpImageViewer1.GifFPS = 15.0R
+        Me.KpImageViewer1.Image = Nothing
+        Me.KpImageViewer1.Location = New System.Drawing.Point(0, 0)
+        Me.KpImageViewer1.MenuColor = System.Drawing.SystemColors.Control
+        Me.KpImageViewer1.MenuPanelColor = System.Drawing.SystemColors.Control
+        Me.KpImageViewer1.MinimumSize = New System.Drawing.Size(454, 157)
+        Me.KpImageViewer1.Name = "KpImageViewer1"
+        Me.KpImageViewer1.NavigationPanelColor = System.Drawing.SystemColors.Control
+        Me.KpImageViewer1.NavigationTextColor = System.Drawing.SystemColors.ControlText
+        Me.KpImageViewer1.OpenButton = False
+        Me.KpImageViewer1.PreviewButton = False
+        Me.KpImageViewer1.PreviewPanelColor = System.Drawing.SystemColors.Control
+        Me.KpImageViewer1.PreviewText = "label1"
+        Me.KpImageViewer1.PreviewTextColor = System.Drawing.SystemColors.ControlText
+        Me.KpImageViewer1.Rotation = 0
+        Me.KpImageViewer1.Scrollbars = False
+        Me.KpImageViewer1.ShowPreview = True
+        Me.KpImageViewer1.Size = New System.Drawing.Size(455, 358)
+        Me.KpImageViewer1.TabIndex = 0
+        Me.KpImageViewer1.TextColor = System.Drawing.SystemColors.ControlText
+        Me.KpImageViewer1.Zoom = 100.0R
+        '
+        'ImageList1
+        '
+        Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
+        Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
+        Me.ImageList1.Images.SetKeyName(0, "PDF.PNG")
+        Me.ImageList1.Images.SetKeyName(1, "Word.PNG")
+        Me.ImageList1.Images.SetKeyName(2, "Excel.PNG")
+        Me.ImageList1.Images.SetKeyName(3, "Mail.PNG")
+        Me.ImageList1.Images.SetKeyName(4, "Document_search_256.png")
+        '
+        'ThumbViewer
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.Controls.Add(Me.SplitContainer1)
+        Me.Controls.Add(Me.ToolStrip1)
+        Me.Name = "ThumbViewer"
+        Me.Size = New System.Drawing.Size(971, 596)
+        Me.SplitContainer1.Panel1.ResumeLayout(False)
+        Me.SplitContainer1.Panel1.PerformLayout()
+        Me.SplitContainer1.Panel2.ResumeLayout(False)
+        CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainer1.ResumeLayout(False)
+        CType(Me.TrackBar1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ToolStrip2.ResumeLayout(False)
+        Me.ToolStrip2.PerformLayout()
+        Me.GrpDokumentvorschauMail.ResumeLayout(False)
+        Me.GrpDokumentvorschauMail.PerformLayout()
+        Me.ToolStrip4.ResumeLayout(False)
+        Me.ToolStrip4.PerformLayout()
+        Me.grpdokumentvorschau.ResumeLayout(False)
+        Me.grpdokumentvorschau.PerformLayout()
+        Me.ToolStrip3.ResumeLayout(False)
+        Me.ToolStrip3.PerformLayout()
+        Me.grpdokumentvorschaupdf.ResumeLayout(False)
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
+    Friend WithEvents ListView1 As System.Windows.Forms.ListView
+    Friend WithEvents SplitContainer1 As System.Windows.Forms.SplitContainer
+    Friend WithEvents ToolStrip2 As System.Windows.Forms.ToolStrip
+    Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripButton2 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripButton3 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents TrackBar1 As System.Windows.Forms.TrackBar
+    Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents ToolStripButton4 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents KpImageViewer1 As KaiwaProjects.KpImageViewer
+    Friend WithEvents GrpDokumentvorschauMail As Windows.Forms.GroupBox
+    Private WithEvents webBrowser1 As Windows.Forms.WebBrowser
+    Private WithEvents ToolStrip4 As Windows.Forms.ToolStrip
+    Private WithEvents PrintButton As Windows.Forms.ToolStripButton
+    Private WithEvents ForwardButton As Windows.Forms.ToolStripButton
+    Private WithEvents BackButton As Windows.Forms.ToolStripButton
+    Private WithEvents SaveAsTextButton As Windows.Forms.ToolStripButton
+    Friend WithEvents grpdokumentvorschau As Windows.Forms.GroupBox
+    Friend WithEvents DocumentViewer1 As Gnostice.Documents.Controls.WinForms.DocumentViewer
+    Private WithEvents ToolStrip3 As Windows.Forms.ToolStrip
+    Private WithEvents btnFirstPage As Windows.Forms.ToolStripButton
+    Private WithEvents btnPrvPage As Windows.Forms.ToolStripButton
+    Private WithEvents txtGoToPage As Windows.Forms.ToolStripTextBox
+    Private WithEvents btnNxtPage As Windows.Forms.ToolStripButton
+    Private WithEvents btnLastPage As Windows.Forms.ToolStripButton
+    Private WithEvents toolStripSeparator4 As Windows.Forms.ToolStripSeparator
+    Private WithEvents tsActSize As Windows.Forms.ToolStripButton
+    Private WithEvents tsFitPage As Windows.Forms.ToolStripButton
+    Private WithEvents tsFitWidth As Windows.Forms.ToolStripButton
+    Private WithEvents tsZoomOut As Windows.Forms.ToolStripButton
+    Private WithEvents toolStripSeparator7 As Windows.Forms.ToolStripSeparator
+    Private WithEvents txtZoom As Windows.Forms.ToolStripTextBox
+    Private WithEvents toolStripPercentlabel As Windows.Forms.ToolStripLabel
+    Private WithEvents tsZoomIn As Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripButton5 As Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripButton6 As Windows.Forms.ToolStripButton
+    Friend WithEvents grpdokumentvorschaupdf As Windows.Forms.GroupBox
+    Private WithEvents pdfViewerControl1 As Syncfusion.Windows.Forms.PdfViewer.PdfViewerControl
+    Friend WithEvents ImageList1 As ImageList
+End Class
--- a/DPM2016/Dokumente/Thumbviewer/ThumbViewer.resx
+++ b/DPM2016/Dokumente/Thumbviewer/ThumbViewer.resx
@@ -0,0 +1,632 @@
+<?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="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+  <metadata name="ToolStrip2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>124, 17</value>
+  </metadata>
+  <metadata name="ToolStrip4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>742, 17</value>
+  </metadata>
+  <metadata name="ToolStrip3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>498, 17</value>
+  </metadata>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="ToolStripButton1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABcAAAATCAYAAAB7u5a2AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAG6SURBVDhP1ZNbK0RRGIbXX/MTREhyiHAhg4maIZGcUmKS
+        cSZEg5FxSIgmLhwzmSinXCs3as7Hz36/WstsS4rmxldP7823n9699toikUiQEIKQ2eYfy+PxOMuRYMt7
+        Tw7PC7UuP5N9yWDxkWzz99Qyd0fNM7dknfZT04SPGsavyTJ6SXUj59QxecrPSYdEk/e4veTYe/01OcNe
+        kxhocjT+C9UD38hjsRjLkcC++ER/mcreQ+WQaHLbwgMvd558grF4qhWYMd8nmPLufZMY6HLj42EgnfWb
+        5eO+Ic50Os1St9FDyks7d01iIKLRKMuRALcC81PzVCqlNS9p31EOiSbHdfs6aCqBOJNkMsk7xW2bJjHQ
+        5NapG17ObAopOfMVkL7f1SgwRfYNkxiISCTCciSwOK94GdJZv1MdA4tXrJxoy9K3SSXPb15TDokIh8Ms
+        R4L6kQtezmzOr57RHL/21+Z51hXlkGjyOscZL/92cptcJjEQoVCI5UjQP3NMtYMn/MdV9R1RRfcBlXXt
+        Gbdhmz9aUauHCm3rVNDiNo5i1WjsotxGFz8nHRJNnk1EMBhkOTLbiEAgwHJkdgnQB/rv9Lv2b3V7AAAA
+        AElFTkSuQmCC
+</value>
+  </data>
+  <data name="ToolStripButton2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABMAAAATCAYAAAByUDbMAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHiSURBVDhPzZJbS1RRFMfn+/QNevMjSKESkYURPkiWg8KM
+        IkrYJIHQ4BTTZSZSipm08cqgMjbog2lRFAV2wadAUcs6t33O2aP/9lq4z4ROgjIP/eH3sPZi/di3kJQS
+        1eI/lvm+D2KyuIr4+Bo6n31D9Kli+AsiT1bR8fgT2lMfEX70AW333+Fa8i1a775Gy+Ayeh4s8Zx2BLKb
+        o0XEZzaOTc2d4mEZ7egkXLn9l8zzPBDR4a+oFBo4Kk2xAs8TgSwy9JmbzS+BQqGAfD7PtZb9MAU2dxys
+        b9n4vmlibd3g9Yt9sxVk6rIrRct+OxI/LRdbhpL+EtjYdnj9Qm++LHNdFwS9GoV2lsvlkM1mudYyy5Uw
+        hYRhS+yYPrYNl9fPd0/zPBHI6PkrRcuEJ2ErSGrsSynnuiYOy8IP33PzdApIp9NIJpNca5m7uwtPfUzh
+        SzgKklIaomNlmRACROu9N9w8GC3zlUwjSiU4Skw52z7C80TIcRwQVwdXuHlqAEgkEojFYlxrWWlvj/H3
+        8ZSQciac5XkikLXEX3HzYLTsX6lty5Rltm2D6E8toHlgkX/05VvzuNQ3h8YbM+q1pviSGzrHUR95gbqO
+        UXW052pHGdRez/CcdgSyahCyLAvVImSaJqqDiT+JsiApUK7YBgAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="ToolStripButton3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABcAAAASCAYAAACw50UTAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIUSURBVDhPtZNra9NwFMbz1fwIQ9EhotOp+GI4XdmgnQxF
+        5gVBaFm1Wg1SV9vYpU3a1d6oFH3hFUVRmBd8PbxtmmuTrM9yDgrJ4psNe+DHn8KTX845+VdwXRfDYrhy
+        x3EQpNZbQUr9gtnCZyTu+Sx+RDy3gpk77zEtvkPs9ltM3XyNUzdeYfLaC0wsPMPZ7BN+bqsrIr8g95Bq
+        rW6bXcleyENE5NTxTjh+5R/yfr+PIInFT9hJjV/shjxERB6/+4HDx1omn91uF51OB41GA5YzQL1exw/N
+        g6qqUBQFsixzbmy+HfIQUbn/8ahsX0Qyk7A38Nvy+Pe66WHN8PBdc/H1l4PVdYfzB881Qh5CsG0bQehW
+        UI0/0Phst9toNpuoVqssr1Qq/AJJklAoFJDP5zl3YK4e8hAROV03KscboO8OeAKCJiC57k9AU/yd4Kfu
+        cX7/mWrIQ0TksVtvOHxkeY1P2nGtVkOpVGJ5sViE4a8pl8tBFEVks1nOjSaUkIcQLMtCkMnrLznsbgzg
+        /umeIHEQ3X+B5ndPUO2ZXgp5CME0TQQ5ufCcw2PKNz5p1+VymXdLUuqYzkwmg3Q6jWQyybndsfshDxGR
+        T6Secni7NTIlhTyEYBgGglwWH+HE1cf8jzt66SEOz3dw6HzLvw3L/NFGZ1Xsi5exd0b2V1HyO5Ywclri
+        57a6IvL/iaDrOoaFoGkahoOGTRL65La920HBAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="ToolStripButton4.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABQAAAARCAYAAADdRIy+AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHgSURBVDhPrZJRSxRRFMf3+/QNevMjiGESYYURPkiWi8Ku
+        EYbYKoHQ4iprtRslxa7aphmLyeqiD5WKUSSYhU+CopY1OzN3Zu7q33sO3oFdxqDYP/wezuWcH2fm3pCU
+        ErWk9kLP80C8KW4gPrWF7pc/EH2hGNtE5NkGup6uozP1FeEnX9Ax+gm3kmtoH15B29BH9Dx6z3PaQfjC
+        +5NFxGd3/5m6h8VgIW32P9x4UCV0XRdEdOw7gkJDf0tLrMDzGl8Yef6NG1oXgEKhgHw+z7UW/iwJ7B3a
+        2Nm3sL1XwtaOwedX+96dIVQXEBQt/GNL/DId7BtK/Ftg98Dm8+Z7+Uqh4zgg6DYptGEul0M2m+VaC01H
+        oiQkDEvisOThwHD4/PLdtzyv8YX0NIKihcKVsBQkNk7FlEt3poOF4cefueF8Ckin00gmk1xroXN0BFc9
+        XOFJ2AoSU5qiryuFQggQ7SOr3FAdLfSUUCPKZdhKTrnQOcHzmpBt2yBuDi1zw7lBIJFIIBaLca2F5eNj
+        xjvFVVJKQzjL8xpf2Bb/wA3V0cKzUt+RqRRalgViILWI1sElfvnX++dxrW8OV3pn1S3O8I9v6p7Cxcgr
+        NHZNqs8cV5tlUH87w3PaQfjCWhEyTRO1w8QJvKLOmShBwNkAAAAASUVORK5CYII=
+</value>
+  </data>
+  <metadata name="ToolStrip4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>742, 17</value>
+  </metadata>
+  <data name="PrintButton.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIpSURBVDhPtZL/T1JRGMb5p1itrVZbbRpqZbawnBENV1I0
+        jGlByTSyJTXJwq2oKZQb1KAv6JCYWSxvBrkkZUq4CeQEiRABFeLL072Xa0zRra31bO8v57zP5znnPYf1
+        X+TxhWF6O7VtGYcnwbSWijKPOLzYrPSvLPwLS3huGUMlT7o9wGD9grVUBj+icdid03S9tDmgNxNwTgVQ
+        J+rA8XNtWwM+uuZATMwxmQVRycuJFNyzIRitDlScugKzjSgFRGJJaIwEsrk8AsHIhnSL/Ssck37UNipQ
+        I5DjtuYV7uksRYhr2kebhx2eP6nrycFIEh5fBA/1Nvru8q5+PDaOovK0rABwfwugWzcErfkzHhjsePL6
+        E7q1VrTdNUDcrgGvSYlDZHN5XTNOnL8BVe8AJAoNDtZfLgDu9L1BPJmikzcrk81hlRwodZJwdBXziwnI
+        OrVoaOkiT8C8hKLHBPO7CbywOaE1jeC+bhAd6meQdvZC1KoG/5IS3MZ2HObLUHZSggvkWq3wOvbWiAqA
+        VpWeyStVfCUNf3AZ4zNhfHCFMEDMgye+hYr6FrDLzxQAUuVTpr0ocn74mchg5vsKRt1RcHp2Qv9+kZ78
+        UcE17KkWFgHNN/uQzgBkGKLJPBZiecyGchjzrmFwPIF++xJUbDbUQzEacIArLpopSRSP4CUN1Obf1Abz
+        uqob5KjiXwWH/GVl5HPt5zZh37GL2H1EiF1VZ7GDI6CNW5r/TSzWbwHYL0mKJ5czAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="SaveAsTextButton.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAPVSURBVFhHzZbfS5NhFMe9jYq6MaKroPt+XEXRH9BlUkEE
+        UVCB0E0UdBVlhGARFJVoZmr4e6am5tTlmNZ0zmzpnLrJnLpMl1l40f2p79POw9mz9323oIsOfDjvxrt9
+        v9/znsdZkKsa/cVU7z+tqBk6RZX9RYq6vluUvuXf1ebmT2LiyQiVvtpPT7vO0YWn2+nMg610onQLFd3d
+        RuWNt2gt9V3fy6x/28y6Tn39oa7RmbRcdvGHIf5k4CBVuE+SL1JOJa1H6PyjHcpEleu2+hJTSHbGShzG
+        03LZxeIV3kP0wnecvNP36aarkPAYiit3anEWk/B73HEfdym+urphb4CTu0YvUl3gKM2sdJJ76oYyYSaX
+        YrJLpDiAuK2BcHyUyjoPqAULzteRK3iW+sPXqay3kOq7SxzFzWtTGLC4rYF7rsNU7b5CLYFihT/6mB56
+        9tLzzssUSfRR9PNbiq0MZnQws+xRTC0MZDA+169BuJwGSjp20dWafdQRKKGHfccIrxt67ij3+aRmnJKD
+        xaU1ewPYchy5a3W76VnbVZ1cwollcvRP8QGFTA4+RN3qfWkiLZlZEMUZx3HDwi2vLtDKelSTTM1lgIW1
+        IrYU1kQXwxSOTVI0lsg9ATZQ2fxn21MbSxkGpAkIWZmAKPdIPKLE0fGaxe0nULNH/YWDOJ5tYm1Cj5w7
+        jxudR44R86jBu6luzVCoRzE27dcGbCfwqPmSEuflslo6E76frxkeN8PJHQ3AMQuDWHI8Izkjk1ulZji9
+        L/SGxmbd2kQ88cXaAApJciWXSSUy8VIypbvEcQIocwIyMZBHyyo90oKBYJemP9BF70M+ZQDp854AjqG5
+        5QBbzcfLisloiD7OfMxgYvr36UiLOxpgcXRpgM81xCX5iP+VATkBPAIeOZYIYMzoPGoGY+Zxdw13qPfQ
+        GW/Qq8Vj80lnA07IRbNDLp1MLUnLZZcUwy8YJzaXjHGPvM5KK2n3vlJ4Rge1eGQ2kZ8BecT4Pxkr+HzL
+        c26CsaNDHD0tl11SPBQdsUwNkFxiJjbp83uUCRCOzDsb4NSxxZjedmw3wDabmx6YHNedGR4fVfA1OotP
+        hGbsDbA4wE+oPF4sDBOmARM2gB8hBMBn8HgCwUl7cRSL45njw/zXDGPmLkcOOofaM8bd6mlTVLVW6x3A
+        fuQUR7E4L5hELpvTwjG+oYAaOe7LSxyVSxxfbF5LUbntMIDHmLc4SooyUpBfS1ETPmqD3hHyDY/lL46S
+        whJpwgrznGP0b3q9fyeO6u7uoba2dkVzSys1NbVQQ2OTI7W1L7Ou0dNf+b9XQcEvSVdalbWccXkAAAAA
+        SUVORK5CYII=
+</value>
+  </data>
+  <data name="btnFirstPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHGSURBVDhPYxhcoGH1q/8gXLfyxf/SpU/3Q4XhILj3ZntA
+        /c0vUC4maFj94v+Wc5/+Lzr47n/BgocoBnh3Xm/3qp/5z7Xlxn+oECYoX/bs/4bTH/7P3ffmf+pMhAGe
+        LVf7Mufe/z9hy/P/ltWXcBtQsODR/9Un3v+ftvPV/5iJd8EGuLdcm5c26/7//q3P//duevZfp+Q8bgNS
+        Zz/8v/TI2//9W178D+y8ud+x/vKSlOl3/0/Y+gwYLo/+t6598l8u+yxuA2Im3f8/78Dr/zN2v/xvVn/i
+        R/Gih//7Nj/7X7n84f/sOXf/1614+F8q6QRuA4K6b4I1gzRZVl94kzvv3v+2dU/+Fy68/z9p+u3/ZYvv
+        /5eIPIbbAFAIT9z24n/5kof/tYrPH5DNPL3GpfHy/6rlD/4nT7/1v2D+vf/iQQdwGwAK4a6NT//nzr33
+        XzbzLDgQJaOOrLQtv/A/b/7d/1mz7/wX89qL2wBQCDevefw/FehcycQT8GgU89i9yCL7FNgVIo67cRsA
+        CuFqYEDFTbwB9OtRlIQkYrd1gXHKsf/CNttxGwAKYcmYY/8lQo/8Fw08gGIACAgZbpwtZLkNtwEDABgY
+        AOJ2DIFMpaCHAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="btnPrvPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAAA0AAAASCAYAAACAa1QyAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFVSURBVDhPnc9LSwJRGMbx8xm6ENE3aBctoiBoV7RsFwRC
+        drGMQCGMMCiiC0ThZrpoYZIEISGUkBJCQUgSUUEF5VgjMqVRq3FmvCyeHGHEacZgWvzgwPP+F4cUCgXo
+        9b8on89Dr6qR/+obEzsJzU0z8kW+YNxg0O+IqzYJyeVyqLR/kcbMAQtn+BO9y8+KTaaINoMfmPImsX2W
+        BhVKocP+oDiWlaP1AAvLHlMKlvws1o7f0Wy9VQUSks1mYaRiMO8yoIIpzPuSsHresHCURNNwFNL+Wyma
+        9jIwUDRWT1jYiu9RJ138VwKNA5HqES+IMLti6Fl8gv0wgZGtGCyeVzT0nWtHoihCNuR4RKftDpPuOMZc
+        NOq7w+WtEhEEAZVMK/doM0cxSL2griuk2GSqSGKau0GL4RK17aeqTUJ4noeW8dlr1LQGNLeq0V9IJpOB
+        XoTjOOjD4QeGDVYMZCqaCAAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="btnNxtPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAAA8AAAARCAYAAAACCvahAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFSSURBVDhPnc2/SwJhHMfx56+IaO0/CJoqGhyDlqagRaeC
+        ECpFjH4YFHcVRLRIW3ZSloRJRERLRlCRcZbkEuKPk/xBGXF3nj+GTzoI+jzPEDe8luf7ed+RRqMBs0i9
+        XodZ3HgjVMS1/Mu807ixJ1jCciCPi2iZuXUitVoNNPfxJ84efyCcFyBFisy9jRvbD7IIPJQh3X3D6Vew
+        Hc4xmxZubPNm4It8Ye+qgP2bIqzeJJyHSWZHqtUqaBM7H82oBM+pgrWggq3mn8fEBAYWnrt23NiynsDu
+        ZR4OKQ2XP938QBaW1TimxPeuHTcedL1BCOUw70th6SSD0cUYrJtxaLrRtSOGYYDWb3/BSiAD91EaI64Y
+        bEKM2bSQSqUCWp/tCU4phWGHjGnxlbm3cePeyXsMzUUxI8jMrRPRdR20nvFbzIoy807jxv9FNE2DWURV
+        VZij4g8vAaumPuiPLAAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="btnLastPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHHSURBVDhPzZBRL1thGMfPZ6CsXPgAiy/QRSSEJbZYgsjS
+        EBFFwpKFTUjXRBVdVUNoDNUoKWvKQbBEg9l7kiG9kW1I04qq9rR1dMPNLnbl77zLiUTkveafvBfPP3l/
+        z5Mf97hi5KW/nV7Jooy3aXBESe2nCLRDYZTbQlDq++niJRiM3utWd+wOpHo4TGxfzjDxNYXi3iAb0OFJ
+        YtF/hb5lCXWjJ4NKzZVZQ6R3KY4RnwSNYZ8NaJmOgZcBnu+X+OBJoNQadNFe3koMXhEDq0nktv1gAxqc
+        UXzevsDYRgqubyk0TUag0f+c1eh/kffuU5gX48h5s8cGVNsjcAm/YVlOwrqShF0++a0MefrO/8/Ex9Dp
+        jSK7zs8GUMPjm+cwzovo5kXYVhNodISRU7/3p20mgnb5qbW7bAA1PLwmwTgnyhfE8dISQLbOvyBvFWrs
+        IbRMneBJucAGUMP9Kwl8lI0/NweQVbszR3u1doe8tgXQ7DxG5ostNoAa7lkQUWQ6QFbVrlupuYwygVSY
+        D6EbO4KqYJMNoIYL6Wft9rRS/U9GyRZ51bWPmpEg0vN8bAA1rK4UnMp4G1XBOlHlryP9mQ9pmjU24AHC
+        cTe9YwvnHM3wAwAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="tsActSize.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABEAAAASCAYAAAC9+TVUAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAI1SURBVDhPzZPZU1JhGIfPX5aBoomGgMi+QywlKktD1OTY
+        WDgJmJmFTQ5maW4tII1JZGSazDTZctN/IC1q08QOF7/O+WiYCO+46eL5Lt7fmWfe77zvR5XLZTQK5Upa
+        wODcMcPxxgT71qkjP2QwrSlhfKqAflUG7RMp1I/EpE4kvveXMP7BSwSHmQP0vTKgVCrVwAgO0vswrirg
+        idvhjvVDuSwiGcV0MLo7hIXPIfjfDcP52orel/o6iTEqhz4iw7n4ACaTAZx/7oR8UViROLZNcGybMfJ2
+        EFO7Y5j5FMSZF9o6iY4W3Ej6cSVxEZ6YA7IFISTz/Ipk4M8VbAkDEdz9OAVrTINisViD5rEEEzt+BLZG
+        oF6WYP/Xd/Tc45GMYg5bQo/eDR1Ox7WwxNQwP1PVSVQrPVAsdVc6mONXBQxE0ihUoVBAo/xHknw+DwO9
+        A8wImQmoHtI/kF4ipv43glAH+NNc8G6fQGewDdybnGpGMYJvP7/CGFZidPMyfJteMoFcLldD1x0uBtc8
+        8ERdRJA6TKHtejPJKF1YSjpwr9txYd0F78YQGeG/kpN0B+6oE5YlA9SzcrRPtIBzjVWRaOhHxAiuJobR
+        F7FUdyCbzdbQcasVvCAX+jkNzobtUIQkaAkcJxmlXBGhP2qFLWKGdF6ALz9SEM501knaJznYO9hD6zgb
+        2lkl5NNisP1NFYl8sRvSBwKI73dBNMsjgkwmcySMgDPGQjPdAdvXBNboMVKn0uk0GiON33xM8BfRNAZ2
+        AAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="tsFitPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABQAAAATCAYAAACQjC21AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIgSURBVDhP1ZPdT5JRAMbfvywDM28cFaHyFYQQtHxh4gtt
+        lDIVJ4NARW2tsUpLPrJhLV7RrRk0JNK5Ndfm+guwLa0LPuTj4olzNhqn4R03Xfx2tud59ts5F4drNBro
+        JlToyN+lCJ8tGM+ZYc/e6TgmmFNamEQNRt6rcPutErrEENNz9Xqdyl5/X0Ps+DmVkewiTos/YRH1WPkS
+        xOP9eWg3FExPheRmkeNnCB8twXvgxtOjZWbUgshGRQPcu/cxl3FjMeeHOi5nNlQ4vmeGMzeKwKEH69/C
+        mM0/xJOvIWZIsG6bMLnrxHI+ACFlhSomx3DkOrPharUaxprPPCudwpHl4dufwsyeC6EDP0jXTjA7B+eO
+        DcIWj8AnL80GX8qYDRW2oNI0j6XDADNqx5ue/ivrBCPsBly1WkU3+Q+E5+fnaGch54M3M8Nk7UzvuKFa
+        HcSP3ycde65SqcCYVIOcRCakeNjFe/B+9NCsnQnRBVNMD0t8BIqwDIWzAvpDvcyGCg3vlNBvDlOZPzML
+        x5YNxg0NMyR4Um4YIrfgSjphXNdjYKUffQsSZsOVy2Xomx/cn/HgwbYAQeShi6tw8qsA0v3LVHICulU1
+        TFEdxhI8rgQvMz0Vat8o4Et74PkwCU1UcaGsxdVFKewJK4RNG6SBHqbjSqVS84PfhDJ6A0OvrkGxJoP8
+        xQBI3gki65uXoLd5M+mjHkj8l5ieKxaL6CZdFhbxB3vJNtE1aIzMAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="tsFitWidth.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABQAAAARCAYAAADdRIy+AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAG6SURBVDhPvZK5SyNRHMdfoSI27j9gZalipSxaiIWghQu7
+        gmzARmy3WMTCQhEVvDplYVEbtfCKx6obDxwP4pFEd4URdTQecYlXks2FycwkKb7OGxiZx1gOFh94/D4/
+        Po83DEmlUjAT84PJZBJm8j7BPWEU/ojHMNd4CJ7D5Z5805FEIgE95147vi/kgr9bZ+Z6HB4rmm2FuLzf
+        NzgmGHn2o2kiB2U7BDv/bZBkiVmmiLKIFd84yrcJWmfzEX0OMJ4JtlsLUG5Pw9dDgj7+Gy6Vp+k95TTA
+        o5tvQO0BQcV2Bnp/lTKeyLIMyo+VT6jk0lGkLNb9Ieg4qseYMIS5qwkIgRMc+47U86gwiLa/FliUnWIX
+        QTWXhWHOojYor8F5VwtqfmeqS1pw4doKu3cDt+EbXIfc6plGteBHB4Fl+QOWDjuNQQq9id74RYn+FFrx
+        L+x5dRpXwQsMnDXis5OghsvGyFYD44kkSdDTM1+ifhuHf42Z6+GeplG1mYl+W6XBEVEUoScUeULLTB54
+        zyoz1+N0T6FrsQShqM/gDEHKhXcXweijYa4RCHuVf9D5piPxeBxmYn4wFovBPGJ4AZn40zTeQGXrAAAA
+        AElFTkSuQmCC
+</value>
+  </data>
+  <data name="tsZoomOut.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABMAAAARCAYAAAA/mJfHAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAI9SURBVDhPrc9NSJNxAMfxp4snKyioTkaHDKI6RkKHugXd
+        wovQ0Q5dus1huHwhMB2piUN7MSt1NhFTUpOYuikzmrFNRKdO08oaaq7yeeYzn718e/ZUg6VuBj3wuTz/
+        3/Pl/wjhcJjduqE3U1ozQFnF4LbngqIopNPZO8bQ1BIvPis0Lyi0zIdoHg9gfjWVtEsb093uJqBEiT91
+        TpHrrSvc7F3D5JboXo1QUNqR2KaMWe2ztC8Esa+EsUwGKR/+jskl8dKvMLQewaHEGFgV6epxanthc3OT
+        nVQ+eEvXN9D3BjC8DtDik3FGwKPe0v3bhKrcNKTtU8ZqWj0890PjtRI8RzKZOZDB3B4B38EMfFmZTNUZ
+        mVRjVWa7tk8ZMz5y0qbGHuor8Zw9zGz2Xi32/ngmH3MOMd9qYlqNVdTbtL0QCoXYiXXYh2VR5t47icEf
+        Ee234jdZU4VUsmpclOnuG9P2KWOjb7zcqrbS8SWCTfwVi/OqPqhiqsrqnsR+25gyP0zEXY9/wsrdqiYM
+        tZ30f/qKKxrVYq5oDMeySP/oHJZ2R+I7QZZl/ha7fwYsF1gqOkbu5fPauyu5d9CXdVDd5KCidoTCwr4t
+        3wkbGxv8EZq1EWs4BU/PIZZkYc4/QZGuLnGeTlIs1nAa2i+yXpxFY95+DPqGpHE6QjAYJC5qOgnPcgiW
+        HqUtPxuDrpbpmWXtbLcSsceFl5DUX2vK24ehwLRluBuCJEnEjYyM8sRwlWKdEa/Xr737V4IoivwfIj8B
+        DBSBX45AyqIAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="tsZoomIn.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABQAAAAVCAYAAABG1c6oAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAJVSURBVDhPxZFbSJNhGMe/oosgaF0VRBZ1UXS8LhCqu6C7
+        8Ebo0ou66W4Oy2VKYB5yOhybUU0zpxMxBWcS88wWaWgibh4aM7RMrUX7Nje/HX59G/TBUqfFoBd+PPA8
+        z//H+/IKkUiETPJ/hXc0Foqreykp69t0nkCQJIntaLeN0u9a5NVniUavxEtPmMYJH5bXrg272wrVDzvx
+        STESp3ZE5HbTCndt3zGMB+hcjZJf3Jayn1ZoH5yl1RtkcCWCdSpIS1EFc/t24TTW0O+P4pDi9K6KdHSN
+        KBlhfX2drSh/8o6OH6Cx+dC+8WErrcS7R8DdqGdcvnGCSZlSQ7+SSSusbvpAyxLU3yphKkuF5+DepNB7
+        SK4nVMwYK5mShVWWQSWTVljxdIRmWWi+V4UrOwvv2QNJ4cJpFV8vH2G+xcS0LCwzDigZIRwOsxX2oTms
+        8yFq3gfo+xnF1VCdFK7W6wjLopDMhBiis3tUyaQVOt+6ua+z0/YlyoAoC611eA/vxiPXT7IsLlOu60rJ
+        bCqUPENEx40sTdp5XGVGq2+nZ+EbY7FY8iPGYnEcyyI9zo9YWx0pWSEUCvEn8boLYL3CYuFxcq5nJ3s3
+        ch6hKWlDZ3ZQph+moKB7Qy6BsLa2xm/CswPETeeg4SLig6NY8k5RqK5V5jshRRg3nYfWq/iLjvIsV4VW
+        Y0pZ3glCMBgkQcxwBl5cIlh8jOa8k2jVeqZnlpOzv0ERPi+4RkB+pjl3P9p8w4bFnSIEAgESDA87qdfe
+        pEhdgdu9lOz9C4IoimSSzAv9fj+Zw88v9Dvul8vs9JEAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="ToolStripButton5.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAVCAYAAABPPm7SAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHgSURBVDhPpY7dS1NxGIDPXxKVZdmHiYiEdNN/EHQlJYmh
+        fbEmm1PX5tH50dSkEGthpaa0ky2DkJUtcaU15ooQzdSoi6CibrrY19nXxdMmOPohcQbn4rl4ed734ZUy
+        mQx6kNLpNFskU0l837z5uRCEgLIxhjMkCwta5ANTX9z0vZNxLto5/6KG+menMM400L/QhXftKb/Dv7Yd
+        55BSqRTTX6fozR571sd5vDHO5PoYyqcRRpdvcT3YQ/PMZa76HHz8vkxu/182A08+K/QEbZuHD9dGca/e
+        Y2J1mPsrt3F9GODu0hBtLy04pm38/PNjeyDHg5UR2uct2P0majwnqVZOYPZeZDDUl43c4Ob7Ac5N1vJo
+        UREDyWSSLYZDQ7Q+b8zPd966qJ2opj/QhTPQTkvWmdyGvM8hBNSEimdJERZc/kHOuk9zLdhNb6CTKrlC
+        8ELgfxx3VmU/6KD7jUyltUxwUiKRQItjjko6F+x0zF+hvOmw4CRVVdHiqL0c+bWVtlfNlBpLBFdQoKLl
+        CDa/BeucmQOXigUnxeNxtCgzHaR1zoRltpF9DUWCKyhwyLCfplkjZp+BPXU7BSfFYjG0KLmwl+L63RRl
+        j3ed2SE4KRqNogf9gUgkgh6kcDiMHnR+EOEviLWq1b39p/gAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="ToolStripButton6.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABMAAAAUCAYAAABvVQZ0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHcSURBVDhPrdHLSxtRFAbw+Z+6kFa0qKioKFZUhC7EFxg0
+        RcWKIgg+Yow1MYnRZIxJmigKvkoRgyQLFz7is/Ftu6lbRVd5TCbJ4nPuhQzGyWICs/gt5txzv7mcwyST
+        SShF2bBEIgE5tv5ugo/zGc9SZIcN+LrBHs1kPEuRhD1HnuB/8MJ8MokenwrNvxvQuF6Hfl8X+rxqLASs
+        af1vMfF4HCn/Xu5hPZ+G5nAQs+dT+HllxdKNHZ5rFs7LOcwHzfj2qw2uA7t45y0x7Cn8KARMw3Q6gZU7
+        p3DZAs8NSwMdFxbYgzP0R6q1Jth2ZyVBhBjm/+/F2P4Alm8dWBRew/4x4fuOGvXuStQslKNzsxXtq00w
+        +/WSkBSG53kQhmOtMCcd7Bdm+oKOjRY4AjZ6RqgWm6HbHhO/MxHDWoRBu69tdDa93o60IMK97wQX49Jq
+        74lhZGNkNmTIta4KSaMcTCwWA/F15QvYoBFzZwZUs6W0li2G4zgQ9Z5KWE71wjYnUWEporVsiWFkY0Zh
+        AfqjcZQaPksa5WCi0SiIKmsJfgQ00B2OoFCXS2vZEsPKTIXQHgxDszeE/NEcSaMcTCQSAVE8lY8C7Sfk
+        jeTg49AHWssWEw6HoRRlw0KhEJQRwiu1nmGGw8uMdQAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="PdfViewerPrinterSettings6.PrintLocation" mimetype="application/x-microsoft.net.object.binary.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj00LjAuMC4wLCBDdWx0
+        dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAABVTeXN0ZW0uRHJh
+        d2luZy5Qb2ludEYCAAAAAXgBeQAACwsCAAAAAAAAAAAAAAAL
+</value>
+  </data>
+  <metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>959, 17</value>
+  </metadata>
+  <data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
+        LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
+        ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAD+
+        NAAAAk1TRnQBSQFMAgEBBQEAAQgBAAEIAQABUAEAAVABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
+        AwABQAEBAgABoAMAAQEBAAEIBgAByBgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc
+        AcABAAHwAcoBpgEAATMFAAEzAQABMwEAATMBAAIzAgADFgEAAxwBAAMiAQADKQEAA1UBAANNAQADQgEA
+        AzkBAAGAAXwB/wEAAlAB/wEAAZMBAAHWAQAB/wHsAcwBAAHGAdYB7wEAAdYC5wEAAZABqQGtAgAB/wEz
+        AwABZgMAAZkDAAHMAgABMwMAAjMCAAEzAWYCAAEzAZkCAAEzAcwCAAEzAf8CAAFmAwABZgEzAgACZgIA
+        AWYBmQIAAWYBzAIAAWYB/wIAAZkDAAGZATMCAAGZAWYCAAKZAgABmQHMAgABmQH/AgABzAMAAcwBMwIA
+        AcwBZgIAAcwBmQIAAswCAAHMAf8CAAH/AWYCAAH/AZkCAAH/AcwBAAEzAf8CAAH/AQABMwEAATMBAAFm
+        AQABMwEAAZkBAAEzAQABzAEAATMBAAH/AQAB/wEzAgADMwEAAjMBZgEAAjMBmQEAAjMBzAEAAjMB/wEA
+        ATMBZgIAATMBZgEzAQABMwJmAQABMwFmAZkBAAEzAWYBzAEAATMBZgH/AQABMwGZAgABMwGZATMBAAEz
+        AZkBZgEAATMCmQEAATMBmQHMAQABMwGZAf8BAAEzAcwCAAEzAcwBMwEAATMBzAFmAQABMwHMAZkBAAEz
+        AswBAAEzAcwB/wEAATMB/wEzAQABMwH/AWYBAAEzAf8BmQEAATMB/wHMAQABMwL/AQABZgMAAWYBAAEz
+        AQABZgEAAWYBAAFmAQABmQEAAWYBAAHMAQABZgEAAf8BAAFmATMCAAFmAjMBAAFmATMBZgEAAWYBMwGZ
+        AQABZgEzAcwBAAFmATMB/wEAAmYCAAJmATMBAANmAQACZgGZAQACZgHMAQABZgGZAgABZgGZATMBAAFm
+        AZkBZgEAAWYCmQEAAWYBmQHMAQABZgGZAf8BAAFmAcwCAAFmAcwBMwEAAWYBzAGZAQABZgLMAQABZgHM
+        Af8BAAFmAf8CAAFmAf8BMwEAAWYB/wGZAQABZgH/AcwBAAHMAQAB/wEAAf8BAAHMAQACmQIAAZkBMwGZ
+        AQABmQEAAZkBAAGZAQABzAEAAZkDAAGZAjMBAAGZAQABZgEAAZkBMwHMAQABmQEAAf8BAAGZAWYCAAGZ
+        AWYBMwEAAZkBMwFmAQABmQFmAZkBAAGZAWYBzAEAAZkBMwH/AQACmQEzAQACmQFmAQADmQEAApkBzAEA
+        ApkB/wEAAZkBzAIAAZkBzAEzAQABZgHMAWYBAAGZAcwBmQEAAZkCzAEAAZkBzAH/AQABmQH/AgABmQH/
+        ATMBAAGZAcwBZgEAAZkB/wGZAQABmQH/AcwBAAGZAv8BAAHMAwABmQEAATMBAAHMAQABZgEAAcwBAAGZ
+        AQABzAEAAcwBAAGZATMCAAHMAjMBAAHMATMBZgEAAcwBMwGZAQABzAEzAcwBAAHMATMB/wEAAcwBZgIA
+        AcwBZgEzAQABmQJmAQABzAFmAZkBAAHMAWYBzAEAAZkBZgH/AQABzAGZAgABzAGZATMBAAHMAZkBZgEA
+        AcwCmQEAAcwBmQHMAQABzAGZAf8BAALMAgACzAEzAQACzAFmAQACzAGZAQADzAEAAswB/wEAAcwB/wIA
+        AcwB/wEzAQABmQH/AWYBAAHMAf8BmQEAAcwB/wHMAQABzAL/AQABzAEAATMBAAH/AQABZgEAAf8BAAGZ
+        AQABzAEzAgAB/wIzAQAB/wEzAWYBAAH/ATMBmQEAAf8BMwHMAQAB/wEzAf8BAAH/AWYCAAH/AWYBMwEA
+        AcwCZgEAAf8BZgGZAQAB/wFmAcwBAAHMAWYB/wEAAf8BmQIAAf8BmQEzAQAB/wGZAWYBAAH/ApkBAAH/
+        AZkBzAEAAf8BmQH/AQAB/wHMAgAB/wHMATMBAAH/AcwBZgEAAf8BzAGZAQAB/wLMAQAB/wHMAf8BAAL/
+        ATMBAAHMAf8BZgEAAv8BmQEAAv8BzAEAAmYB/wEAAWYB/wFmAQABZgL/AQAB/wJmAQAB/wFmAf8BAAL/
+        AWYBAAEhAQABpQEAA18BAAN3AQADhgEAA5YBAAPLAQADsgEAA9cBAAPdAQAD4wEAA+oBAAPxAQAD+AEA
+        AfAB+wH/AQABpAKgAQADgAMAAf8CAAH/AwAC/wEAAf8DAAH/AQAB/wEAAv8CAAP/BwAE/z30BP/7AAL/
+        JvQC8wHyAfEB8AHxAvIB8xL0Av/7AAH/A/Qk8wHyAfEBvAEHAe8BBwG8AfAB8hHzAvQC//oAAf8C9CXz
+        AfEBBwHvAZIB7AGSAe8BBwHxD/MB8gLzAfQC//oAA/QB8yT0AfAB7wHsAW0BEwFtAewB7wHwC/QD8wPy
+        AfMC9AH/+gAD9AHzH/QB8wHyAvEB8AEHAe8B7QH4AW0B7AGSAQcB8Av0A/MD8gHzAvQB//oAA/QB8x/0
+        AfIB8QG8AQcC7wH3AZIC7AGSAe8BBwHxC/QD8wPyAfMC9AH/+gAD9AHzH/QB8gG8AQcB7wWSAfcB7wEH
+        AfAB8gv0A/MD8gHzAvQB//oAA/QB8x/0AfEBBwHvAe0B+AHsAe0B9wHvAgcB8AHxAfIL9APzA/IB8wL0
+        Af/6AAP0AfMf9AHwAe8BkgH4AW0B6wHsAfcBBwHwAfEC8gHzC/QD8wPyAfMC9AH/+gAD9AHzGvQB8wHy
+        AfEB8AG8AQcB7wGSAewB+AHsAfcB7wG8AfEC8gLzC/QD8wPyAfMC9AH/+gAD9AHzGvQB8gHwAQcB7wL3
+        ApIC7QH3Ae8BBwHwA/IC8wv0A/MD8gHzAvQB//oAA/QB8xr0AfEBBwHvAe0B+AHsAe0BkgH3Au8BBwG8
+        AfEB8gTzC/QD8wPyAfMC9AH/+gAD9AHzGvQB8AHvAe0B+AHqAW0B7AGSAe8BBwG8AfAB8QHyBPMM9APz
+        A/IB8wL0Af/6AAP0AfMa9AG8AfcB+AHqAUMBEgHrAZIBBwHxAvIC8xD0A/MD8gHzAvQB//oAA/QB8xr0
+        AfAB7wHsAW0BEwFtAewB9wEHA/IC8xD0A/MD8gHzAvQB//oAA/QB8xr0AfABBwGSAewBbQHsAZIB7wG8
+        AvID8xD0A/MD8gHzAvQB//oAA/QB8xr0AfEBBwHvAe0B7AHtAe8BBwHwBfMQ9APzA/IB8wL0Af/6AAP0
+        AfMa9AHxAbwBBwHvAZIB7wEHAbwB8QTzEfQD8wPyAfMC9AH/+gAD9AHzGvQB8gHwAbwBBwHvAQcBvAHx
+        AfIV9APzA/IB8wL0Af/6AAP0AfMG9ALzAvIG8QPyAvMC8gHxAfABvAIHAu8B9wHvAQcB8AHyFfQD8wPy
+        AfMC9AH/+gAD9AHzBvQB8wHyAfEB8Aa8AvAB8QLyAfEBvAEHAu8C9wGSAu0B9wHvAbwB8RX0A/MD8gHz
+        AvQB//oAA/QB8wb0AfIB8QHwCAcBvAHwAfEB8gG8AQcB7wGSBuwB7QHvAQcB8RX0A/MD8gHzAvQB//oA
+        A/QB8wb0AfIB8AIHB+8CBwHwAfEBBwHvAe0B+AVtAesB7AH3AQcB8BX0A/MD8gHzAvQB//oAA/QC8wX0
+        AfEBvAEHAe8DkgPtAfcB7wEHAbwB8AEHAZIB+AFtARQCEwESAeoBbQH4AZIB7wHwFfQD8wPyAfMC9AH/
+        +gAB9AHzAfIB8QHwAfEC8gHzAfQB8gHwAgcF7wH3Ae8CBwHwAfEBBwH3AewBbQETARIB6gFtAesB+AHt
+        Ae8BBwHxFfQD8wPyAfMC9AH/+gAB9AHzAfEBvAIHAbwB8QHyAfQB8gHxAfAIBwG8AfAB8QHyAQcB7wHs
+        AW0BEgHqAW0B+AHsAZIB7wEHAbwB8RX0A/MD8gHzAvQB//oAAfQB8gHwAQcBkgHvAQcBvAHyAfQB8wHy
+        AfEB8Ae8AfAB8QLyAbwB7wHtAesB6gFtAfgB7QH3Ae8BBwG8AfEB8hX0A/MD8gHzAvQB//oAAfQB8gG8
+        Ae8B7AGSAe8BBwHxAfQC8wHyCPEC8gLzAbwB7wGSAfgBbQHrAewB9wEHAfAC8QHyAfMV9APzA/IB8wL0
+        Af/3AAP/AfQB8QEHAe0BbQHsAZIBBwHwAvQM8wL0AfABBwGSAewBbQHsAZIBBwHwAfMZ9APzA/IB8wL0
+        Af/1AAP/AvQB8gHwAQcBkgHsAe0B7wEHAfED9ArzA/QB8QEHAe8B7QHsAe0B9wHvAQcB8AHxAvIB8xX0
+        A/MD8gHzAvQB//UAAf8B9AHzAfIB8QHwAQcC7wGSAe8BBwG8AfIQ9AHxAbwBBwHvApIB9wLvAgcBvAHx
+        AfIV9APzA/IB8wL0Af/1AAH/AfMB8gHwAgcE7wEHAbwB8QHyEPQB8gHwAbwBBwPvAvcBkgHvAQcBvAHy
+        FfQD8wPyAfMC9AH/9QAB9AHyAfAB7wKSAu8BBwG8AfAB8QHyAfME9Aj2BPQB8wHyAfEB8AG8AQcB7wGS
+        Ae0B7AGSAe8BBwHxFfQD8wPyAfMC9AH/9QAB9AHxAQcB7QFtAewBkgHvAbwE8wT0AfUI9gH1A/QD8wLy
+        AbwB7wGSAfgBbQHsAZIBBwHwFfQD8wPyAfMC9AH/9QAB9AHyAbwB7wHsAZIB7wEHAfAE8wT0AfUJ9gH1
+        A/QD8wHyAfABBwHvAe0B7AGSAe8BBwHxAfMU9APzA/IB8wL0Af/1AAH0AfIB8AEHAfcB7wEHAfAB8QTz
+        BPQB9Qn2AvUD9APzAfEBvAEHAe8BkgHvAQcBvAHxA/MS9APzA/IB8wL0Af/1AAH0AfMB8QHwAQcBvAHw
+        AfEB8gPzBfQB9Qv2AfUD9ALzAfIB8QG8AwcBvAHxAfIE8xH0A/MD8gHzAvQB//UAAvQB8wTyA/MH9AH1
+        DPYB9QP0AvMB8gLxAfAC8QLyBPMR9APzA/IB8wL0Af/1AAH/A/QD/wr0AfUN9gH1CfQH8xH0A/MD8gHz
+        AvQB//UAAf8D9AL/CvQB9Q72AfUF9AXzBPID8xD0A/MD8gHzAvQB//UAAf8D9AL/CfQB9Q/2AfUE9AXz
+        AvID8QLyAfMQ9APzA/IB8wL0Af/1AAH/DPQD/w/2AfUD9AXzAfIC8QPwAfEB8gHzEPQD8wPyAfMC9AH/
+        9QAB/wz0A/8P9gH1A/QE8wLyAfEB8AK8AfAB8QHyAfMQ9APzA/IB8wL0Af/1AAP0AfMI9AX/DvYB9QP0
+        A/MC8gHxAfABvAIHAbwB8AHxAfIQ9APzA/IB8wL0Af/1AAH/CvQG/w32AfUE9APzAvIC8QHwAbwBBwG8
+        AfAB8QHzEPQD8wPyAfMC9AH/9QAB/wn0B/8M9gL1BPQE8wLyAfEB8AK8AfAB8QHyAfMQ9APzA/IB8wL0
+        Af/1AAH/A/QN/wr2AvUG9ATzAvIC8QHwAbwB8AHxAfIB8xD0A/MD8gHzAvQB//UAAf8D9A3/CvYB9Qj0
+        BPMB8gLxAvAC8QHyAfMQ9APzA/IB8wL0Af/1AAH/A/QN/wn2AfUJ9ATzAvIC8QHwAfEC8gHzEPQD8wPy
+        AfMC9AH/9QAB/wP0Dv8I9gH1CPQG8wLyAvEC8gLzEPQD8wPyAfMC9AH/9QAB/wT0Dv8I9gX0CvMF8gLz
+        EPQD8wPyAfMC9AH/9QAB/wb0Ev8C9gT0DfMB8gTzEPQD8wPyAfMC9AH/9QAC9APzAvQT/wH2BPQI8wH0
+        CPMR9APzA/IB8wL0Af/1AAL0BPMC9BP/BPQH8xv0A/MD8gHzAvQB//UAAvQD8wL0FP8E9AjzAfIE8xX0
+        B/MC9AH/9QAB/wb0FP8E9AXzA/IB8QLyAvMX9AXzAvQB//UAAf8E9Bb/BfQE8wHyAvEB8AHxAvIB8x70
+        Af/1AAH/A/QX/wj0AfMB8gHxAfABvAHwAfEB8gHzGPQC/wP0Av/1AAH/A/QX/wj0AfIB8QHwAbwBBwG8
+        AfAB8QHyF/QD/wP0Av/1AAH/BPQI/wP0Cv8D9AXzAfQB8wHyAfEB8AG8AfAB8QHyAfMd9AL/9QAB/wb0
+        BP8C9APzAvQI/wL0CPMB8gLxAfAB8QLyAfMI9AXzBfQE8wf0Av/1AAL/BvQD/wH0AfMD8gHzAfQI/wL0
+        AfMC8gXzA/IB8QLyAvMH9AfzA/QG8wX0Av/2AAX/A/QC/wH0AfMB8gHxAfAB8QHyAfMB9Af/AfQB8wXy
+        BvMB8gTzB/QH8wP0BvMC9AX/+wAB/wP0Af8B9AHzAfIB8AG8AfAB8gHzAfQH/wH0AfMB8gHxBPIE8w30
+        B/MD9AbzAvQB//8AAf8D9AH/AfQB8wHyAfEB8AHxAfIB8wH0Bv8C9AHzBfIF8w30CPMB9AfzAfQC//8A
+        Af8D9AL/AfQB8wPyAfMB9Af/AvQC8wLyB/MN9A/zAvQC//8AAf8D9AL/AvQD8wL0Bv8D9ArzDvQN8wP0
+        Av//AAEAAf8D9AT/A/QH/wX0BvMR9AzzAvQE//8AAQAB/wP0Df8d9AvzAvQB//8ABQAB/wP0Dv8c9Avz
+        AfQC//8ABQAB/wP0D/8b9ArzAvQC//8ABQAB/wP0Ef8Z9AjzA/QC//8ABgAB/wP0Ef8Z9AfzAvQE//8A
+        BgAB/wP0Ev8X9AfzAvQB//8ACgAB/wP0Ef8U9AHzAfQJ8wH0Av//AAoAAf8D9BH/E/QL8wL0Av//AAoA
+        Af8o9ALzCfQC//8ACwAB/yf0AvMI9AT//wALAAP0AfMk9ALzAvQB//8ADgD//5r/AfNB8gHzXP8C9FP/
+        Ab0BRzImARcB9Bb/AbwB7z8HAe8BBwz/AfQB8ELxAfAB8gj/AZ0ETgEIUP8BRzYmAeMV/wG8AfA//wHx
+        AQcM/wHyAe8BvEDwAbwCBwf/AZ0GTgEITv8BRwMmAUcB4y4WAeMBRwMmARcU/wG8AfA//wHxAQcM/wHy
+        Ae9C/wHxAQcH/wJOAfEB/wROTf8B4wImAUcz9AG9AyYBmhP/AbwB8D//AfEBBwz/AfIB70L/AfEBBwb/
+        AQgBTgEIAfMBCAH1A04B9Uv/AfUCJgFHNvQCJgFHE/8BvAHwP/8B8QEHDP8B8gHvQv8B8QEHBv8BuwRO
+        AQgB8wJOAfVL/wGUAiYBGjb0ARYCJgG9Ev8BvAHwP/8B8QEHDP8B8gHvQv8B8QEHBv8B9QVOAQgBlwFO
+        TP8BRwImN/QB8wImAZQS/wG8AfA//wHxAQcM/wHyAe9C/wHxAQcH/wFxBk4BmEz/AyY49AImAZQS/wG8
+        AfAG/wHyMe0B8Qb/AfEBBwz/AfIB7wb/AfQBBw2SAe8B8QL/AfMOmAEIAfUB/wH0AQgOmAH1Bv8B8QEH
+        CP8BcQROAZdN/wMmOPQCJgGUEv8BvAHwBv8B8gftAewDrgaLIO0B8Qb/AfEBBwz/AfIB7wb/AfQBBwaS
+        Be0C7AHtAe8BCAEHAfIOmAEIAfUB/wH0AQgOmAH1Bv8B8QEHCf8B8QGYAbsB9E7/AyY49AImAZQS/wLu
+        AvMB8gHxAfABCQG1Aq4PiyD3AfEG/wHxAQcM/wHyAe8F/wH1AfMB7wPsBPgB6wFyAXEDbARJAfEOmAEI
+        AfUB/wH0AQgOmAH1Bv8B8QEHW/8DJjj0AiYBlAn/AfUB8wHyAvEB8AIJAbsBtAGRAbQBrhWLAa4g8gH0
+        Bv8B8QEHCv8B9QH0AfAB9wHwAQgBBwLvAZgBkQFyBGwNSQHxDpgBCAH1Af8B9AEIDpgB9Qb/AfEBBwb/
+        ARoBHApuAW0mSgdEAxQHRAMUAewN/wMmEPQCEQf0BBEB6wT0Ae8BEQEHE/QCJgGUCf8BtQK0Aa4eiwG0
+        J/8B8QEHBP8B8AEIAQcBuwKYApEBcgRxAWwVSQHxDpgBCAH1Af8B9AEIDpgB9Qb/AfEBBwb/ARoBHApu
+        AW0mSgdEAxQHRAMUAewN/wMmEPQCEQf0AREB6gHtARMBEQFDA/QB7wERAQcT9AImAZQJ/yKLAbQn/wHx
+        AQcE/wNxAWwfSQHyAQgNuwHxAv8B9QHwDbsBCAf/AfEBBwb/ARoBHBtZEFMZUgEUAewN/wMmEPQCEQf0
+        AREB7AL0Ae0BEQHqAvQB7wERAQcT9AImAZQJ/yKLAbQn/wHxAQcE/yNJAfQB9Q30BP8B9Q70B/8B8QEH
+        Bv8BGgEcApocehdZCVMGUgEUAewN/wMmEPQCEQf0AREB7AP0AUMBEQL0Ae8BEQEHE/QCJgGUCf8iiwGu
+        IO8B8gb/AfEBBwT/I0kB9Cj/AfEBBwb/ARoBHALDC5ohehFZA1MCUgEUAewN/wMmEPQEEQFDAQcD9AER
+        AewD9AESAREC9AHvAREBBxP0AiYBlAn/I4sg7QHxBv8B8QEHBP8jSQH0KP8B8QEHBv8BGgEcAsMBoAua
+        IXoRWQJTAlIBFAHsDf8DJhD0AhEB8gH3AhEB8QL0AREB7AP0AewBEQL0Ae8FERD0AiYBlAn/I4sg7QHx
+        Bv8B8QEHBP8jSQHxDpgBCAH1Af8B9AEIDpgB9Qb/AfEBBwb/ARoBHALDAqALmiF6EVkBUwJSARQB7A3/
+        AyYQ9AIRAvQB8AERAesC9AERAewD9AHsAREC9AHvAREBBxP0AiYBlAn/IosBkSDyAfQG/wHxAQcE/yNJ
+        AfEOmAEIAfUB/wH0AQgOmAH1Bv8B8QEHBv8BGgEcAsMDoAqaInoRWQJSARQB7A3/AyYQ9AIRA/QCEQL0
+        AREB7AP0ARMBEQL0Ae8BEQEHE/QCJgGUCf8iiwG0J/8B8QEHBP8jSQHxDpgBCAH1Af8B9AEIDpgB9Qb/
+        AfEBBwb/ARoBHALDBKAKmiJ6EFkCUgEUAewN/wMmEPQCEQL0AfMBEQESAvQBEQHsA/QCEQL0Ae8BEQEH
+        E/QCJgGUCf8iiwG0J/8B8QEHBP8jSQHxDpgBCAH1Af8B9AEIDpgB9Qb/AfEBBwb/ARoBHALDBaAKmiJ6
+        D1kBUgFLARQB7A3/AyYQ9AIRAfQB8gETAREB7wL0AREB7AH0AfABQwERAe8C9AHvAREB7wPyAfMP9AIm
+        AZQJ/yKLAbQn/wHxAQcE/yNJAfEOmAEIAfUB/wH0AQgOmAH1Bv8B8QEHBv8BGgEcAXkBwwagCpoieg5Z
+        AksBFAHsDf8DJhD0BREB6gP0BREB7AP0Ae8FEQH3D/QCJgGUCf8iiwGuILwB8wb/AfEBBwT/I0kB8gG7
+        DZgB8AH1Af8B9AEIDpgB9Qb/AfEBBwb/ARoBHAFSAXkHoAuaIXoMWQNLARQB7A3/AyYQ9AGSAu0B9wHy
+        BPQD7QHvBfQB8AXtAfIP9AImAZQJ/wuLAbQCtQG0BIsBtAK7AbUMiyDtAfEG/wHxAQcE/xNJAWwDcQxJ
+        D/QB9QP/AfUO9Af/AfEBBwb/ARoBHAJSAXkHoAuaIXoKWQFMAksBUgEUAewN/wMmOPQCJgGUCf8KiwGu
+        Ae4C/wHwBIsB8gL/AfMMiyDtAfEG/wHxAQcE/wpJAXEB8wL0AZEBbAJJAXIBCAH0AfMBBwxJAfQo/wHx
+        AQcG/wEaARwBmgJSAXoHoAuaIXoIWQFSAksCUgEUAewN/wMmOPQCJgGUCf8KiwG0AfEC/wHyAbQDiwT/
+        Aa4KiwGuIPAB9Ab/AfEBBwT/CkkBbAHvAv8B8AFyAkkBmAL/AfMBcQxJAfQo/wHxAQcG/wEaARwBGgGa
+        AlIBegegC5ohegZZAVIBSwFMAVkCUgEUAewN/wMmOPQCJgGUCf8KiwG1AfUC/wH0AbsCiwG0BP8BtQqL
+        AbQn/wHxAQcE/wtJAXEB8wL/AZEBbAFyAbwB/wH0Ae8NSQHyAbsNmAHwAfUB/wH0AbwOmAH1Bv8B8QEH
+        Bv8BGgEcARoBwwF6AlIBegegCpoiegRZAVIBSwFMAnoCUgEUAewN/wMmOPQCJgGUCf8KiwG7Av8B9QH/
+        AbwCiwG7Av8B9QH/AQkKiwG0J/8B8QEHBP8MSQHtAfQB/wEIAXIBmAH0Af8BvAFxDUkB8Q6YAQgB9QH/
+        AfQBCA6YAfUG/wHxAQcG/wEaARwBGgHDAXoBeQJSAZoHoAqaInoCWQFSAksDegJSARQB7A3/AyY49AIm
+        AZQJ/wqLAQkB/wHyAbwB/wHxAosB8QH/AfMB8AH/AfIKiwG0J/8B8QEHBP8MSQFsAbwB9QH0AQgB8AH/
+        AfMBmA5JAfEOmAEIAfUB/wH0AQgOmAH1Bv8B8QEHBv8BGgEcARoBwwJ6AXkCUgGaB6AKmiJ6AVICTAR6
+        AlIBFAHsDf8DJjj0AiYBlAn/CYsBtAHwAf8BCQG1Af8B8wG0AYsB9AH/AQkBuwL1Ac8JiwGuIPAB8wb/
+        AfEBBwT/DUkBkQHyAf8B9QH/AfUBCAFxDkkB8Q6YAQgB9QH/AfQBCA6YAfUG/wHxAQcG/wEaARwBGgHD
+        A3oBeQJSAZoHoAqaIHoBUgJMBXoCUgEUAewN/wMmDfQBGwG9ARso9AImAZQJ/wmLAbQB8wH/AbsBtAHz
+        AfQBtQG0Av8BtQG0AfUB/wG0Cosg7QHxBv8B8QEHBP8NSQFsAQcB9AL/AfEBkQ9JAfEOmAEIAfUB/wH0
+        AQgOmAH1Bv8B8QEHBv8BGgEcARoBwwR6AXkCUgigCpoeegNSBnoCUgEUAewN/wMmDPQDFwImJ/QCJgGU
+        Cf8JiwG1AfUB9AG1Aa4BvAH1AbwBtQH/AfUBrgGLAfQB/wG7Cosg7QHxBv8B8QEHBP8OSQEHAfQC/wHx
+        AZEPSQHxDpgBCAH1Af8B9AEIDpgB9Qb/AfEBBwb/ARoBHAEaAcMFmgFYAlIIoAqaBnoBUhV6AVgCUgd6
+        AlIBFAHsDf8DJgz0ARcC9AEaAiYBvSX0AiYBlAn/CYsBCQH/AfIBtAGLAbUB/wHzAbwB/wH0AosB8wH/
+        AfAJiwGuIAcB8wb/AfEBBwT/DUkBcQHxA/8B9AHvD0kP9AH1A/8B9Q70B/8B8QEHBv8BGgEcARoBwwaa
+        AVgCUgigCpoEegF5AlITegFYAlIIegJSARQB7A3/AyYM9AFHA/QB8wImARok9AImAZQJ/wiLAa4BvAH/
+        AfABtAGLAbQC/wH0Af8B8AKLAbwB/wH0Ac8IiwG0J/8B8QEHBP8NSQEHAfQB/wHxAfIB/wHxAZEOSQH0
+        KP8B8QEHBv8BGgEcAsMHmgFYAlIIoAqaAnoBeQRSEXoBWAJSCXoCUgEUAewN/wMmDPQBvQEXA/QBGgIm
+        JPQCJgGUCf8IiwG0AfIB/wEJAosBtAH0A/8BuwKLAbsB9QH/AbQIiwG0J/8B8QEHBP8MSQFxAfMB/wH0
+        AZEBmAL1AQgBbA1JAfQo/wHxAQcG/wEaARwCwwiaAVgCUgigCpoBeQJSAZoBegJSEHoCUgp6AlIBFAHs
+        Df8DJg30Ab0BRwP0AeMBJgFHI/QCJgGUCf8IiwG1AfQB/wG7AosBrgHwAv8B9QG0AosBtAH0Af8BuwiL
+        AbQn/wHxAQcE/wxJAQcB9QH/AQcBcQFyAQgB/wHzAZENSQHyAQgNuwHxAv8B9QHwDrsH/wHxAQcG/wEa
+        ARwCwwmaA1IIoAiaAXkCUgPDAZkCUg56AlILegJSARQB7A3/AyYP9AFHAZQC9AImARYi9AImAZQJ/wiL
+        AbsB/wH1AbUDiwG7Av8B9AGuAosBtAHzAf8BCQGuB4sBriDwAfMG/wHxAQcE/wtJAXIB9AH/AfUBkQJs
+        AZgB9QH/AfEBcQxJAfEOmAEIAfUB/wH0AQgOmAH1Bv8B8QEHBv8BGgEcAsMKmgFYAVIBWAigBpoBegJS
+        BcMBeQJSDHoCUgx6AlIBFAHsDf8DJhD0Ab0BRwG9ARsCJiL0AiYBlAn/CIsBtQEJAbsBtAOLAbQC8AHu
+        BIsBuwEJAbsJiyCSAfEG/wHxAQcE/wpJAWwB7wLyAQgBcQJJAXIBCAHzAfEBkQxJAfEOmAEIAfUB/wH0
+        AQgOmAH1Bv8B8QEHBv8BGgEcAsMLmgFYAVIBWAegBZoBegJSB8MBdAJSCnoCUg16AlIBFAHsDf8DJhL0
+        Ab0BJgFHASYBRw/0Ab0BFwImAZQN9AImAZQJ/yOLIO0B8Qb/AfEBBwT/C0kBcgKRAXEBbAJJAWwBcgKR
+        AXIMSQHxDpgBCAH1Af8B9AEIDpgB9Qb/AfEBBwb/ARoBmQLDDJoBWAFSAVgIoAKaAXoBdAFSCcMBdAJS
+        CHoCUg56AVMBUgEUAewN/wMmFfQCJgG9C/QB8wFHAeMD9AFHASYB4wz0AiYBlAn/I4sg9wHxBv8B8QEH
+        BP8jSQHxDpgBCAH1Af8B9AEIDpgB9Qb/AfEBBwb/ARoBmQLDDZoBWAFSAXkIoAGaAnQLwwJSAXQGegJS
+        D3oBUwFSARQB7A3/AyYV9AEWAiYCRwG9B/QBRwEWBfQBvQImDPQCJgGUCf8iiwG0J/8B8QEHBP8jSQHx
+        DpgBCAH1Af8B9AEIDpgB9Qb/AfEBBwb/ARoBmQLDDpoBWAFSAXkGoAGaAnQNwwJSAXQEegJSAVgPegFT
+        AVIBFAHsDf8DJhb0AiYBGgH0Ab0BFwFHAeMBvQHzAfQBRwf0ARYBJgEWDPQCJgGUCf8iiwG0J/8B8QEH
+        BP8jSQ/0AfUD/wH1DvQH/wHxAQcG/wEaAZkCww6gAZoCWAF6BKABmgJ0D8MCUgF5AnoCUgFYEHoBUwFS
+        ARQB7A3/AyYW9AHjAiYF9AG9AeMBRwEmARcBFgOUARYCRwG9DfQCJgGUCf8iiwG0J/8B8QEHBP8jSQH0
+        KP8B8QEHBv8BGgGZAsMPoAGaAlgBegKgAZoCdAEaEMMCUgF5AlIBWBF6AVMBUgEUAewN/wMmF/QCJgEb
+        BfQBRxj0AiYBlAn/IosBriDxAfQG/wHxAQcE/yNJAfQo/wHxAQcG/wEaAZkCwxCgAZoCWAF6AaACdAEa
+        EsMDUgFYEnoBUwFSARQB7A3/AyYX9AFHASYBRwT0AUcZ9AImAZQJ/yOLIPcB8Qb/AfEBBwT/I0kB8g4I
+        AfEC/wH1AfEOCAf/AfEBBwb/ARoBmQLDEaABmgJYAnQBGhPDAZoCUhN6AVMBUgEUAewN/wMmGPQCJgP0
+        AUca9AImAZQJ/yOLIO0B8Qb/AfEBBwT/I0kB8Q6YAQgB9QH/AfQBCA6YAfUG/wHxAQcG/wEaAZkCwxKg
+        AZoCdAEaFcMBmgJSEnoBUwFSARQB7A3/AyYY9AFHASYB4wH0ApQa9AImAZQJ/yOLIPcB8Qb/AfEBBwT/
+        I0kB8Q6YAQgB9QH/AfQBCA6YAfUG/wHxAQcG/wEaAZkCwxKgAnQBmhfDAXkCUhF6AVMBUgEUAewN/wMm
+        GPQBlAEmAUcB9AFHG/QCJgGUCf8iiwG0IPQH/wHxAQcE/yNJAfEOmAEIAfUB/wH0AQgOmAH1Bv8B8QEH
+        Bv8BGgGZAsMRoAJ0AZoZwwF0AlIQegFTAVIBFAHsDf8DJhn0AiYBRxz0AiYBlAn/Ac8hiwG0J/8B8QEH
+        BP8BbCJJAfEOmAEIAfUB/wH0AQgOmAH1Bv8B8QEHBv8BGgGZAsMQoAJ0AZkbwwJSAUsPegFTAVIBFAHs
+        Df8DJhn0AUcBJgHjHPQCJgGUDP8B9AHxAe4BuwG1AbQZiwG0J/8B8QEHBP8B8AEIAQcCmAGRAXIBcQFs
+        GkkB8Q6YAQgB9QH/AfQBCA6YAfUG/wHxAQcG/wEaAZkCww+gAXkBdAGZHcMBUgFLAVIOegFTAVIBFAHs
+        Df8DJhn0ARoBJgFHHPQCJgGUEv8BvAHuAfQB8wHwAQkBuwG1AbQQiwG0IPMH/wHxAQcH/wH1A/QB8wG8
+        AfcB8AEIAQcCmAGRAnERSQH0DvMB9AP/AfQO8wf/AfEBBwb/ARoBmQLDDqABeQF0AXkfwwFSAUsBUg16
+        AVMBUgEUAewN/wMmGfQBvQImHPQCJgGUEv8BvAHwBv8B8wL3Au0B7AGRA64HiwGuIO8B8Qb/AfEBBwz/
+        AfIB7wf/AfUB9AHyAfABCAHvAfcBkQFyAXEBbAdJAfQo/wHxAQcG/wEaAZkCww2gAnkBmSHDAksBUgx6
+        AVMBUgEUAewN/wMmGfQCRwEmAZQb9AImAZQS/wG8AfAG/wHyDO0D7AGuAZEg7QHxBv8B8QEHDP8B8gHv
+        Ev8B9AHxAQgB7wGYAZEBcgH1KP8B8QEHBv8BGgGZAsMMoAJ5AZkjwwJLAVILegFTAVIBFAHsDf8DJhn0
+        ARcBlAEmARcb9AImAZQS/wG8AfAG/wHzMe8B8Qb/AfEBBwz/AfIB7wf/AfENBwG8AfMC/wH0DggB8gL/
+        AfUB8g4IB/8B8QEHBv8BGgGZAsMLoAJ5AZkkwwGgAksBeQp6AVMBUgEUAewN/wMmGPQBlAH0AfMCJhv0
+        AiYBlBL/AbwB8Af/MfIB9Ab/AfEBBwz/AfIB7wb/AfQBBw2SAe8B8gL/AfMOmAEIAfUB/wH0AQgOmAH1
+        Bv8B8QEHBv8BGgGZAsMKoAN5JsMBmgJLAXkJegFZAVIBFAHsDf8DJhj0AUcC9AImG/QCJgGUEv8BvAHw
+        P/8B8QEHDP8B8gHvBv8B9AEHDZIB7wHyAv8B8w6YAQgB9QH/AfQBCA6YAfUG/wHxAQcG/wEaAZkCwwmg
+        A3kowwGZAksJegFZAVIBFAHsDf8DJhj0AUcC9AFHASYb9AImAZQS/wG8AfA//wHxAQcM/wHyAe8G/wH0
+        AQcNkgHvAfIC/wHzDpgBCAH1Af8B9AEIDpgB9Qb/AfEBBwb/ARoBmQLDCKABegJ5AfYpwwF5AksIegFZ
+        AVMBFAHsDf8DJhj0ASYC9AHjASYb9AImAZQS/wG8AfA//wHxAQcM/wHyAe8G/wH0AQcNkgHvAfIC/wHz
+        DpgBCAH1Af8B9AEIDpgB9Qb/AfEBBwb/ARoBmQLDB6ABegJ5AvYqwwF0AksHegFZAVMBFAHsDf8DJhj0
+        ASYC9AGUASYb9AImAZQS/wG8AfAG/wHzJPcBkgHsC/gBkgfvAQcM/wHyAe8G/wH0AQcNkgHvAfIC/wHz
+        DpgBCAH1Af8B9AEIAZgBkQtyAZEHBwHvAQcG/wEaAZkCwwagAZoCeQP2K8MBUgJLBnoBWQFTARQB7A3/
+        AyYY9AEmAvQBFgEmG/QCJgGUEv8BvAHwBv8B8iXtAewB9wrxAfIF8wHwAQcB8Az/AfIB7wf/AfMN8QHy
+        AfQC/wH1AfIN8QH0A/8B9AHwAe8B9wu8AfEF8gG8Ae8BvAb/ARoBmQLDBaABmgJ5BPYswwNLBXoCWQEU
+        AewN/wMmGPQBRwL0AUcBFhr0AZQCJgG9Ev8BvAHwBv8B8iT3AZIB7AHvD/8B8gHuAfEN/wHyAe8t/wH0
+        AfABBxD/AfIBBwHwB/8BGgGZAsMEoAGaAnkF9izDAaADSwR6AlkBFAHsDf8DJhn0AUcBJgHjG/QCJgFH
+        E/8BvAHwBv8B9CTxAbwB7wHuDf8B9AHxAbwB8Q7/AfIB7y3/AfQBvAEHD/8B8QEHAfEI/wEaAZkCwwOg
+        AZoCeQb2LMMCoAJLAVIDegJZARQB7A3/AyY29AMmAZQT/wG8AfAr/wH0AbwB8Az/AfQB8AG8AfIP/wHy
+        Ae8H/wHyDbwB8AH0Av8B9AHwDbwB8gP/AfIBBwLvDf8B9AHwAbwB8gn/ARoBmQLDAqABmgJ5B/YswwOg
+        AksBdAJ6AlkBFAHsDf8DJjX0AUcCJgFHFP8BvAHwK/8B9AG8AfAL/wHzAfABvAHzEP8B8gHvBv8B9AEH
+        DZIB7wHyAv8B8gH3DZIBvAH0Af8B9AEHAe0B7AH3DP8B9AK8AfMK/wEaAZkCwwKgAnkI9izDBKACSwF5
+        AXoCWQEUAewN/wMmNPQBRwImAUcV/wG8AfAr/wH0AbwB8Ar/AfMBvAHwAfMR/wHyAe8G/wH0AQcNkgHv
+        AfIC/wHyAfcNkgG8AfQB/wH0AQcB7QHsAfcL/wHzAbwB8AH0C/8BGwGZAsMBoAJ5CfYswwSgAZoCSwGZ
+        AlkBFAHsDf8DJjP0AUcCJgFHFv8BvAHwBv8B8yXvAZIBBwn/AfIBvAHxAfQS/wHyAe8G/wH0AQcNkgHv
+        AfIC/wHyAfcNkgG8AfQB/wH0AQcB7QHsAfcK/wHyAQcB8QH0DP8BGwGZAsMCeQr2LMMFoAF5AksBUgFZ
+        ARQB7A3/AyYy9AFHAiYBRxf/AbwB8Ab/AfIl7QHsAe8I/wHxAQcB8RT/AfIB7wb/AfQBBw2SAe8B8gL/
+        AfIB9w2SAbwB9AH/AfQBBwHtAewB9wj/AfQB8QEHAfIO/wEbAZkBwwF6AXkL9izDBqABeQJLAVIBFAHs
+        Df8DJjH0AUcCJgFHGP8BvAHwBv8B8iXtAewB7wf/AfABBwHyFf8B8gHvBv8B9AEHDZIB7wHyAv8B8gH3
+        DZIBvAH0Af8B9AEHAe0B7AH3B/8B9AG8AQcB8w//ARsBmQJ6AcML9izDB6ABUgFLASoBFAHsDf8DJjD0
+        AyYBRxn/AbwB8Ab/AfQk8QG8Ae8BBwb/AfABBwHzFv8B8gHvB/8B8g3wAfEB9AL/AfQO8AHzA/8B8gG8
+        Au8G/wHzArwB9BD/ARsBmQF6AcMM9izDCKABUgEqARQB7A3/AyYv9AMmAUca/wG8AfAr/wH0AbwB8AX/
+        AbwBBwH0F/8B8gHvLf8B9AHwAe4F/wHyAQcBvBL/ARsBmQHDDfYswwmgAUsBFAHsDf8BRwImLvQDJgFH
+        G/8BvAHwK/8B9AG8AfAD/wH0ArwB9Bj/AfIB7y3/AfQB8AHuBP8B8QEHAfET/wEbIZklHAGZDf8BlAIm
+        Ab0s9AMmAUcc/wG8AfAr/wH0AbwB8AL/AfMBBwG8Gv8B8gHvLf8B9AHwAe4C/wH0AfABvAHyFP8BGyKZ
+        JBwBmQ3/AfUDJiv0AUcCJgFHHf8BvAHwK/8B9AG8AfAB/wHyAQcB8Bv/AfIB7y3/AfQB8AHuAf8B8wK8
+        AfNr/wHjAiYBRyj0Ab0BRwImARce/wG8AfAr/wH0ArwB8QEHAfEc/wHyAe8t/wH0AfABBwHyAbwB8AH0
+        bf8BRwMmAUcl4wFHAyYBFx//AbwBByvyAfEBBwHvAQcB8h3/AfIB7y7yAQcB7wEHAfEB9G//ARcrJgHj
+        IP8B8QEHLLwBBwG8AfMe/wHzAQcuvAIHAfJy/wHzAUcnJgFHAfQi/y/0IP8x9P/////o/wFCAU0BPgcA
+        AT4DAAEoAwABQAEBAgABoAMAAQEBAAEBBgABGRYAA/8BAAH8CAABHx4AAfwIAAEfHgAB/AgAAQ8eAAH8
+        CAABDx4AAfwIAAEPHgAB/AgAAQ8eAAH8CAABDx4AAfwIAAEPHgAB/AgAAQ8eAAH8CAABDx4AAfwIAAEP
+        HgAB/AgAAQ8eAAH8CAABDx4AAfwIAAEPHgAB/AgAAQ8eAAH8CAABDx4AAfwIAAEPHgAB/AgAAQ8eAAH8
+        CAABDx4AAfwIAAEPHgAB/AgAAQ8eAAH8CAABDx4AAfwIAAEPHgAB/AgAAQ8eAAH8CAABDx4AAfwIAAEP
+        HgAB/AgAAQ8eAAH8CAABDx4AAfwIAAEPHgAB4AgAAQ8eAAGACAABDx4AAYAIAAEPHgABgAgAAQ8eAAGA
+        CAABDx4AAYAIAAEPHgABgAgAAQ8eAAGACAABDx4AAYAIAAEPHgABgAgAAQ8eAAGACAABDx4AAYAIAAEP
+        HgABgAgAAQ8eAAGACAABDx4AAYAIAAEPHgABgAgAAQ8eAAGACAABDx4AAYAIAAEPHgABgAgAAQ8eAAGA
+        CAABDx4AAYAIAAEPHgABgAgAAQ8eAAGACAABDx4AAYAIAAEPHgABgAgAAQ8eAAGACAABDx4AAYAIAAEP
+        HgABgAgAAQ8eAAGACAABDx4AAYAIAAEPHgABgAgAAQ8eAAGACAABDx4AAYAIAAEPHgABgAgAAR8eAAGA
+        CAABHx4AAfwHAAEBAf8eAAH8BwABAQH/HgAB/AcAAQEB/x4AAfwHAAEDAf8eAAH8BwABAwH/HgAB/AcA
+        AT8B/x4AAfwHAAE/Af8eAAH8BwABPwH/HgAB/AcAAX8B/x4AAfwHAAF/Af8eAAH8BgABBwL/HgAB/AYA
+        AQcC/x4AAfwGAAEHAv8eAAH8BgABDwL/HgAB/AYAAQ8C/x4AAfwFAAEfA///AP8A/wD/AP8A/wD/AP8A
+        /wD/AP8A/wCqAAs=
+</value>
+  </data>
+</root>
--- a/DPM2016/Dokumente/Thumbviewer/ThumbViewer.vb
+++ b/DPM2016/Dokumente/Thumbviewer/ThumbViewer.vb
@@ -0,0 +1,382 @@
+Imports System.Windows.Forms
+Imports System.Drawing
+Class ThumbViewer
+    Private myImageList As System.Windows.Forms.ImageList = New ImageList()
+    Private myImageListSmall As System.Windows.Forms.ImageList = New ImageList()
+    Private myImageListLarge As System.Windows.Forms.ImageList = New ImageList()
+    Private count As Integer = 0
+    Private DefaultSplitsize As Integer
+    Dim m_data As DataTable
+    Dim d As New clsDok
+
+    Property Data As DataTable
+        Get
+            Return m_data
+        End Get
+        Set(value As DataTable)
+
+            m_data = value
+            Try
+                AddImages()
+                large_images()
+            Catch
+            End Try
+        End Set
+    End Property
+
+    Dim m_previewfilename As String
+    Property PreviewFilename As String
+        Get
+            Return m_previewfilename
+        End Get
+        Set(value As String)
+            m_previewfilename = value
+        End Set
+    End Property
+
+    Sub New()
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+        myImageList.ImageSize = New Size(50, 50)
+        myImageListSmall.ImageSize = New Size(32, 32)
+        myImageListLarge.ImageSize = New Size(80, 80)
+        Me.TrackBar1.Minimum = 20
+        Me.TrackBar1.Maximum = 256
+        Me.TrackBar1.Value = 80
+        Me.DefaultSplitsize = Me.SplitContainer1.SplitterDistance
+
+    End Sub
+    Public Function AddImage(ByVal imagefile As Object, ByVal name As String, ByVal key As Integer)
+        Dim img As System.Drawing.Image
+        img = GetImagefromDB(imagefile)
+        myImageList.Images.Add(img)
+        myImageListSmall.Images.Add(img)
+        myImageListLarge.Images.Add(img)
+        ListView1.LargeImageList = myImageListLarge
+        Dim lvitem As New ListViewItem
+        lvitem.ImageIndex = count
+        lvitem.Text = name
+        lvitem.Tag = key
+        ListView1.Items.Add(lvitem)
+        count += 1
+    End Function
+
+    Public Function AddImages()
+        Me.ListView1.Items.Clear()
+        For Each r As DataRow In Me.Data.Rows
+            Try
+                Dim ext As String
+                ext = UCase(System.IO.Path.GetExtension(r("pfad")))
+                Dim img As System.Drawing.Image
+                Select Case ext
+                    Case ".PDF"
+                        img = Me.ImageList1.Images(0)
+                    Case ".MSG"
+                        img = Me.ImageList1.Images(3)
+                    Case ".DOCX", ".DOCM", ".DOC", ".DOC"
+                        img = Me.ImageList1.Images(1)
+                    Case ".XLSX", "XLSM", ".XLS", "XLM"
+                        img = Me.ImageList1.Images(2)
+                    Case ".TIF", ".TIFF", ".JPG", ".PNG", ".BMP"
+                        img = GetImagefromDB(r.Item("dokumentfile"))
+                    Case Else
+                        img = Me.ImageList1.Images(5)
+                End Select
+                myImageList.Images.Add(img)
+                myImageListSmall.Images.Add(img)
+                myImageListLarge.Images.Add(img)
+                ListView1.LargeImageList = myImageListLarge
+                Dim lvitem As New ListViewItem
+                lvitem.ImageIndex = count
+                lvitem.Text = r.Item("bezeichnung")
+                lvitem.Tag = r.Item(0)
+                lvitem.ToolTipText = ext
+                ListView1.Items.Add(lvitem)
+                count += 1
+            Catch
+            End Try
+        Next
+    End Function
+
+    Public Function GetImagefromDB(ByVal imgfield As Object) As Image
+        Dim IMGC As New ImageConverter
+        Dim IMGPIC As Image = CType(IMGC.ConvertFrom(imgfield), Image)
+        Return IMGPIC
+    End Function
+
+    Dim InitLIst As Boolean = False
+    Public Function SearchItem(ByVal Key As Integer)
+        Dim i As Integer = 0
+        InitLIst = True
+        For Each item As ListViewItem In Me.ListView1.Items
+            item.Focused = False
+            item.Selected = False
+        Next
+        InitLIst = False
+        For Each item As ListViewItem In Me.ListView1.Items
+            item.Focused = False
+            item.Selected = False
+
+            If item.Tag = Key Then
+                item.Focused = True
+                item.Selected = True
+                'Me.ListView1.Items(i).Focused = True
+                'Me.ListView1.Items(i).Selected = True
+
+            End If
+            i = i + 1
+        Next
+    End Function
+
+    Private Sub ListView1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListView1.SelectedIndexChanged
+        If InitLIst Then Exit Sub
+        Dim key As Integer
+        key = ListView1.FocusedItem.Tag
+        Dim previewfilename As String = ""
+        If Globals.PreViewDir = "" Then
+            Dim db As New clsDB
+            db.Get_Tabledata("dms", "", "Select * from dms_Settings where nreintrag=6")
+            Globals.PreViewDir = db.dsDaten.Tables(0).Rows(0).Item(2)
+            If Not System.IO.Directory.Exists(Globals.PreViewDir) Then
+                System.IO.Directory.CreateDirectory(Globals.PreViewDir)
+            End If
+        End If
+        Dim txt As String
+        txt = ListView1.FocusedItem.ToolTipText
+        Select Case txt
+            Case ".PDF"
+                previewfilename = d.Get_Dokument(key, Globals.PreViewDir, True, True)
+                Me.KpImageViewer1.Visible = False
+                Me.grpdokumentvorschau.Visible = False
+                Me.grpdokumentvorschaupdf.Visible = True
+                Me.GrpDokumentvorschauMail.Visible = False
+                Me.grpdokumentvorschaupdf.Dock = DockStyle.Fill
+
+                Me.pdfViewerControl1.RenderingEngine = Syncfusion.Windows.Forms.PdfViewer.PdfRenderingEngine.Pdfium
+                Me.pdfViewerControl1.ReferencePath = Application.StartupPath + ""
+                Me.pdfViewerControl1.Load(previewfilename)
+            Case ".MSG"
+                Me.KpImageViewer1.Visible = False
+                Me.grpdokumentvorschaupdf.Visible = False
+                Me.grpdokumentvorschau.Visible = False
+                Me.GrpDokumentvorschauMail.Visible = True
+                Me.GrpDokumentvorschauMail.Dock = DockStyle.Fill
+
+                previewfilename = d.Get_Dokument(key, Globals.PreViewDir, True, True)
+                Dim msgreader As New MsgReader.Reader
+                Dim files = msgreader.ExtractToFolder(previewfilename, Globals.PreViewDir)
+                Dim err = msgreader.GetErrorMessage
+                webBrowser1.Navigate(files(0))
+            Case ".TIF", ".TIFF", ".JPG", ".PNG", ".BMP"
+                Me.KpImageViewer1.Visible = True
+                Me.grpdokumentvorschaupdf.Visible = False
+                Me.grpdokumentvorschau.Visible = False
+                Me.GrpDokumentvorschauMail.Visible = False
+
+                Me.KpImageViewer1.Dock = DockStyle.Fill
+                Me.KpImageViewer1.DoResize()
+
+                For Each r As DataRow In Data.Rows
+                    If r.Item(0) = key Then
+                        Me.KpImageViewer1.Image = GetImagefromDB(r.Item("dokumentfile"))
+                    End If
+                Next
+            Case Else
+                previewfilename = d.Get_Dokument(key, Globals.PreViewDir, True, True)
+                Me.KpImageViewer1.Visible = False
+                Me.grpdokumentvorschaupdf.Visible = False
+                Me.grpdokumentvorschau.Visible = True
+                Me.GrpDokumentvorschauMail.Visible = False
+                Me.grpdokumentvorschau.Dock = DockStyle.Fill
+
+                Try
+                    'Threading.Thread.CurrentThread.Sleep(1000)
+                    Try
+                        DocumentViewer1.CloseDocument()
+                    Catch
+                    End Try
+                    Try
+                        Me.DocumentViewer1.LoadDocument(previewfilename)
+                    Catch
+                    End Try
+
+                Catch es As Gnostice.Core.XDocException
+                    End Try
+        End Select
+
+    End Sub
+
+    Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
+        large_images()
+        Me.TrackBar1.Visible = True
+    End Sub
+
+    Public Sub large_images()
+
+        Dim imglst As New ImageList
+
+        imglst.ImageSize = New Size(Me.TrackBar1.Value, Me.TrackBar1.Value)
+        imglst.Images.Clear()
+
+        For n As Int32 = 0 To myImageListLarge.Images.Count - 1
+            imglst.Images.Add(myImageListLarge.Images(n))
+        Next
+        ListView1.LargeImageList = imglst
+        ListView1.View = View.LargeIcon
+    End Sub
+
+    Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click
+        ListView1.SmallImageList = myImageListSmall
+        ListView1.View = View.SmallIcon
+    End Sub
+
+    Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) Handles ToolStripButton3.Click
+        ListView1.View = View.List
+    End Sub
+
+    Private Sub TrackBar1_Scroll(sender As Object, e As EventArgs) Handles TrackBar1.Scroll
+        large_images()
+    End Sub
+
+    Private Sub ToolStripButton4_Click(sender As Object, e As EventArgs) Handles ToolStripButton4.Click
+        If Me.SplitContainer1.Panel2.Visible Then
+            Me.SplitContainer1.Panel2.Visible = False
+            Me.DefaultSplitsize = Me.SplitContainer1.Panel1.Width
+            Me.SplitContainer1.SplitterDistance = Me.SplitContainer1.Width
+        Else
+            Me.SplitContainer1.Panel2.Visible = True
+            Me.SplitContainer1.SplitterDistance = DefaultSplitsize
+        End If
+    End Sub
+
+    Private Sub KpImageViewer1_Load(sender As Object, e As EventArgs)
+
+    End Sub
+
+#Region "Gnostic"
+    Private Sub tsActSize_Click(sender As Object, e As EventArgs) Handles tsActSize.Click
+        If DocumentViewer1.IsDocumentLoaded Then
+            DocumentViewer1.Zoom.ZoomMode = Gnostice.Documents.Controls.WinForms.ZoomMode.ActualSize
+        End If
+    End Sub
+
+    Private Sub tsFitPage_Click(sender As Object, e As EventArgs) Handles tsFitPage.Click
+        If DocumentViewer1.IsDocumentLoaded Then
+            DocumentViewer1.Zoom.ZoomMode = Gnostice.Documents.Controls.WinForms.ZoomMode.FitPage
+        End If
+    End Sub
+
+    Private Sub tsFitWidth_Click(sender As Object, e As EventArgs) Handles tsFitWidth.Click
+        If DocumentViewer1.IsDocumentLoaded Then
+            DocumentViewer1.Zoom.ZoomMode = Gnostice.Documents.Controls.WinForms.ZoomMode.FitWidth
+        End If
+    End Sub
+
+    Private Sub tsZoomOut_Click(sender As Object, e As EventArgs) Handles tsZoomOut.Click
+        If DocumentViewer1.IsDocumentLoaded Then
+            DocumentViewer1.ZoomOut()
+        End If
+    End Sub
+
+    Private Sub tsZoomIn_Click(sender As Object, e As EventArgs) Handles tsZoomIn.Click
+        If DocumentViewer1.IsDocumentLoaded Then
+            DocumentViewer1.ZoomIn()
+        End If
+    End Sub
+
+    Private Sub btnFirstPage_Click(sender As Object, e As EventArgs) Handles btnFirstPage.Click
+        If DocumentViewer1.IsDocumentLoaded Then
+            DocumentViewer1.FirstPage()
+        End If
+    End Sub
+
+    Private Sub btnPrvPage_Click(sender As Object, e As EventArgs) Handles btnPrvPage.Click
+        If DocumentViewer1.IsDocumentLoaded Then
+            DocumentViewer1.PreviousPage()
+        End If
+    End Sub
+
+    Private Sub btnNxtPage_Click(sender As Object, e As EventArgs) Handles btnNxtPage.Click
+        If DocumentViewer1.IsDocumentLoaded Then
+            DocumentViewer1.NextPage()
+        End If
+    End Sub
+
+    Private Sub btnLastPage_Click(sender As Object, e As EventArgs) Handles btnLastPage.Click
+        If DocumentViewer1.IsDocumentLoaded Then
+            DocumentViewer1.LastPage()
+        End If
+    End Sub
+
+    Private Sub ToolStripButton5_Click(sender As Object, e As EventArgs) Handles ToolStripButton5.Click
+        DocumentViewer1.RotatePagesAntiClockwise90()
+    End Sub
+
+    Private Sub ToolStripButton6_Click(sender As Object, e As EventArgs) Handles ToolStripButton6.Click
+        DocumentViewer1.RotatePagesClockwise90()
+    End Sub
+
+    Private Sub txtGoToPage_KeyDown(sender As System.Object, e As System.Windows.Forms.KeyEventArgs) Handles txtGoToPage.KeyDown
+        Select Case e.KeyCode
+
+            Case Keys.NumPad0, Keys.NumPad1, Keys.NumPad2, Keys.NumPad3, Keys.NumPad4, Keys.NumPad5,
+             Keys.NumPad6, Keys.NumPad7, Keys.NumPad8, Keys.NumPad9, Keys.Delete, Keys.[End],
+             Keys.Home, Keys.Down, Keys.Up, Keys.Left, Keys.Right, Keys.Back
+                e.SuppressKeyPress = False
+                Exit Select
+
+            Case Keys.D0, Keys.D1, Keys.D2, Keys.D3, Keys.D4, Keys.D5,
+             Keys.D6, Keys.D7, Keys.D8, Keys.D9
+                If e.Shift Then
+                    e.SuppressKeyPress = True
+                Else
+                    e.SuppressKeyPress = False
+                End If
+                Exit Select
+
+            Case Keys.Enter
+                e.SuppressKeyPress = False
+                If txtGoToPage.Text.Trim() <> "" Then
+                    DocumentViewer1.GoToPage(Convert.ToInt32(txtGoToPage.Text))
+                End If
+                Exit Select
+            Case Else
+
+                e.SuppressKeyPress = True
+                Exit Select
+        End Select
+
+    End Sub
+    Private Sub txtZoom_KeyDown(sender As System.Object, e As System.Windows.Forms.KeyEventArgs) Handles txtZoom.KeyDown
+        Select Case e.KeyCode
+
+            Case Keys.NumPad0, Keys.NumPad1, Keys.NumPad2, Keys.NumPad3, Keys.NumPad4, Keys.NumPad5,
+             Keys.NumPad6, Keys.NumPad7, Keys.NumPad8, Keys.NumPad9, Keys.Delete, Keys.[End],
+             Keys.Home, Keys.Down, Keys.Up, Keys.Left, Keys.Right, Keys.Back
+                e.SuppressKeyPress = False
+                Exit Select
+
+            Case Keys.D0, Keys.D1, Keys.D2, Keys.D3, Keys.D4, Keys.D5,
+             Keys.D6, Keys.D7, Keys.D8, Keys.D9
+                If e.Shift Then
+                    e.SuppressKeyPress = True
+                Else
+                    e.SuppressKeyPress = False
+                End If
+                Exit Select
+
+            Case Keys.Enter
+                e.SuppressKeyPress = False
+                DocumentViewer1.Zoom.ZoomPercent = Double.Parse(txtZoom.Text)
+                Exit Select
+            Case Else
+
+                e.SuppressKeyPress = True
+                Exit Select
+        End Select
+    End Sub
+
+#End Region
+
+End Class
--- a/DPM2016/Dokumente/clsDokumente.Designer.vb
+++ b/DPM2016/Dokumente/clsDokumente.Designer.vb
@@ -52,7 +52,6 @@ Partial Class clsDokumente
        Me.ElementStyle1 = New DevComponents.DotNetBar.ElementStyle()
        Me.ElementStyle2 = New DevComponents.DotNetBar.ElementStyle()
        Me.GroupBox2 = New System.Windows.Forms.GroupBox()
-        Me.ThumbViewer1 = New DPM2016.ThumbViewer()
        Me.GrpDokumentvorschauMail = New System.Windows.Forms.GroupBox()
        Me.webBrowser1 = New System.Windows.Forms.WebBrowser()
        Me.ToolStrip3 = New System.Windows.Forms.ToolStrip()
@@ -95,6 +94,7 @@ Partial Class clsDokumente
        Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripSeparator()
        Me.NeuesDokumentAusVorlageErstellenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
+        Me.ThumbViewer1 = New DPM2016.ThumbViewer()
        Me.ToolStrip1.SuspendLayout()
        Me.GroupBox1.SuspendLayout()
        CType(Me.treestruktur, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -263,16 +263,6 @@ Partial Class clsDokumente
        Me.GroupBox2.TabStop = False
        Me.GroupBox2.Text = "Dokumente"
        '
-        'ThumbViewer1
-        '
-        Me.ThumbViewer1.Data = Nothing
-        Me.ThumbViewer1.Location = New System.Drawing.Point(9, 468)
-        Me.ThumbViewer1.Name = "ThumbViewer1"
-        Me.ThumbViewer1.PreviewFilename = Nothing
-        Me.ThumbViewer1.Size = New System.Drawing.Size(971, 596)
-        Me.ThumbViewer1.TabIndex = 12
-        Me.ThumbViewer1.Visible = False
-        '
        'GrpDokumentvorschauMail
        '
        Me.GrpDokumentvorschauMail.Controls.Add(Me.webBrowser1)
@@ -505,6 +495,7 @@ Partial Class clsDokumente
        '
        'txtGoToPage
        '
+        Me.txtGoToPage.Font = New System.Drawing.Font("Segoe UI", 9.0!)
        Me.txtGoToPage.Name = "txtGoToPage"
        Me.txtGoToPage.Size = New System.Drawing.Size(40, 25)
        '
@@ -572,6 +563,7 @@ Partial Class clsDokumente
        '
        'txtZoom
        '
+        Me.txtZoom.Font = New System.Drawing.Font("Segoe UI", 9.0!)
        Me.txtZoom.MaxLength = 4
        Me.txtZoom.Name = "txtZoom"
        Me.txtZoom.Size = New System.Drawing.Size(35, 23)
@@ -704,6 +696,16 @@ Partial Class clsDokumente
        Me.NeuesDokumentAusVorlageErstellenToolStripMenuItem.Size = New System.Drawing.Size(306, 22)
        Me.NeuesDokumentAusVorlageErstellenToolStripMenuItem.Text = "Neues Dokument aus Vorlage erstellen"
        '
+        'ThumbViewer1
+        '
+        Me.ThumbViewer1.Data = Nothing
+        Me.ThumbViewer1.Location = New System.Drawing.Point(9, 468)
+        Me.ThumbViewer1.Name = "ThumbViewer1"
+        Me.ThumbViewer1.PreviewFilename = Nothing
+        Me.ThumbViewer1.Size = New System.Drawing.Size(971, 596)
+        Me.ThumbViewer1.TabIndex = 12
+        Me.ThumbViewer1.Visible = False
+        '
        'clsDokumente
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
--- a/DPM2016/Dokumente/clsDokumente.resx
+++ b/DPM2016/Dokumente/clsDokumente.resx
@@ -198,7 +198,7 @@
        AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
        LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
        ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACU
-        CgAAAk1TRnQBSQFMAgEBAwEAAdgBAAHYAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
+        CgAAAk1TRnQBSQFMAgEBAwEAAfgBAAH4AQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
        AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
        AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
        AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
@@ -301,14 +301,14 @@
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHGSURBVDhPYxhcoGH1q/8gXLfyxf/SpU/3Q4XhILj3ZntA
-        /c0vUC4maFj94v+Wc5/+Lzr47n/BgocoBnh3Xm/3qp/5z7Xlxn+oECYoX/bs/4bTH/7P3ffmf+pMhAGe
+        /c0vUC4maFj94v+Wc5/+Lzr47n/BgocoBnh3Xm/3qp/6z7Xlxn+oECYoX/bs/4bTH/7P3ffmf+pMhAGe
        LVf7Mufe/z9hy/P/ltWXcBtQsODR/9Un3v+ftvPV/5iJd8EGuLdcm5c26/7//q3P//duevZfp+Q8bgNS
        Zz/8v/TI2//9W178D+y8ud+x/vKSlOl3/0/Y+gwYLo/+t6598l8u+yxuA2Im3f8/78Dr/zN2v/xvVn/i
        R/Gih//7Nj/7X7n84f/sOXf/1614+F8q6QRuA4K6b4I1gzRZVl94kzvv3v+2dU/+Fy68/z9p+u3/ZYvv
        /5eIPIbbAFAIT9z24n/5kof/tYrPH5DNPL3GpfHy/6rlD/4nT7/1v2D+vf/iQQdwGwAK4a6NT//nzr33
        XzbzLDgQJaOOrLQtv/A/b/7d/1mz7/wX89qL2wBQCDevefw/FehcycQT8GgU89i9yCL7FNgVIo67cRsA
        CuFqYEDFTbwB9OtRlIQkYrd1gXHKsf/CNttxGwAKYcmYY/8lQo/8Fw08gGIACAgZbpwtZLkNtwEDABgY
-        AOJ2DIFMpaCHAAAAAElFTkSuQmCC
+        ANX+DH3oaov/AAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="btnPrvPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -338,15 +338,15 @@
  <data name="btnLastPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHHSURBVDhPzZBRL1thGMfPZ6CsXPgAiy/QRSSEJbZYgsjS
-        EBFFwpKFTUjXRBVdVUNoDNUoKWvKQbBEg9l7kiG9kW1I04qq9rR1dMPNLnbl77zLiUTkveafvBfPP3l/
-        z5Mf97hi5KW/nV7Jooy3aXBESe2nCLRDYZTbQlDq++niJRiM3utWd+wOpHo4TGxfzjDxNYXi3iAb0OFJ
-        YtF/hb5lCXWjJ4NKzZVZQ6R3KY4RnwSNYZ8NaJmOgZcBnu+X+OBJoNQadNFe3koMXhEDq0nktv1gAxqc
-        UXzevsDYRgqubyk0TUag0f+c1eh/kffuU5gX48h5s8cGVNsjcAm/YVlOwrqShF0++a0MefrO/8/Ex9Dp
-        jSK7zs8GUMPjm+cwzovo5kXYVhNodISRU7/3p20mgnb5qbW7bAA1PLwmwTgnyhfE8dISQLbOvyBvFWrs
-        IbRMneBJucAGUMP9Kwl8lI0/NweQVbszR3u1doe8tgXQ7DxG5ostNoAa7lkQUWQ6QFbVrlupuYwygVSY
-        D6EbO4KqYJMNoIYL6Wft9rRS/U9GyRZ51bWPmpEg0vN8bAA1rK4UnMp4G1XBOlHlryP9mQ9pmjU24AHC
-        cTe9YwvnHM3wAwAAAABJRU5ErkJggg==
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHJSURBVDhPzZDfS1phGMfP37BsWRf9AbF/wBiDogYVBTVi
+        SBFRa1DBaC2KEtJW5kwaJTYryYWVWKeGNUj6+R5YhTeyakM0MqdH7eTWuumiq76ddxyEMd7r9YX34vnC
+        +3kePtz9ip6Xrvs9kkkZM2mZipHGiSi0YxHUWMJQ6n9j4CXo9PO3r13xvyD14xFi+XyO6e00SodCbECP
+        O4UV/xXeeSU0fTh7r9RctTlMhj4lYPNJ0OiO2YCO2Th4GeD+8ht97iQqzSEn7eWtROcRMbqWwqOur2xA
+        iyOGhb1L2DfTcO6m0ToThab3cF7Te0TeuH7AuJJAfnuADai3RuEUfsLkTcG8moJVPvmVDCno9N8M8HH0
+        e2LIa/KzAdTw5NYF9Esi3vIiLGtJvJyKIP9F4FfXXBTd8lNrD9gAanh8XYJ+UZQvSKDCFERes39Z3io0
+        WMPo+HiGnBqBDaCGR1aTGJaNPzUGkdu4v0h7tXafPLcE0eY4xcPyHTaAGh5cFlEy8A25dQcupeayqwXy
+        zPgdzfYTqIq22ABquJh+1u7NKtWfZJftkCrDMRpsIWQ99rEB1LC6VnAoYyaqog2ierKBrEIfHmjW2YD/
+        EI67A7B7C+MKaEv0AAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="tsActSize.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
--- a/DPM2016/Dokumente/clsDokumente.vb
+++ b/DPM2016/Dokumente/clsDokumente.vb
@@ -180,7 +180,7 @@ Public Class clsDokumente

    End Sub

-    Private Sub Form1_DragDrop(sender As System.Object, e As System.Windows.Forms.DragEventArgs) Handles Me.DragDrop
+    Private Sub Form1_DragDrop(sender As System.Object, e As System.Windows.Forms.DragEventArgs) Handles Me.DragDrop, C1Dokumente.DragDrop
        Dim files() As String = e.Data.GetData(DataFormats.FileDrop)
        For Each path In files
            Dim f As New DokumentDetail(Me.Patientnr, Me.treestruktur.SelectedNode.Tag)
@@ -191,7 +191,7 @@ Public Class clsDokumente
        Next
    End Sub

-    Private Sub Form1_DragEnter(sender As System.Object, e As System.Windows.Forms.DragEventArgs) Handles Me.DragEnter
+    Private Sub Form1_DragEnter(sender As System.Object, e As System.Windows.Forms.DragEventArgs) Handles Me.DragEnter, C1Dokumente.DragEnter
        If e.Data.GetDataPresent(DataFormats.FileDrop) Then
            e.Effect = DragDropEffects.Copy
        End If
@@ -690,6 +690,10 @@ Public Class clsDokumente
    Private Sub PrintButton_Click(sender As Object, e As EventArgs) Handles PrintButton.Click
        Me.webBrowser1.ShowPrintDialog()
    End Sub
+
+    Private Sub C1Dokumente_MouseDown(sender As Object, e As MouseEventArgs) Handles C1Dokumente.MouseDown
+        Me.C1Dokumente.Bookmark = Me.C1Dokumente.RowContaining(e.Y)
+    End Sub
 End Class

 Public Class DocumentNotLoadedException
--- a/DPM2016/Fakturierung/frmFakturierung.Designer.vb
+++ b/DPM2016/Fakturierung/frmFakturierung.Designer.vb
@@ -36,16 +36,11 @@ Partial Class frmFakturierung
        Me.ToolStripButton4 = New System.Windows.Forms.ToolStripButton()
        Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
        Me.ToolStripButton3 = New System.Windows.Forms.ToolStripButton()
-        Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
-        Me.tstxtsuche = New System.Windows.Forms.ToolStripTextBox()
-        Me.tsbtnfirst = New System.Windows.Forms.ToolStripButton()
-        Me.tsbtprev = New System.Windows.Forms.ToolStripButton()
-        Me.tsbtnnext = New System.Windows.Forms.ToolStripButton()
-        Me.tsbtnlast = New System.Windows.Forms.ToolStripButton()
        Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
        Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
        Me.lblTotal = New System.Windows.Forms.ToolStripLabel()
        Me.lblbetrag = New System.Windows.Forms.ToolStripLabel()
+        Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
        Me.grpOffeneRechnungen = New System.Windows.Forms.GroupBox()
        Me.C1Abgeschlossen = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
@@ -56,6 +51,8 @@ Partial Class frmFakturierung
        Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.toolstripmenuAusschlussaufheben = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolstripAusschlussVorschau = New System.Windows.Forms.ToolStripMenuItem()
+        Me.DateTimePicker1 = New System.Windows.Forms.DateTimePicker()
+        Me.Label1 = New System.Windows.Forms.Label()
        Me.MenuStrip1.SuspendLayout()
        Me.ToolStrip1.SuspendLayout()
        Me.grpOffeneRechnungen.SuspendLayout()
@@ -69,10 +66,11 @@ Partial Class frmFakturierung
        'MenuStrip1
        '
        Me.MenuStrip1.AllowMerge = False
+        Me.MenuStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiToolStripMenuItem})
        Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
        Me.MenuStrip1.Name = "MenuStrip1"
-        Me.MenuStrip1.Size = New System.Drawing.Size(773, 24)
+        Me.MenuStrip1.Size = New System.Drawing.Size(871, 24)
        Me.MenuStrip1.TabIndex = 20
        Me.MenuStrip1.Text = "MenuStrip1"
        '
@@ -92,10 +90,11 @@ Partial Class frmFakturierung
        'ToolStrip1
        '
        Me.ToolStrip1.AllowDrop = True
-        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbtnquit, Me.tsbtnSave, Me.ToolStripButton5, Me.ToolStripButton6, Me.tsbtnnew, Me.ToolStripButton4, Me.ToolStripButton2, Me.ToolStripButton3, Me.ToolStripLabel1, Me.tstxtsuche, Me.tsbtnfirst, Me.tsbtprev, Me.tsbtnnext, Me.tsbtnlast, Me.ToolStripButton1, Me.ToolStripSeparator1, Me.lblTotal, Me.lblbetrag})
+        Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
+        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbtnquit, Me.tsbtnSave, Me.ToolStripButton5, Me.ToolStripButton6, Me.tsbtnnew, Me.ToolStripButton4, Me.ToolStripButton2, Me.ToolStripButton3, Me.ToolStripButton1, Me.ToolStripSeparator1, Me.lblTotal, Me.lblbetrag, Me.ToolStripSeparator2})
        Me.ToolStrip1.Location = New System.Drawing.Point(0, 24)
        Me.ToolStrip1.Name = "ToolStrip1"
-        Me.ToolStrip1.Size = New System.Drawing.Size(773, 25)
+        Me.ToolStrip1.Size = New System.Drawing.Size(871, 27)
        Me.ToolStrip1.TabIndex = 21
        Me.ToolStrip1.Text = "ToolStrip1"
        '
@@ -105,7 +104,7 @@ Partial Class frmFakturierung
        Me.tsbtnquit.Image = CType(resources.GetObject("tsbtnquit.Image"), System.Drawing.Image)
        Me.tsbtnquit.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.tsbtnquit.Name = "tsbtnquit"
-        Me.tsbtnquit.Size = New System.Drawing.Size(23, 22)
+        Me.tsbtnquit.Size = New System.Drawing.Size(24, 24)
        Me.tsbtnquit.Text = "Schliessen"
        '
        'tsbtnSave
@@ -114,7 +113,7 @@ Partial Class frmFakturierung
        Me.tsbtnSave.Image = CType(resources.GetObject("tsbtnSave.Image"), System.Drawing.Image)
        Me.tsbtnSave.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.tsbtnSave.Name = "tsbtnSave"
-        Me.tsbtnSave.Size = New System.Drawing.Size(23, 22)
+        Me.tsbtnSave.Size = New System.Drawing.Size(24, 24)
        Me.tsbtnSave.Text = "Speichern"
        Me.tsbtnSave.Visible = False
        '
@@ -124,7 +123,7 @@ Partial Class frmFakturierung
        Me.ToolStripButton5.Image = CType(resources.GetObject("ToolStripButton5.Image"), System.Drawing.Image)
        Me.ToolStripButton5.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton5.Name = "ToolStripButton5"
-        Me.ToolStripButton5.Size = New System.Drawing.Size(134, 22)
+        Me.ToolStripButton5.Size = New System.Drawing.Size(134, 24)
        Me.ToolStripButton5.Text = "Fakturierung ausführen"
        '
        'ToolStripButton6
@@ -132,7 +131,7 @@ Partial Class frmFakturierung
        Me.ToolStripButton6.Image = CType(resources.GetObject("ToolStripButton6.Image"), System.Drawing.Image)
        Me.ToolStripButton6.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton6.Name = "ToolStripButton6"
-        Me.ToolStripButton6.Size = New System.Drawing.Size(68, 22)
+        Me.ToolStripButton6.Size = New System.Drawing.Size(72, 24)
        Me.ToolStripButton6.Text = "Drucker"
        '
        'tsbtnnew
@@ -141,7 +140,7 @@ Partial Class frmFakturierung
        Me.tsbtnnew.Image = CType(resources.GetObject("tsbtnnew.Image"), System.Drawing.Image)
        Me.tsbtnnew.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.tsbtnnew.Name = "tsbtnnew"
-        Me.tsbtnnew.Size = New System.Drawing.Size(23, 22)
+        Me.tsbtnnew.Size = New System.Drawing.Size(24, 24)
        Me.tsbtnnew.Text = "Neuer Datensatz"
        Me.tsbtnnew.Visible = False
        '
@@ -151,7 +150,7 @@ Partial Class frmFakturierung
        Me.ToolStripButton4.Image = CType(resources.GetObject("ToolStripButton4.Image"), System.Drawing.Image)
        Me.ToolStripButton4.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton4.Name = "ToolStripButton4"
-        Me.ToolStripButton4.Size = New System.Drawing.Size(23, 22)
+        Me.ToolStripButton4.Size = New System.Drawing.Size(24, 24)
        Me.ToolStripButton4.Text = "Dokumentinformationen bearbeiten"
        Me.ToolStripButton4.Visible = False
        '
@@ -161,7 +160,7 @@ Partial Class frmFakturierung
        Me.ToolStripButton2.Image = CType(resources.GetObject("ToolStripButton2.Image"), System.Drawing.Image)
        Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton2.Name = "ToolStripButton2"
-        Me.ToolStripButton2.Size = New System.Drawing.Size(23, 22)
+        Me.ToolStripButton2.Size = New System.Drawing.Size(24, 24)
        Me.ToolStripButton2.Text = "Dokument löschen"
        Me.ToolStripButton2.Visible = False
        '
@@ -171,97 +170,49 @@ Partial Class frmFakturierung
        Me.ToolStripButton3.Image = CType(resources.GetObject("ToolStripButton3.Image"), System.Drawing.Image)
        Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton3.Name = "ToolStripButton3"
-        Me.ToolStripButton3.Size = New System.Drawing.Size(23, 22)
+        Me.ToolStripButton3.Size = New System.Drawing.Size(24, 24)
        Me.ToolStripButton3.Text = "Dokument anzeigen"
        Me.ToolStripButton3.Visible = False
        '
-        'ToolStripLabel1
-        '
-        Me.ToolStripLabel1.Name = "ToolStripLabel1"
-        Me.ToolStripLabel1.Size = New System.Drawing.Size(39, 22)
-        Me.ToolStripLabel1.Text = "Suche"
-        Me.ToolStripLabel1.Visible = False
-        '
-        'tstxtsuche
-        '
-        Me.tstxtsuche.Name = "tstxtsuche"
-        Me.tstxtsuche.Size = New System.Drawing.Size(100, 25)
-        Me.tstxtsuche.Visible = False
-        '
-        'tsbtnfirst
-        '
-        Me.tsbtnfirst.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        Me.tsbtnfirst.Image = CType(resources.GetObject("tsbtnfirst.Image"), System.Drawing.Image)
-        Me.tsbtnfirst.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.tsbtnfirst.Name = "tsbtnfirst"
-        Me.tsbtnfirst.Size = New System.Drawing.Size(23, 22)
-        Me.tsbtnfirst.Text = "Erster Datensatz"
-        Me.tsbtnfirst.Visible = False
-        '
-        'tsbtprev
-        '
-        Me.tsbtprev.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        Me.tsbtprev.Image = CType(resources.GetObject("tsbtprev.Image"), System.Drawing.Image)
-        Me.tsbtprev.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.tsbtprev.Name = "tsbtprev"
-        Me.tsbtprev.Size = New System.Drawing.Size(23, 22)
-        Me.tsbtprev.Text = "Vorheriger Datensatz"
-        Me.tsbtprev.Visible = False
-        '
-        'tsbtnnext
-        '
-        Me.tsbtnnext.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        Me.tsbtnnext.Image = CType(resources.GetObject("tsbtnnext.Image"), System.Drawing.Image)
-        Me.tsbtnnext.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.tsbtnnext.Name = "tsbtnnext"
-        Me.tsbtnnext.Size = New System.Drawing.Size(23, 22)
-        Me.tsbtnnext.Text = "nächster Datensatz"
-        Me.tsbtnnext.Visible = False
-        '
-        'tsbtnlast
-        '
-        Me.tsbtnlast.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        Me.tsbtnlast.Image = CType(resources.GetObject("tsbtnlast.Image"), System.Drawing.Image)
-        Me.tsbtnlast.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.tsbtnlast.Name = "tsbtnlast"
-        Me.tsbtnlast.Size = New System.Drawing.Size(23, 22)
-        Me.tsbtnlast.Text = "Letzter Datensatz"
-        Me.tsbtnlast.Visible = False
-        '
        'ToolStripButton1
        '
        Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
        Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton1.Name = "ToolStripButton1"
-        Me.ToolStripButton1.Size = New System.Drawing.Size(23, 22)
+        Me.ToolStripButton1.Size = New System.Drawing.Size(23, 24)
        Me.ToolStripButton1.Text = "ToolStripButton1"
        '
        'ToolStripSeparator1
        '
        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
-        Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
+        Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 27)
        '
        'lblTotal
        '
        Me.lblTotal.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Bold)
        Me.lblTotal.Name = "lblTotal"
-        Me.lblTotal.Size = New System.Drawing.Size(37, 22)
+        Me.lblTotal.Size = New System.Drawing.Size(37, 24)
        Me.lblTotal.Text = "Total:"
        '
        'lblbetrag
        '
        Me.lblbetrag.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Bold)
        Me.lblbetrag.Name = "lblbetrag"
-        Me.lblbetrag.Size = New System.Drawing.Size(93, 22)
+        Me.lblbetrag.Size = New System.Drawing.Size(93, 24)
        Me.lblbetrag.Text = "ToolStripLabel2"
        '
+        'ToolStripSeparator2
+        '
+        Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
+        Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 27)
+        '
        'grpOffeneRechnungen
        '
        Me.grpOffeneRechnungen.Controls.Add(Me.C1Abgeschlossen)
        Me.grpOffeneRechnungen.Dock = System.Windows.Forms.DockStyle.Top
-        Me.grpOffeneRechnungen.Location = New System.Drawing.Point(0, 49)
+        Me.grpOffeneRechnungen.Location = New System.Drawing.Point(0, 51)
        Me.grpOffeneRechnungen.Name = "grpOffeneRechnungen"
-        Me.grpOffeneRechnungen.Size = New System.Drawing.Size(773, 161)
+        Me.grpOffeneRechnungen.Size = New System.Drawing.Size(871, 161)
        Me.grpOffeneRechnungen.TabIndex = 22
        Me.grpOffeneRechnungen.TabStop = False
        Me.grpOffeneRechnungen.Text = "Abgeschlossene Behandlungen"
@@ -280,13 +231,14 @@ Partial Class frmFakturierung
        Me.C1Abgeschlossen.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.C1Abgeschlossen.PreviewInfo.ZoomFactor = 75.0R
        Me.C1Abgeschlossen.PrintInfo.PageSettings = CType(resources.GetObject("C1Abgeschlossen.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
-        Me.C1Abgeschlossen.Size = New System.Drawing.Size(767, 142)
+        Me.C1Abgeschlossen.Size = New System.Drawing.Size(865, 142)
        Me.C1Abgeschlossen.TabIndex = 3
        Me.C1Abgeschlossen.Text = "C1TrueDBGrid1"
        Me.C1Abgeschlossen.PropBag = resources.GetString("C1Abgeschlossen.PropBag")
        '
        'ContextMenuStrip2
        '
+        Me.ContextMenuStrip2.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.ContextMenuStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuAusschliessen, Me.ToolStripAbschlussVorschau})
        Me.ContextMenuStrip2.Name = "ContextMenuStrip2"
        Me.ContextMenuStrip2.Size = New System.Drawing.Size(148, 48)
@@ -307,9 +259,9 @@ Partial Class frmFakturierung
        '
        Me.GrpAusgeschlosseneRechnungen.Controls.Add(Me.C1Ausgeschlossen)
        Me.GrpAusgeschlosseneRechnungen.Dock = System.Windows.Forms.DockStyle.Top
-        Me.GrpAusgeschlosseneRechnungen.Location = New System.Drawing.Point(0, 210)
+        Me.GrpAusgeschlosseneRechnungen.Location = New System.Drawing.Point(0, 212)
        Me.GrpAusgeschlosseneRechnungen.Name = "GrpAusgeschlosseneRechnungen"
-        Me.GrpAusgeschlosseneRechnungen.Size = New System.Drawing.Size(773, 161)
+        Me.GrpAusgeschlosseneRechnungen.Size = New System.Drawing.Size(871, 161)
        Me.GrpAusgeschlosseneRechnungen.TabIndex = 23
        Me.GrpAusgeschlosseneRechnungen.TabStop = False
        Me.GrpAusgeschlosseneRechnungen.Text = "Ausgeschlossen"
@@ -328,13 +280,14 @@ Partial Class frmFakturierung
        Me.C1Ausgeschlossen.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.C1Ausgeschlossen.PreviewInfo.ZoomFactor = 75.0R
        Me.C1Ausgeschlossen.PrintInfo.PageSettings = CType(resources.GetObject("C1Ausgeschlossen.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
-        Me.C1Ausgeschlossen.Size = New System.Drawing.Size(767, 142)
+        Me.C1Ausgeschlossen.Size = New System.Drawing.Size(865, 142)
        Me.C1Ausgeschlossen.TabIndex = 3
        Me.C1Ausgeschlossen.Text = "C1TrueDBGrid1"
        Me.C1Ausgeschlossen.PropBag = resources.GetString("C1Ausgeschlossen.PropBag")
        '
        'ContextMenuStrip1
        '
+        Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.toolstripmenuAusschlussaufheben, Me.ToolstripAusschlussVorschau})
        Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
        Me.ContextMenuStrip1.Size = New System.Drawing.Size(186, 48)
@@ -351,11 +304,31 @@ Partial Class frmFakturierung
        Me.ToolstripAusschlussVorschau.Size = New System.Drawing.Size(185, 22)
        Me.ToolstripAusschlussVorschau.Text = "Vorschau"
        '
+        'DateTimePicker1
+        '
+        Me.DateTimePicker1.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
+        Me.DateTimePicker1.Location = New System.Drawing.Point(754, 24)
+        Me.DateTimePicker1.Name = "DateTimePicker1"
+        Me.DateTimePicker1.Size = New System.Drawing.Size(109, 20)
+        Me.DateTimePicker1.TabIndex = 24
+        '
+        '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(679, 27)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(69, 13)
+        Me.Label1.TabIndex = 25
+        Me.Label1.Text = "RG-Datum:"
+        '
        'frmFakturierung
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.ClientSize = New System.Drawing.Size(773, 363)
+        Me.ClientSize = New System.Drawing.Size(871, 363)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.DateTimePicker1)
        Me.Controls.Add(Me.GrpAusgeschlosseneRechnungen)
        Me.Controls.Add(Me.grpOffeneRechnungen)
        Me.Controls.Add(Me.ToolStrip1)
@@ -388,12 +361,6 @@ Partial Class frmFakturierung
    Friend WithEvents ToolStripButton4 As ToolStripButton
    Friend WithEvents ToolStripButton2 As ToolStripButton
    Friend WithEvents ToolStripButton3 As ToolStripButton
-    Friend WithEvents ToolStripLabel1 As ToolStripLabel
-    Friend WithEvents tstxtsuche As ToolStripTextBox
-    Friend WithEvents tsbtnfirst As ToolStripButton
-    Friend WithEvents tsbtprev As ToolStripButton
-    Friend WithEvents tsbtnnext As ToolStripButton
-    Friend WithEvents tsbtnlast As ToolStripButton
    Friend WithEvents grpOffeneRechnungen As GroupBox
    Friend WithEvents GrpAusgeschlosseneRechnungen As GroupBox
    Friend WithEvents C1Abgeschlossen As C1.Win.C1TrueDBGrid.C1TrueDBGrid
@@ -410,4 +377,7 @@ Partial Class frmFakturierung
    Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
    Friend WithEvents lblTotal As ToolStripLabel
    Friend WithEvents lblbetrag As ToolStripLabel
+    Friend WithEvents ToolStripSeparator2 As ToolStripSeparator
+    Friend WithEvents DateTimePicker1 As DateTimePicker
+    Friend WithEvents Label1 As Label
 End Class
--- a/DPM2016/Fakturierung/frmFakturierung.resx
+++ b/DPM2016/Fakturierung/frmFakturierung.resx
@@ -268,133 +268,6 @@
        wJoACUUiMjHalXRcPsqEWL7fcMfjSR5gxpzZAtc7N97anSgWi1fEuERy5+69S+73H/me4aHeYiLCv6Cb
        MWDevIil18vI5vOjYryr+w+lt7X6Z9sGw2xxmGdN88VPPn/tpeUVfL7PNf4Gp8To/ysQCBzhOO5yuVw+
        1l2RSH4BvQRqc//87N0AAAAASUVORK5CYII=
-</value>
-  </data>
-  <data name="tsbtnfirst.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAb0SURBVFhH7ZZ5UJNnHsftzh6ddXd2XbfiScIhuNTR7bpd
-        ioqplktBlHIjKoIHlTOQEO5gICRAIAeHBAiQEJAz3ISWpWkpp3Jf4irbbbvq2N0d9x+3O63td5+8xsxg
-        mFbtrH/1O/OZ58n7zLzv53l+v/edrPkhLyoc+UfmvWN/82gbvP5Lw6UXF9sgdTgjrvPB3PI/EVf4wRKX
-        y/2RYelRUir+SmMrbujsmR1fboro+DJAOKGLr1igGZafO3Y+Db+x8VNr3Nmd6J3/HDP3vsAbYTWw9axY
-        eQqsigXd4Mxt1HeP4UrXGHSTf0eSYl5nWH6uWAfWMmwCVZ9yykegW76PPy//m3Aftr6lpgK001VfyZS9
-        kFZ1UlQ166C/Zlh+pjAYuh9vD1Dx7MKbHir6ltA5dwcds7fRTjaoH228i4hAzkoBu9Ae5JZqjMjr3oXN
-        iUYYlp86tv5V9O0B1UMns3rRMHwT9SO3jFwxjNbHxVj/pMCO023IlDUYKVJ2wzpA/UwCNv5qf1v/2vsZ
-        1cNQ6RZR9f4CYRHVBP34eG7lKTIV0O82RaQ2UlDRDivfqqcS2BWsWrvdX6VwYXK/kWquoqRrApe7p1Cq
-        nYZcT+/MI7QzKCOjpbvQVEC/Wxa/CuxsJYWwpAUWXvLvFLAOUL5mFVC9FCbshrh5CAXNw5BoxiBtuwZZ
-        +zgKOyZQ1DlpRP/b4nAW1u9lrxSw8qlEXFY1WAIiQsgu0YDuWfgtAnjJJqCa+fqJmv+yi7XIVPaBX6OD
-        sG4AuQ1DEDWNIr/5KsSaaxC3jhMmHqEZB8310ioCb8sRL6gFO6eeQlDaAfpR8aoClsGqDda+lT1usXVI
-        KGxFUkknUsu04Fb2gafUga8egODKMBEZQ17TNYiax4nMBBn1jMPcOc1UwPJ4IVi5TUgQtVAIy7Ww8Mgz
-        EbDyq3TdHlh21y9RhQhyUtF5DYiTaJBQ3IlkeS/SFf24pPwQWephInEVOY3jyG2aRF7zFIV+bv5W8ioC
-        ngXgFLQjUdKFJGk3+GXvweJItlHAzrfxp9beZaI9DPnXARw5TqXIEcqtxAV+LSKJOFPSTiS0SC7rR3rl
-        AHg1I+DXjUPYMImcpmny4Bkj5oc4qwh45CBRpkWC9F1E5nThSFQV6G48o4Dl8ct9jqFF8I6VwDtGAh+m
-        DEGJcoSkK3GeX4/IvFYwpT1IuNyPFMVHyFCNIatuAoL6aSIwS3Y/Z4R2iEUEQlcKWBzhw4vTCJ+kNgqv
-        hEbQXdOMAhaesmr7YDHePHkJrmez4fGOCN7MYgQmKhCSUYsLghZEFXQjvrgfSeVD4CqvIbN2CoKGWeQ2
-        L0DUskiRr1kE7WCcqQDdLQPBPC1OZ/VRnOD1gO6ctKIHaIezw60YvAebHS6AzojAH7zScCg0H17MCpxM
-        q0c4Obn4Ih1SFSPIrCF1b5yDpHWJvH43cblnmXwbCGSkH4xZRcAlBedEH+CieJBCP6c5sU2akOaU+rtt
-        LqlTO9yTYe3Mxk7PDNgH5ePguTJ4MOvgl9qJEH4f3ikYRFzJOJIr53BJfQP8+lvIblgGv/EWzBmRWG/7
-        hADNmYPo4lGw5JMUUUWjpFliTQT0sXaL+tmmA6yCVxmMr/8UmAMHUhqn8Ap4shoRyO1GmPB9RElHkFA+
-        jYyaJQibPoa44zYkHXeQ3/EZEbhoKrDtrTiwK6bArblOwSqfwrY3I1cVeJxNDhGuFk4xdxnnC+ESUYXj
-        7CYEZWhxNleH6MIxJCpmwav7C0Stn6Gk9x8ofe9fkGrvwvxAOBHwfELgYDSSVfMQNn9MkaScx1ZG+LcK
-        6GPmEL5hg31Y1xshOfBO0RCBHpzNIQKyUSRWzIBXewN5mk9R2HMPxdrPIe65g20HzpkKbCHHklp3HZLO
-        OxSptdexxfHsdwo8ziuvBUfauIT9x5fXhlBSggjJMFXKNOUiVf/clk8oEUHbJ9jqGGYqsJlYpdQtUbXS
-        k0IENu0PeWoBfdbt8ttp9nrwrAtbgXDpIGKKxqg+SKteQIZ6iWrG9Iab2EzuayKwcf8ZcNQLVMPo4ZBy
-        mO07+UwC+tBop19e9+rbsp1+Kd+EFg1QvRBfOoGEsmlwiAyL3HfjvlOmAltpwV9Fq2aQrlqkiCLz39K8
-        nusvmT6/3uHpvu6PfveO8ltwsXAUkeSt0HOxbBxme4OxxnbvSoFjZ5IHA6XtiK2ZR6x6Hu6ZNbC09/nQ
-        sPxcWbvzqNkvbN20u8mX85RsAKGCfpyRDeEVhwBTASY33/pYSMLgFrvAhxvt7B7a7vcd2OUYbGFY/j55
-        aa2lU+yvdh/7woVHvhOKMdIDQaYl+H/n5/R9u1+mOc4zOBLYB8Y92LPn/E8MSy8u+oc6xwgP72WJf2+4
-        9ENI1qz5H5t6trPpJ4eoAAAAAElFTkSuQmCC
-</value>
-  </data>
-  <data name="tsbtprev.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAATuSURBVFhH7ZVrTFNXAMfNMrclRp0vwAeyDQukkSxOEUFd
-        dRCQKI/J++F4KagoIFZABG8FKgVaKNDCqEBpeZZHEdCWTR4O5VVKizAJm+A2cZpNk73MPixu/x2uNS77
-        JlI++Ut+ueeeJj2/3nt676LXGBNK3mfSofneUavVLjZMLRw2wVWhB1NUv4/ffYyEoq96DdPGZ1Nw1TIr
-        /+pa14RWtOsfQv/gCbaFyWH42LiQxXdY+cmmT5f0oWf6F3Td/ZX2PU+xkQMo6g1GYFWK/QHFX5KOCVwZ
-        f4i2sQe07UQL9wLjBTB8KtczAuTdARw16vvuoH5w+oUDU1AMTmHjfoFxAqyCZJ6bD0kfpVb0oer6BCq7
-        iT3/0XBuvi97fgMsQqXvMPzlYqdY6h+hUoOSqzp8rtKjVD2K0o5bkBBnj8/H61248xdg4yffzAiQjodx
-        r0LY3I/85gEIW4ZQeHkYRa1aiNpGIGrXvbBNh3VOF+YnwMq/8hgz/NKfbJEamfJOXKzuAa+uFzmKPvAb
-        B5HXrEG+cpgEaYkjtPlKLdbuTX21ABsv2apN/pUtLrE1SCy6jLMl7Ui7pAanohMZsh5wq3tJSD8JGUJu
-        4zD4TVoImkcgaBqhx2as5LkHWPpL99j4SWd8k+SI4dUgjt+A0wUtSBJfwTnJF6AqupAu6wW3ph9ZdRpk
-        N2hJhA65TXraHDI23c1++QAWi3pzk7ckk3mIehqQJEHoOQkiOVIc5dbgZG4jTglbkShWk4guUNJepFcN
-        gFurBU+hI4uOEm8ZHIXprlMvH2DpVXJtV4QI3vEFRCF8E4oQnCxBOCVDNLceJ/gtSChUIamkC6nlN8CR
-        a5BZO4IsxSiyG8eQ0zROm0s03Rn78gEWnsJrO0Pz4RSWAbcoHtyPC+CTIEbQ2QqEc2oRnaVEbJ4KbHE3
-        Usr6QMmGkVmjJ1dgdvHb4DdP0AqUEzBzjJnbLbBw42V8wKSertsRBYZTHLb7cuByRAgfdgXCOA2I4auQ
-        WHwd56WDZA/oyab7GoWtkxBfuUOeC9PPVE/DzOHY3DehuWvabnPXcz9YuyXD0pkNWw8O7IME+CRKggOn
-        6uCX2o4wbieO5d1EQrEWKRXj4FRPgls/9cyGKZiRH2D4urlhwYp7dwOLrbA9yIFdAA8OIUI4Hy2HJ7sB
-        gZQKkbxunCwcRNKlUXCqJsFr/A55rfeR3/YjBG0zMLOPfLWA55g6xIRb7GP/sTdaDJfjUnidaUIweQkd
-        ybmOuKIhnC0fQ0btHQguz6C44xFKvnyMAvVDmNqHzU/ALKvtoxlr7SM0H0cJ4Z2iRBAJOJzTg1gSkFw2
-        hvTab8FvuQeR6ieI1T8jnwSYbP9s/gJotkYtXr0lJIvJTHkaSN4JEeQWnCjox5lSPc7LJ3BRMY1c5T1a
-        Xts9mNgFz3OAgVUf+u01cQyd8Uirw1HhTcSLNGQf3EKabAIXar6hpRqnsGZboHECZlnG9Fm5wvZgs11E
-        FqLE/YgjEexSHb0hZ2POVN/Gqq1+xgt4znIbz8MbHA4/8SHPhuOFAzhZQCTHmHIdVn7kbfyAWZZau1ov
-        Zx7Q7ogXIbzwBv33DC8ewIotXgsTQMP0fWuJpXOOOYv1t3t2O4LKhrBm66cLGGDg7Y17nJa8v/u+c7oE
-        tocSfzNMLyzWjh5L98VmhdjFXHQwTL3mfyxa9C8BQ0Drrw8VXgAAAABJRU5ErkJggg==
-</value>
-  </data>
-  <data name="tsbtnnext.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAUdSURBVFhH7ZVpTJRXFIZJU5smRls3tFrBqiyl4q4oLgOK
-        CrVlU8qmIIggSxEQAQecBYZFBnSQfRmWmWEoWwHZtAOOM4DAMCMooqao1DU1rTG2tj8a27eXLzf910SB
-        8ZdP8iY3955z7pt7zpfP4B3/h1arndap+claKBkypFtvlyiRSj1871e4stt+s/CW+9Ltt8f6QxKM/PwH
-        mq4+wa7IJph6yuTLvaUz6bH+WeKUC+3jl+i89wLKO88RldcD028q7pp7SzfREP1i/HUWVHeeoeXGU0at
-        I09ReOEWrL6q+cvMU8o24HLfo6H6wWhvJtqHH6NO+4BRLaP7qOkbg1fiBZh4SC6Z+JQvouFTz2L706jr
-        H4Os685/knaNQqoeRWX3KLgVfVjhU/bL514yJ5oytSzanQzJ5dsQd9xCKZG44yajEgXRDyMovngDOeeH
-        sDuS+4+ZuyTX2LfsQ5o6NSzcySc9H0Z+O1XbMPLariOv9RpyW4aQ0zyIc006YkKHIKECJp5lw+YHJCto
-        +uT5xDYBWU2DRENUZN04CFHDVZz9XovMugFk1PYjvboXaVXdSChRwuJw8Z+mnpJgWmJyLGDFIaNOh8z6
-        q4zG18JaLdJrBnC6WkMu7UNKZQ8EUjX45UpwxR3glCjgHFuP5e7lDeYHK+bQUhNj/rZocpGWSMcojaxT
-        vxtAirwfAlkvEiXd4JWrwBErEV+kQFx+O6KzWxAlaoRfUj1WHix7uGxfsQ0t9+bM3xKJlCodkuVaRoJK
-        LZJkGnJxH7n4Ck6VqhFfrERcQQeicy4gUtSM6KxmHBVUYd+xXKxy4sDYgvtqqUuBgMXivk/Lvj6G1uEQ
-        yHVIlGnBl45rgHx6GnDK+xAv7kGCuAsxeZ0Iy2jFIV4tXCJLsclLiBWOPJjsjoXR9nAYbjyCT3ckYJlz
-        voKWfX0MN4cgvlSDE4W9OJ5/BRHZXQgTqcjEd8Iv+SLc2I1wPF4N+28l2BFYjK2+2djgIcRK50SY2Z+E
-        MSsCC6yCsMSOjaVOogkYIMlh53oQmKFCoFCFgHQl/FM74StQwJvfDveEZriQgdsbIceu4FJs98+DlVcm
-        VrkIYO7AJq8QAzPSAmOHtKSJtWBjAKIKBhCW1YtQ0RUEn+lGEDFzOO0SY8KL14b97CbmFfaEVsDmcAE2
-        eZ/BGtdkrNkvwHJ7/v3Fe/jbaLk3x3CDH2JLh8hfUIvI3AGEZ/czRoIy1PAnJg4mXYT7qRY4n6iFA2mD
-        bUAhtvhmYZ17Cox2nKg2ZnE/pqUmxrx1PkiovInY4muIKRokc6DDsRwNMdGDI+mX4ZusgCenlWmDQ7gU
-        dqFFMP4y+veFW8P9aInJMXetN/g1ozhVMYL4shuILbnGmAg/14ejmWr4pXTAk9uGfewG2IbkYPHWIM0i
-        qyATmj555qzxgKBxDInyH8GV3mZMxBQNIYK8wvg8+JGB9EhqgYUH95Xhep9Ug3WB02jq1DB7tRvS2h4h
-        teYeBFWj4EhuIY68wvg8BJM2uPBqYGQT+HD+Wi9bmjK1zFrpinTFU2Q0PGBM8GS3cVJ8HWGFGliHnMHc
-        1W71My32z6bhU89Hlk4QKp/h7PnHSKsdA5cYOJSvwmcOR1/OsnQJoGH6Y+YXe5Gpfs4Y4NXdhR1Hglmr
-        XLUzLB3NaIh+mbPaEQkdTxBC/gMmLNbf003t0w0s3D6gx/rH8kDMi10CMWaY2j2avtRmJ91+e2wITdls
-        H5l6wMzafwbdeoceMDD4F+v0NgfWMPF+AAAAAElFTkSuQmCC
-</value>
-  </data>
-  <data name="tsbtnlast.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAcBSURBVFhH7ZZ5TJRnHsdJs9ts0ujWar0QhxtKvahrsYoO
-        KCCo5VBYTkUQQQFHwIEBZmQ4hmE45b6HYQ4GGUBukIKOICjHjEABcReraT02ZtM03TX7h3X3uw9v3kCb
-        oY01qX/1k3yTJ8/veL/z/J7J++r9zo/h8/nvHOd1WzNj2tfQW28XpwtNN29oH8P6tPJflv7yQHr77fGR
-        txjT/3iBFs0zOEa3wdxXoTT1l6+kw28Mt/ohI1b8N7VNdPvLDRHtL31EWvXF6lkGHV7C0K0EmqcvcP3h
-        91A/+A4xpcMw/6v0K3Iau+mUN4JdPasemnqKK12jqO8chfruEySIZ9R0eAnG5wUYePAtOmeeU+qafY6K
-        a3OwOap6aeErTySX5B069VfBCJT8UCi9hgJJByVJkxoLe3R4ic1HctEz/RRNmm8oNVL6GqqRR/BLvQYz
-        H9kNs5O1+nT6a2MV3I2s8quLqlD2wtxfBTq8hIFzJppGH0Fx68Gi5LfmIR+cR93QPPjSEWw5KfnnR34K
-        N7rktbAMbEVaYcOiiqVdMPVR6BrQd0qH7OZ9iPvnUEMk7r9HqbqP6ItZVPXOoLh9Ek7R/P9ZeMtKyDH+
-        iS79RRZ+LTdHsai86jaYeEl0DWw8mEJmPo2yHlrd0yjt/hKlXVMo6ZxEcccECtu0xIQWYdl9MPOVTFsG
-        yLbQ5T/Lwq9lp0sQK5RSEpU2w8ijQtfABnseCtomiCZpkXXrBPJb7uLyVQ1ym8aR0ziKrIY7ENUPgVet
-        htXpqv+Y+8rO0S2WxcSzBjGCWrAziBEiYelVGLoW6RpYz4xHTpMWuc13KS2ssxs1yFKNI7NhjDx0BMK6
-        YQjkg0ipVYMv7kdSdR/cOc0w9a5tsTwhXU23+gkmxypwMaMOsZlXKGWUt8Pw88u6BtbtY5MHaYi0lERk
-        nXFlHELlKASKO0iVDSG5dgBJYjW4lX2IL+sBu6gTMfmtCEprxrYTkscmx6vs6HaLGLsXgZ3ViLicZkqi
-        qh4YHc1exsDeaAjrtUhXaigJ6jRIU4yRB4+QB9/GpZpBcKvUiC/vB7v4GqLzO8Au6MBZQT2OXyjBdrck
-        MKz4r4w9ygVMJv8PdFs9Y9c8cPLaEJ/fiYSCLqRXfgGjw0JdA2v3sCBQapGq0CBFvqBx8tcbQ1LtCLji
-        YfDEtxBXeh2ROV04ldwIj+ga7PbLxhbXZJg5cbB5PwtrPz2DTQd4MHEv66Pb6hkfzUR8YQ/iCnoRmdmJ
-        w+clMHROXcbAZ+Hg1owhtuIOLpbdRlTRLUTmD5Abfx1B6b3wSmyF68UGOJ+X4UBoFWwDi7DLJxvb3FNh
-        4ZwABjMK623CYOiQCGO3/EUDRofT4cFRwTOhlZJHnAqGhy4tY4AURxYOIzRnAKHZAwjJUiM44zoCBX3w
-        T+mBN6+DNGrGkSglHM/VYH9wKWz8crHdQwBLl0RyCnGwICNguIjSfjwCQ+dkBKT2UH2oXqndMHRMWMbA
-        pyGIKR9HZMEdROTfxrm8IYQRM6dFN6hCv+RueCa2UadwKEIKu9Pl2O2fB+tj6bD2FMDUOeVrg0Mp++h2
-        ixg6cXEm5ybCLw9RWlgzHGKXMbArCJyaSfIW1CC6ZBysolHKSFjOIIKJiRNpvfC+1An32Ea4kDHYh1Rg
-        b2ABdnoLsflAbAODyX+fbvUTGI4csEpGwK64S+l88QjJj9I18OHOk+DV3QOnagpxlRPkHmhxoXiMmBjG
-        maybCEzvg29SFzUGF5YcDhGVYBxm/3ujLSuIbrEsBgdjEFs9Ab58jhK7agIGdpG6BtZ84o8U1TwuSWfB
-        lcyAUz1FmWAVjuBs7iCChP3w5XfjeGIL7MOLYWAbNqZvE2ZGl/8sBvYsJMpmIGp6RClBOoNNzLO6BlZb
-        +0DQ+gipyr8Tp/cpE3GVk4gip7BwH4LIhfRJ64SVD//V2r+czNDbGfpHuvQX0WeGg6ecQ37HM0q8ujno
-        7wvRNfDBDi+Iup8gQ/UQgvp5JMnmEE9OYeE+nCNj8EhWYbNd6ON1n/jZ0yWvxcb9Z8BV3sfl9qeUuMTA
-        BttTugZWbTuGrL7nyGn5hjKRrLhPPp2+RGTFGPaE52HNDq/mlVaeH9Dpr816W3K5FbMQNZIREHHIONbt
-        PaFr4M9b3ZCt/pZyuZDIJwZOlQ3AyOXsi1VbPULotF/NJkbADyzZFDnRe5TOk/UahofuJ9nKj48gd/A7
-        ykBy01dwSJJh1fZjmhVbXS3olDfCLShxyLegDVHyGUQpZnAkTQ5jG88BOrzE6h2u4PU/Qzh5D5gxmf99
-        z9w5S8/K6106/MZE83NN3U7FDelb+b5ab2X1ysLWa3DbvgAjOrzE1oC47x0FYqwwd3jynrHdQXr77bEr
-        QviZc3RGgMWe4BX01u/8xujp/R8+75YoB9R89wAAAABJRU5ErkJggg==
 </value>
  </data>
  <metadata name="ContextMenuStrip2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
@@ -437,7 +310,7 @@
 </value>
  </data>
  <data name="C1Abgeschlossen.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{ForeColor:ControlText;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 765, 140&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 765, 140&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 863, 140&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 863, 140&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
  </data>
  <metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>231, 17</value>
@@ -479,7 +352,7 @@
 </value>
  </data>
  <data name="C1Ausgeschlossen.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{ForeColor:ControlText;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 765, 140&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 765, 140&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 863, 140&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 863, 140&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
  </data>
  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
--- a/DPM2016/Fakturierung/frmFakturierung.vb
+++ b/DPM2016/Fakturierung/frmFakturierung.vb
@@ -19,6 +19,8 @@
        spalten.Spaltentitel_aktualisieren(Me.C1Ausgeschlossen, ausgeschlossen.TableName, ausgeschlossen)

        refresh_total()
+        Me.DateTimePicker1.Left = Me.Width - Me.DateTimePicker1.Width - 20
+        Me.Label1.Left = Me.DateTimePicker1.Left - Me.Label1.Width - 20

    End Sub

@@ -79,6 +81,12 @@
        Dim anzahlraten As Integer = 0
        Dim Empfaenger As String = ""
        db.Get_Tabledata("Behandlu", "where nrbehandlung=" + r.Item("nrbehandlung").ToString)
+        If Me.DateTimePicker1.Value.ToShortDateString <> Now.ToShortDateString Then
+            Dim r1 As DataRow
+            r1 = db.dsDaten.Tables(0).Rows(0)
+            r1.Item("RGdatum") = Me.DateTimePicker1.Value
+            db.Update_Data()
+        End If
        anzahlraten = db.dsDaten.Tables(0).Rows(0).Item("Anzahlraten")
        Empfaenger = db.dsDaten.Tables(0).Rows(0).Item("Empfaenger")
        If anzahlraten = 0 Then anzahlraten = 1
@@ -219,4 +227,16 @@
        End Try

    End Sub
+
+    Private Sub ToolStripLabel1_Click(sender As Object, e As EventArgs)
+
+    End Sub
+
+    Private Sub C1Abgeschlossen_MouseDown(sender As Object, e As MouseEventArgs) Handles C1Abgeschlossen.MouseDown
+        Me.C1Abgeschlossen.Bookmark = Me.C1Abgeschlossen.RowContaining(e.Y)
+    End Sub
+
+    Private Sub C1Ausgeschlossen_MouseDown(sender As Object, e As MouseEventArgs) Handles C1Ausgeschlossen.MouseDown
+        Me.C1Ausgeschlossen.Bookmark = Me.C1Ausgeschlossen.RowContaining(e.Y)
+    End Sub
 End Class
--- a/DPM2016/Finanzaen/Finanzen.Designer.vb
+++ b/DPM2016/Finanzaen/Finanzen.Designer.vb
@@ -30,6 +30,7 @@ Partial Class Finanzen
        Me.btnBuchen = New System.Windows.Forms.Button()
        Me.chkVorauszahlung = New System.Windows.Forms.CheckBox()
        Me.lblVorauszahlung = New System.Windows.Forms.Label()
+        Me.cbboxKonto = New DPM2016.MyCombobox()
        Me.lblKonto = New System.Windows.Forms.Label()
        Me.lblBetrag = New System.Windows.Forms.Label()
        Me.diBetrag = New DevComponents.Editors.DoubleInput()
@@ -48,26 +49,25 @@ Partial Class Finanzen
        Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.ZahlungBuchenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.GroupBox1 = New System.Windows.Forms.GroupBox()
-        Me.Label1 = New System.Windows.Forms.Label()
-        Me.Label2 = New System.Windows.Forms.Label()
-        Me.Label3 = New System.Windows.Forms.Label()
-        Me.Label4 = New System.Windows.Forms.Label()
-        Me.Mahndatum1 = New System.Windows.Forms.Label()
-        Me.Label6 = New System.Windows.Forms.Label()
-        Me.Mahnfaelligkeit1 = New System.Windows.Forms.Label()
-        Me.Mahngebühr1 = New System.Windows.Forms.Label()
-        Me.Mahngebühr2 = New System.Windows.Forms.Label()
-        Me.Mahnfaelligkeit2 = New System.Windows.Forms.Label()
-        Me.Mahndatum2 = New System.Windows.Forms.Label()
-        Me.Label9 = New System.Windows.Forms.Label()
+        Me.btnzurücksetzen3 = New System.Windows.Forms.Button()
+        Me.btnzurücksetzen2 = New System.Windows.Forms.Button()
+        Me.btnZurücksetzen1 = New System.Windows.Forms.Button()
        Me.Label10 = New System.Windows.Forms.Label()
        Me.Mahngebühr3 = New System.Windows.Forms.Label()
        Me.Mahnfaelligkeit3 = New System.Windows.Forms.Label()
        Me.Mahndatum3 = New System.Windows.Forms.Label()
-        Me.btnZurücksetzen1 = New System.Windows.Forms.Button()
-        Me.btnzurücksetzen2 = New System.Windows.Forms.Button()
-        Me.btnzurücksetzen3 = New System.Windows.Forms.Button()
-        Me.cbboxKonto = New DPM2016.MyCombobox()
+        Me.Label9 = New System.Windows.Forms.Label()
+        Me.Mahngebühr2 = New System.Windows.Forms.Label()
+        Me.Mahnfaelligkeit2 = New System.Windows.Forms.Label()
+        Me.Mahndatum2 = New System.Windows.Forms.Label()
+        Me.Mahngebühr1 = New System.Windows.Forms.Label()
+        Me.Mahnfaelligkeit1 = New System.Windows.Forms.Label()
+        Me.Label6 = New System.Windows.Forms.Label()
+        Me.Mahndatum1 = New System.Windows.Forms.Label()
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Label1 = New System.Windows.Forms.Label()
        Me.GrpZahlung.SuspendLayout()
        CType(Me.diBetrag, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.dtdatum, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -145,6 +145,18 @@ Partial Class Finanzen
        Me.lblVorauszahlung.TabIndex = 17
        Me.lblVorauszahlung.Text = "Vorauszahlung"
        '
+        'cbboxKonto
+        '
+        Me.cbboxKonto.Dataselection = Nothing
+        Me.cbboxKonto.Displaymember = Nothing
+        Me.cbboxKonto.Location = New System.Drawing.Point(147, 109)
+        Me.cbboxKonto.Name = "cbboxKonto"
+        Me.cbboxKonto.Size = New System.Drawing.Size(177, 21)
+        Me.cbboxKonto.TabIndex = 15
+        Me.cbboxKonto.Table = Nothing
+        Me.cbboxKonto.TableAlias = ""
+        Me.cbboxKonto.Valuemember = Nothing
+        '
        'lblKonto
        '
        Me.lblKonto.AutoSize = True
@@ -373,117 +385,32 @@ Partial Class Finanzen
        Me.GroupBox1.TabStop = False
        Me.GroupBox1.Text = "Mahnungen"
        '
-        'Label1
+        'btnzurücksetzen3
        '
-        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(77, 16)
-        Me.Label1.Name = "Label1"
-        Me.Label1.Size = New System.Drawing.Size(72, 13)
-        Me.Label1.TabIndex = 0
-        Me.Label1.Text = "Mahndatum"
+        Me.btnzurücksetzen3.Location = New System.Drawing.Point(379, 85)
+        Me.btnzurücksetzen3.Name = "btnzurücksetzen3"
+        Me.btnzurücksetzen3.Size = New System.Drawing.Size(98, 23)
+        Me.btnzurücksetzen3.TabIndex = 18
+        Me.btnzurücksetzen3.Text = "Zurücksetzen"
+        Me.btnzurücksetzen3.UseVisualStyleBackColor = True
        '
-        'Label2
+        'btnzurücksetzen2
        '
-        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(175, 16)
-        Me.Label2.Name = "Label2"
-        Me.Label2.Size = New System.Drawing.Size(86, 13)
-        Me.Label2.TabIndex = 1
-        Me.Label2.Text = "Mahnfälligkeit"
+        Me.btnzurücksetzen2.Location = New System.Drawing.Point(379, 62)
+        Me.btnzurücksetzen2.Name = "btnzurücksetzen2"
+        Me.btnzurücksetzen2.Size = New System.Drawing.Size(98, 23)
+        Me.btnzurücksetzen2.TabIndex = 17
+        Me.btnzurücksetzen2.Text = "Zurücksetzen"
+        Me.btnzurücksetzen2.UseVisualStyleBackColor = True
        '
-        'Label3
+        'btnZurücksetzen1
        '
-        Me.Label3.AutoSize = True
-        Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label3.Location = New System.Drawing.Point(292, 16)
-        Me.Label3.Name = "Label3"
-        Me.Label3.Size = New System.Drawing.Size(77, 13)
-        Me.Label3.TabIndex = 2
-        Me.Label3.Text = "Mahngebühr"
-        '
-        'Label4
-        '
-        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(7, 16)
-        Me.Label4.Name = "Label4"
-        Me.Label4.Size = New System.Drawing.Size(37, 13)
-        Me.Label4.TabIndex = 3
-        Me.Label4.Text = "Stufe"
-        '
-        'Mahndatum1
-        '
-        Me.Mahndatum1.AutoSize = True
-        Me.Mahndatum1.Location = New System.Drawing.Point(77, 44)
-        Me.Mahndatum1.Name = "Mahndatum1"
-        Me.Mahndatum1.Size = New System.Drawing.Size(39, 13)
-        Me.Mahndatum1.TabIndex = 4
-        Me.Mahndatum1.Text = "Label5"
-        '
-        'Label6
-        '
-        Me.Label6.AutoSize = True
-        Me.Label6.Location = New System.Drawing.Point(7, 44)
-        Me.Label6.Name = "Label6"
-        Me.Label6.Size = New System.Drawing.Size(13, 13)
-        Me.Label6.TabIndex = 5
-        Me.Label6.Text = "1"
-        '
-        'Mahnfaelligkeit1
-        '
-        Me.Mahnfaelligkeit1.AutoSize = True
-        Me.Mahnfaelligkeit1.Location = New System.Drawing.Point(175, 44)
-        Me.Mahnfaelligkeit1.Name = "Mahnfaelligkeit1"
-        Me.Mahnfaelligkeit1.Size = New System.Drawing.Size(39, 13)
-        Me.Mahnfaelligkeit1.TabIndex = 6
-        Me.Mahnfaelligkeit1.Text = "Label7"
-        '
-        'Mahngebühr1
-        '
-        Me.Mahngebühr1.AutoSize = True
-        Me.Mahngebühr1.Location = New System.Drawing.Point(292, 44)
-        Me.Mahngebühr1.Name = "Mahngebühr1"
-        Me.Mahngebühr1.Size = New System.Drawing.Size(39, 13)
-        Me.Mahngebühr1.TabIndex = 7
-        Me.Mahngebühr1.Text = "Label8"
-        '
-        'Mahngebühr2
-        '
-        Me.Mahngebühr2.AutoSize = True
-        Me.Mahngebühr2.Location = New System.Drawing.Point(292, 67)
-        Me.Mahngebühr2.Name = "Mahngebühr2"
-        Me.Mahngebühr2.Size = New System.Drawing.Size(39, 13)
-        Me.Mahngebühr2.TabIndex = 10
-        Me.Mahngebühr2.Text = "Label8"
-        '
-        'Mahnfaelligkeit2
-        '
-        Me.Mahnfaelligkeit2.AutoSize = True
-        Me.Mahnfaelligkeit2.Location = New System.Drawing.Point(175, 66)
-        Me.Mahnfaelligkeit2.Name = "Mahnfaelligkeit2"
-        Me.Mahnfaelligkeit2.Size = New System.Drawing.Size(39, 13)
-        Me.Mahnfaelligkeit2.TabIndex = 9
-        Me.Mahnfaelligkeit2.Text = "Label7"
-        '
-        'Mahndatum2
-        '
-        Me.Mahndatum2.AutoSize = True
-        Me.Mahndatum2.Location = New System.Drawing.Point(77, 66)
-        Me.Mahndatum2.Name = "Mahndatum2"
-        Me.Mahndatum2.Size = New System.Drawing.Size(39, 13)
-        Me.Mahndatum2.TabIndex = 8
-        Me.Mahndatum2.Text = "Label5"
-        '
-        'Label9
-        '
-        Me.Label9.AutoSize = True
-        Me.Label9.Location = New System.Drawing.Point(7, 67)
-        Me.Label9.Name = "Label9"
-        Me.Label9.Size = New System.Drawing.Size(13, 13)
-        Me.Label9.TabIndex = 11
-        Me.Label9.Text = "2"
+        Me.btnZurücksetzen1.Location = New System.Drawing.Point(379, 39)
+        Me.btnZurücksetzen1.Name = "btnZurücksetzen1"
+        Me.btnZurücksetzen1.Size = New System.Drawing.Size(98, 23)
+        Me.btnZurücksetzen1.TabIndex = 16
+        Me.btnZurücksetzen1.Text = "Zurücksetzen"
+        Me.btnZurücksetzen1.UseVisualStyleBackColor = True
        '
        'Label10
        '
@@ -521,44 +448,117 @@ Partial Class Finanzen
        Me.Mahndatum3.TabIndex = 12
        Me.Mahndatum3.Text = "Label5"
        '
-        'btnZurücksetzen1
+        'Label9
        '
-        Me.btnZurücksetzen1.Location = New System.Drawing.Point(379, 39)
-        Me.btnZurücksetzen1.Name = "btnZurücksetzen1"
-        Me.btnZurücksetzen1.Size = New System.Drawing.Size(98, 23)
-        Me.btnZurücksetzen1.TabIndex = 16
-        Me.btnZurücksetzen1.Text = "Zurücksetzen"
-        Me.btnZurücksetzen1.UseVisualStyleBackColor = True
+        Me.Label9.AutoSize = True
+        Me.Label9.Location = New System.Drawing.Point(7, 67)
+        Me.Label9.Name = "Label9"
+        Me.Label9.Size = New System.Drawing.Size(13, 13)
+        Me.Label9.TabIndex = 11
+        Me.Label9.Text = "2"
        '
-        'btnzurücksetzen2
+        'Mahngebühr2
        '
-        Me.btnzurücksetzen2.Location = New System.Drawing.Point(379, 62)
-        Me.btnzurücksetzen2.Name = "btnzurücksetzen2"
-        Me.btnzurücksetzen2.Size = New System.Drawing.Size(98, 23)
-        Me.btnzurücksetzen2.TabIndex = 17
-        Me.btnzurücksetzen2.Text = "Zurücksetzen"
-        Me.btnzurücksetzen2.UseVisualStyleBackColor = True
+        Me.Mahngebühr2.AutoSize = True
+        Me.Mahngebühr2.Location = New System.Drawing.Point(292, 67)
+        Me.Mahngebühr2.Name = "Mahngebühr2"
+        Me.Mahngebühr2.Size = New System.Drawing.Size(39, 13)
+        Me.Mahngebühr2.TabIndex = 10
+        Me.Mahngebühr2.Text = "Label8"
        '
-        'btnzurücksetzen3
+        'Mahnfaelligkeit2
        '
-        Me.btnzurücksetzen3.Location = New System.Drawing.Point(379, 85)
-        Me.btnzurücksetzen3.Name = "btnzurücksetzen3"
-        Me.btnzurücksetzen3.Size = New System.Drawing.Size(98, 23)
-        Me.btnzurücksetzen3.TabIndex = 18
-        Me.btnzurücksetzen3.Text = "Zurücksetzen"
-        Me.btnzurücksetzen3.UseVisualStyleBackColor = True
+        Me.Mahnfaelligkeit2.AutoSize = True
+        Me.Mahnfaelligkeit2.Location = New System.Drawing.Point(175, 66)
+        Me.Mahnfaelligkeit2.Name = "Mahnfaelligkeit2"
+        Me.Mahnfaelligkeit2.Size = New System.Drawing.Size(39, 13)
+        Me.Mahnfaelligkeit2.TabIndex = 9
+        Me.Mahnfaelligkeit2.Text = "Label7"
        '
-        'cbboxKonto
+        'Mahndatum2
        '
-        Me.cbboxKonto.Dataselection = Nothing
-        Me.cbboxKonto.Displaymember = Nothing
-        Me.cbboxKonto.Location = New System.Drawing.Point(147, 109)
-        Me.cbboxKonto.Name = "cbboxKonto"
-        Me.cbboxKonto.Size = New System.Drawing.Size(177, 21)
-        Me.cbboxKonto.TabIndex = 15
-        Me.cbboxKonto.Table = Nothing
-        Me.cbboxKonto.TableAlias = ""
-        Me.cbboxKonto.Valuemember = Nothing
+        Me.Mahndatum2.AutoSize = True
+        Me.Mahndatum2.Location = New System.Drawing.Point(77, 66)
+        Me.Mahndatum2.Name = "Mahndatum2"
+        Me.Mahndatum2.Size = New System.Drawing.Size(39, 13)
+        Me.Mahndatum2.TabIndex = 8
+        Me.Mahndatum2.Text = "Label5"
+        '
+        'Mahngebühr1
+        '
+        Me.Mahngebühr1.AutoSize = True
+        Me.Mahngebühr1.Location = New System.Drawing.Point(292, 44)
+        Me.Mahngebühr1.Name = "Mahngebühr1"
+        Me.Mahngebühr1.Size = New System.Drawing.Size(39, 13)
+        Me.Mahngebühr1.TabIndex = 7
+        Me.Mahngebühr1.Text = "Label8"
+        '
+        'Mahnfaelligkeit1
+        '
+        Me.Mahnfaelligkeit1.AutoSize = True
+        Me.Mahnfaelligkeit1.Location = New System.Drawing.Point(175, 44)
+        Me.Mahnfaelligkeit1.Name = "Mahnfaelligkeit1"
+        Me.Mahnfaelligkeit1.Size = New System.Drawing.Size(39, 13)
+        Me.Mahnfaelligkeit1.TabIndex = 6
+        Me.Mahnfaelligkeit1.Text = "Label7"
+        '
+        'Label6
+        '
+        Me.Label6.AutoSize = True
+        Me.Label6.Location = New System.Drawing.Point(7, 44)
+        Me.Label6.Name = "Label6"
+        Me.Label6.Size = New System.Drawing.Size(13, 13)
+        Me.Label6.TabIndex = 5
+        Me.Label6.Text = "1"
+        '
+        'Mahndatum1
+        '
+        Me.Mahndatum1.AutoSize = True
+        Me.Mahndatum1.Location = New System.Drawing.Point(77, 44)
+        Me.Mahndatum1.Name = "Mahndatum1"
+        Me.Mahndatum1.Size = New System.Drawing.Size(39, 13)
+        Me.Mahndatum1.TabIndex = 4
+        Me.Mahndatum1.Text = "Label5"
+        '
+        'Label4
+        '
+        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(7, 16)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(37, 13)
+        Me.Label4.TabIndex = 3
+        Me.Label4.Text = "Stufe"
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label3.Location = New System.Drawing.Point(292, 16)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(77, 13)
+        Me.Label3.TabIndex = 2
+        Me.Label3.Text = "Mahngebühr"
+        '
+        'Label2
+        '
+        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(175, 16)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(86, 13)
+        Me.Label2.TabIndex = 1
+        Me.Label2.Text = "Mahnfälligkeit"
+        '
+        '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(77, 16)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(72, 13)
+        Me.Label1.TabIndex = 0
+        Me.Label1.Text = "Mahndatum"
        '
        'Finanzen
        '
--- a/DPM2016/Finanzaen/Finanzen.resx
+++ b/DPM2016/Finanzaen/Finanzen.resx
@@ -161,7 +161,7 @@
 </value>
  </data>
  <data name="C1Zahlungen.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 637, 281&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 637, 281&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 637, 281&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 637, 281&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
  </data>
  <metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>124, 17</value>
@@ -203,6 +203,6 @@
 </value>
  </data>
  <data name="C1OffeneRechnungen.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 637, 118&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 637, 118&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{ForeColor:ControlText;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 637, 118&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 637, 118&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
  </data>
 </root>
--- a/DPM2016/Finanzaen/Finanzen.vb
+++ b/DPM2016/Finanzaen/Finanzen.vb
@@ -316,4 +316,12 @@ Public Class Finanzen
        Refresh_Zahlungen()
        Get_Mahndaten()
    End Sub
+
+    Private Sub C1Zahlungen_MouseDown(sender As Object, e As MouseEventArgs) Handles C1Zahlungen.MouseDown
+        Me.C1Zahlungen.Bookmark = Me.C1Zahlungen.RowContaining(e.Y)
+    End Sub
+
+    Private Sub C1OffeneRechnungen_MouseDown(sender As Object, e As MouseEventArgs) Handles C1OffeneRechnungen.MouseDown
+        Me.C1OffeneRechnungen.Bookmark = Me.C1OffeneRechnungen.RowContaining(e.Y)
+    End Sub
 End Class
--- a/DPM2016/Finanzaen/frmMahnungen.Designer.vb
+++ b/DPM2016/Finanzaen/frmMahnungen.Designer.vb
@@ -199,6 +199,7 @@ Partial Class Mahnungen
        '
        'tstxtsuche
        '
+        Me.tstxtsuche.Font = New System.Drawing.Font("Segoe UI", 9.0!)
        Me.tstxtsuche.Name = "tstxtsuche"
        Me.tstxtsuche.Size = New System.Drawing.Size(100, 25)
        Me.tstxtsuche.Visible = False
--- a/DPM2016/Finanzaen/frmMahnungen.resx
+++ b/DPM2016/Finanzaen/frmMahnungen.resx
@@ -437,7 +437,7 @@
 </value>
  </data>
  <data name="C1Mahnungen2.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{ForeColor:ControlText;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 792, 123&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 792, 123&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;ForeColor:ControlText;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 792, 123&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 792, 123&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
  </data>
  <metadata name="ToolStrip3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>560, 17</value>
@@ -497,7 +497,7 @@
 </value>
  </data>
  <data name="C1Mahnungen1.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 792, 168&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 792, 168&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{ForeColor:ControlText;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 792, 168&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 792, 168&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
  </data>
  <metadata name="ToolStrip2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>453, 17</value>
@@ -557,7 +557,7 @@
 </value>
  </data>
  <data name="C1Mahnungen3.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;ForeColor:ControlText;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 792, 123&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 792, 123&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 792, 123&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 792, 123&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
  </data>
  <metadata name="ToolStrip4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>667, 17</value>
@@ -617,7 +617,7 @@
 </value>
  </data>
  <data name="C1Mahnungen4.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 792, 138&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 792, 138&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 792, 138&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 792, 138&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
  </data>
  <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
    <value>108</value>
--- a/DPM2016/Finanzaen/frmMahnungen.vb
+++ b/DPM2016/Finanzaen/frmMahnungen.vb
@@ -11,23 +11,32 @@ Public Class Mahnungen
    End Sub
    Sub refresh_data(Optional type As Integer = 0)
        Cursor = Cursors.WaitCursor
+        Dim dt As DateTime = Now
+        Dim days As Integer
+        Try
+            days = db1.Get_Option(10002)
+            dt = dt.AddDays(days * -1)
+
+        Catch
+        End Try
+
        If type = 0 Or type = 1 Then
            Me.C1Mahnungen1.DataSource = Nothing
-            db1.Get_Tabledata("View_Offene_Mahnungen", " where mahndatum1 IS null and faelligam < '" + Convert_Date(Now) + "'")
+            db1.Get_Tabledata("View_Offene_Mahnungen", " where mahndatum1 IS null and faelligam < '" + Convert_Date(dt) + "'")
            Me.C1Mahnungen1.DataSource = db1.dsDaten.Tables(0)
            Me.C1Mahnungen1.DataMember = db1.dsDaten.Tables(0).TableName
        End If

        If type = 0 Or type = 2 Then
            Me.C1Mahnungen2.DataSource = Nothing
-            db2.Get_Tabledata("View_Offene_Mahnungen", " where mahndatum2 IS null and mahnfaelligkeit1 < '" + Convert_Date(Now) + "'")
+            db2.Get_Tabledata("View_Offene_Mahnungen", " where mahndatum2 IS null and mahnfaelligkeit1 < '" + Convert_Date(dt) + "'")
            Me.C1Mahnungen2.DataSource = db2.dsDaten.Tables(0)
            Me.C1Mahnungen2.DataMember = db2.dsDaten.Tables(0).TableName
        End If

        If type = 0 Or type = 3 Then
            Me.C1Mahnungen3.DataSource = Nothing
-            db3.Get_Tabledata("View_Offene_Mahnungen", " where mahndatum3 IS null and mahnfaelligkeit2 <'" + Convert_Date(Now) + "'")
+            db3.Get_Tabledata("View_Offene_Mahnungen", " where mahndatum3 IS null and mahnfaelligkeit2 <'" + Convert_Date(dt) + "'")
            Me.C1Mahnungen3.DataSource = db3.dsDaten.Tables(0)
            Me.C1Mahnungen3.DataMember = db3.dsDaten.Tables(0).TableName
        End If
--- a/DPM2016/Klassen/clsSpalten.vb
+++ b/DPM2016/Klassen/clsSpalten.vb
@@ -159,8 +159,13 @@ Public Class Tabellenspalte
        Dim t As New DataTable()
        Dim s As String
        anzcols = daten.Splits(0).DisplayColumns.Count
+
        t = dt
        Me.Tabelle = tablename
+        Dim st As New MySpaltenTitel
+        If st.Check_Table_Has_Spaltendata(tablename) = False Then Exit Function
+
+
        For i = 0 To daten.Columns.Count - 1
            s = daten.Columns(i).DataField
            'If s = "ApplikationNr" Then
@@ -169,7 +174,7 @@ Public Class Tabellenspalte
            'End If
            Me.Feld = s
            Me.getspalte()
-            If Me.spaltenname = "" Then Exit Function
+            If Me.spaltenname <> "" Then
                daten.Columns(i).Caption = Me.spaltenname

                If Me.ColWith = 0 Then
@@ -204,6 +209,7 @@ Public Class Tabellenspalte
                If Me.Numberformat <> "" Then
                    daten.columns(i).numberformat = Me.Numberformat
                End If
+            End If
        Next
        ColumnOrder(tablename, daten)
        daten.HeadingStyle.WrapText = False
@@ -300,7 +306,13 @@ Public Class MySpaltenTitel
        spaltendata.Dispose()
        Me.dispose()
    End Sub
+    Public Function Check_Table_Has_Spaltendata(ByVal tab As String) As Boolean
+        If spaltendata.Rows.Count = 0 Then load_data()
+        Dim dv() As DataRow
+        dv = spaltendata.Select("Tabelle='" & tab + "'")
+        If dv.Length = 0 Then Return False Else Return True

+    End Function
    Public Function getspalte(ByVal tabelle As String, ByVal feld As String, ByRef spaltenname As String, ByRef locked As Boolean, _
    ByRef colwidth As Integer, ByRef order As Integer, ByRef alshacken As Boolean, ByRef tiptext As String, ByRef numberformat As String)
        If spaltendata.Rows.Count = 0 Then load_data()
@@ -308,7 +320,6 @@ Public Class MySpaltenTitel
        Dim dv() As DataRow
        Dim dr As DataRow
        dv = spaltendata.Select("Tabelle='" & tabelle & "' and tabellenspalte='" & feld & "'", "Reihenfolge, Spaltenr")
-
        If dv.Length = 0 Then
            spaltenname = ""
            locked = True
--- a/DPM2016/Klassen/clsStammdaten_flat.Designer.vb
+++ b/DPM2016/Klassen/clsStammdaten_flat.Designer.vb
@@ -24,22 +24,22 @@ Partial Class clsStammdaten_flat
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(clsStammdaten_flat))
-        Dim Style17 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style18 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style19 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style20 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style21 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style22 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style23 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style24 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style25 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style26 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style27 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style28 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style29 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style30 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style31 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
-        Dim Style32 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style1 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style2 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style3 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style4 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style5 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style6 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style7 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style8 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style9 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style10 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style11 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style12 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style13 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style14 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style15 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style16 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
        Me.c1daten = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
        Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton()
@@ -49,6 +49,7 @@ Partial Class clsStammdaten_flat
        Me.ToolStripButton3 = New System.Windows.Forms.ToolStripButton()
        Me.ToolStripButton6 = New System.Windows.Forms.ToolStripButton()
        Me.ToolStripButton7 = New System.Windows.Forms.ToolStripButton()
+        Me.tsnewdentotar = New System.Windows.Forms.ToolStripButton()
        Me.C1TrueDBDropdown1 = New C1.Win.C1TrueDBGrid.C1TrueDBDropdown()
        Me.C1TrueDBDropdown2 = New C1.Win.C1TrueDBGrid.C1TrueDBDropdown()
        Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
@@ -60,7 +61,6 @@ Partial Class clsStammdaten_flat
        Me.ctxmenuDentotar = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.TarifBearbeitenToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
-        Me.tsnewdentotar = New System.Windows.Forms.ToolStripButton()
        CType(Me.c1daten, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.ToolStrip1.SuspendLayout()
        CType(Me.C1TrueDBDropdown1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -170,31 +170,41 @@ Partial Class clsStammdaten_flat
        Me.ToolStripButton7.Text = "ToolStripButton7"
        Me.ToolStripButton7.Visible = False
        '
+        'tsnewdentotar
+        '
+        Me.tsnewdentotar.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.tsnewdentotar.Image = CType(resources.GetObject("tsnewdentotar.Image"), System.Drawing.Image)
+        Me.tsnewdentotar.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.tsnewdentotar.Name = "tsnewdentotar"
+        Me.tsnewdentotar.Size = New System.Drawing.Size(23, 22)
+        Me.tsnewdentotar.Text = "Neuer Dentotar-Eintrag"
+        Me.tsnewdentotar.Visible = False
+        '
        'C1TrueDBDropdown1
        '
        Me.C1TrueDBDropdown1.AllowColMove = True
        Me.C1TrueDBDropdown1.AllowColSelect = True
        Me.C1TrueDBDropdown1.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.C1TrueDBDropdown1.AlternatingRows = False
-        Me.C1TrueDBDropdown1.CaptionStyle = Style17
+        Me.C1TrueDBDropdown1.CaptionStyle = Style1
        Me.C1TrueDBDropdown1.ColumnCaptionHeight = 17
        Me.C1TrueDBDropdown1.ColumnFooterHeight = 17
-        Me.C1TrueDBDropdown1.EvenRowStyle = Style18
+        Me.C1TrueDBDropdown1.EvenRowStyle = Style2
        Me.C1TrueDBDropdown1.FetchRowStyles = False
-        Me.C1TrueDBDropdown1.FooterStyle = Style19
-        Me.C1TrueDBDropdown1.HeadingStyle = Style20
-        Me.C1TrueDBDropdown1.HighLightRowStyle = Style21
+        Me.C1TrueDBDropdown1.FooterStyle = Style3
+        Me.C1TrueDBDropdown1.HeadingStyle = Style4
+        Me.C1TrueDBDropdown1.HighLightRowStyle = Style5
        Me.C1TrueDBDropdown1.Images.Add(CType(resources.GetObject("C1TrueDBDropdown1.Images"), System.Drawing.Image))
        Me.C1TrueDBDropdown1.Location = New System.Drawing.Point(16, 70)
        Me.C1TrueDBDropdown1.Name = "C1TrueDBDropdown1"
-        Me.C1TrueDBDropdown1.OddRowStyle = Style22
-        Me.C1TrueDBDropdown1.RecordSelectorStyle = Style23
+        Me.C1TrueDBDropdown1.OddRowStyle = Style6
+        Me.C1TrueDBDropdown1.RecordSelectorStyle = Style7
        Me.C1TrueDBDropdown1.RowDivider.Color = System.Drawing.Color.DarkGray
        Me.C1TrueDBDropdown1.RowDivider.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.[Single]
        Me.C1TrueDBDropdown1.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.C1TrueDBDropdown1.ScrollTips = False
        Me.C1TrueDBDropdown1.Size = New System.Drawing.Size(215, 150)
-        Me.C1TrueDBDropdown1.Style = Style24
+        Me.C1TrueDBDropdown1.Style = Style8
        Me.C1TrueDBDropdown1.TabIndex = 14
        Me.C1TrueDBDropdown1.Visible = False
        Me.C1TrueDBDropdown1.PropBag = resources.GetString("C1TrueDBDropdown1.PropBag")
@@ -205,25 +215,25 @@ Partial Class clsStammdaten_flat
        Me.C1TrueDBDropdown2.AllowColSelect = True
        Me.C1TrueDBDropdown2.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.C1TrueDBDropdown2.AlternatingRows = False
-        Me.C1TrueDBDropdown2.CaptionStyle = Style25
+        Me.C1TrueDBDropdown2.CaptionStyle = Style9
        Me.C1TrueDBDropdown2.ColumnCaptionHeight = 17
        Me.C1TrueDBDropdown2.ColumnFooterHeight = 17
-        Me.C1TrueDBDropdown2.EvenRowStyle = Style26
+        Me.C1TrueDBDropdown2.EvenRowStyle = Style10
        Me.C1TrueDBDropdown2.FetchRowStyles = False
-        Me.C1TrueDBDropdown2.FooterStyle = Style27
-        Me.C1TrueDBDropdown2.HeadingStyle = Style28
-        Me.C1TrueDBDropdown2.HighLightRowStyle = Style29
+        Me.C1TrueDBDropdown2.FooterStyle = Style11
+        Me.C1TrueDBDropdown2.HeadingStyle = Style12
+        Me.C1TrueDBDropdown2.HighLightRowStyle = Style13
        Me.C1TrueDBDropdown2.Images.Add(CType(resources.GetObject("C1TrueDBDropdown2.Images"), System.Drawing.Image))
        Me.C1TrueDBDropdown2.Location = New System.Drawing.Point(189, 153)
        Me.C1TrueDBDropdown2.Name = "C1TrueDBDropdown2"
-        Me.C1TrueDBDropdown2.OddRowStyle = Style30
-        Me.C1TrueDBDropdown2.RecordSelectorStyle = Style31
+        Me.C1TrueDBDropdown2.OddRowStyle = Style14
+        Me.C1TrueDBDropdown2.RecordSelectorStyle = Style15
        Me.C1TrueDBDropdown2.RowDivider.Color = System.Drawing.Color.DarkGray
        Me.C1TrueDBDropdown2.RowDivider.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.[Single]
        Me.C1TrueDBDropdown2.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.C1TrueDBDropdown2.ScrollTips = False
        Me.C1TrueDBDropdown2.Size = New System.Drawing.Size(233, 150)
-        Me.C1TrueDBDropdown2.Style = Style32
+        Me.C1TrueDBDropdown2.Style = Style16
        Me.C1TrueDBDropdown2.TabIndex = 15
        Me.C1TrueDBDropdown2.Visible = False
        Me.C1TrueDBDropdown2.PropBag = resources.GetString("C1TrueDBDropdown2.PropBag")
@@ -281,16 +291,6 @@ Partial Class clsStammdaten_flat
        Me.TarifBearbeitenToolStripMenuItem1.Size = New System.Drawing.Size(155, 22)
        Me.TarifBearbeitenToolStripMenuItem1.Text = "Tarif bearbeiten"
        '
-        'tsnewdentotar
-        '
-        Me.tsnewdentotar.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        Me.tsnewdentotar.Image = CType(resources.GetObject("tsnewdentotar.Image"), System.Drawing.Image)
-        Me.tsnewdentotar.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.tsnewdentotar.Name = "tsnewdentotar"
-        Me.tsnewdentotar.Size = New System.Drawing.Size(23, 22)
-        Me.tsnewdentotar.Text = "Neuer Dentotar-Eintrag"
-        Me.tsnewdentotar.Visible = False
-        '
        'clsStammdaten_flat
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
--- a/DPM2016/Klassen/clsStammdaten_flat.resx
+++ b/DPM2016/Klassen/clsStammdaten_flat.resx
@@ -155,7 +155,7 @@
 </value>
  </data>
  <data name="c1daten.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 756, 374&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 756, 374&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 756, 374&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 756, 374&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
  </data>
  <metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>163, 17</value>
@@ -163,19 +163,19 @@
  <data name="ToolStripButton5.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAK1SURBVDhPnZLfS1NhGMdfCPoDuummi+i6qwYWaYjb3Obx
-        7MzN1eY5Z9tJZ86MirIgK/utaVoaaqHDVEyKSq2MsuyHopGhlIVUK6qLKCiiCKKLgk/HHyx2aQ984H1e
-        eD+83+d9xf/U11cjwU/vJn937spkfmuuLlTm9vceyqX/yAxSkr7DEhf327kf386X6UE+T13nx+thzu+x
-        pgr6KmVWrbGzOt3GmnX/SEu3stKSwc/EIIn+A0w0+/mWeMCFfY5UQW+FTKbVic0uYXe4kliznaRl2HjZ
-        GWGiVWe8JciX57e4fDAnVeBoEEjVi8ix+5BcClKOG0mScblk1lklpjsMxs+GeNgU5ONE32zU+aNC2I4L
-        Eh+7cJqS3CwNtzOAIvlRZC+y20OWw82zeJixZp3hhgLejfZwo0qZE9iqBVPv2+gYFmRWCez1AudpgVyx
-        FK8SxJPnJzvXx2SrxnCjzs+by3kx1M6tGi/CVSt49LaK+JigbdRcvyni8dsITz6EZyXrPWHy84NIngCP
-        W1TundL4NbiC5zeaGar3zwnuJsqJTwriE4L2Z4KOacHT7xEcjYJgfhEbAiHc+RpjTQGGTgZpK3fypO84
-        DxoCsxEsdjPCwItiuhKCrJkIJwSOU4K8/cvQ1SiqbuALGow0+Lldt54rhxQe9VQy2qQmh2jJrhH0v/Hh
-        PCkwAjswtDKMcAmGESViFBIIRblX7+VmrY+Bai8j53YyfiaU8owWp3llpXYxUWMr0aJSiqIlsxSaaBtj
-        3Kn1MFCVx9WjHgabY0y2RVIEorNsLZtKyyiNbaN085YkMZPCkq3crpG5dkyh94iba3UhptoLEbquo2sh
-        NC2Mqs5grlXN7NUkqtlvKNDZHQvQXamYP1Dm0uE8pruK54a4UCr0tD1Ne9P/vOqOpUZYQC0xWSWEsPwF
-        X0fCgJOjtY0AAAAASUVORK5CYII=
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAK1SURBVDhPnZLdS1NhHMcfCPoDuummi+i6KwcWlYjb3Obx
+        7MzN1eY5Z9tJV86Mit5AS3v3rUwtrchhKhVFpVZGWfaiaKQoZiHWiuoivCiiCKSLgk9HjcUu6wcfeH4P
+        PB+e7+95xP/Ul9eDwZn34z879mTyZ2uhrlTm9nQdyqXnyBxSku7DElcr7DyO7+DzVB+fJm/z/c0Al8qs
+        qYLuSpm01XZWrbWxOuMv6WutrLSsYzbRR6LnAGMtfr4mnnBlvyNV0FUuk2l1YrNL2B2uJNZsJ+nrbLzq
+        iDB2XmfkTJDPL+9x/WBOqsDRKJCqF5Fj9yG5FKQcN5Ik43LJZFglptoNRs6FeNocZGasez7qn6NC2GoE
+        iZlOnKYkN0vD7QygSH4U2Yvs9pDlcPMiHma4RWegsYD3Q5e5U6UsCGzVgskPrbQPCDKrBPZ6gfOUQC5f
+        ilcJ4snzk53rY/y8xkCTzuzd5Uz3t3Gv1otw1QmevasiPixoHTLXb4sYfRdh4mN4XrLeEyY/P4jkCTB6
+        RuVRg8aPvhW8vNNCf71/QfAwsZv4uCA+Jmh7IWifEjz/FsHRJAjmF7EhEMKdrzHcHKD/ZJDW3U4mumt4
+        0hiYj2CxmxF6pzfRmRBkzUU4LnA0CPIqlqGrUVTdwBc0GGz0c//Eem4cUnh2uZKhZjU5REt2raDnrQ/n
+        SYER2ImhlWKEizGMKBGjkEAoyqN6L3frfPRWexm8sIuRs6GUZ7Q4zSsrdYuJGtuIFpVQFC2ep9BE2xjj
+        QZ2H3qo8bh710NcSY7w1kiIQHaVr2FxSSklsOyVbtiaJmRQWb+N+rcytYwpdR9zcOhFisq0Qoes6uhZC
+        08Ko6hzmWtXMXk2imv2GAp29sQAXKxXzB8pcO5zHVOemhSH+K+V6etnpfWt+vb4YS43wD7XEJE0IYfkN
+        WuDCfcAVxNMAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="ToolStripButton1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -196,16 +196,16 @@
  <data name="ToolStripButton4.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIWSURBVDhPlY9dSJNhFMffCylqduHIEk2pbaWwqMyLpCsL
-        +sAwJRlBBNLozoYSXhQFc7Su9CLoA+xi1L7brH02p1ttK1c3IWgh+bZGOM29vjO3uYs2cv+ewXPZu9kP
-        /pznOed/znkeZisEJBLX+5aW2/T6f0x1dT16wDDQ1dQgKJV+fieT1dJSZYrzT9rn4iw8d+9jlAwZE4nw
-        sr4eMxJJJ7WU5/fsLT490YYk+xSxBQ5j+yV4WFUFt1h8h1qE2Yxp9b8C55F0NWPJxGA5cAbsCo/XqoEf
-        1CJMMa49lw4rkPTIyQAplsbF4H2t+Gnbhvjsi2Zq+zesT7WdC13Pc2RzavIUEvZdWJvsIINk+BMQqahN
-        mM25wSDnlWNt6ix5wWGyuQ28/ySyvj1RahGmyN5UpnztWPUew3pIAY58Yf1tD6ZHDxW/2GqrqU2Ywvzj
-        BOdtRe7jDfATJ5AJX0GKbC+GD16ilvLkvz5DesGJ9Mw9ZN50k+0XUQgfH6fl8oyMXBWBcyL77RU2FkPI
-        JYLIRTs3aLkyjY175Zd7OpD57kGeiwKFmC27/Gk3LVemoanpwo6d1dhXV+dOLX5ooOmtEYlEDqjV6mGN
-        RqPVm0wKne55n9ls7nc4HEMlOZ3OfiIl0TW3293rcrlO+/1+GW1nGLvdfsRisXSTpj6DwTBgNBqHSBwm
-        UV0SPZdyg0RKvV7fa7VajzIMw/wFTEUkRqq1mZcAAAAASUVORK5CYII=
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIWSURBVDhPlY9dSJNhFMffCylqduHIEk2pbaWwsMyLpCsL
+        +sAwJRlBBNLozoYSXhQFc7Su1kXQB9jFqH23WXv3bs3pVtuS1U0IakiuNcJp7W0zt7mLNnL/nsFz2bvZ
+        D/6c5znnf855HmYr+CUS10xb2y16/T+me3sfPWAY6OvqEJBKF97JZPW0VJ3S4pOu+XgU7jv3cJ8MGReJ
+        8LKxEbMSSQ+1VOb33M1UZrITyehTxJZ4jO+X4GFNDTix+Da1CLMZ0xp++c8h6WrFipnBqv80oj9SeK0a
+        /kYtwpTi2rOZkAJJt5wMkGJlQoyUtwPf7dsQn3vRSm3/JupVbeeD1wo82ZyeOomEYxfWprrJIBn++EUq
+        ahNmc34kwHvkWJs+Q15wmGzuRMp3Ajnvngi1CFOK3lCmvV346TmK9aACPPnC+tt+zOgOlT7Z62upTZji
+        4uME7+lA/sN1pCaPIxu6jDTZXgodvEgtlSl8fobMEovM7F1k3/SR7RdQDB2boOXK6HRXROBZ5L68wsZy
+        EPlEAPlIzwYtV6e5ea/8Un83sl/dKPARoBiz51Y/7qbl6jS1tJzfsbMW+xoauPTy+yaa3hrhcPiAWq0e
+        02g0WoPZrNDrnw9aLJYhp9M5WhbLskNESqKrHMcNuFyuUz6fT0bbGcbhcLRbrdY+0jRoNBqHTSbTKIlj
+        JKrLoudyboRIaTAYBmw22xGGYZi/SIAkRADW4vYAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="ToolStripButton2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -243,191 +243,191 @@
  <data name="ToolStripButton6.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAAIAAAACACAYAAADDPmHLAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAACsTSURBVHhe7Z0HnBRV1vZX3V19P/d79zWRJDMMGQaGzMAw
-        zAADkkQQkZxzDkMGUcC8uqZd13XNmZwEFRFRVHZ9ASWjIklBBERQovc7z6061adu356pDriw39wff7qn
-        u/p29Xmee26oqu7f5Jf8kl/yS37JL/klv+SX/JJf8kt+yS/5Jb/I0qlTp263tL9lb+/evX8ZNmyYGjFi
-        hBo5cqQaNWqUGj16tBozZowaO3asGj9unMoZP17l5OSoCRMmqInE2DFj1aCBA9WLL7+qnn/lDfXiq3PV
-        y68vUPMXLFELFi5TCxcvV4uXrlBLl61Uy5a/rZaveEe9+da7auXb76m33lmj3n73fc077671s3qtWrX6
-        A82770k+VO+uYdap1eD9deq9tR+pNWs/DvHBJ+r9DyXr1dp16537H2Cbj+g1zmtXU12rqG685zuraX9W
-        raF9w/6tViveWqVZvvId2ve31bI331JLl6+kz7NCLVn6plq8ZLlatJg+56Kl9HkXq/nEvAWL1Lz5C9Xc
-        efPVG3PnqdffmKteeuU19fyLr6hnX3hJPfPsc6p/v346xuMpnuMorojvWIozYj2GYo64I/6jaJuRpAc0
-        GTF8uBo+fPgvo4YMOdCrR6/+rnzxlSEDh/QYTqIvXbpUPUc7No4EDcr4sePU/ffep9q2bqN27zuoPt60
-        w2Przj3E1z627IgNsx6n7j1qG7Nrb4gv9qrtHvs0O770s5P5ar/HLmb3fvWF5GtwQPOl4CvB7j0hvgZ7
-        DfYdUBu3fqE2ELjd/+13qm2bNuru2XOscc2N6dOmqy2bt6hV76xSkyZMGurKGHsZMmjwvjvvmKm2bdum
-        Xn3lVTVowMComDA+R2U2yVQHj55UO/Yd8fju6M/qkMkR5qcAuNta6vnu6Cn13TE/h3847eN7cNzPkeNn
-        HH50OCo5cUYdE/wATp7VHGd+cvhRcOJncE5zEpxy+Ik5fU79THx98Ae1Bxz6gd7vZ5WVmaVGjxptjWle
-        TJowUY0dPUY9+eST37gyxl4GDxx0bmD/AYrp16ev6tTxVh/dunT1njdxDNCEhPEbwBTk8LHTYaIFBa8N
-        q8/FJrQjdh6CE1JwU3RT+HDRgwn/8+nzGgjPeAYYOcoa06A89KeHzpOElzlKxlgG9Ovvq7R2rdoqJSVF
-        pdZIVTVTU+m2hqpUsaK67dZOvu2YnHHjHQMcO6l27j/iYRPFg4XLC9trDXxCC7GDCJ6X6FG3dovwp844
-        SAMc0wbIjNsA991zryIJ4zeApEb1Giq9USPVNCtLNW/WTIsLU7Rr09a3HQMDNMkIN4AnhBQnEXC9LqbI
-        HobQeQoODMFDogdt7Y7wp4Tw4LQwwF4Y4AQZgLpNDPBsMQ3KPXffDQPEV8xKa9Wsqfv0Nq1bq5vbtVMt
-        srNVvbr1VLu27XzbMZgZwADfkQF2CQNYRUkwNoElptg2wWMW3Sa8Ibrm7Hl1hoDwmu8cAyDGo0bEZ4C7
-        51wAA9StU4dafnN1W6fbVLdu3Uj4tqphWpo2g7ktMA3A2ARJNFpg4IprEkTsiIIHFd0mPAnOwmvO/aKF
-        ZxJngDnxG6B/335K0qhhIzVs6DA9x582ZSrNSceo7t27q5spA5jbgnE0FWzSOIMM8JP64sBRzS6CRdj0
-        5aELxmfR8JXD5199F4jNzG47Wyxs/VpyWHOWxAdhBqBGM3L4CGtMgzJn9uzEG6BxemPVlUb9I4YN1+LC
-        aR07dMjbAD+EDAC4xX2689sLxv/mxS7moI8NAdho44vIbGLIbBKIf+58yAD7EmmAWQkwAKZ9EgwC27dv
-        r4UfPGiQ6t2rtx4UoiswtwVYnMgg05gG4PRqFSYReOIyfpGDCs1EKziIJDrgzAPxzxMQ3uE4dVunqNvM
-        0I3MFtOgzL5rVuINkFK1mrqpZUvV5fYuqnvXbqozjQXq1qmrZwHmtoANcJgM8CUJz3B/ahMmXmwCRkMs
-        YgNPcCDENkWXnP+FDEBAeOaHk4kxwKxEGKBv7z5KktYgTc/7q6dUp2xQXaVUS1EVK1RQt9/W2bcdgxUp
-        dBvaAN+Q+C48aDr+05mE8mNu/BziRBihwd5JG6fO0v5aOH2WBntADv7O0YDPz2nmrMMZzXlF2mv2HT6u
-        9hNOBvhZZVC3CQPYYhqUWXfelXgDgN49e/noQ92AbTvgGCBdG+ArEp7hQGHUnEikCH6chRfGHJ1L5BRN
-        4o3agTt4M0FKlyC9a9yWzoJrlFNwP9QFOGMAGADHYGwxDcpdd955YQwQDWyA74+TAb495uELuiFOLOQm
-        qA1PZOAKbBUakLCxCk53faJrwV3Rf9HPO9ubs4CEGGBmAgyA1h0PY0aNpkFiuAF8ArjYhAqCrS4NiWcj
-        TGCGBI0kNDDFDiI4/dMFtxBcih6q53y4AajbxHTbFtOg4CCeK2PsxVZxNEgD7CbhGasAAptwEttrcoUE
-        zEtgRgos8cQGrpD0z4+jt7WVh0Q/T+8T4gzBK4FYDsbBoEQYYGYiDGD299GCAxrpDRuFGcAW+F8LU1iJ
-        T2TAAhL0Lwwuzt/+Fg6ces+rc0JwLbo2ZmhQyMcC2ACNqdEMGzLUGtOg3DFjxkVmgIMkvosZ+F8Ln7gM
-        i6bxC+zBQgP9mBAb0AtD72MR3BRdzBBOnTmrvqaYMEcuJgP06tFTxcMo1wBHfvzJ9yE5aBcEKYwPFi8C
-        jsa64L7zuCE0oIp8YltSutnCgRTcmTo6YCrJcUHjQKxggKGDh1hjGpQZ0y8GA4wYqRo1bKhdLQ1Acfz1
-        cAXlwn+HtrGL7BfaEVsK7RfbENxo4abgzjrCGXXSRXaPRyhbYnU1bgNMmx6/AXp276HiQRsgDQbwZwAO
-        Ov0LR4oUCfrPDtcbwicscMW1CWxL357QwNKy/WIHE/ykbxHqNM2Mjnqgu4QBhgwebI1pUKZPnfbvNwAO
-        aDQkA+Q1BpCixIJZn5/IwkpMkaMV2i927oL/+FOI4wQvkGGVFLHCUdchg+IzwLSLzgAizdkESDSeoMBL
-        08AiLiBRw0W2C+0XWwhtEdsm+PGT4JRe9wdymfxwogwwZWr8BujRrbuKB6xn44QRfCiZ5jjoO/d9f8HZ
-        kSuHHfb62Z4be0JsE2zd852D77i/wxYfh9SW3YfUZgJTPiz8fHngiAeWzTFuGjxwkDWmQZk6ecpFZICw
-        YwFndcva9MW3amMY9qNt4dheS+zKmw1R4j+0/I3DTj+fRmLHN+pfEUBmxAD5CxKe+e6HkxePAXDINx6w
-        no0jiIfpQ335DTnchfvJWMRINH5xhcDRiMxYRA5jOzig/kmgYcAEu0h4BgZAt4lz/G0xDcrkSZMvAgMM
-        DRlAupz7SBbAFCUawgW04QoaQVjGKqqJTdRIaLG/0WLbwLmSEHzX/u81Owk8lhgDTIrfALjoIx6wmpVW
-        v4H+UNIAPCBCH5hokFKPHM8btDwPtEQXtEobEEoL5oJT3T2OOhw8esLPkRPqW8E3R35U33wfgl8P4Rlt
-        AGo0OLffFtOgTJ54ERgAixlsAJnmePT7q3AixLGIkHmAYSbPUMAzjzCOMJDfME7LthrGNAoZQw5KD9Fj
-        MED/fv2tMQ0KLhFzZYy92CqOBkxlYADT5Qg2gu7HJkxehNcTSUgTT1ggMkMkgW3ZwRTZFBpimmLbMgKE
-        3+6C7bQB+vazxjQoCTFA19u7qHjASLZB/foUkBM+A/gDTpiCRItZn4ZG2C5hgkoswoYgUXMTGQQQ+lsI
-        baT/A+Cwg5xm4rVpDRqovn36WGMalAk5E/79BsBARhuAgiLn37ZgcyuLFltdueOKahE2TFwQqX8n/CLn
-        IrQntnPuH8MngrL42wjUow3QO14D5MRvgC6db1fxgIFM/Xr1dbCQ3njhxRb4RBMmJOMKam25kjBxmVxE
-        BhahpdiMPgPokINcUMJ7NKBus3evXtaYBgXXZboyxl5sFUcDrh/QBqAP5UtztoBfaHwi2nCFNcSNRuT9
-        hsim0HzWj8fBH/TBMbmKiPeHAXr17GmNaVASYgCc7h0PGMjUr1dPBxjpjcGHRMBD2ASJBqceT0DGFS8S
-        PlGB2ydbxQUWgT2RAwgtkcdG5HIx9gvdZs8ePa0xDQq+ocWVMfZiqzgacIFC/bowwI++NOcF2hQgHjzx
-        TCxCmlhEldgEDiKyKTTQx0PEsjgOAMljBdoAlDV7dO9hjWlQcFGOK2PsBVf+xAMGMrh8HAbw0hxhCzKA
-        EEGxvT4onqAWUcOEZdyvcQkiciShPfQlcqGFsc1fOweHAAyAbrN7t+7WmAblojAArh2sV7euTsdwNx8d
-        swU90VhFlLiCRhKVsYkLvKObrsA2kU2hgV4ME5fK4/sSPifhmQPfH9fdZreuXa0xDQquyXBljL3YKo4G
-        nJwYMsAhD1ugfw1sQpp4whrihgkMIoishRYis9B6HYSmweZh6s/1pengoO6ytAG6XAQGwHf/xANOTMDF
-        o3C1TnMuHOD12/eH8c8A2F4HPomFbZH5WLI1bz7aus/OFod1Bjz3/4yEZzAmQbeJkbwtpkEZPWrURWYA
-        t48DuuVQC/pg897E83k4axPA+5o9Dp/lzhobm8Lhqd9nX+KKYgeMUWCA2zt3tsY0KDgl35Ux9mJ+JVy0
-        9OjaTX+tDFwdSnOHvLRoC/SvhU/QAKJKrAIDi8hrNn3t4z0BvjkE3yiy6ctvPXCBKLpNpHFbTIOCE3Jd
-        GWMvtoqjAQMZNgCnOPRz3A/agvvvwiqoxCouiCxwbqwmuEHIM5rYAGjFtpgGJTEG6NBRxUO327uourX9
-        BgC8Iii7hYRDgWWcQDvmi4TcPx+UlmWKNtkIIpymtgHssp284pyAwvXq7Vwwg6lH3aYW0hLToOCEXFfG
-        2MutVFE8YCBThwyAfk0GbesenEQZjlwsCoKtDrne4ENMQxm5AGMj9MVPwlgu3tTNM5gDf+FUXuaRhtkg
-        zlaCATBussUzGnA+pitj7MVWcTREMoAt2AnHEy+yiCaRRPUL64obSGB/VvBaelhWCBkAaxQwQMdbOlhj
-        GpSEGAA7EQ8YyNSpVVv3azIQXmBl0OOF6wyAVUwhaCRRmVxTPhACh4lMqd88/xCP8/09h47pbrND+/bW
-        mAYF52O6MsZebBVHAwYyMACWXL3gEAiiDHYiMcUKQkjQcFF9wgKruLkLzPwL6BNGD3j8k5Db7DnoGOCW
-        m+MzwLChQxNggPa3qHi4jQYydWrWon7tGAXrGw9bkC80PhGBENEkJGowYZnQGcF+gT3cs4HXezgLWHJ7
-        rFjWpUbTvl07a0yDMmzwkPgN0IEqiodbqS+qTQZAWvMCqTGD7McmisT2mnDk+7mQSBKbiCahVhtMXL/A
-        IZHXu6uLYauNW/f76sG1k8ia+PJNM57RgBNyXRljLx0oDcUDUlHtmjW1AT4VQtgCfSHQ4gGfgCAkokQK
-        oXEFzVXYXMQFoaXifR7mErGse/e3R8kAtVS7Nm2sMQ3K0EGD4zcA+qF4gBPxDeNIa1IYHVBbwBMB6s4D
-        v5CMX9DcRAX+4wMhcW0Chx8H2KvWbd6rPnSR742DTrXJAPipHVtMgzJk0KAEGKDdzSoe2lMaq5VaUy1e
-        sZoC7/R1EImDyIFOFFKgaLAf8IkgKuMKaxXXEJixHrsgUD/E/2TbPrVk5WrdbbZqeZM1pkHBGdmujLEX
-        W8XRAANUr1ZNf/lx86bN8glAFsUKX8nbtlVra0yDMnjAwPgN0J4qihd8WzhSGo5x46rXjMaNVdPMLJXd
-        rLn+3mGkOmyHbx2/rVMn53uIu3XTZ8X269tPDaQPMoQGNCOGj9A/meb8PF2O/sp6XP82dcoUNW3qVP2L
-        WTNmzFAz77hD3Xnnnequu+5Ss2fNUnPmzNG/nnHvPfeo++69V91/333qgfvvVw8+8IB68MEHnVsCj+E5
-        bINt76bX4CvXZ1E9+NbNO2fOVHdQ3TOmT6f3mqam0ntOmTxZTZw4UZ+Dj5/MGzt2rP45N1wUO5j64AH9
-        B+jz+3v26KGPi+AIX6dbb9VdIwZ5rVu1Ui1btFDNSHj8RgC+VBOxwvcqmXGMFsTNlTH2ghb8a2Jzcl7Y
-        BkC/JrZ9ygvbZ080OCXflTH2Apfmc2mCU/JdGWMvN7dpq/K5NBlA3acrY+wFvwOQz6UJrslwZYy9tKMB
-        Wj6XJrgmw5Ux9mKrOJ9Lg369+8RvAEzR8rk0wUU5royxFyxG5HNp0qdXr/gN0IYqyufSpE/PRBjgplYq
-        n0uT3j165hvg/2fwjeGujLGX1i1vUvlcmuCqLFfG2Iut4nwuDXp26x6/AVq1aKkuZvjDIuXx6NebC7dp
-        4yyLtg0dIDEPytgO7tgwX8f16XV3vfLmvCfvA6dh3j/bvl9oenTrdukYgEVEEBFQBBknNuIKl86dOqmu
-        nW9X3bt01WkNo1sscmCtG99ChlOfhg8ZqkYOH64vhxozapS+NBpfkJAzdpyaMG68mpiTo783D9+eOWXS
-        ZP1FytOmTFHTp0zVP6wwYxqYbjBNP4evXce2eA1eizpQF+pE3XgPvBfec8zIUXofRg4brr8lFd+TOGjA
-        AL2v2OfePXvqlonP0qVzZ9X51k76vEmYTBuKPnvb1q0TYpruXbv+52eAfCIDk7kyxl5uym6hLiTNs5rq
-        VrV+/Xq1a9cuPzt3qp2SHTs0OyTbt6vtJtu2qW2SrVs1W5ktWzRbDDZv3qy2uOC+5PPPP/fx2WefhbFp
-        0ybNxo0b1fPPP6+yMjNVlUqVNZUrVQpRMQR+h7lShYr695crlq+gypcrp8onl1PVqlTVsbHFLCi4LtOV
-        MfbSsnm2upAgRR45ckTt3btX7d69+z+GAwcOqNWrV5P4lUjMKvq0uNSU6h41UlIcqjngR7hxGljVypW1
-        IcqVTdYmsMUsKOg2XRljL7aKE0WLZs31T5x/8MEH/5EgE1StXIWErq4v9MC3pWnq1PXAVcD1atfRVwLh
-        VHCcQFudzIDsUC45WcfIFrsgYIzhyhh7wQ5cKLKbNtPn79mC958ADADxcZEHvjAb5/mFaKh/TY3Bl0Nj
-        m/p16+rrKJAx0CUgRrbYBeH2TrfFbwDsQKJB/8TTtjmz56iPPvpIrVu3Tn344Yc+OJDvv/++x5o1ayLy
-        3nvv6Vtst3btWh9cl3zMfD8J75MNPPfxxx/r7WR9/B7Mhg0bVM3UVN3KIXhm4wzVpHFjh/QQGenpqjGZ
-        AjRs0EBnhNTqNfR4AeMAWwyDgBmGK2PsBTuQSJCaeB6NuTPO2mXBEDQEVQb7k08+8cBAke9DBBP5OhZS
-        Co37bCI2C9+ycRgWkcXl/ePXy20BPy+BAdCaG1Daz2iUrk/3ZnCaPAzBaCPQNo3S0vT2tcg4VWg8YIth
-        UHBdpitj7KVZZpZKJJieyEWUu+fc7QUMIuFWCiUFiAS2NV8nwePyPfh95H0Tfs5mKvNvbM/vwfsAPv30
-        08gGEOJLAyBT4FtCMRbA4NEWw6BgDcWVMfbSrEmmSiTIADABuoFWLVroc/c5YAwLh/tSPLO1swASPG5m
-        A8B1MPw+8j1k/bmB9C9B/Xhv1IE6kVUwA0DGqk1ChhmABAdafBIeaANgbEDjgTQyAIwDAzS1xDAot97S
-        IX4DYAcSCQYnvFABM+AiCwjASJEALtbAilruDFFDBw9WgwYOdC/C6Kl6dO9O3cvsMIOYInKXgvt4HGLi
-        FtuysLZb3o73E0Zi4d999121atUqXactA8j0j4tmvLGA7gKcDIDXpVStqre3xTEIWEl1ZYy9eK5NMBwA
-        XNXDLRFI8UFDGhkjgLmhp1M0cKpVI1XVJDCXrlyxol6A4XoBGwwi2sBzclsbsj4GwrP477zzjubtt9/W
-        JkEGwMgeAzz5ubX4rvAsfuNGjRwD0GfC62AAbGfGLii4QNSVMfYidzgRIPXjlGU+aMOtlFuXFB8geHlR
-        r44zh65Zo4ZKJSA+VtawqgaBbEKa4L1s+4DHcIttUJdM8WjpEPutt95SK1asUCtXrtT3cQvwOlwZjX2E
-        uJkZFAOiCXBnA7hMDrMAgOlhI5oOwgC1atbSBoA5bHEMAsZZroyxF+nSRIDBCS9UoBvANXcIciQD6IWS
-        vMAiCgWsBk2dsIhSrUpVvapWjQLI5jLfgx/nroCRXQKex7ZSfDaA+TdA2ocR3nzzTbV8+XL9HFI5Fn+Q
-        AZD6dcp3yaB4aHTrZwM00BmNM0ATetwWxyDgwJIrY+wFO5dIkJp4lJpF/RR+4RpisCBSfIAVsiDgcmrM
-        nfHtWqnoBmgAhYUU2bol/J6M2cIlsl/nFM9pnls/iw6WLVumli5dql+H0TwMgJ+D94TXrd4BwrP4GABi
-        QYgNgMUgWwyDggzryhh7wcg0kcCZEP8mZAEaEN4xY4Yngik+wBJqXmClTS+hUqtHv4/UX7ZMkkoiIBrE
-        AxAEQFQIDcEZbs1sAH4NIwVn0aXYixcv1ixZskSD+3gN9gvf+gmBtQHc1skiaQPQc44B0vSYxzMAfR48
-        Z4tjENDNujLGXhqTKxOJFh9Hq9xuAAawCc/UpZadF0j/GACmUOqvWL68Fr9MqVKqdMlSntBcH2cEbvFS
-        fJgFIgP04dyyZeuWf+MWBpAmWLRokVq4cKEGRsGCDgRF69bTPRIcaAOQSBCYY4P+H8vBPKBFN4bXyfhF
-        A1ZbXRljL9iBRILpCYTPbuYsV+KafikKC8VA3LxAa6lJ6R/z5sr6SFpZbQIcTJF1oX4Wnls6MoJM7bKV
-        swlsZmDRAZsALX/BggVq/vz5at68eXpbzEowToG4vpbvis+pH+gZD00B8d3KbAC8TsYvGnBSiStj7AU7
-        kEiwY9qhDZ3biRMmei1QtlQG4uYJBQuHWKtVruIce69YSVUoV17PBqTYnPq5T2dgADaB7NdlmufUzumd
-        WzkEl6KDuXPnqjfeeEObA8bEGAWDO5/wrkjpIjZYAMIMANvDONoAZAoZv2jAINuVMfYCV15IJozP8QTC
-        rWkAtIQ8oSDjmDoMgGPsOIhSgcYByUllfWMAFphF5pYtW7RM4xAWt/hbpnYJbwMDQPTXX39d89prr+m6
-        YExkKXxWT3SCRfJiQeKnkfgNaLyAMQ2MAwN4z1vIzmoqjv410+v/8nl0s66MsRfsWCLB/FQescJKIKZc
-        vEIXZgAKRF4gWDUoWFgAQkZA4DgTsOgyxUsDMJzeYQJu5VJ0eR9io5WjtXPLx98Q/tVXX1WvvPKKBtvC
-        mDAAUrvX2kkcoIVy4+KI7yxqYXunS6vqi50JxlL6wI87q4Lg8nl0ta6MsRfsWCJBAORAZWLOBJ2muX82
-        DVCzevU8QSurTnNmnH2TQlMnp/UnqbKETO+c2mVfzrecAWSaN03A6V6mfNMAL7/8snrppZfUiy++qB/H
-        VA4DQbRsHOptWJ/EIdJAPYoJAeHxPMSvW7u2O6V1ujRbDBm0fL3s66784W/5PBqYK2PspQHtVCJBP6jX
-        AWjH0Rfi922R+tkEpgH4FKrcQNrHDAAtvgYFDl0A1gCSaTDIrR7iy7QvhZfis/DSCGwCKTbSPUCq51YP
-        8SH8Cy+8oM8JhCGwmOMMBOvoPl73857oOEPIEd4RHyuaZAAyDHdpthgy6AL4QBKA4PJ5ZAdXxtgL71yi
-        QP/nHf0iM+D0arkYYxoAZ9Tkibv6B9Ex8Esum6ySSpdRZUqX9gkOoWVrly3elvplS2fRccutHeKz8Gj1
-        LPxzzz2nnn32WW0MiKgXqEhcR/AQcjUTz+s1DWr96NawolmVujFbDBmkfj2rcAeW+Fs+j4bmyhh7wZw0
-        kbDz+e+xY8b4RukQnadqAIHIE93/V1EVkp0zasvS4A+tH3BLZ8FZaCk+t3oz3UN8W6tnZMvntP/MM89o
-        /vGPf+jHcFIHDIq07glOn1sLDtyFLA3Ep2xRk0yNrgPjGI6TDaR/OZPA3+bzroyxl3q0Y4kEgxNeDAGc
-        AXh5Vk7bMF2DuHmB9I/WUpGmfjAEVgLR+ksUL+ETW7ZsU2ApMlo3g1bOsOAQVorOoPU//fTT6u9//7t6
-        6qmn9N/olrCPWBE0Vy8hOMNT2lo1aEBLBtCfiV5riyGDcwp4wIc+H3+bz7syxl5sK2/xALdiwKIHLrSD
-        uMqGWzuE5+Vanp9Xp0DkRQq1/iqY+1Pr16uBFaj/pywAE7D4spVLI0B4NgIMYDOC2dJZeE75Mu1D+L/9
-        7W/qySef1H9Xpn1JqVJFp3V8/joksgRrGAzE12Maav3o0rCoZcYPcN+P1M/9fX1q8RhU4zGMr7AdtnFl
-        jL2YOxwv2FmkK+wopoT4dk1O/7ZVOfShHtTKTdDyQSVcVEF9P86pL1umjCpdqpQqVbKUJ77sz6XIZuuG
-        yHzLQHCIzSJzipetHaKz8H/961/VX/7yF/089qsadQMQ1i+2s34hp7JI/egukDHwmWAAWwzRiDCFdFK9
-        m1VIcGQSdK+YYmI7ZFhXxtiL3OlEgB3EgAWDFwwEMQbgqZptjl6FglCZgohAOpR3oHTPIPVDfAz8YADu
-        /7EcjNYO4SO1aBaYW7TZqiOJDaEhMsSWoj/xxBPq8ccf12A7rEgiO0FULTKmriQ08GYyJDpwxK+ql7S5
-        S7PFEKAB6e6DhObVUIDYyvuujLEX34pbAkDr1ycs6FlAI20AOVUzp2kVkpN1OkerLksCg6RSpT3KAGrp
-        pUqUUCWKFdPb4iggHi9VsqSvH4fwDIsOkc2WzfCAjh83xYfY4LHHHtM8+uij3u0jjzyit4Ex0ZLRNZli
-        e7hjGT2eIQNgQIvXwAC2GAKkfIz05WMYByAr8N8YILoyxl4c1yYOOFOmPZzPx1M0nqbJqVoS9eMlixdX
-        xYsWVcVuvFFTtEgRzY2gcGFVpFAhVbhgQVWIKE4muJG2KUSPFbjhBmvrzk10gNbOoNWbaZ7v49bMChD+
-        z3/+s3r44Yd1FsCBKWQsnJ+Akb0HCQ0guAdaPsYzbvrHmMaMnwSpXv6NrkH+jcbmyhh74XSVKHQXQM5k
-        cCm1nKeb07OSNJK/sXAREriQKlSgoCpYoIAqSMIWuP4GdcP116sbrrteXX/ddeq6a6/Tt8XIKDBAETJG
-        YTIBp31kAL7lLGAO7LifhylgDjYDi8xAbJnu0eIZCP/QQw+pP/3pT9oMWJGsQAaAqMgCJr4xDsSn7gLi
-        o2tD9rPFkEFjwpgK99H6daMSz2N24MoYeyGXruS0lQiwo3oRiPon9FGjRozw0j0MYM7H0fLRsrXgLLYr
-        +HXXXquuu+Zade0116hr/scBrR7C4zW4hbCyr2ehZTaA2BAa4nJ6Z5DSITKne9znNA/Q2rnFQ3j99fPE
-        Aw88oP/GuARrExAWAvOgVYLnGC0+jXUq0mvKUXdmi6FEGsB8Do+RhJcJoi6XVa1a9erqlaq+hX4qEaCP
-        4lkAjDCSDCBbvrkIM3DgQEqfNCWiQFWiAFXUJ3w6J31WoECVp9aFeX85QEHTzxM4H7B/v35ea+Z0zynf
-        TPHyb5nSubUzbAbcSmAKtPj7779f3YffHMBvEpAJME6BkBDVJzRDn4XBAFYOavE6WwxNMJayPQ5zpKen
-        /5Z0vAJaugQu/IIrkpKS/rtapUpv2+bg0YLpCvouvYRJIAPAAAAGMKdpGCDK08X4oJFcO2B4OslTSmQT
-        2cezyDKVY/Rua93cqrllM0jt3MIhNpD37733XnXPPfdoYAIMUJNpUApRMZsx0TMbes6b0cDEhGOAJGsM
-        g4KBIul3VWpq6u+gI3G5q2mggg3xArz4qquvvrpA5QoV3rX1Y9GAfgrzVhwUQRYYPnSol/IhvJyuyfm5
-        7K8xqJMLMXJQJ9M6xOe0DqF5ysbwY2jZbAJGjuZlmpd9vDQCxJbiswFKlyipZy4VsEbBIucGia+XtKn1
-        Y/xgi2FQEGfS7r+J/0P8nogqE+jWT+CFVxPXXXnllUkVksqtxcpbrGDeikUMnCGDTIBft+R+H6k/FtFl
-        Kzf/5rQuUzrfZ9gAtrTOtzACi49bNoRpBGkAGKJUseLUDZTSgnLrzg0YhVs/MocthkHBOgHpVpD4I/Ff
-        BBpz4CyAjdB/XEXARaiozG9/+9t6Zcsk/dO2KhcEDE54SRP079tXp3tu8bGIziLjFs/zY7L1Q2AeuAGI
-        aqZ72bJxy7DAMtUDcxsgDQBK0rQU3UA5EhPi5gWMAmAALGTZYhgUrAWQZqWIAq6GVxLQNGoD/A9RhKhA
-        1L/iiis6lC1VajMOVkQLFjtwoAL9E25xLZ9teiYNYDMCm4CFRquWfTu3bpn62QgQHqKjVTMwAMNGYGFZ
-        cJnmZ8+erX+MSoLHTAOUKFpMdwPJmA244uYGhOfWj67DFsMgwABobKRXRaIYcS2BroCzQJ6FDYDUAQMU
-        JSoRjYiOl19+eU6ZoqV2Y6k2GjBl4TVsGAA/asD9vpn+zSzASAOYmYDF577dHLlzOpd9OovMArPI+NUw
-        EzyO7Ri8DpmBs4QUH5SgaWzpEiVITMwGHHHzAuInuyufthgGAWMtMsIvpFUqUZq4gfgDgS49UDeADTAG
-        QAZAH8IZII3oQIy97LLLnipevPgh2w5EAqNTXgkEXbt00cIBiCgF5SkZBJV9tymu2V+bItsGbVJkbr0s
-        MDBbN8NG4PswAerlumfNmuUD6xhYpo7WALz0bYthXvA0sHTp0idIpzpEMoEu/P8ScjCYa2EDoN/AC1FB
-        ElGbaEUMJR4jE7xZqmDBo7YdscHpiWnTurUOFASQgcPfDD+G3wKcOdP57T79+30zZqjp06erafwbflOm
-        qMnu7/jp3/KbMEHl5OSo8ePHqzFjxujf8xs5cqSG74+gaSjA32DcuHG5gt8FRF0m/Pjo0aN9lC6JWYAj
-        PgZ3QcEaALDFMDeQ9tHIcL9s2bI7SKO4DMDTQPQd6EOKE1WIxkQXYgbxHJlgedGiRQ/SKPYUTWFOFSty
-        42kbeI66gFO1a9f2aJaZeab9zTefZZo3bXauWdOmmqZZWd5tVmbmuYyMDI/G6ema9EaNzjVq2FCTnp5+
-        PhGkNWhwrn69eh74GzRg6tfX8OMtslucbZGdfTa7WfOzmU0yiSaaJhkZZysXLXa60o1FTxenz8/xyStG
-        uYE6bFQuX+HnihUq/lSpRIkfabtDSWWSNtHUHY005i4ARWYBngmgsupEU6IbMZ6YTTxIPEI8RjxOPCHA
-        38gWjxYsWPAvVatW/VtWVtZTnTt3fn7w4MGvUcuZTy114aRJkxZTK15CLXoZtejlxApq4W9Tq19FrX81
-        sYYywgeUvtdR6v2YWE8p/l+U6v+X2EipfhOl/s+IzcRWYht1B9vp8e002t9B2+6kv3fiPm2/A49Td7CN
-        UvdWqmsL1fs5pfaNlNo3UDfwKd3/F73fevr7I7r/IT3/Ad2uIVbT49gn7NtKykbLiaW074soi7w+dOjQ
-        V/v16/dKp06dXiJDvZCcnPz0H//4x8d/97vfIT5/JnD7KGKSC3ge25ng9ZKHiYeI+wg0SIjemWhB1CMw
-        CMT4LepBIIrMAjwYLETABNWIhsRNREeiK9GT6E30IfoK8HdvGjj2KlCgQP/U1NRhrVq1Gtu/f//plKbn
-        kMj3UsAfoH70YeIREuox4gnq46nLf/Lv1Pf/g3iWxgPP07jgRRofvES8QoPB12igOJemjfOIhcQiGjwu
-        oVuwlAaUy+jv5XS7AtBjb0rwnPv8UqpnMd1fTI8vosHoInpsAd3Op8fm0SD0deI1ej+854s0EKXJyPN0
-        97lnaDBKw5enn6L9epIGmo/T57iHzIHPNJuMPbNLly6TGjZsOJLGSv2uuuqqHhQHgDj1QkxyAc8HBfWh
-        MXYi2hCZRF2iMlGSwDQQ6T+qaSAXzgJIHXAQTIBMUIIoR1QlahJwGwaImCWkG+AxmCWtcuXKTW+55Za2
-        1Eo6UYvvSa1wIA3qBpOgQ2gAOJQCPYLEGElCjCYBxpAQ4+bOnZuzcOHCicSkRYsWTabbqUuWLJm+ePHi
-        GYD+voMenzl//vw7aEYxjbbHY3cuWLBgJu7jMZfpDNU7g2Yed9DzYAaYN2/edKoDr51Br50m6p9Kf0+h
-        5ybRfezHRNp2AtUzHvuH/cQ+kxkGU2bpTtmkG/mgC2WyzoMGDWrfsmXL7KSkpPQ//OEPDSgGAHFCPBCX
-        RIC6UC80gBZonNAGGkH8mBaCuGBjaQJUBDchpSAbIL3AZRggliXwxuUN8BgGImWLFStWqX79+ildu3at
-        Q4OwBpQ60ykFZ1CLz6D0nEGtPpMMkUWtqimgVqahFteMzNGcAp1NrbIlideCRNCQ+PqWRMwmUZrjOYDt
-        SKCbGHp9S2q9LXCfDNYKkOlakHDNyYDZ9D4a3Me2gLbB9tmi7mZUbxbtRxNA2zam2UdDylwNqKuoT8LX
-        vOuuu2pS95VKg8Ya9DmrpaWlVSxSpEjy73//e8QHIBa2OMUKxxcaYOEH8/7CxPVEzEvBskgTwEVIJagU
-        RkBGgBnwZhhowHGRwPPXFy5c+PqUlJQbmjZtWoACVKBPnz4FBw4cWIBSpoZG8AUphepb934hhoJbGFCg
-        i9ggM90YD7Y6Ab+v3BfeP4b3H58FnwmfDZ+RWv8NhQoV0p/djYEZF2TUWJH1oO7riGsICI8lfEzjoRm0
-        i7r1mwUvRiWoDH0JXIU3QFaAIQDeNBJ6G5ox/FfdunU1PXr0uCo7O/vKYcOG+aAAX3UpYe4/PhcNAK/i
-        z4nPzJ/fjcWFAHXjfaAJGimEh04xt/xIhStjM7AhgnJFx44dr6DAXQ7ob10f/32pY34WfFZ8ZsKMAwRK
-        FLJefj8vtoSl/OY3/w+WoIMvIOtjXAAAAABJRU5ErkJggg==
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAACsVSURBVHhe7Z0HnBRV1vZX3V15P/d791WUJJlhyDAwhAFm
+        GGAGGJAkoohkECRnGDKIBMWwuqZd13XNmQwiCIiIkV1fRcmoCAgCCoqgRO93nlt1qk/dvj1THXBhv7k/
+        /nRPd/Xt6vM899xQVd2/KSgFpaAUlIJSUApKQSkoBaWgFJSCUlAKSkGRpUuXLj1u6HTD3r59+/4ybNgw
+        NWLECDVy5Eg1atQoNXr0aDVmzBg1duxYNX7cOJU7frzKzc1VEyZMUBOJsWPGqkEDB6rnXnhJPfPiq+q5
+        l+arF15ZpBYuWqYWLX5NLV66Qi1dvlItf22Vem3FarVi5Rr1+htvqlWr31JvrFmvVr/5tmbNmxv8rNug
+        1q57R/PmW5J31ZvrmffUOvD2e+qtDe+r9Rs+CPHOh+rtdyUb1Yb3Njr338E279NrnNeuo7rWUt14zzXr
+        aH/Wrqd9w/6tUyvfWKtZsWoN7ftq9drrb6jlK1bR51mpli1/XS1dtkItWUqfc8ly+rxL1UJiwaIlasHC
+        xWr+goXq1fkL1CuvzlfPv/iyeua5F9VTzz6vnnzqaTWgf38d4/EUz3EUV8R3LMUZsR5DMUfcEf9RtM1I
+        0gOajBg+XA0fPvyXUUOG7O/Tq88AV774ypCBQ3oNJ9GXL1+unqYdG0eCBmX82HHqnnl3qw7t2qvd+w6q
+        Dzbt8Ni6cw/xlY8tO2LDrMepe4/axuzaG+LzvWq7xz7Nji/87GS+/NpjF7P7a/W55CuwX/OF4EvB7j0h
+        vgJ7DfbtV59s/Vx9TOD2628Oqw7t26s758y1xjUvpk+brrZs3qLWrlmrJk2YNNSVMfYyZNDgfXfcPlNt
+        27ZNvfTiS2rQbQOjYsL4XJXVPEsdPHpC7dh3xOPw0Z/VIZMjzE8BcLe11HP46El1+Hs/3/5wysd34Jif
+        I8dOO/zocFRy/LT6XvADOHFGc4z5yeFHwfGfwVnNCXDS4Sfm1Fn1M/HVwR/UHnDoB3q/n1V2VrYaPWq0
+        Nab5MWnCRDV29Bj12GOPHXBljL0MHjjo7MABtymmf79bVZcbb/LRo1t373kTxwDNSRi/AUxBvv3+VJho
+        QcFrw+pzsQntiJ2P4IQU3BTdFD5c9GDC/3zqnAbCM54BRo6yxjQo9//p/nMk4SWOkjGW2/oP8FVav159
+        lZKSolLrpKq6qal0W0dVq1pV3XxTF992TO648Y4Bvj+hdn59xMMmigcLlx+21xr4hBZiBxE8P9Gjbu0W
+        4U+edpAG+F4bICtuA9x91zxFEsZvAEmd2nVUZpMmqkV2tmrVsqUWF6bo2L6DbzsGBmjeLNwAnhBSnETA
+        9bqYInsYQucrODAED4ketLU7wp8UwoNTwgB7YYDjZADqNjHAs8U0KHfdeScMEF8xK61Xt67u09u3a6eu
+        79hRtc7JUQ3TGqqOHTr6tmMwM4ABDpMBdgkDWEVJMDaBJabYNsFjFt0mvCG65sw5dZqA8JrDjgEQ41Ej
+        4jPAnXPPgwHSGjSglt9K3dzlZtWjRw8SvoPKSE/XZjC3BaYBGJsgiUYLDFxxTYKIHVHwoKLbhCfBWXjN
+        2V+08EziDDA3fgMMuLW/kjTJaKKGDR2m5/jTpkylOekY1bNnT3U9ZQBzWzCOpoLNmzYjA/ykPt9/VLOL
+        YBE2fXHovPFpNHzp8NmXhwOxmdltZ4uFrV9JvtWcIfFBmAGo0YwcPsIa06DMnTMn8QZomtlUdadR/4hh
+        w7W4cNqNnTvnb4AfQgYA3OI+2vnNeeN/82MXc9DHxwH4xMbnkdnEkNkkEP/suZAB9iXSALMTYABM+yQY
+        BHbq1EkLP3jQINW3T189KERXYG4LsDjRjExjGoDTq1WYROCJy/hFDio0E63gIJLogDMPxD9HQHiHY9Rt
+        naRus5luZLaYBmXOrNmJN0BKzVrqujZtVLdbuqme3XuorjQWSGuQpmcB5raADfAtGeALEp7h/tQmTLzY
+        BIyGWMQGnuBAiG2KLjn3CxmAgPDMDycSY4DZiTDArX37KUl643Q976+dUpuyQW2VUitFVa1SRd1yc1ff
+        dgxWpNBtaAMcIPFdeNB07KfTCeXHvPg5xPEwQoO9EzZOnqH9tXDqDA32gBz8naUBn59TzBmH05pzirTX
+        7Pv2mPqacDLAz6oZdZswgC2mQZl9x6zEGwD07d3HRz/qBmzbAccAmdoAX5LwDAcKo+ZEIkXw4yy8MObo
+        XCKnaBJv1A7cwZsJUroE6V3jtnQWXKOcgvuhLsAZA8AAOAZji2lQZt1xx/kxQDSwAb47Rgb45nsPX9AN
+        cWIhL0FteCIDV2Cr0ICEjVVwuusTXQvuiv6Lft7Z3pwFJMQAMxNgALTueBgzajQNEsMN4BPAxSZUEGx1
+        aUg8G2ECMyRoJKGBKXYQwemfLriF4FL0UD3nwg1A3Sam27aYBgUH8VwZYy+2iqNBGmA3Cc9YBRDYhJPY
+        XpMnJGB+AjNSYIknNnCFpH9+HL2trTwk+jl6nxCnCV4JxHIwDgYlwgAzE2EAs7+PFhzQyMxoEmYAW+B/
+        LUxhJT6RAQtI0L8wuDh/+1s4cOo9p84KwbXo2pihQSEfC2ADNKVGM2zIUGtMg3L7jBkXmAEOkvguZuB/
+        LXziMiyaxi+wBwsN9GNCbEAvDL2PRXBTdDFDOHn6jPqKYsIcuZAM0KdXbxUPo1wDHPnxJ9+H5KCdF6Qw
+        Pli8CDga64L7zuOG0IAq8oltSelmCwdScGfq6ICpJMcFjQOxggGGDh5ijWlQZky/EAwwYqRqkpGhXS0N
+        QHH89XAF5cJ/h7axi+wX2hFbCu0X2xDcaOGm4M46wml1wkV2j0coW2J1NW4DTJsevwF69+yl4kEbIB0G
+        8GcADjr9C0eKFAn6zw7XG8InLHDFtQlsS9+e0MDSsv1iBxP8hG8R6hTNjI56oLuEAYYMHmyNaVCmT532
+        7zcADmhkkAHyGwNIUWLBrM9PZGElpsjRCu0XO2/Bf/wpxDGCF8iwSopY4ajrkEHxGWDaBWcAkeZsAiQa
+        T1DgpWlgEReQqOEi24X2iy2EtohtE/zYCXBSr/sDuUz+baIMMGVq/Abo1aOnigesZ+OEEXwomeY46Dv3
+        fXfe2ZEn3zrs9bM9L/aE2CbYuuewg++4v8MWH4fUlt2H1GYCUz4s/Hyx/4gHls0xbho8cJA1pkGZOnnK
+        BWSAsGMBZ3TL2vT5N+qTMOxH28KxvZbYlT8fR4n/0PIBh51+PorEjgPqXxFAZsQA+XMSnjn8w4kLxwA4
+        5BsPWM/GEcRv6UN9cYAc7sL9ZCxiJBq/uELgaERmLCKHsR3sV/8k0DBggl0kPAMDoNvEOf62mAZl8qTJ
+        F4ABhoYMIF3OfSQLYIoSDeEC2nAFjSAsYxXVxCZqJLTYB7TYNnCuJATf9fV3mp0EHkuMASbFbwBc9BEP
+        WM1Kb9RYfyhpAB4QoQ9MNEipR47lD1qeB1qiC1qlDQilBXPBqe4eRx0OHj3u58hx9Y3gwJEf1YHvQvDr
+        ITyjDUCNBuf222IalMkTLwADYDGDDSDTHI9+fxWOh/g+ImQeYJjJMxTwzCOMIwzkN4zTsq2GMY1CxpCD
+        0kP0GAwwoP8Aa0yDgkvEXBljL7aKowFTGRjAdDmCjaD7sQmTH+H1RBLSxBMWiMwQSWBbdjBFNoWGmKbY
+        towA4be7YDttgFv7W2MalIQYoPst3VQ8YCTbuFEjCshxnwH8ASdMQaLFrE9DI2yXMEElFmFDkKh5iQwC
+        CP0NhDbS/37wrYOcZuK16Y0bq1v79bPGNCgTcif8+w2AgYw2AAVFzr9tweZWFi22uvLGFdUibJi4IFL/
+        TvhFzkNoT2zn3D+GTwRl8bcRqEcboG+8BsiN3wDdut6i4gEDmUYNG+lgIb3xwost8IkmTEjGFdTaciVh
+        4jJ5iAwsQkuxGX0G0CEHuaCE92hM3WbfPn2sMQ0Krst0ZYy92CqOBlw/oA1AH8qX5mwBP9/4RLThCmuI
+        G43IXxsim0LzWT8eB3/QB8fkKiLeHwbo07u3NaZBSYgBcLp3PGAg06hhQx1gpDcGHxIBD2ETJBqcejwB
+        GVe8SPhEBW6fbBUXWAT2RA4gtEQeG5HLxdgvdJu9e/W2xjQo+IYWV8bYi63iaMAFCo3SYIAffWnOC7Qp
+        QDx44plYhDSxiCqxCRxEZFNooI+HiGVxHACSxwq0AShr9urZyxrToOCiHFfG2Auu/IkHDGRw+TgM4KU5
+        whZkACGCYnt9UDxBLaKGCcu4X+MSRORIQnvoS+RCC2Obv3IODgEYAN1mzx49rTENygVhAFw72DAtTadj
+        uJuPjtmCnmisIkpcQSOJytjEBd7RTVdgm8im0EAvholL5fF9CZ+R8Mz+747pbrNH9+7WmAYF12S4MsZe
+        bBVHA05ODBngkIct0L8GNiFNPGENccMEBhFE1kILkVlovQ5C02DzMPVn+tJ0cFB3WdoA3S4AA+C7f+IB
+        Jybg4lG4Wqc5Fw7wxu1fh/HPANheBz6MhW2R+UCyNX/e37rPzhaH9wx47v8pCc9gTIJuEyN5W0yDMnrU
+        qAvMAG4fB3TLoRb0zua9ieezcDYkgLc1exw+zZv1NjaFw1O/T7/AFcUOGKPAALd07WqNaVBwSr4rY+zF
+        /Eq4aOnVvYf+Whm4OpTmDnlp0RboXwufoAFElVgFBhaR12/6ysdbAnxzCL5RZNMX33jgAlF0m0jjtpgG
+        BSfkujLGXmwVRwMGMmwATnHo57gftAX334VVUIlVXBBZ4LxYR3CDkGc0sQHQim0xDUpiDND5RhUPPW7p
+        ptLq+w0AeEVQdgsJhwLLOIF2zBcJuX8+KC3LFG3yCYhwmtrHYJft5BXnBBSuV2/nghlMQ+o2tZCWmAYF
+        J+S6MsZebqKK4gEDmQZkAPRrMmhb9+AkynDkYlEQbHXI9QYfYhrKyAUYG6EvfhLGcvGmbp7BHPgLp/Iz
+        jzTMx+JsJRgA4yZbPKMB52O6MsZebBVHQyQD2IKdcDzxIotoEklUv7CuuIEE9mcFr6WHZYWQAbBGAQPc
+        eENna0yDkhADYCfiAQOZBvXq635NBsILrAx6vHCdAbCKKQSNJCqTZ8oHQuAwkSn1m+cf4nG+v+fQ97rb
+        7NypkzWmQcH5mK6MsRdbxdGAgQwMgCVXLzgEgiiDnUhMsYIQEjRcVJ+wwCpu3gIz/wL6hNH9Hv8k5DZ7
+        DjoGuOH6+AwwbOjQBBig0w0qHm6mgUyDuvWoX/uegnXAwxbk841PRCBENAmJGkxYJnRGsF9gD/ds4I0e
+        zgKW3B4rlmnUaDp17GiNaVCGDR4SvwE6U0XxcBP1RfXJAEhrXiA1ZpD92ESR2F4Tjnw/FxJJYhPRJNRq
+        g4nrFzgk8kZ3dTFstXHr1756cO0ksia+fNOMZzTghFxXxthLZ0pD8YBUVL9uXW2Aj4QQtkCfD7R4wCcg
+        CIkokUJoXEHzFDYPcUFoqXifh7lELOve/c1RMkA91bF9e2tMgzJ00OD4DYB+KB7gRHzDONKaFEYH1Bbw
+        RIC688EvJOMXNC9Rgf/4QEhcm8DhxwH2qvc271Xvusj3xkGn+mQA/NSOLaZBGTJoUAIM0PF6FQ+dKI3V
+        S62rlq5cR4F3+jqIxEHkQCcKKVA02A/4RBCVcYW1imsIzFiPXRCoH+J/uG2fWrZqne4227a5zhrToOCM
+        bFfG2Iut4miAAWrXqqW//LhVi5YFBCCbYoWv5O3Qtp01pkEZfNvA+A3QiSqKF3xbOFIajnHjqtdmTZuq
+        FlnZKqdlK/29w0h12A7fOn5zly7O9xD36KHPiu1/a381kD7IEBrQjBg+Qv9kmvPzdLn6K+tx/dvUKVPU
+        tKlT9S9mzZgxQ828/XZ1xx13qFmzZqk5s2eruXPn6l/PmHfXXeruefPUPXffre695x513733qvvuu8+5
+        JfAYnsM22PZOeg2+cn021YNv3bxj5kx1O9U9Y/p0eq9paiq955TJk9XEiRP1Ofj4ybyxY8fqn3PDRbGD
+        qQ++bcBt+vz+3r166eMiOMLX5aabdNeIQV67tm1Vm9atVUsSHr8RgC/VRKzwvUpmHKMFcXNljL2gBf+a
+        2JycH7YB0K+JbZ/yw/bZEw1OyXdljL3ApQVcnOCUfFfG2Mv17TuoAi5ObqPu05Ux9oLfASjg4gTXZLgy
+        xl460gCtgIsTXJPhyhh7sVVcwMVB/7794jcApmgFXJzgohxXxtgLFiMKuDjp16dP/AZoTxUVcHHSr3ci
+        DHBdW1XAxUnfXr0LDPD/M/jGcFfG2Eu7NtepAi5OcFWWK2PsxVZxARcHvXv0jN8AbVu3URcy/GGR8nj0
+        682F27d3lkU7hA6QmAdlbAd3bJiv4/r0urteeXPek/eB0zDvn23fzze9evS4eAzAIiKICCiCjBMbcYVL
+        1y5dVPeut6ie3brrtIbRLRY5sNaNbyHDqU/DhwxVI4cP15dDjRk1Sl8ajS9IyB07Tk0YN15NzM3V35uH
+        b8+cMmmy/iLlaVOmqOlTpuofVpgxDUw3mKafw9euY1u8Bq9FHagLdaJuvAfeC+85ZuQovQ8jhw3X35KK
+        70kcdNttel+xz31799YtE5+lW9euqutNXfR5kzCZNhR99g7t2iXEND27d//PzwAFRAYmc2WMvVyX01qd
+        T1plt9CtauPGjWrXrl1+du5UOyU7dmh2SLZvV9tNtm1T2yRbt2q2Mlu2aLYYbN68WW1xwX3JZ5995uPT
+        Tz8NY9OmTZpPPvlEPfPMMyo7K0vVqFZdU71atRBVQ+B3mKtVqap/f7lq5SqqcqVKqnJyJVWrRk0dG1vM
+        goLrMl0ZYy9tWuWo8wlS5JEjR9TevXvV7t27/2PYv3+/WrduHYlfjcSsoU+LS02p7VEnJcWhlgN+hBun
+        gdWsXl0bolLFZG0CW8yCgm7TlTH2Yqs4UbRu2Ur/xPk777zzHwkyQc3qNUjo2vpCD3xbmqZBmgeuAm5Y
+        v4G+EginguME2tpkBmSHSsnJOka22AUBYwxXxtgLduB8kdOipT5/zxa8/wRgAIiPizzwhdk4zy9Ehv41
+        NQZfDo1tGqWl6esokDHQJSBGttgF4ZYuN8dvAOxAokH/xNO2uXPmqvfff1+999576t133/XBgXz77bc9
+        1q9fH5G33npL32K7DRs2+OC65GPm+0l4n2zguQ8++EBvJ+vj92A+/vhjVTc1VbdyCJ7VtJlq3rSpQ2aI
+        ZpmZqimZAmQ0bqwzQmrtOnq8gHGALYZBwAzDlTH2gh1IJEhNPI/G3Bln7bJgCBqCKoP94YcfemCgyPch
+        gol8HQsphcZ9NhGbhW/ZOAyLyOLy/vHr5baAn5fAAGjNjSntN2uSqU/3ZnCaPAzBaCPQNk3S0/X29cg4
+        NWg8YIthUHBdpitj7KVlVrZKJJieyEWUO+fe6QUMIuFWCiUFiAS2NV8nwePyPfh95H0Tfs5mKvNvbM/v
+        wfsAPvroo8gGEOJLAyBT4FtCMRbA4NEWw6BgDcWVMfbSsnmWSiTIADABuoG2rVvrc/c5YAwLh/tSPLO1
+        swASPG5mA8B1MPw+8j1k/XmB9C9B/Xhv1IE6kVUwA0DGqk9ChhmABAdafBIeaANgbEDjgXQyAIwDA7Sw
+        xDAoN93QOX4DYAcSCQYnvFABM+AiCwjASJEALtbAilreDFFDBw9WgwYOdC/C6K169exJ3cucMIOYInKX
+        gvt4HGLiFtuysLZb3o73E0Zi4d988021du1aXactA8j0j4tmvLGA7gKcDIDXpdSsqbe3xTEIWEl1ZYy9
+        eK5NMBwAXNXDLRFI8UEGjYwRwLzQ0ykaONWrk6rqEphLV69aVS/AcL2ADQYRbeA5ua0NWR8D4Vn8NWvW
+        aFavXq1NggyAkT0GePJza/Fd4Vn8pk2aOAagz4TXwQDYzoxdUHCBqCtj7EXucCJA6scpy3zQhlspty4p
+        PkDw8qNhA2cOXbdOHZVKQHysrGFVDQLZhDTBe9n2AY/hFtugLpni0dIh9htvvKFWrlypVq1ape/jFuB1
+        uDIa+whxs5pRDIjmwJ0N4DI5zAIApodNaDoIA9SrW08bAOawxTEIGGe5MsZepEsTAQYnvFCBbgDX3CHI
+        kQygF0ryA4soFLA6NHXCIkqtGjX1qlotCiCby3wPfpy7AkZ2CXge20rx2QDm3wBpH0Z4/fXX1YoVK/Rz
+        SOVY/EEGQOrXKd+lGcVDo1s/G6CxzmicAZrT47Y4BgEHllwZYy/YuUSC1MSj1Gzqp/AL1xCDBZHiA6yQ
+        BQGXU2PujG/XSkU3QAMoLKTI1i3h92TMFi6R/TqneE7z3PpZdPDaa6+p5cuX69dhNA8D4OfgPeF1q3eA
+        8Cw+BoBYEGIDYDHIFsOgIMO6MsZeMDJNJHAmxL8OWYAGhLfPmOGJYIoPsISaH1hp00uo1OrR7yP1V6yQ
+        pJIIiAbxAAQBEBVCQ3CGWzMbgF/DSMFZdCn20qVLNcuWLdPgPl6D/cK3fkJgbQC3dbJI2gD0nGOAdD3m
+        8QxAnwfP2eIYBHSzroyxl6bkykSixcfRKrcbgAFswjNp1LLzA+kfA8AUSv1VK1fW4lcoV06VL1vOE5rr
+        44zALV6KD7NAZIA+nFu2bN3yb9zCANIES5YsUYsXL9bAKFjQgaBo3Xq6R4IDbQASCQJzbND/YzmYB7To
+        xvA6Gb9owGqrK2PsBTuQSDA9gfA5LZ3lSlzTL0VhoRiImx9oLXUp/WPeXF0fSauoTYCDKbIu1M/Cc0tH
+        RpCpXbZyNoHNDCw6YBOg5S9atEgtXLhQLViwQG+LWQnGKRDX1/Jd8Tn1Az3joSkgvluZDYDXyfhFA04q
+        cWWMvWAHEgl2TDs0w7mdOGGi1wJlS2Ugbr5QsHCItVb1Gs6x96rVVJVKlfVsQIrNqZ/7dAYGYBPIfl2m
+        eU7tnN65lUNwKTqYP3++evXVV7U5YEyMUTC48wnvipQpYoMFIMwAsD2Mow1AppDxiwYMsl0ZYy9w5flk
+        wvhcTyDcmgZAS8gXCjKOqcMAOMaOgyhVaByQnFTRNwZggVlkbtmyRcs0DmFxi79lapfwNjAARH/llVc0
+        L7/8sq4LxkSWwmf1RCdYJC8WJH46id+YxgsY08A4MID3vIWc7Bbi6F9Lvf4vn0c368oYe8GOJRLMT+UR
+        K6wEYsrFK3RhBqBA5AeCVYeChQUgZAQEjjMBiy5TvDQAw+kdJuBWLkWX9yE2WjlaO7d8/A3hX3rpJfXi
+        iy9qsC2MCQMgtXutncQBWig3Lo74zqIWtne6tJq+2JlgLKUP/LizKggun0dX68oYe8GOJRIEQA5UJuZO
+        0Gma+2fTAHVr184XtLLaNGfG2TcpNHVyWn+SqkjI9M6pXfblfMsZQKZ50wSc7mXKNw3wwgsvqOeff149
+        99xz+nFM5TAQRMvGod6MRiQOkQ4aUkwICI/nIX5a/frulNbp0mwxZNDy9bKvu/KHv+XzaGCujLGXxrRT
+        iQT9oF4HoB1HX4jft0XqZxOYBuBTqPICaR8zALT4OhQ4dAFYA0imwSC3eogv074UXorPwksjsAmk2Ej3
+        AKmeWz3Eh/DPPvusPicQhsBijjMQbKD7eN3Pe6LjDCFHeEd8rGiSAcgw3KXZYsigC+ADSQCCy+eRHVwZ
+        Yy+8c4kC/Z939IvMgNOr5WKMaQCcUZMv7uofRMfAL7liskoqX0FVKF/eJziElq1dtnhb6pctnUXHLbd2
+        iM/Co9Wz8E8//bR66qmntDEgol6gInEdwUPI1Uw8r9c0qPWjW8OKZk3qxmwxZJD69azCHVjib/k8Gpor
+        Y+wFc9JEws7nv8eOGeMbpUN0nqoBBCJfdP9fQ1VJds6orUiDP7R+wC2dBWehpfjc6s10D/FtrZ6RLZ/T
+        /pNPPqn5xz/+oR/DSR0wKNK6Jzh9bi04cBeyNBCfskVdMjW6DoxjOE42kP7lTAJ/m8+7MsZeGtKOJRIM
+        TngxBHAG4OVZOW3DdA3i5gfSP1pLVZr6wRBYCUTrL1O6jE9s2bJNgaXIaN0MWjnDgkNYKTqD1v/EE0+o
+        v//97+rxxx/Xf6Nbwj5iRdBcvYTgDE9p69WhAS0ZQH8meq0thgzOKeABH/p8/G0+78oYe7GtvMUD3IoB
+        ix640A7iKhtu7RCel2t5fl6bApEfKdT6a2DuT61frwZWof6fsgBMwOLLVi6NAOHZCDCAzQhmS2fhOeXL
+        tA/h//a3v6nHHntM/12d9iWlRg2d1vH5G5DIEqxhMBBfj2mo9aNLw6KWGT/AfT9SP/f3jajFY1CNxzC+
+        wnbYxpUx9mLucLxgZ5GusKOYEuLbNTn921bl0Id6UCs3QcsH1XBRBfX9OKe+YoUKqny5cqpc2XKe+LI/
+        lyKbrRsi8y0DwSE2i8wpXrZ2iM7C//Wvf1V/+ctf9PPYr1rUDUBYv9jO+oWcyiL1o7tAxsBnggFsMUQj
+        whTSSfVuViHBkUnQvWKKie2QYV0ZYy9ypxMBdhADFgxeMBDEGICnarY5eg0KQnUKIgLpUNmB0j2D1A/x
+        MfCDAbj/x3IwWjuEj9SiWWBu0WarjiQ2hIbIEFuK/uijj6pHHnlEg+2wIonsBFG1yJi6ktDAm8mQ6MAR
+        v6Ze0uYuzRZDgAakuw8SmldDAWIr77syxl58K24JAK1fn7CgZwFNtAHkVM2cplVJTtbpHK26IgkMksqV
+        96gAqKWXK1NGlSlVSm+Lo4B4vFzZsr5+HMIzLDpENls2wwM6ftwUH2KDhx9+WPPQQw95tw8++KDeBsZE
+        S0bXZIrt4Y5l9HiGDIABLV4DA9hiCJDyMdKXj2EcgKzAf2OA6MoYe3FcmzjgTJn2cD4fT9F4mianaknU
+        j5ctXVqVLllSlbr2Wk3JEiU014LixVWJYsVU8aJFVTGiNJngWtqmGD1W5JprrK07L9EBWjuDVm+meb6P
+        WzMrQPg///nP6oEHHtBZAAemkLFwfgJG9h4kNIDgHmj5GM+46R9jGjN+EqR6+Te6Bvk3GpsrY+yF01Wi
+        0F0AOZPBpdRynm5Oz8rSSP7a4iVI4GKqWJGiqmiRIqooCVvk6mvUNVdfra4pfLW6unBhVfiqwvq2FBkF
+        BihBxihOJuC0jwzAt5wFzIEd9/MwBczBZmCRGYgt0z1aPAPh77//fvWnP/1JmwErklXIABAVWcDEN8aB
+        +NRdQHx0bch+thgyaEwYU+E+Wr9uVOJ5zA5cGWMv5NJVnLYSAXZULwJR/4Q+atSIEV66hwHM+ThaPlq2
+        FpzFdgUvfNVVqvCVV6mrrrxSXfk/Dmj1EB6vwS2ElX09Cy2zAcSG0BCX0zuDlA6ROd3jPqd5gNbOLR7C
+        66+fJ+699179N8YlWJuAsBCYB60SPMdo8WmsU5VeU4m6M1sMJdIA5nN4jCS8RBB1uaRmzZpX1K5W8w30
+        U4kAfRTPAmCEkWQA2fLNRZiBAwdS+qQpEQWqGgWoqj7h0znpswoFqjK1Lsz7KwEKmn6ewPmAA/r391oz
+        p3tO+WaKl3/LlM6tnWEz4FYCU6DF33PPPepu/OYAfpOATIBxCoSEqD6hGfosDAawclCL19liaIKxlO1x
+        mCMzM/O3pONl0NIlcOEXXJaUlPTftapVW22bg0cLpivou/QSJoEMAAMAGMCcpmGAKE8X44NGcu2A4ekk
+        TymRTWQfzyLLVI7Ru611c6vmls0gtXMLh9hA3p83b5666667NDABBqjJNCiFqJjNmOiZDT3nzWhgYsIx
+        QJI1hkHBQJH0K5Samvo76Ehc6moaqGBDvAAvLnTFFVcUqV6lypu2fiwa0E9h3oqDIsgCw4cO9VI+hJfT
+        NTk/l/01BnVyIUYO6mRah/ic1iE0T9kYfgwtm03AyNG8TPOyj5dGgNhSfDZA+TJl9cylCtYoWOS8IPH1
+        kja1fowfbDEMCuJM2v038X+I3xNRZQLd+gm88Aqi8OWXX55UJanSBqy8xQrmrVjEwBkyyAT4dUvu95H6
+        YxFdtnLzb07rMqXzfYYNYEvrfAsjsPi4ZUOYRpAGgCHKlSpN3UA5LSi37ryAUbj1I3PYYhgUrBOQbkWJ
+        PxL/RaAxB84C2Aj9RyECLkJFFX772982rFgh6Z+2VbkgYHDCS5pgwK236nTPLT4W0Vlk3OJ5fky2fgjM
+        AzcAUc10L1s2bhkWWKZ6YG4DpAFAWZqWohuoRGJC3PyAUQAMgIUsWwyDgrUA0qwcUcTV8HICmkZtgP8h
+        ShBViEaXXXZZ54rlym3GwYpowWIHDlSgf8ItruWzTc+kAWxGYBOw0GjVsm/n1i1TPxsBwkN0tGoGBmDY
+        CCwsCy7T/Jw5c/SPUUnwmGmAMiVL6W4gGbMBV9y8gPDc+tF12GIYBBgAjY30qkqUIq4i0BVwFsi3sAGQ
+        OmCAkkQ1oglx46WXXppboWS53ViqjQZMWXgNGwbAjxpwv2+mfzMLMNIAZiZg8blvN0funM5ln84is8As
+        Mn41zASPYzsGr0Nm4CwhxQdlaBpbvkwZEhOzAUfc/ID4ye7Kpy2GQcBYi4zwC2mVSpQnriH+QKBLD9QN
+        YAOMAZAB0IdwBkgnOhNjL7nkksdLly59yLYDkcDolFcCQfdu3bRwACJKQXlKBkFl322Ka/bXpsi2QZsU
+        mVsvCwzM1s2wEfg+TIB6ue7Zs2f7wDoGlqmjNQAvfdtimB88DSxfvvxx0qkBkUygC/+/hBwM5lnYAOg3
+        8EJUkETUJ9oSQ4mHyQSvlyta9KhtR2xwemLat2unAwUBZODwN8OP4bcAZ850frtP/37fjBlq+vTpahr/
+        ht+UKWqy+zt++rf8JkxQubm5avz48WrMmDH69/xGjhyp4fsjaBoK8DcYN25cnuB3AVGXCT8+evRoH+XL
+        YhbgiI/BXVCwBgBsMcwLpH00MtyvWLHiDtIoLgPwNBB9B/qQ0kQNoinRjZhBPE0mWFGyZMmDNIo9SVOY
+        kyWLlzhlA89RF3Cyfv36Hi2zsk53uv76M0zL7BZnW2Rna7KzsrzbrObNzzZt2tQjs0kTTZOMjLMZ6ema
+        zMzMc4mgcaNGZxumpXngb9CIadhQw4+3zml9pnVOzpmclq3OZDXPIpprmjdrdqb6tSVPVStx7alS9Pk5
+        PvnFKC9Qh43qlav8XLVK1Z+qlSnzI213KKlC0iaauqORxtwFoMgswDMBVFabaEH0IMYTc4j7iAeJh4lH
+        iEcF+BvZ4qGiRYv+pWbNmn/Lzs5+vGvXrs8MHjz4ZWo5C6mlLp40adJSasXLqEW/Ri16BbGSWvhqavVr
+        qfWvI9ZTRniH0vd7lHo/IDZSiv8Xpfr/JT6hVL+JUv+nxGZiK7GNuoPt9Ph2Gu3voG130t87cZ+234HH
+        qTvYRql7K9W1her9jFL7J5TaP6Zu4CO6/y96v4309/t0/116/h26XU+so8exT9i3VZSNVhDLad+XUBZ5
+        ZejQoS/179//xS5dujxPhno2OTn5iT/+8Y+P/O53v0N8/kzg9iHEJA/wPLYzweslDxD3E3cTaJAQvSvR
+        mmhIYBCI8VvUg0AUmQV4MFiMgAlqERnEdcSNRHeiN9GX6EfcKsDffWng2KdIkSIDUlNTh7Vt23bsgAED
+        plOanksiz6OA30v96APEgyTUw8Sj1MdTl//Y36nv/wfxFI0HnqFxwXM0PnieeJEGgy/TQHE+TRsXEIuJ
+        JTR4XEa3YDkNKF+jv1fQ7UpAj70uwXPu88upnqV0fyk9voQGo0vosUV0u5AeW0CD0FeIl+n98J7P0UCU
+        JiPP0N2nn6TBKA1fnnic9usxGmg+Qp/jLjIHPtMcMvbMbt26TcrIyBhJY6X+hQoV6kVxAIhTH8QkD/B8
+        UFAfGmMXoj2RRaQR1YmyBKaBSP9RTQO5cBZA6oCDYAJkgjJEJaImUZeA2zBAxCwh0wCPwSzp1atXb3HD
+        DTd0oFbShVp8b2qFA2lQN5gEHUIDwKEU6BEkxkgSYjQJMIaEGDd//vzcxYsXTyQmLVmyZDLdTl22bNn0
+        pUuXzgD09+30+MyFCxfeTjOKabQ9Hrtj0aJFM3Efj7lMZ6jeGTTzuJ2eBzPAggULplMdeO0Meu00Uf9U
+        +nsKPTeJ7mM/JtK2E6ie8dg/7Cf2mcwwmDJLT8omPcgH3SiTdR00aFCnNm3a5CQlJWX+4Q9/aEwxAIgT
+        4oG4JALUhXqhAbRA44Q20Ajix7QQxAUbSxOgIrgJKQXZAOkFLsMAsSKBN65sgMcwEKlYqlSpatSPpnTv
+        3r0BDcIaU+rMpBTcjFp8M0rPzajVZ5EhsqlVtQDUyjTU4lqSOVpRoHOoVbYh8VqTCBoSX9+SiDkkSis8
+        B7AdCXQdQ69vQ623Ne6TwdoCMl1rEq4VGTCH3keD+9gW0DbYPkfU3ZLqzab9aA5o26Y0+8igzNWYuopG
+        JHzdWbNm1aXuK5UGjXXoc9ZKT0+vWqJEieTf//73iA9ALGxxihWOLzTAwg/m/cWJq4mYl4JlkSaAi5BK
+        UCmMgIwAM+DNMNCA4yKB568uXrz41SkpKde0aNGiCAWoSL9+/YoOHDiwCKVMDY3gi1IK1bfu/WIMBbc4
+        oECXsEFmujYebHUCfl+5L7x/DO8/Pgs+Ez4bPiO1/muKFSumP7sbAzMuyKixIutB3YWJKwkIjyV8TOOh
+        GbSLuvWbBS9GJagMfQlchTdAVoAhAN40EnobmjH8V1pamqZXr16FcnJyLh82bJgPCnChiwlz//G5aABY
+        iD8nPjN/fjcW5wPUjfeBJmikEB46xdzyIxWujM3AhgjKZTfeeONlFLhLAf2t6+O/L3bMz4LPis9MmHGA
+        QIlC1svv58WWsJTf/Ob/AUb1grMc6K9fAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="ToolStripButton7.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -468,7 +468,7 @@
 </value>
  </data>
  <data name="C1TrueDBDropdown1.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:Aqua;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{}Style14{}Footer{}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.DropdownView Name="" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" RecordSelectors="False" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 213, 148&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.DropdownView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 213, 148&lt;/ClientArea&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:Aqua;}Normal{}RecordSelector{AlignImage:Center;}OddRow{}Style14{}Footer{}FilterBar{}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.DropdownView Name="" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" RecordSelectors="False" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 213, 148&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.DropdownView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 213, 148&lt;/ClientArea&gt;&lt;/Blob&gt;</value>
  </data>
  <data name="C1TrueDBDropdown2.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
@@ -478,7 +478,7 @@
 </value>
  </data>
  <data name="C1TrueDBDropdown2.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:Aqua;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{}Style14{}Footer{}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.DropdownView Name="" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" RecordSelectors="False" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 231, 148&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.DropdownView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 231, 148&lt;/ClientArea&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:Aqua;}Normal{}RecordSelector{AlignImage:Center;}OddRow{}Style14{}Footer{}FilterBar{}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.DropdownView Name="" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" RecordSelectors="False" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 231, 148&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.DropdownView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 231, 148&lt;/ClientArea&gt;&lt;/Blob&gt;</value>
  </data>
  <metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>270, 17</value>
--- a/DPM2016/Klassen/clsStammdaten_flat.vb
+++ b/DPM2016/Klassen/clsStammdaten_flat.vb
@@ -342,4 +342,8 @@ Public Class clsStammdaten_flat

        End If
    End Sub
+
+    Private Sub c1daten_MouseDown(sender As Object, e As MouseEventArgs) Handles c1daten.MouseDown
+        c1daten.Bookmark = c1daten.RowContaining(e.Y)
+    End Sub
 End Class
--- a/Project/licenses.licx
+++ b/Project/licenses.licx
@@ -1,4 +1,5 @@
-ComponentOwl.BetterThumbnailBrowser.BetterThumbnailBrowser, BetterThumbnailBrowser-net35, Version=3.15.0.0, Culture=neutral, PublicKeyToken=e6c91a3add447be2
-C1.Win.C1TrueDBGrid.C1TrueDBGrid, C1.Win.C1TrueDBGrid.2, Version=2.0.20153.110, Culture=neutral, PublicKeyToken=75ae3fb0e2b1e0da
-C1.Win.C1Input.C1PictureBox, C1.Win.C1Input.4, Version=4.0.20153.110, Culture=neutral, PublicKeyToken=7e7ff60f0c214f9a
+C1.Win.C1Input.C1Button, C1.Win.C1Input.4, Version=4.0.20153.110, Culture=neutral, PublicKeyToken=7e7ff60f0c214f9a
 C1.Win.C1Command.C1DockingTab, C1.Win.C1Command.4, Version=4.0.20153.110, Culture=neutral, PublicKeyToken=e808566f358766d8
+C1.Win.C1TrueDBGrid.C1TrueDBGrid, C1.Win.C1TrueDBGrid.2, Version=2.0.20153.110, Culture=neutral, PublicKeyToken=75ae3fb0e2b1e0da
+ComponentOwl.BetterThumbnailBrowser.BetterThumbnailBrowser, BetterThumbnailBrowser-net35, Version=3.15.0.0, Culture=neutral, PublicKeyToken=e6c91a3add447be2
+C1.Win.C1Input.C1PictureBox, C1.Win.C1Input.4, Version=4.0.20153.110, Culture=neutral, PublicKeyToken=7e7ff60f0c214f9a
--- a/DPM2016/Recall/Recall.resx
+++ b/DPM2016/Recall/Recall.resx
@@ -161,6 +161,6 @@
 </value>
  </data>
  <data name="C1Recall.PropBag" xml:space="preserve">
-    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;ForeColor:ControlText;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 316, 265&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 316, 265&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
+    <value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 316, 265&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 316, 265&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
  </data>
 </root>
--- a/DPM2016/Recall/Recall.vb
+++ b/DPM2016/Recall/Recall.vb
@@ -95,4 +95,8 @@
    Private Sub ToolStrip1_ItemClicked(sender As Object, e As ToolStripItemClickedEventArgs) Handles ToolStrip1.ItemClicked

    End Sub
+
+    Private Sub C1Recall_MouseDown(sender As Object, e As MouseEventArgs) Handles C1Recall.MouseDown
+        Me.C1Recall.Bookmark = Me.C1Recall.RowContaining(e.Y)
+    End Sub
 End Class
--- a/DPM2016/Sysadmin/frmDentotarDetail.Designer.vb
+++ b/DPM2016/Sysadmin/frmDentotarDetail.Designer.vb
@@ -0,0 +1,299 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmDentotarDetail
+    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.Label1 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.TextBox1 = New System.Windows.Forms.TextBox()
+        Me.TextBox2 = New System.Windows.Forms.TextBox()
+        Me.TextBox3 = New System.Windows.Forms.TextBox()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.TextBox4 = New System.Windows.Forms.TextBox()
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.TextBox5 = New System.Windows.Forms.TextBox()
+        Me.Label5 = New System.Windows.Forms.Label()
+        Me.Label6 = New System.Windows.Forms.Label()
+        Me.TextBox6 = New System.Windows.Forms.TextBox()
+        Me.Label8 = New System.Windows.Forms.Label()
+        Me.TextBox7 = New System.Windows.Forms.TextBox()
+        Me.Label7 = New System.Windows.Forms.Label()
+        Me.TextBox8 = New System.Windows.Forms.TextBox()
+        Me.Label9 = New System.Windows.Forms.Label()
+        Me.TextBox9 = New System.Windows.Forms.TextBox()
+        Me.Label10 = New System.Windows.Forms.Label()
+        Me.TextBox10 = New System.Windows.Forms.TextBox()
+        Me.Label11 = New System.Windows.Forms.Label()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Button2 = New System.Windows.Forms.Button()
+        Me.SuspendLayout()
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Location = New System.Drawing.Point(34, 21)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(58, 13)
+        Me.Label1.TabIndex = 0
+        Me.Label1.Text = "LeistungNr"
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Location = New System.Drawing.Point(34, 48)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(58, 13)
+        Me.Label2.TabIndex = 1
+        Me.Label2.Text = "Lesitung D"
+        '
+        'TextBox1
+        '
+        Me.TextBox1.Location = New System.Drawing.Point(112, 18)
+        Me.TextBox1.Name = "TextBox1"
+        Me.TextBox1.Size = New System.Drawing.Size(100, 20)
+        Me.TextBox1.TabIndex = 3
+        '
+        'TextBox2
+        '
+        Me.TextBox2.Location = New System.Drawing.Point(112, 48)
+        Me.TextBox2.Multiline = True
+        Me.TextBox2.Name = "TextBox2"
+        Me.TextBox2.Size = New System.Drawing.Size(348, 40)
+        Me.TextBox2.TabIndex = 4
+        '
+        'TextBox3
+        '
+        Me.TextBox3.Location = New System.Drawing.Point(112, 94)
+        Me.TextBox3.Multiline = True
+        Me.TextBox3.Name = "TextBox3"
+        Me.TextBox3.Size = New System.Drawing.Size(348, 40)
+        Me.TextBox3.TabIndex = 6
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Location = New System.Drawing.Point(34, 94)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(53, 13)
+        Me.Label3.TabIndex = 5
+        Me.Label3.Text = "Lesitung I"
+        '
+        'TextBox4
+        '
+        Me.TextBox4.Location = New System.Drawing.Point(112, 140)
+        Me.TextBox4.Multiline = True
+        Me.TextBox4.Name = "TextBox4"
+        Me.TextBox4.Size = New System.Drawing.Size(348, 40)
+        Me.TextBox4.TabIndex = 8
+        '
+        'Label4
+        '
+        Me.Label4.AutoSize = True
+        Me.Label4.Location = New System.Drawing.Point(34, 140)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(53, 13)
+        Me.Label4.TabIndex = 7
+        Me.Label4.Text = "Lesitung f"
+        '
+        'TextBox5
+        '
+        Me.TextBox5.Location = New System.Drawing.Point(112, 186)
+        Me.TextBox5.Name = "TextBox5"
+        Me.TextBox5.Size = New System.Drawing.Size(100, 20)
+        Me.TextBox5.TabIndex = 10
+        '
+        'Label5
+        '
+        Me.Label5.AutoSize = True
+        Me.Label5.Location = New System.Drawing.Point(34, 189)
+        Me.Label5.Name = "Label5"
+        Me.Label5.Size = New System.Drawing.Size(39, 13)
+        Me.Label5.TabIndex = 9
+        Me.Label5.Text = "Einheit"
+        '
+        'Label6
+        '
+        Me.Label6.AutoSize = True
+        Me.Label6.Location = New System.Drawing.Point(218, 189)
+        Me.Label6.Name = "Label6"
+        Me.Label6.Size = New System.Drawing.Size(75, 13)
+        Me.Label6.TabIndex = 11
+        Me.Label6.Text = "(TP oder CHF)"
+        '
+        'TextBox6
+        '
+        Me.TextBox6.Location = New System.Drawing.Point(112, 212)
+        Me.TextBox6.Name = "TextBox6"
+        Me.TextBox6.Size = New System.Drawing.Size(100, 20)
+        Me.TextBox6.TabIndex = 13
+        '
+        'Label8
+        '
+        Me.Label8.AutoSize = True
+        Me.Label8.Location = New System.Drawing.Point(34, 215)
+        Me.Label8.Name = "Label8"
+        Me.Label8.Size = New System.Drawing.Size(38, 13)
+        Me.Label8.TabIndex = 12
+        Me.Label8.Text = "Betrag"
+        '
+        'TextBox7
+        '
+        Me.TextBox7.Location = New System.Drawing.Point(112, 238)
+        Me.TextBox7.Name = "TextBox7"
+        Me.TextBox7.Size = New System.Drawing.Size(100, 20)
+        Me.TextBox7.TabIndex = 15
+        '
+        'Label7
+        '
+        Me.Label7.AutoSize = True
+        Me.Label7.Location = New System.Drawing.Point(34, 241)
+        Me.Label7.Name = "Label7"
+        Me.Label7.Size = New System.Drawing.Size(77, 13)
+        Me.Label7.TabIndex = 14
+        Me.Label7.Text = "TP UV_MV_IV"
+        '
+        'TextBox8
+        '
+        Me.TextBox8.Location = New System.Drawing.Point(112, 264)
+        Me.TextBox8.Name = "TextBox8"
+        Me.TextBox8.Size = New System.Drawing.Size(100, 20)
+        Me.TextBox8.TabIndex = 17
+        '
+        'Label9
+        '
+        Me.Label9.AutoSize = True
+        Me.Label9.Location = New System.Drawing.Point(34, 267)
+        Me.Label9.Name = "Label9"
+        Me.Label9.Size = New System.Drawing.Size(41, 13)
+        Me.Label9.TabIndex = 16
+        Me.Label9.Text = "PP Min"
+        '
+        'TextBox9
+        '
+        Me.TextBox9.Location = New System.Drawing.Point(112, 290)
+        Me.TextBox9.Name = "TextBox9"
+        Me.TextBox9.Size = New System.Drawing.Size(100, 20)
+        Me.TextBox9.TabIndex = 19
+        '
+        'Label10
+        '
+        Me.Label10.AutoSize = True
+        Me.Label10.Location = New System.Drawing.Point(34, 293)
+        Me.Label10.Name = "Label10"
+        Me.Label10.Size = New System.Drawing.Size(51, 13)
+        Me.Label10.TabIndex = 18
+        Me.Label10.Text = "PP Privat"
+        '
+        'TextBox10
+        '
+        Me.TextBox10.Location = New System.Drawing.Point(112, 316)
+        Me.TextBox10.Name = "TextBox10"
+        Me.TextBox10.Size = New System.Drawing.Size(100, 20)
+        Me.TextBox10.TabIndex = 21
+        '
+        'Label11
+        '
+        Me.Label11.AutoSize = True
+        Me.Label11.Location = New System.Drawing.Point(34, 319)
+        Me.Label11.Name = "Label11"
+        Me.Label11.Size = New System.Drawing.Size(44, 13)
+        Me.Label11.TabIndex = 20
+        Me.Label11.Text = "PP Max"
+        '
+        'Button1
+        '
+        Me.Button1.Location = New System.Drawing.Point(36, 363)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(75, 23)
+        Me.Button1.TabIndex = 23
+        Me.Button1.Text = "Speichern"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'Button2
+        '
+        Me.Button2.Location = New System.Drawing.Point(137, 363)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(75, 23)
+        Me.Button2.TabIndex = 24
+        Me.Button2.Text = "Abbruch"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
+        'frmDentotarDetail
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(625, 416)
+        Me.Controls.Add(Me.Button2)
+        Me.Controls.Add(Me.Button1)
+        Me.Controls.Add(Me.TextBox10)
+        Me.Controls.Add(Me.Label11)
+        Me.Controls.Add(Me.TextBox9)
+        Me.Controls.Add(Me.Label10)
+        Me.Controls.Add(Me.TextBox8)
+        Me.Controls.Add(Me.Label9)
+        Me.Controls.Add(Me.TextBox7)
+        Me.Controls.Add(Me.Label7)
+        Me.Controls.Add(Me.TextBox6)
+        Me.Controls.Add(Me.Label8)
+        Me.Controls.Add(Me.Label6)
+        Me.Controls.Add(Me.TextBox5)
+        Me.Controls.Add(Me.Label5)
+        Me.Controls.Add(Me.TextBox4)
+        Me.Controls.Add(Me.Label4)
+        Me.Controls.Add(Me.TextBox3)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.TextBox2)
+        Me.Controls.Add(Me.TextBox1)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.Label1)
+        Me.Name = "frmDentotarDetail"
+        Me.Text = "Dentotar"
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents Label1 As Label
+    Friend WithEvents Label2 As Label
+    Friend WithEvents TextBox1 As TextBox
+    Friend WithEvents TextBox2 As TextBox
+    Friend WithEvents TextBox3 As TextBox
+    Friend WithEvents Label3 As Label
+    Friend WithEvents TextBox4 As TextBox
+    Friend WithEvents Label4 As Label
+    Friend WithEvents TextBox5 As TextBox
+    Friend WithEvents Label5 As Label
+    Friend WithEvents Label6 As Label
+    Friend WithEvents TextBox6 As TextBox
+    Friend WithEvents Label8 As Label
+    Friend WithEvents TextBox7 As TextBox
+    Friend WithEvents Label7 As Label
+    Friend WithEvents TextBox8 As TextBox
+    Friend WithEvents Label9 As Label
+    Friend WithEvents TextBox9 As TextBox
+    Friend WithEvents Label10 As Label
+    Friend WithEvents TextBox10 As TextBox
+    Friend WithEvents Label11 As Label
+
+    Friend WithEvents Button1 As Button
+    Friend WithEvents Button2 As Button
+End Class
--- a/DPM2016/Sysadmin/frmDentotarDetail.resx
+++ b/DPM2016/Sysadmin/frmDentotarDetail.resx
@@ -0,0 +1,120 @@
+<?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>
+</root>
--- a/DPM2016/Sysadmin/frmDentotarDetail.vb
+++ b/DPM2016/Sysadmin/frmDentotarDetail.vb
@@ -0,0 +1,27 @@
+Public Class frmDentotarDetail
+
+    Dim db As New clsDB
+    Dim m_pk As Integer
+    Property pk As Integer
+        Get
+            Return m_pk
+        End Get
+        Set(value As Integer)
+            m_pk = value
+        End Set
+    End Property
+
+    Private Sub frmDentotarDetail_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+
+    End Sub
+
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        Me.DialogResult = DialogResult.OK
+        Me.Close()
+    End Sub
+
+    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
+        Me.DialogResult = DialogResult.Abort
+        Me.Close()
+    End Sub
+End Class
--- a/DPM2016/Utils/Globals.vb
+++ b/DPM2016/Utils/Globals.vb
@@ -35,6 +35,7 @@ Module Globals
    Public pdfCollection As New Collection
    Public InAbschluss As Integer = 0
    Public License As New SHUKeyGen.clsKeyGen("", "", "", "", "", ":DPMKEY:", "Steafn Hutter Unternehmensberatung, 8808 Pfäffikon SZ")
+    Public Recall_Bei_Abschluss As Boolean = True

    Public Enum Taxpunkttyp
        Privat = 1
--- a/DPM2016/Utils/frmSQLCript.Designer.vb
+++ b/DPM2016/Utils/frmSQLCript.Designer.vb
@@ -0,0 +1,109 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmSQLCript
+    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()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSQLCript))
+        Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
+        Me.tsbtnquit = New System.Windows.Forms.ToolStripButton()
+        Me.tsbtnSave = New System.Windows.Forms.ToolStripButton()
+        Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
+        Me.TextBox1 = New System.Windows.Forms.TextBox()
+        Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStrip1.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'ToolStrip1
+        '
+        Me.ToolStrip1.AllowDrop = True
+        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbtnquit, Me.tsbtnSave, Me.ToolStripButton1})
+        Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
+        Me.ToolStrip1.Name = "ToolStrip1"
+        Me.ToolStrip1.Size = New System.Drawing.Size(800, 25)
+        Me.ToolStrip1.TabIndex = 22
+        Me.ToolStrip1.Text = "ToolStrip1"
+        '
+        'tsbtnquit
+        '
+        Me.tsbtnquit.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.tsbtnquit.Image = CType(resources.GetObject("tsbtnquit.Image"), System.Drawing.Image)
+        Me.tsbtnquit.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.tsbtnquit.Name = "tsbtnquit"
+        Me.tsbtnquit.Size = New System.Drawing.Size(23, 22)
+        Me.tsbtnquit.Text = "Schliessen"
+        '
+        'tsbtnSave
+        '
+        Me.tsbtnSave.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.tsbtnSave.Image = CType(resources.GetObject("tsbtnSave.Image"), System.Drawing.Image)
+        Me.tsbtnSave.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.tsbtnSave.Name = "tsbtnSave"
+        Me.tsbtnSave.Size = New System.Drawing.Size(23, 22)
+        Me.tsbtnSave.Text = "Datei öffnen"
+        '
+        'OpenFileDialog1
+        '
+        Me.OpenFileDialog1.FileName = "OpenFileDialog1"
+        Me.OpenFileDialog1.Filter = "SQL-Dateien|*.sql"
+        '
+        'TextBox1
+        '
+        Me.TextBox1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.TextBox1.Location = New System.Drawing.Point(0, 25)
+        Me.TextBox1.Multiline = True
+        Me.TextBox1.Name = "TextBox1"
+        Me.TextBox1.Size = New System.Drawing.Size(800, 425)
+        Me.TextBox1.TabIndex = 23
+        '
+        'ToolStripButton1
+        '
+        Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton1.Image = CType(resources.GetObject("ToolStripButton1.Image"), System.Drawing.Image)
+        Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton1.Name = "ToolStripButton1"
+        Me.ToolStripButton1.Size = New System.Drawing.Size(23, 22)
+        Me.ToolStripButton1.Text = "Ausführen"
+        '
+        'frmSQLCript
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(800, 450)
+        Me.Controls.Add(Me.TextBox1)
+        Me.Controls.Add(Me.ToolStrip1)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.Name = "frmSQLCript"
+        Me.Text = "SQL-Script"
+        Me.ToolStrip1.ResumeLayout(False)
+        Me.ToolStrip1.PerformLayout()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents ToolStrip1 As ToolStrip
+    Friend WithEvents tsbtnquit As ToolStripButton
+    Friend WithEvents tsbtnSave As ToolStripButton
+    Friend WithEvents OpenFileDialog1 As OpenFileDialog
+    Friend WithEvents TextBox1 As TextBox
+    Friend WithEvents ToolStripButton1 As ToolStripButton
+End Class
--- a/DPM2016/Utils/frmSQLCript.resx
+++ b/DPM2016/Utils/frmSQLCript.resx
--- a/DPM2016/Utils/frmSQLCript.vb
+++ b/DPM2016/Utils/frmSQLCript.vb
@@ -0,0 +1,26 @@
+Imports System.IO
+Public Class frmSQLCript
+    Private Sub tsbtnSave_Click(sender As Object, e As EventArgs) Handles tsbtnSave.Click
+        Dim fileno1 As Integer = 1
+        If OpenFileDialog1.ShowDialog = DialogResult.OK Then
+            If OpenFileDialog1.FileName <> "" Then
+                Try
+                    TextBox1.Text = System.IO.File.ReadAllText(OpenFileDialog1.FileName)
+                Catch ex As Exception
+                    ' Let the user know what went wrong.
+                    MsgBox(ex.Message)
+                End Try
+            End If
+        End If
+
+    End Sub
+
+    Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
+        Dim db As New clsDB
+        db.Exec_SQL(Me.TextBox1.Text)
+    End Sub
+
+    Private Sub tsbtnquit_Click(sender As Object, e As EventArgs) Handles tsbtnquit.Click
+        Me.Close()
+    End Sub
+End Class
--- a/DPM2016/bin/Debug/C1.Win.C1Command.2.dll
+++ b/DPM2016/bin/Debug/C1.Win.C1Command.2.dll
--- a/DPM2016/bin/Release/C1.Win.C1Command.4.xml
+++ b/DPM2016/bin/Release/C1.Win.C1Command.4.xml
--- a/DPM2016/bin/Debug/Connectionstrings.cfg
+++ b/DPM2016/bin/Debug/Connectionstrings.cfg
@@ -1,4 +1,4 @@
-˜ª´µ¯´‡§Á®¾ºˆ¸¦Æ¯e»¼ºÀ¶§‚Å©É…~‚¡¦™¬¹§e©§½¬»½º‘©¶®¬ºÂÈ¦¾‡ÁÁ®¾³€±»¹³º´¦Æ¦¸uÁ¬›¢¡Ä¿~˜™–’†¿³ÅÇ®¹µn»º·É·»ÉÇt®À´´…³¦ºÆ§€É°ÆÀÁ»™¬™§¾fª©ƒ¹¬²¹¸Èe¹ªÈ’ˆ„~ˆÃÇªÄn®¬Š¸¯Ž²¦Å´ËÄÀ«ub£ Åxz
+˜•“{²©Éµt¸ÁÊÀ·ªÁ½}u‰¼°®ÆªµÁnª™¬‘¤¿~©¶³¨¯´¼Çµ±x´»±Á¹®ÀÉ³»·³Âª¬m¸³¶··»µÍ’¡šˆk¨µ¸´®¹ºi¾´±ÈÆ®ººn±ÃºÃ‚¸¶ºÇªÅ´º¸¸Â´¶®Á¯t¾²„s¨‘›»«µe¹¯Ã°Œ‚ƒ{¶ÁÇt½©È¯µ³Á¸¿¼·²l¸º¶†Ž
 ¦´«º±ÃŽ¸¦Æ¶nÇ´ÇÀ¨Š¸¶ÈruªÂ¾Â°™¤P›±º¢±µ†¯¿»²Æ´«º±Ã½³ÆºµÆ¦Æ³©hÀª±È´®Æº‘¨¡—s Â¹ª¸ºf¼°²ÃÅ½¹¿a·¶»Ã‘«³ÁÁ¹€É½·³À¹¯Ç«´Àa½¹‹‚¨™“£µºa¸¯À®ˆƒ~ŒŠ€»´³ºu½¸‚Å¶‰Ä¦ÅÁ¼·¿©‹}µÇs
 ˜Š“ˆ¬¶ÈµeÅÄÃÆ¨·‹¸°Âu~Ž«³»µ½¶ºg›™¤™¼µ¨‚ª¶¶ª³³ÁÈ¦²sÁµ¾À¹€»ÃÂ¹¬Ä¯¹±eÁ¸¥ºÄªÈÎ‹š‹ˆysÀ«³¸¯¹½kÂ³¶É·¯µÇh¾Âº´»¯À¸·‰¼·¿°ÁÇ£¹»°Âu·«us ™³±¦¹f¹²Å´‹‡„~||Ã»ºÆt®¶’Áµ€Â¯¸»Ä´À·oÅ©É‡‡
 ˜ª´µ·»¸µ¹³uÁÃºÄ±ª…ÀÃƒr€»¯½É·¨¤X“™Ä§´ƒ»¼€ƒ…}¥r‰±ÃÈ¹¬Ä¶Â¹©rÁª«Â··Ç»‚¥”¤ž‰·ª£¡Ãºa¸«©¾½¸ÂÌt®´§½…»µÀ¸·ÅÃ·½Á¹©Á®½Áb®¶~Å¯ª£¤XÃ¯»ªƒzy„…‰ÈÇª¸a·¬’Çµ€Â¶ÁÇ¼ÁÀ©…w¸¶Èt~
--- a/DPM2016/bin/Debug/DPM/PrinterConfig/Default.cfg
+++ b/DPM2016/bin/Debug/DPM/PrinterConfig/Default.cfg
@@ -0,0 +1,18 @@
+Microsoft Print to PDF
+1;Microsoft Print to PDF;;1
+2;Microsoft Print to PDF;;1
+3;Buelach_HPCDCFDC (HP Officejet Pro X476dw MFP);260;1
+4;;;1
+5;Microsoft Print to PDF;;2
+6;Microsoft Print to PDF;;2
+7;Microsoft Print to PDF;;1
+1000;Buelach_HPCDCFDC (HP Officejet Pro X476dw MFP);259;1
+Microsoft Print to PDF
+1;Standard;;1
+2;Microsoft Print to PDF;;1
+3;Buelach_HPCDCFDC (HP Officejet Pro X476dw MFP);260;1
+4;;;1
+5;Microsoft Print to PDF;;2
+6;Microsoft Print to PDF;;2
+7;Microsoft Print to PDF;;1
+1000;Buelach_HPCDCFDC (HP Officejet Pro X476dw MFP);259;1
--- a/DPM2016/bin/Debug/DPM/PrinterConfig/fax.cfg
+++ b/DPM2016/bin/Debug/DPM/PrinterConfig/fax.cfg
@@ -0,0 +1,9 @@
+Microsoft Print to PDF
+1;Microsoft Print to PDF;;1
+2;Microsoft Print to PDF;;1
+3;Fax;260;1
+4;;;1
+5;Microsoft Print to PDF;;2
+6;Microsoft Print to PDF;;2
+7;Microsoft Print to PDF;;1
+1000;Buelach_HPCDCFDC (HP Officejet Pro X476dw MFP);259;1
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Abgeschlossene_Behandlungen
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Abgeschlossene_Behandlungen
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="CSharp" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="01/14/2018 14:02:31" ReportInfo.CreatorVersion="2017.4.1.0">
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="Behandlungsbeginn" DataType="System.DateTime"/>
+      <Column Name="Behandlungsende" DataType="System.DateTime"/>
+      <Column Name="Total" DataType="System.Double"/>
+      <Column Name="Patient" DataType="System.String"/>
+      <Column Name="Behandler" DataType="System.String"/>
+      <Column Name="Status" DataType="System.Int32"/>
+      <Column Name="aktiv" DataType="System.Boolean" BindableControl="CheckBox"/>
+    </TableDataSource>
+    <Parameter Name="Absender" DataType="System.String"/>
+  </Dictionary>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="37.8">
+      <TextObject Name="Text1" Left="9.45" Width="255.15" Height="18.9" Text="Abgeschlossene Behandlungen" Font="Arial, 10pt, style=Bold, Underline"/>
+      <TextObject Name="Text12" Left="349.65" Width="349.65" Height="18.9" Text="[Absender]" HorzAlign="Right"/>
+    </ReportTitleBand>
+    <PageHeaderBand Name="PageHeader1" Top="41.84" Width="718.2" Height="28.35">
+      <TextObject Name="Text3" Left="9.45" Width="94.5" Height="18.9" Text="Beh-Beginn" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text5" Left="122.85" Width="94.5" Height="18.9" Text="Patient" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text7" Left="415.8" Width="122.85" Height="18.9" Text="Behandler" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text9" Left="604.8" Width="94.5" Height="18.9" Text="Total" HorzAlign="Right" Font="Arial, 10pt, style=Bold"/>
+      <LineObject Name="Line1" Left="9.45" Top="18.9" Width="689.85"/>
+    </PageHeaderBand>
+    <DataBand Name="Data1" Top="74.23" Width="718.2" Height="18.9" DataSource="Daten">
+      <TextObject Name="Text2" Left="9.45" Width="94.5" Height="18.9" Text="[Daten.Behandlungsbeginn]" Format="Date" Format.Format="d"/>
+      <TextObject Name="Text4" Left="122.85" Width="283.5" Height="18.9" Text="[Daten.Patient]"/>
+      <TextObject Name="Text6" Left="415.8" Width="189" Height="18.9" Text="[Daten.Behandler]"/>
+      <TextObject Name="Text8" Left="604.8" Width="94.5" Height="18.9" Text="[Daten.Total]" Format="Number" Format.UseLocale="true" HorzAlign="Right" WordWrap="false" Trimming="EllipsisCharacter"/>
+    </DataBand>
+    <PageFooterBand Name="PageFooter1" Top="97.17" Width="718.2" Height="37.8">
+      <TextObject Name="Text10" Left="9.45" Top="9.45" Width="170.1" Height="18.9" Text="[Date]"/>
+      <LineObject Name="Line2" Left="9.45" Width="689.85"/>
+      <TextObject Name="Text11" Left="604.8" Top="9.45" Width="94.5" Height="18.9" Text="[Page#]" HorzAlign="Right"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Abgeschlossene_Behandlungen.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Abgeschlossene_Behandlungen.frx
@@ -0,0 +1,69 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="Vb" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="08/26/2018 11:32:33" ReportInfo.CreatorVersion="2018.2.11.0">
+  <ScriptText>Imports System
+Imports System.Collections
+Imports System.Collections.Generic
+Imports System.ComponentModel
+Imports System.Windows.Forms
+Imports System.Drawing
+Imports Microsoft.VisualBasic
+Imports FastReport
+Imports FastReport.Data
+Imports FastReport.Dialog
+Imports FastReport.Table
+Imports FastReport.Barcode
+Imports FastReport.Utils
+
+Namespace FastReport
+  Public Class ReportScript
+
+
+    Private Sub Picture1_BeforePrint(ByVal sender As object, ByVal e As EventArgs)
+      dim s as String()
+      s=report.FileName.Split(&quot;Reporting&quot;)
+      Dim ReportLogo as String
+      ReportLogo=s(0)+&quot;\Reporting\Logo\reportlogo.png&quot;
+      picture1.ImageLocation=Reportlogo
+  
+    End Sub
+  End Class
+End Namespace
+</ScriptText>
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="Behandlungsbeginn" DataType="System.DateTime"/>
+      <Column Name="Behandlungsende" DataType="System.DateTime"/>
+      <Column Name="Total" DataType="System.Double"/>
+      <Column Name="Patient" DataType="System.String"/>
+      <Column Name="Behandler" DataType="System.String"/>
+      <Column Name="Status" DataType="System.Int32"/>
+      <Column Name="aktiv" DataType="System.Boolean" BindableControl="CheckBox"/>
+    </TableDataSource>
+    <Parameter Name="Absender" DataType="System.String"/>
+  </Dictionary>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="75.6">
+      <TextObject Name="Text1" Left="444.15" Width="255.15" Height="18.9" Text="Abgeschlossene Behandlungen" HorzAlign="Right" Font="Arial, 10pt, style=Bold, Underline"/>
+      <TextObject Name="Text12" Left="349.65" Top="18.9" Width="349.65" Height="18.9" Text="[Absender]" HorzAlign="Right"/>
+      <PictureObject Name="Picture1" Left="9.45" Width="160.65" Height="47.25" BeforePrintEvent="Picture1_BeforePrint" Image=""/>
+    </ReportTitleBand>
+    <PageHeaderBand Name="PageHeader1" Top="78.93" Width="718.2" Height="28.35">
+      <TextObject Name="Text3" Left="9.45" Width="94.5" Height="18.9" Text="Beh-Beginn" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text5" Left="122.85" Width="94.5" Height="18.9" Text="Patient" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text7" Left="415.8" Width="122.85" Height="18.9" Text="Behandler" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text9" Left="604.8" Width="94.5" Height="18.9" Text="Total" HorzAlign="Right" Font="Arial, 10pt, style=Bold"/>
+      <LineObject Name="Line1" Left="9.45" Top="18.9" Width="689.85"/>
+    </PageHeaderBand>
+    <DataBand Name="Data1" Top="110.62" Width="718.2" Height="18.9" DataSource="Daten">
+      <TextObject Name="Text2" Left="9.45" Width="94.5" Height="18.9" Text="[Daten.Behandlungsbeginn]" Format="Date" Format.Format="d"/>
+      <TextObject Name="Text4" Left="122.85" Width="283.5" Height="18.9" Text="[Daten.Patient]"/>
+      <TextObject Name="Text6" Left="415.8" Width="189" Height="18.9" Text="[Daten.Behandler]"/>
+      <TextObject Name="Text8" Left="604.8" Width="94.5" Height="18.9" Text="[Daten.Total]" Format="Number" Format.UseLocale="true" HorzAlign="Right" WordWrap="false" Trimming="EllipsisCharacter"/>
+    </DataBand>
+    <PageFooterBand Name="PageFooter1" Top="132.85" Width="718.2" Height="37.8">
+      <TextObject Name="Text10" Left="9.45" Top="9.45" Width="170.1" Height="18.9" Text="[Date]"/>
+      <LineObject Name="Line2" Left="9.45" Width="689.85"/>
+      <TextObject Name="Text11" Left="604.8" Top="9.45" Width="94.5" Height="18.9" Text="[Page#]" HorzAlign="Right"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Abgeschlossene_KV.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Abgeschlossene_KV.frx
@@ -0,0 +1,69 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="Vb" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="08/26/2018 11:33:35" ReportInfo.CreatorVersion="2018.2.11.0">
+  <ScriptText>Imports System
+Imports System.Collections
+Imports System.Collections.Generic
+Imports System.ComponentModel
+Imports System.Windows.Forms
+Imports System.Drawing
+Imports Microsoft.VisualBasic
+Imports FastReport
+Imports FastReport.Data
+Imports FastReport.Dialog
+Imports FastReport.Table
+Imports FastReport.Barcode
+Imports FastReport.Utils
+
+Namespace FastReport
+  Public Class ReportScript
+
+
+    Private Sub Picture1_BeforePrint(ByVal sender As object, ByVal e As EventArgs)
+      dim s as String()
+      s=report.FileName.Split(&quot;Reporting&quot;)
+      Dim ReportLogo as String
+      ReportLogo=s(0)+&quot;\Reporting\Logo\reportlogo.png&quot;
+      picture1.ImageLocation=Reportlogo
+
+    End Sub
+  End Class
+End Namespace
+</ScriptText>
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="Behandlungsbeginn" DataType="System.DateTime"/>
+      <Column Name="Behandlungsende" DataType="System.DateTime"/>
+      <Column Name="Total" DataType="System.Double"/>
+      <Column Name="Patient" DataType="System.String"/>
+      <Column Name="Behandler" DataType="System.String"/>
+      <Column Name="Status" DataType="System.Int32"/>
+      <Column Name="aktiv" DataType="System.Boolean" BindableControl="CheckBox"/>
+    </TableDataSource>
+    <Parameter Name="Absender" DataType="System.String"/>
+  </Dictionary>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="85.05">
+      <TextObject Name="Text1" Left="434.7" Width="264.6" Height="18.9" Text="Abgeschlossene Kostenvoranschläge" HorzAlign="Right" Font="Arial, 10pt, style=Bold, Underline"/>
+      <TextObject Name="Text12" Left="349.65" Top="18.9" Width="349.65" Height="18.9" Text="[Absender]" HorzAlign="Right"/>
+      <PictureObject Name="Picture1" Left="18.9" Width="179.55" Height="56.7" BeforePrintEvent="Picture1_BeforePrint" Image=""/>
+    </ReportTitleBand>
+    <PageHeaderBand Name="PageHeader1" Top="88.38" Width="718.2" Height="28.35">
+      <TextObject Name="Text3" Left="9.45" Width="94.5" Height="18.9" Text="Beh-Beginn" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text5" Left="122.85" Width="94.5" Height="18.9" Text="Patient" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text7" Left="415.8" Width="122.85" Height="18.9" Text="Behandler" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text9" Left="604.8" Width="94.5" Height="18.9" Text="Total" HorzAlign="Right" Font="Arial, 10pt, style=Bold"/>
+      <LineObject Name="Line1" Left="9.45" Top="18.9" Width="689.85"/>
+    </PageHeaderBand>
+    <DataBand Name="Data1" Top="120.07" Width="718.2" Height="18.9" DataSource="Daten">
+      <TextObject Name="Text2" Left="9.45" Width="94.5" Height="18.9" Text="[Daten.Behandlungsbeginn]" Format="Date" Format.Format="d"/>
+      <TextObject Name="Text4" Left="122.85" Width="283.5" Height="18.9" Text="[Daten.Patient]"/>
+      <TextObject Name="Text6" Left="415.8" Width="189" Height="18.9" Text="[Daten.Behandler]"/>
+      <TextObject Name="Text8" Left="604.8" Width="94.5" Height="18.9" Text="[Daten.Total]" Format="Number" Format.UseLocale="true" HorzAlign="Right" WordWrap="false" Trimming="EllipsisCharacter"/>
+    </DataBand>
+    <PageFooterBand Name="PageFooter1" Top="142.3" Width="718.2" Height="37.8">
+      <TextObject Name="Text10" Left="9.45" Top="9.45" Width="170.1" Height="18.9" Text="[Date]"/>
+      <LineObject Name="Line2" Left="9.45" Width="689.85"/>
+      <TextObject Name="Text11" Left="604.8" Top="9.45" Width="94.5" Height="18.9" Text="[Page#]" HorzAlign="Right"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Adressetiketten.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Adressetiketten.frx
@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="CSharp" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="11/28/2015 07:43:26" ReportInfo.CreatorVersion="2015.3.1.0">
+  <Dictionary/>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="37.8"/>
+    <PageHeaderBand Name="PageHeader1" Top="41.84" Width="718.2" Height="28.35"/>
+    <DataBand Name="Data1" Top="74.23" Width="718.2" Height="75.6"/>
+    <PageFooterBand Name="PageFooter1" Top="153.87" Width="718.2" Height="18.9"/>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Abgeschlossene_Behandlungen
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Abgeschlossene_Behandlungen
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="CSharp" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="01/14/2018 14:02:31" ReportInfo.CreatorVersion="2017.4.1.0">
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="Behandlungsbeginn" DataType="System.DateTime"/>
+      <Column Name="Behandlungsende" DataType="System.DateTime"/>
+      <Column Name="Total" DataType="System.Double"/>
+      <Column Name="Patient" DataType="System.String"/>
+      <Column Name="Behandler" DataType="System.String"/>
+      <Column Name="Status" DataType="System.Int32"/>
+      <Column Name="aktiv" DataType="System.Boolean" BindableControl="CheckBox"/>
+    </TableDataSource>
+    <Parameter Name="Absender" DataType="System.String"/>
+  </Dictionary>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="37.8">
+      <TextObject Name="Text1" Left="9.45" Width="255.15" Height="18.9" Text="Abgeschlossene Behandlungen" Font="Arial, 10pt, style=Bold, Underline"/>
+      <TextObject Name="Text12" Left="349.65" Width="349.65" Height="18.9" Text="[Absender]" HorzAlign="Right"/>
+    </ReportTitleBand>
+    <PageHeaderBand Name="PageHeader1" Top="41.84" Width="718.2" Height="28.35">
+      <TextObject Name="Text3" Left="9.45" Width="94.5" Height="18.9" Text="Beh-Beginn" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text5" Left="122.85" Width="94.5" Height="18.9" Text="Patient" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text7" Left="415.8" Width="122.85" Height="18.9" Text="Behandler" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text9" Left="604.8" Width="94.5" Height="18.9" Text="Total" HorzAlign="Right" Font="Arial, 10pt, style=Bold"/>
+      <LineObject Name="Line1" Left="9.45" Top="18.9" Width="689.85"/>
+    </PageHeaderBand>
+    <DataBand Name="Data1" Top="74.23" Width="718.2" Height="18.9" DataSource="Daten">
+      <TextObject Name="Text2" Left="9.45" Width="94.5" Height="18.9" Text="[Daten.Behandlungsbeginn]" Format="Date" Format.Format="d"/>
+      <TextObject Name="Text4" Left="122.85" Width="283.5" Height="18.9" Text="[Daten.Patient]"/>
+      <TextObject Name="Text6" Left="415.8" Width="189" Height="18.9" Text="[Daten.Behandler]"/>
+      <TextObject Name="Text8" Left="604.8" Width="94.5" Height="18.9" Text="[Daten.Total]" Format="Number" Format.UseLocale="true" HorzAlign="Right" WordWrap="false" Trimming="EllipsisCharacter"/>
+    </DataBand>
+    <PageFooterBand Name="PageFooter1" Top="97.17" Width="718.2" Height="37.8">
+      <TextObject Name="Text10" Left="9.45" Top="9.45" Width="170.1" Height="18.9" Text="[Date]"/>
+      <LineObject Name="Line2" Left="9.45" Width="689.85"/>
+      <TextObject Name="Text11" Left="604.8" Top="9.45" Width="94.5" Height="18.9" Text="[Page#]" HorzAlign="Right"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Abgeschlossene_Behandlungen.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Abgeschlossene_Behandlungen.frx
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="CSharp" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="01/14/2018 14:09:29" ReportInfo.CreatorVersion="2017.4.1.0">
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="Behandlungsbeginn" DataType="System.DateTime"/>
+      <Column Name="Behandlungsende" DataType="System.DateTime"/>
+      <Column Name="Total" DataType="System.Double"/>
+      <Column Name="Patient" DataType="System.String"/>
+      <Column Name="Behandler" DataType="System.String"/>
+      <Column Name="Status" DataType="System.Int32"/>
+      <Column Name="aktiv" DataType="System.Boolean" BindableControl="CheckBox"/>
+    </TableDataSource>
+    <Parameter Name="Absender" DataType="System.String"/>
+  </Dictionary>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="37.8">
+      <TextObject Name="Text1" Left="9.45" Width="255.15" Height="18.9" Text="Abgeschlossene Behandlungen" Font="Arial, 10pt, style=Bold, Underline"/>
+      <TextObject Name="Text12" Left="349.65" Width="349.65" Height="18.9" Text="[Absender]" HorzAlign="Right"/>
+    </ReportTitleBand>
+    <PageHeaderBand Name="PageHeader1" Top="41.84" Width="718.2" Height="28.35">
+      <TextObject Name="Text3" Left="9.45" Width="94.5" Height="18.9" Text="Beh-Beginn" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text5" Left="122.85" Width="94.5" Height="18.9" Text="Patient" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text7" Left="415.8" Width="122.85" Height="18.9" Text="Behandler" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text9" Left="604.8" Width="94.5" Height="18.9" Text="Total" HorzAlign="Right" Font="Arial, 10pt, style=Bold"/>
+      <LineObject Name="Line1" Left="9.45" Top="18.9" Width="689.85"/>
+    </PageHeaderBand>
+    <DataBand Name="Data1" Top="74.23" Width="718.2" Height="18.9" DataSource="Daten">
+      <TextObject Name="Text2" Left="9.45" Width="94.5" Height="18.9" Text="[Daten.Behandlungsbeginn]" Format="Date" Format.Format="d"/>
+      <TextObject Name="Text4" Left="122.85" Width="283.5" Height="18.9" Text="[Daten.Patient]"/>
+      <TextObject Name="Text6" Left="415.8" Width="189" Height="18.9" Text="[Daten.Behandler]"/>
+      <TextObject Name="Text8" Left="604.8" Width="94.5" Height="18.9" Text="[Daten.Total]" Format="Number" Format.UseLocale="true" HorzAlign="Right" WordWrap="false" Trimming="EllipsisCharacter"/>
+    </DataBand>
+    <PageFooterBand Name="PageFooter1" Top="97.17" Width="718.2" Height="37.8">
+      <TextObject Name="Text10" Left="9.45" Top="9.45" Width="170.1" Height="18.9" Text="[Date]"/>
+      <LineObject Name="Line2" Left="9.45" Width="689.85"/>
+      <TextObject Name="Text11" Left="604.8" Top="9.45" Width="94.5" Height="18.9" Text="[Page#]" HorzAlign="Right"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Abgeschlossene_KV.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Abgeschlossene_KV.frx
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="CSharp" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="01/14/2018 14:05:14" ReportInfo.CreatorVersion="2017.4.1.0">
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="Behandlungsbeginn" DataType="System.DateTime"/>
+      <Column Name="Behandlungsende" DataType="System.DateTime"/>
+      <Column Name="Total" DataType="System.Double"/>
+      <Column Name="Patient" DataType="System.String"/>
+      <Column Name="Behandler" DataType="System.String"/>
+      <Column Name="Status" DataType="System.Int32"/>
+      <Column Name="aktiv" DataType="System.Boolean" BindableControl="CheckBox"/>
+    </TableDataSource>
+    <Parameter Name="Absender" DataType="System.String"/>
+  </Dictionary>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="37.8">
+      <TextObject Name="Text1" Left="9.45" Width="255.15" Height="18.9" Text="Abgeschlossene Kostenvoranschläge" Font="Arial, 10pt, style=Bold, Underline"/>
+      <TextObject Name="Text12" Left="349.65" Width="349.65" Height="18.9" Text="[Absender]" HorzAlign="Right"/>
+    </ReportTitleBand>
+    <PageHeaderBand Name="PageHeader1" Top="41.84" Width="718.2" Height="28.35">
+      <TextObject Name="Text3" Left="9.45" Width="94.5" Height="18.9" Text="Beh-Beginn" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text5" Left="122.85" Width="94.5" Height="18.9" Text="Patient" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text7" Left="415.8" Width="122.85" Height="18.9" Text="Behandler" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text9" Left="604.8" Width="94.5" Height="18.9" Text="Total" HorzAlign="Right" Font="Arial, 10pt, style=Bold"/>
+      <LineObject Name="Line1" Left="9.45" Top="18.9" Width="689.85"/>
+    </PageHeaderBand>
+    <DataBand Name="Data1" Top="74.23" Width="718.2" Height="18.9" DataSource="Daten">
+      <TextObject Name="Text2" Left="9.45" Width="94.5" Height="18.9" Text="[Daten.Behandlungsbeginn]" Format="Date" Format.Format="d"/>
+      <TextObject Name="Text4" Left="122.85" Width="283.5" Height="18.9" Text="[Daten.Patient]"/>
+      <TextObject Name="Text6" Left="415.8" Width="189" Height="18.9" Text="[Daten.Behandler]"/>
+      <TextObject Name="Text8" Left="604.8" Width="94.5" Height="18.9" Text="[Daten.Total]" Format="Number" Format.UseLocale="true" HorzAlign="Right" WordWrap="false" Trimming="EllipsisCharacter"/>
+    </DataBand>
+    <PageFooterBand Name="PageFooter1" Top="97.17" Width="718.2" Height="37.8">
+      <TextObject Name="Text10" Left="9.45" Top="9.45" Width="170.1" Height="18.9" Text="[Date]"/>
+      <LineObject Name="Line2" Left="9.45" Width="689.85"/>
+      <TextObject Name="Text11" Left="604.8" Top="9.45" Width="94.5" Height="18.9" Text="[Page#]" HorzAlign="Right"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/CamtJournaldetail.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/CamtJournaldetail.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/CamtJournaleinfach.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/CamtJournaleinfach.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Offene_Debitoren.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Offene_Debitoren.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Recallkarte.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Recallkarte.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Recallliste.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Recallliste.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Report1.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Report1.frx
@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="CSharp" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="11/28/2015 07:43:26" ReportInfo.CreatorVersion="2015.3.1.0">
+  <Dictionary/>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="37.8"/>
+    <PageHeaderBand Name="PageHeader1" Top="41.84" Width="718.2" Height="28.35"/>
+    <DataBand Name="Data1" Top="74.23" Width="718.2" Height="75.6"/>
+    <PageFooterBand Name="PageFooter1" Top="153.87" Width="718.2" Height="18.9"/>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Zahlungsjournal.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/Zahlungsjournal.frx
@@ -0,0 +1,56 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="Vb" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="05/02/2018 20:59:09" ReportInfo.CreatorVersion="2018.2.11.0">
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="Status" DataType="System.Int32"/>
+      <Column Name="Debitor" DataType="System.String"/>
+      <Column Name="Nrfaktura" DataType="System.Int32"/>
+      <Column Name="Valuta" DataType="System.DateTime"/>
+      <Column Name="Betrag" DataType="System.Double"/>
+      <Column Name="Vorauszahlung" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="Nrkonto" DataType="System.Int32"/>
+      <Column Name="Konto" DataType="System.String"/>
+      <Column Name="Statusdatum" DataType="System.DateTime"/>
+      <Column Name="Storno" DataType="System.String"/>
+    </TableDataSource>
+    <Parameter Name="Absender" DataType="System.String"/>
+    <Parameter Name="Datum von" DataType="System.String"/>
+    <Parameter Name="Datum bis" DataType="System.String"/>
+    <Parameter Name="Konto" DataType="System.String"/>
+    <Total Name="Total" Expression="[Daten.Betrag]" Evaluator="Data1"/>
+  </Dictionary>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="37.8">
+      <TextObject Name="Text1" Left="9.45" Width="349.65" Height="18.9" Text="Zahlungsjournal [Datum von] bis [Datum bis]" Font="Arial, 10pt, style=Bold, Underline"/>
+      <TextObject Name="Text12" Left="349.65" Width="349.65" Height="18.9" Text="[Absender]" HorzAlign="Right"/>
+    </ReportTitleBand>
+    <PageHeaderBand Name="PageHeader1" Top="40.66" Width="718.2" Height="28.35">
+      <LineObject Name="Line1" Left="9.45" Top="18.9" Width="689.85"/>
+      <TextObject Name="Text3" Left="9.45" Width="94.5" Height="18.9" Text="Valuta" Font="Arial, 8pt, style=Bold"/>
+      <TextObject Name="Text5" Left="103.95" Width="94.5" Height="18.9" Text="Debitor" Font="Arial, 8pt, style=Bold"/>
+      <TextObject Name="Text7" Left="406.35" Width="94.5" Height="18.9" Text="Betrag" HorzAlign="Right" Font="Arial, 8pt, style=Bold"/>
+      <TextObject Name="Text8" Left="510.3" Width="28.35" Height="18.9" Text="VZ" Font="Arial, 8pt, style=Bold"/>
+      <TextObject Name="Text13" Left="538.65" Width="94.5" Height="18.9" Text="Konto" Font="Arial, 8pt, style=Bold"/>
+      <TextObject Name="Text15" Left="642.6" Width="94.5" Height="18.9" Text="Storno" Font="Arial, 8pt, style=Bold"/>
+    </PageHeaderBand>
+    <DataBand Name="Data1" Top="71.86" Width="718.2" Height="18.9" DataSource="Daten" Filter="[Daten.Konto]=[Konto]  OR [Konto]=&quot;&quot;">
+      <TextObject Name="Text2" Left="9.45" Width="75.6" Height="18.9" Text="[Daten.Valuta]" Duplicates="Hide" Format="Date" Format.Format="d" Font="Arial, 8pt"/>
+      <TextObject Name="Text4" Left="103.95" Width="274.05" Height="18.9" Text="[Daten.Debitor]" Font="Arial, 8pt"/>
+      <TextObject Name="Text6" Left="406.35" Width="94.5" Height="18.9" Text="[Daten.Betrag]" Format="Number" Format.UseLocale="true" HorzAlign="Right" WordWrap="false" Font="Arial, 8pt" Trimming="EllipsisCharacter"/>
+      <CheckBoxObject Name="CheckBox1" Left="510.3" Width="18.9" Height="18.9" Checked="false" DataColumn="Daten.Vorauszahlung"/>
+      <TextObject Name="Text9" Left="538.65" Width="94.5" Height="18.9" Text="[Daten.Konto]" Font="Arial, 8pt"/>
+      <TextObject Name="Text14" Left="642.6" Width="94.5" Height="18.9" Text="[Daten.Storno]" Font="Arial, 8pt"/>
+      <Sort>
+        <Sort Expression="[Daten.Valuta]"/>
+      </Sort>
+    </DataBand>
+    <ReportSummaryBand Name="ReportSummary1" Top="93.62" Width="718.2" Height="37.8">
+      <TextObject Name="Text16" Left="359.1" Width="141.75" Height="18.9" Text="[Total]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" Font="Arial, 10pt, style=Bold"/>
+    </ReportSummaryBand>
+    <PageFooterBand Name="PageFooter1" Top="134.28" Width="718.2" Height="37.8">
+      <TextObject Name="Text10" Left="9.45" Top="9.45" Width="170.1" Height="18.9" Text="[Date]"/>
+      <LineObject Name="Line2" Left="9.45" Width="689.85"/>
+      <TextObject Name="Text11" Left="604.8" Top="9.45" Width="94.5" Height="18.9" Text="[Page#]" HorzAlign="Right"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/empty.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/empty.frx
@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="CSharp" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="11/28/2015 07:43:26" ReportInfo.CreatorVersion="2015.3.1.0">
+  <Dictionary/>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="37.8"/>
+    <PageHeaderBand Name="PageHeader1" Top="41.84" Width="718.2" Height="28.35"/>
+    <DataBand Name="Data1" Top="74.23" Width="718.2" Height="75.6"/>
+    <PageFooterBand Name="PageFooter1" Top="153.87" Width="718.2" Height="18.9"/>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/esrjournal.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/esrjournal.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/fakturajournal.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/fakturajournal.frx
@@ -0,0 +1,82 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="Vb" ReportInfo.Name="Fakturajournal" ReportInfo.Description="#Parameter1:Datum von:datetime:firstofcurrentyear&#13;&#10;#Parameter2:Datum bis:datetime:currentdate&#13;&#10;#Parameter3:Behandler:DataTable:select name+' '+vorname from privat where behandler=1 AND aktiv=1 order by nrprivat&#13;&#10;-SQL-&#13;&#10;SELECT        Nrfaktura, Nrdebitor, Nrpatient, Datum, Total, dbo.faktura.Status, dbo.get_name(Nrpatient) AS Patient, case when nrdebitor&lt;&gt;nrpatient then dbo.get_name(Nrdebitor) else '' end AS Debitor, dbo.privat.name+' '+dbo.privat.vorname as behandler&#13;&#10;FROM            dbo.Faktura  JOIN&#13;&#10;                         dbo.PRIVAT ON dbo.Faktura.Nrbehandler = dbo.PRIVAT.NRPRIVAT&#13;&#10;where  datum&gt;='#Parameter1 00:00:00' and datum &lt;='#Parameter2 23:59:59' and (''='#Parameter3' or '#Parameter3'= dbo.privat.name+' '+dbo.privat.vorname)  " ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="08/26/2018 11:08:04" ReportInfo.CreatorVersion="2018.2.11.0">
+  <ScriptText>Imports System
+Imports System.Collections
+Imports System.Collections.Generic
+Imports System.ComponentModel
+Imports System.Windows.Forms
+Imports System.Drawing
+Imports Microsoft.VisualBasic
+Imports FastReport
+Imports FastReport.Data
+Imports FastReport.Dialog
+Imports FastReport.Table
+Imports FastReport.Barcode
+Imports FastReport.Utils
+
+Namespace FastReport
+  Public Class ReportScript
+    Private Sub Picture1_BeforePrint(ByVal sender As object, ByVal e As EventArgs)
+         dim s as String()
+         s=report.FileName.Split(&quot;Reporting&quot;)
+         Dim ReportLogo as String
+         ReportLogo=s(0)+&quot;\Reporting\Logo\reportlogo.png&quot;
+         picture1.ImageLocation=Reportlogo
+    End Sub
+  End Class
+End Namespace
+</ScriptText>
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="Nrfaktura" DataType="System.Int32"/>
+      <Column Name="Nrdebitor" DataType="System.Int32"/>
+      <Column Name="Nrpatient" DataType="System.Int32"/>
+      <Column Name="Datum" DataType="System.DateTime"/>
+      <Column Name="Total" DataType="System.Double"/>
+      <Column Name="Status" DataType="System.Int32"/>
+      <Column Name="Patient" DataType="System.String"/>
+      <Column Name="Debitor" DataType="System.String"/>
+      <Column Name="behandler" DataType="System.String"/>
+    </TableDataSource>
+    <Parameter Name="Absender" DataType="System.String"/>
+    <Parameter Name="Datum von" DataType="System.String"/>
+    <Parameter Name="Datum bis" DataType="System.String"/>
+    <Parameter Name="Behandler" DataType="System.String"/>
+    <Total Name="Total" Expression="[Daten.Total]" Evaluator="Data1" EvaluateCondition="[Daten.Status]&lt;&gt;9"/>
+    <Total Name="Total_Storno" Expression="[Daten.Total]" Evaluator="Data1" EvaluateCondition="[Daten.Status]=9"/>
+  </Dictionary>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2"/>
+    <PageHeaderBand Name="PageHeader1" Top="3.33" Width="718.2" Height="94.5">
+      <PictureObject Name="Picture1" Width="132.3" Height="56.7" BeforePrintEvent="Picture1_BeforePrint" ImageLocation="E:\Software-Projekte\DPM\DPM2016\DPM2016\bin\Debug\Dentis\Reporting\Logo\ReportLogo.png"/>
+      <TextObject Name="Text1" Left="406.35" Top="9.45" Width="302.4" Height="28.35" Text="Rechnungsjournal [Datum von] - [Datum bis]&#13;&#10;Behandler: [Behandler]" HorzAlign="Right"/>
+      <TextObject Name="Text8" Top="75.6" Width="94.5" Height="18.9" Text="RG-Nummer" Font="Arial, 9pt, style=Bold"/>
+      <TextObject Name="Text9" Left="85.05" Top="75.6" Width="94.5" Height="18.9" Text="Datum" Font="Arial, 9pt, style=Bold"/>
+      <TextObject Name="Text10" Left="179.55" Top="75.6" Width="170.1" Height="18.9" Text="Patient / Debitor" Font="Arial, 9pt, style=Bold"/>
+      <TextObject Name="Text11" Left="614.25" Top="75.6" Width="47.25" Height="18.9" Text="Betrag" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+      <TextObject Name="Text12" Left="642.6" Top="75.6" Width="66.15" Height="18.9" Text="Storno" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+      <LineObject Name="Line2" Top="90.5" Width="708.75"/>
+    </PageHeaderBand>
+    <DataBand Name="Data1" Top="101.17" Width="718.2" Height="19.9" CanGrow="true" DataSource="Daten">
+      <TextObject Name="Text2" Top="1" Width="85.05" Height="18.9" Text="[Daten.Nrfaktura]" Font="Arial, 9pt"/>
+      <TextObject Name="Text3" Left="85.05" Top="1" Width="94.5" Height="18.9" Text="[Daten.Datum]" Format="Date" Format.Format="d" Font="Arial, 9pt"/>
+      <TextObject Name="Text4" Left="179.55" Top="1" Width="378" Height="18.9" CanGrow="true" Text="[Daten.Patient]&#13;&#10;[Daten.Debitor]" Font="Arial, 9pt"/>
+      <TextObject Name="Text6" Left="567" Top="1" Width="94.5" Height="18.9" Text="[Daten.Total]" Format="Number" Format.UseLocale="true" HorzAlign="Right" WordWrap="false" Font="Arial, 9pt" Trimming="EllipsisCharacter"/>
+      <TextObject Name="Text7" Left="670.95" Top="1" Width="37.8" Height="18.9" Text="[IIf([Daten.Status]=9,&quot;J&quot;,&quot;&quot;)]" HorzAlign="Right" Font="Arial, 9pt"/>
+      <ChildBand Name="Child1" Top="124.4" Width="718.2">
+        <LineObject Name="Line1" Width="708.75"/>
+      </ChildBand>
+      <Sort>
+        <Sort Expression="[Daten.Nrfaktura]"/>
+      </Sort>
+    </DataBand>
+    <ReportSummaryBand Name="ReportSummary1" Top="127.73" Width="718.2" Height="37.8">
+      <TextObject Name="Text13" Left="434.7" Top="3" Width="132.3" Height="28.35" Text="Total (ohne Storno)&#13;&#10;Total Storno" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+      <TextObject Name="Text14" Left="567" Top="3" Width="94.5" Height="28.35" Text="[Total]&#13;&#10;[Total_Storno]" Format="Number" Format.UseLocale="true" HorzAlign="Right" WordWrap="false" Font="Arial, 9pt, style=Bold" Trimming="EllipsisCharacter"/>
+    </ReportSummaryBand>
+    <PageFooterBand Name="PageFooter1" Top="168.87" Width="718.2" Height="18.9">
+      <TextObject Name="Text5" Width="189" Height="18.9" Text="[Date]" Font="Arial, 9pt"/>
+      <TextObject Name="Text15" Left="614.25" Width="94.5" Height="18.9" Text="[Page#]" HorzAlign="Right" Font="Arial, 9pt"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/mahnliste.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/mahnliste.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/xxx.pdf
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Archiv/xxx.pdf
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/CamtJournaldetail.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/CamtJournaldetail.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/CamtJournaleinfach.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/CamtJournaleinfach.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Fakturierungen_Nach_Behandler.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Fakturierungen_Nach_Behandler.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Offene_Debitoren.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Offene_Debitoren.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/RG_Jahr_X_Abbuchung_Folgejahre.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/RG_Jahr_X_Abbuchung_Folgejahre.frx
@@ -0,0 +1,57 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="CSharp" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="02/11/2018 21:01:48" ReportInfo.CreatorVersion="2015.3.1.0">
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="Nrfaktura" DataType="System.Int32"/>
+      <Column Name="Datum" DataType="System.DateTime"/>
+      <Column Name="NRPRIVAT" DataType="System.Int32"/>
+      <Column Name="NAME" DataType="System.String"/>
+      <Column Name="VORNAME" DataType="System.String"/>
+      <Column Name="Valuta" DataType="System.DateTime"/>
+      <Column Name="Betrag" DataType="System.Double"/>
+      <Column Name="Konto" DataType="System.String"/>
+      <Column Name="Column" DataType="System.Int32" Calculated="true" Expression="Year([Daten.Valuta])"/>
+    </TableDataSource>
+    <Parameter Name="Jahr RG-Stellung" DataType="System.String"/>
+    <Parameter Name="Mit Name" DataType="System.String"/>
+    <Total Name="Total" Expression="[Daten.Betrag]" Evaluator="Data1" PrintOn="GroupFooter1"/>
+  </Dictionary>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="47.25">
+      <TextObject Name="Text1" Left="9.45" Top="9.45" Width="359.1" Height="18.9" Text="Dentis Praxis AG" Font="Arial, 12pt, style=Bold"/>
+      <TextObject Name="Text2" Left="368.55" Top="9.45" Width="340.2" Height="37.8" Text="Offene Posten [Jahr RG-Stellung]&#13;&#10;Zahlung / Abbuchung Folgejahre" HorzAlign="Right"/>
+    </ReportTitleBand>
+    <PageHeaderBand Name="PageHeader1" Top="50.11" Width="718.2"/>
+    <GroupHeaderBand Name="GroupHeader1" Top="52.96" Width="718.2" Height="56.7" KeepWithData="true" Condition="[Daten.Column]">
+      <TextObject Name="Text18" Left="9.45" Width="283.5" Height="18.9" Text="Jahr Zahlung/Ausbuchung [[Daten.Column]]"/>
+      <LineObject Name="Line1" Left="9.45" Top="47.25" Width="699.3"/>
+      <TextObject Name="Text14" Left="491.4" Top="27.34" Width="66.15" Height="18.9" Text="Betrag" HorzAlign="Right" Font="Arial, 9pt"/>
+      <TextObject Name="Text4" Left="9.45" Top="28.35" Width="75.6" Height="18.9" Text="RG-Datum" Font="Arial, 9pt"/>
+      <TextObject Name="Text6" Left="94.5" Top="27.34" Width="85.05" Height="18.9" Text="RG-Nr." Font="Arial, 9pt"/>
+      <TextObject Name="Text8" Left="189" Top="28.35" Width="56.7" Height="18.9" Text="Pat-Nr." Font="Arial, 9pt"/>
+      <TextObject Name="Text10" Left="245.7" Top="28.35" Width="141.75" Height="18.9" Text="Patient" Font="Arial, 9pt"/>
+      <TextObject Name="Text12" Left="415.8" Top="28.35" Width="94.5" Height="18.9" Text="Valuta" Font="Arial, 9pt"/>
+      <TextObject Name="Text16" Left="567" Top="28.35" Width="94.5" Height="18.9" Text="Konto" Font="Arial, 9pt"/>
+      <DataBand Name="Data1" Top="112.52" Width="718.2" Height="18.9" DataSource="Daten">
+        <TextObject Name="Text3" Left="9.45" Width="75.6" Height="18.9" Text="[Daten.Datum]" Format="Date" Format.Format="d" Font="Arial, 9pt"/>
+        <TextObject Name="Text5" Left="94.5" Top="-1.01" Width="85.05" Height="18.9" Text="[Daten.Nrfaktura]" Font="Arial, 9pt"/>
+        <TextObject Name="Text7" Left="189" Width="56.7" Height="18.9" Text="[Daten.NRPRIVAT]" Font="Arial, 9pt"/>
+        <TextObject Name="Text9" Left="245.7" Width="141.75" Height="18.9" Text="[IIf([Mit Name]==&quot;Nein&quot;,&quot;Patient&quot;,[Daten.NAME])]" Font="Arial, 9pt"/>
+        <TextObject Name="Text11" Left="415.8" Width="75.6" Height="18.9" Text="[Daten.Valuta]" Format="Date" Format.Format="d" Font="Arial, 9pt"/>
+        <TextObject Name="Text13" Left="491.4" Top="-1.01" Width="66.15" Height="18.9" Text="[Daten.Betrag]" Format="Number" Format.UseLocale="true" HorzAlign="Right" WordWrap="false" Font="Arial, 9pt" Trimming="EllipsisCharacter"/>
+        <TextObject Name="Text15" Left="567" Width="132.3" Height="18.9" Text="[Daten.Konto]" Font="Arial, 9pt"/>
+        <Sort>
+          <Sort Expression="[Daten.Nrfaktura]"/>
+        </Sort>
+      </DataBand>
+      <GroupFooterBand Name="GroupFooter1" Top="134.28" Width="718.2" Height="37.8">
+        <TextObject Name="Text17" Left="463.05" Top="9.45" Width="94.5" Height="18.9" Text="[Total]" Format="Number" Format.UseLocale="true" HorzAlign="Right" Font="Arial, 9pt"/>
+        <LineObject Name="Line2" Left="9.45" Width="699.3"/>
+      </GroupFooterBand>
+    </GroupHeaderBand>
+    <PageFooterBand Name="PageFooter1" Top="174.94" Width="718.2" Height="18.9">
+      <TextObject Name="Text20" Left="9.45" Width="217.35" Height="18.9" Text="[Date]"/>
+      <TextObject Name="Text19" Left="604.8" Width="94.5" Height="18.9" Text="[Page] / [TotalPages#]" HorzAlign="Right"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Recallkarte.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Recallkarte.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Recallliste.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Recallliste.frx
@@ -0,0 +1,90 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="Vb" ReportInfo.Name="Recallliste" ReportInfo.Author="Recalls" ReportInfo.Version="2018" ReportInfo.Description="#Parameter1:Periode:monthtable:monthtable&#13;&#10;-SQL-&#13;&#10;SELECT        dbo.PRIVAT.NRPRIVAT, dbo.RECALL.Datum, dbo.RECALL.Zeitvon, dbo.RECALL.Zeitbis, dbo.ANREDE.Anrede_D, dbo.TITEL.TITEL_D, dbo.PRIVAT.NAME, dbo.PRIVAT.VORNAME, dbo.PRIVAT.STRASSE, dbo.PRIVAT.COADRESSE, &#13;&#10;                         dbo.PRIVAT.PLZ, dbo.PRIVAT.ORT, dbo.PRIVAT.TELP, dbo.PRIVAT.FAXP, dbo.PRIVAT.TELG, dbo.PRIVAT.FAXG, dbo.PRIVAT.E_Mail, dbo.PRIVAT.Briefanrede, dbo.get_adresse_direkt(dbo.privat.nrprivat,0) as Adresse,&#13;&#10;			dbo.get_adresse_direkt(dbo.privat.nrprivat,1) as AdresseEinzeilig&#13;&#10;FROM            dbo.PRIVAT INNER JOIN&#13;&#10;                         dbo.RECALL ON dbo.PRIVAT.NRPRIVAT = dbo.RECALL.Nrprivat LEFT OUTER JOIN&#13;&#10;                         dbo.TITEL ON dbo.PRIVAT.NRTITEL = dbo.TITEL.NRTITEL LEFT OUTER JOIN&#13;&#10;                         dbo.ANREDE ON dbo.PRIVAT.NRANREDE = dbo.ANREDE.NRANREDE&#13;&#10;WHERE        dbo.recall.aktiv=1 and (YEAR(dbo.RECALL.Datum) = substring('#Parameter1',4,4)) AND (MONTH(dbo.RECALL.Datum) =left('#Parameter1',2))" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="09/03/2018 16:38:27" ReportInfo.CreatorVersion="2018.2.11.0">
+  <ScriptText>Imports System
+Imports System.Collections
+Imports System.Collections.Generic
+Imports System.ComponentModel
+Imports System.Windows.Forms
+Imports System.Drawing
+Imports Microsoft.VisualBasic
+Imports FastReport
+Imports FastReport.Data
+Imports FastReport.Dialog
+Imports FastReport.Table
+Imports FastReport.Barcode
+Imports FastReport.Utils
+
+Namespace FastReport
+  Public Class ReportScript
+
+
+    Private Sub Picture1_BeforePrint(ByVal sender As object, ByVal e As EventArgs)
+      dim s as String()
+      s=report.FileName.Split(&quot;Reporting&quot;)
+      Dim ReportLogo as String
+      ReportLogo=s(0)+&quot;\Reporting\Logo\reportlogo.png&quot;
+      picture1.ImageLocation=Reportlogo
+
+    End Sub
+  End Class
+End Namespace
+</ScriptText>
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="NRPRIVAT" DataType="System.Int32"/>
+      <Column Name="Datum" DataType="System.DateTime"/>
+      <Column Name="Zeitvon" DataType="System.Double"/>
+      <Column Name="Zeitbis" DataType="System.Double"/>
+      <Column Name="Anrede_D" DataType="System.String"/>
+      <Column Name="TITEL_D" DataType="System.String"/>
+      <Column Name="NAME" DataType="System.String"/>
+      <Column Name="VORNAME" DataType="System.String"/>
+      <Column Name="STRASSE" DataType="System.String"/>
+      <Column Name="COADRESSE" DataType="System.String"/>
+      <Column Name="PLZ" DataType="System.String"/>
+      <Column Name="ORT" DataType="System.String"/>
+      <Column Name="TELP" DataType="System.String"/>
+      <Column Name="FAXP" DataType="System.String"/>
+      <Column Name="TELG" DataType="System.String"/>
+      <Column Name="FAXG" DataType="System.String"/>
+      <Column Name="E_Mail" DataType="System.String"/>
+      <Column Name="Briefanrede" DataType="System.String"/>
+      <Column Name="Adresse" DataType="System.String"/>
+      <Column Name="AdresseEinzeilig" DataType="System.String"/>
+    </TableDataSource>
+    <Parameter Name="Absender" DataType="System.String"/>
+    <Parameter Name="Periode" DataType="System.String"/>
+  </Dictionary>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="56.7">
+      <PictureObject Name="Picture1" Width="132.3" Height="56.7" BeforePrintEvent="Picture1_BeforePrint" ImageLocation="E:\Software-Projekte\DPM\DPM2016\DPM2016\bin\Debug\Dentis\\Reporting\Logo\reportlogo.png"/>
+      <TextObject Name="Text1" Left="406.35" Top="9.45" Width="302.4" Height="28.35" Text="Recall-Liste [Periode]" HorzAlign="Right"/>
+    </ReportTitleBand>
+    <PageHeaderBand Name="PageHeader1" Top="60.03" Width="718.2" Height="28.35">
+      <TextObject Name="Text3" Width="94.5" Height="18.9" Text="Nr." Font="Arial, 9pt, style=Bold"/>
+      <TextObject Name="Text5" Left="37.8" Width="94.5" Height="18.9" Text="Patient" Font="Arial, 9pt, style=Bold"/>
+      <TextObject Name="Text7" Left="396.9" Width="94.5" Height="18.9" Text="Datum" Font="Arial, 9pt, style=Bold"/>
+      <TextObject Name="Text9" Left="500.85" Width="94.5" Height="18.9" Text="Tel P;/G." Font="Arial, 9pt, style=Bold"/>
+      <TextObject Name="Text11" Left="604.8" Width="94.5" Height="18.9" Text="E-Mail" Font="Arial, 9pt, style=Bold"/>
+      <LineObject Name="Line2" Top="18.9" Width="718.2"/>
+    </PageHeaderBand>
+    <DataBand Name="Data1" Top="91.72" Width="718.2" Height="29.35" CanGrow="true" DataSource="Daten">
+      <TextObject Name="Text2" Top="3" Width="37.8" Height="18.9" Text="[Daten.NRPRIVAT]" Font="Arial, 9pt"/>
+      <TextObject Name="Text4" Left="37.8" Top="3" Width="349.65" Height="18.9" Text="[Daten.AdresseEinzeilig]" Font="Arial, 9pt"/>
+      <TextObject Name="Text6" Left="396.9" Top="3" Width="94.5" Height="18.9" Text="[Daten.Datum]" Format="Date" Format.Format="d" Font="Arial, 9pt"/>
+      <TextObject Name="Text8" Left="500.85" Top="3" Width="94.5" Height="18.9" CanGrow="true" Text="[Daten.TELP]&#13;&#10;[Daten.TELG]" Font="Arial, 9pt"/>
+      <TextObject Name="Text10" Left="604.8" Top="3" Width="94.5" Height="18.9" CanGrow="true" Text="[Daten.E_Mail]" Font="Arial, 9pt"/>
+      <ChildBand Name="Child1" Top="124.4" Width="718.2">
+        <LineObject Name="Line1" Width="718.2"/>
+      </ChildBand>
+      <Sort>
+        <Sort Expression="[Daten.NAME]"/>
+        <Sort Expression="[Daten.VORNAME]"/>
+      </Sort>
+    </DataBand>
+    <PageFooterBand Name="PageFooter1" Top="127.73" Width="718.2" Height="18.9">
+      <TextObject Name="Text16" Width="189" Height="18.9" Text="[Date]" Font="Arial, 9pt"/>
+      <TextObject Name="Text15" Left="614.25" Width="94.5" Height="18.9" Text="[Page#]" HorzAlign="Right" Font="Arial, 9pt"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Report1.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Report1.frx
@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="CSharp" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="11/28/2015 07:43:26" ReportInfo.CreatorVersion="2015.3.1.0">
+  <Dictionary/>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="37.8"/>
+    <PageHeaderBand Name="PageHeader1" Top="41.84" Width="718.2" Height="28.35"/>
+    <DataBand Name="Data1" Top="74.23" Width="718.2" Height="75.6"/>
+    <PageFooterBand Name="PageFooter1" Top="153.87" Width="718.2" Height="18.9"/>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Reports.txt
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Reports.txt
@@ -0,0 +1,23 @@
+1;0;Behandlungen;;;
+2;1;Abgeschlossene Behandlungen;Abgeschlossene_Behandlungen.sql;Abgeschlossene_Behandlungen.frx
+3;1;AbgeschlosseneKVs;Abgeschlossene_KV.sql;Abgeschlossene_KV.frx
+10;0;Journale;;;
+11;10;Fakturajournal;fakturajournal.sql;fakturajournal.frx
+12;10;Zahlungsjournal;Zahlungsjournal.sql;Zahlungsjournal.frx
+13;10;ESR-Journal;esr-journal.sql;esrjournal.frx
+13;11;CAMT-Journal einfach;CAMT_Journal.sql;CamtJournaleinfach.frx
+13;13;CAMT-Journal detailliert;CAMT_Journal.sql;CamtJournaldetail.frx
+14;10;Offene Debitoren;offene_debitoren.sql;offene_debitoren.frx
+15;10;Report2;Reports2.sql;report2.frx
+20;0;Recalls;;;
+21;20;Recall-Liste;Recalls.sql;Recallliste.frx
+21;20;Recall-Karten;Recalls.sql;Recallkarte.frx
+30;0;Mahnungen;;;
+31;30;Mahnliste;Mahnliste.sql;mahnliste.frx
+40;0;Diverse;;;
+41;40;Rechnungsstellung Jahr X und Abbuchung in Folgejahren;RG_Jahr_X_Abbuchung_Folgejahre.sql;RG_Jahr_X_Abbuchung_Folgejahre.frx
+42;40;Fakturierung nach Behandler;Fakturierungen_nach_behandler.sql;fakturierungen_nach_behandler.frx
+43;40;Zahlungen nach Behandler;Zahlungen_nach_behandler.sql;Zahlungen_nach_behandler.frx
+40;0;Etiketten
+41;40;KG-Etiketten;Labels_Privat.sql;KGEtiketten.frx
+42;40;Adressettiketten;Labels_Privat.sql;Adressetiketten.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Zahlungsjournal.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/Zahlungsjournal.frx
@@ -0,0 +1,90 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="Vb" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="03/24/2019 19:40:28" ReportInfo.CreatorVersion="2018.4.2.0">
+  <ScriptText>Imports System
+Imports System.Collections
+Imports System.Collections.Generic
+Imports System.ComponentModel
+Imports System.Windows.Forms
+Imports System.Drawing
+Imports Microsoft.VisualBasic
+Imports FastReport
+Imports FastReport.Data
+Imports FastReport.Dialog
+Imports FastReport.Table
+Imports FastReport.Barcode
+Imports FastReport.Utils
+
+Namespace FastReport
+  Public Class ReportScript
+    Private Sub Picture1_BeforePrint(ByVal sender As object, ByVal e As EventArgs)
+      dim s as String()
+      s=report.FileName.Split(&quot;Reporting&quot;)
+      Dim ReportLogo as String
+      ReportLogo=s(0)+&quot;\Reporting\Logo\reportlogo.png&quot;
+      picture1.ImageLocation=Reportlogo
+    End Sub
+
+
+   
+  End Class
+End Namespace
+</ScriptText>
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="Status" DataType="System.Int32"/>
+      <Column Name="Debitor" DataType="System.String"/>
+      <Column Name="Nrfaktura" DataType="System.Int32"/>
+      <Column Name="Valuta" DataType="System.DateTime"/>
+      <Column Name="Betrag" DataType="System.Double"/>
+      <Column Name="Vorauszahlung" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="Nrkonto" DataType="System.Int32"/>
+      <Column Name="Konto" DataType="System.String"/>
+      <Column Name="Statusdatum" DataType="System.DateTime"/>
+      <Column Name="Storno" DataType="System.String"/>
+      <Column Name="RGDatum" DataType="System.DateTime"/>
+    </TableDataSource>
+    <Parameter Name="Absender" DataType="System.String"/>
+    <Parameter Name="Datum von" DataType="System.String"/>
+    <Parameter Name="Datum bis" DataType="System.String"/>
+    <Parameter Name="Konto" DataType="System.String"/>
+    <Total Name="Total" Expression="[Daten.Betrag]" Evaluator="Data1"/>
+  </Dictionary>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="56.7">
+      <TextObject Name="Text1" Left="349.65" Width="349.65" Height="18.9" Text="Zahlungsjournal [Datum von] bis [Datum bis]" HorzAlign="Right" Font="Arial, 10pt, style=Bold, Underline"/>
+      <TextObject Name="Text12" Left="349.65" Top="18.9" Width="349.65" Height="18.9" Text="[Absender]" HorzAlign="Right"/>
+      <PictureObject Name="Picture1" Left="9.45" Width="160.65" Height="47.25" BeforePrintEvent="Picture1_BeforePrint" ImageLocation="E:\Software-Projekte\DPM\DPM2016\DPM2016\bin\Debug\Dentis\\Reporting\Logo\reportlogo.png"/>
+    </ReportTitleBand>
+    <PageHeaderBand Name="PageHeader1" Top="59.56" Width="718.2" Height="28.35">
+      <LineObject Name="Line1" Left="9.45" Top="18.9" Width="699.3"/>
+      <TextObject Name="Text3" Left="9.45" Width="94.5" Height="18.9" Text="Valuta" Font="Arial, 8pt, style=Bold"/>
+      <TextObject Name="Text5" Left="94.5" Width="94.5" Height="18.9" Text="Debitor" Font="Arial, 8pt, style=Bold"/>
+      <TextObject Name="Text7" Left="302.4" Width="94.5" Height="18.9" Text="Betrag" HorzAlign="Right" Font="Arial, 8pt, style=Bold"/>
+      <TextObject Name="Text8" Left="415.8" Width="28.35" Height="18.9" Text="VZ" Font="Arial, 8pt, style=Bold"/>
+      <TextObject Name="Text13" Left="444.15" Width="75.6" Height="18.9" Text="Konto" Font="Arial, 8pt, style=Bold"/>
+      <TextObject Name="Text15" Left="529.2" Width="47.25" Height="18.9" Text="Storno" Font="Arial, 8pt, style=Bold"/>
+      <TextObject Name="Text19" Left="576.45" Width="132.3" Height="18.9" Text="RG-Nummer / Datum" Font="Arial, 8pt, style=Bold"/>
+    </PageHeaderBand>
+    <DataBand Name="Data1" Top="90.76" Width="718.2" Height="18.9" CanGrow="true" DataSource="Daten" Filter="[Daten.Konto]=[Konto]  OR [Konto]=&quot;&quot;">
+      <TextObject Name="Text2" Left="9.45" Width="75.6" Height="18.9" Text="[Daten.Valuta]" Duplicates="Hide" Format="Date" Format.Format="d" Font="Arial, 8pt"/>
+      <TextObject Name="Text4" Left="94.5" Width="226.8" Height="18.9" CanGrow="true" Text="[Daten.Debitor]" Font="Arial, 8pt"/>
+      <TextObject Name="Text6" Left="330.75" Width="66.15" Height="18.9" Text="[Daten.Betrag]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" WordWrap="false" Font="Arial, 8pt"/>
+      <CheckBoxObject Name="CheckBox1" Left="415.8" Width="18.9" Height="18.9" Checked="false" DataColumn="Daten.Vorauszahlung"/>
+      <TextObject Name="Text9" Left="444.15" Width="94.5" Height="18.9" Text="[Daten.Konto]" Font="Arial, 8pt"/>
+      <TextObject Name="Text14" Left="529.2" Width="37.8" Height="18.9" Text="[Daten.Storno]" Font="Arial, 8pt"/>
+      <TextObject Name="Text17" Left="576.45" Width="75.6" Height="18.9" Text="[Daten.Nrfaktura]" Font="Arial, 8pt"/>
+      <TextObject Name="Text18" Left="652.05" Width="66.15" Height="18.9" Text="[Daten.RGDatum]" Format="Date" Format.Format="d" Font="Arial, 8pt"/>
+      <Sort>
+        <Sort Expression="[Daten.Valuta]"/>
+      </Sort>
+    </DataBand>
+    <ReportSummaryBand Name="ReportSummary1" Top="112.52" Width="718.2" Height="37.8">
+      <TextObject Name="Text16" Left="255.15" Top="9.45" Width="141.75" Height="18.9" Text="[Total]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" Font="Arial, 10pt, style=Bold"/>
+    </ReportSummaryBand>
+    <PageFooterBand Name="PageFooter1" Top="153.18" Width="718.2" Height="37.8">
+      <TextObject Name="Text10" Left="9.45" Top="9.45" Width="170.1" Height="18.9" Text="[Date]"/>
+      <LineObject Name="Line2" Left="9.45" Width="689.85"/>
+      <TextObject Name="Text11" Left="604.8" Top="9.45" Width="94.5" Height="18.9" Text="[Page#]" HorzAlign="Right"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/empty.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/empty.frx
@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="CSharp" ReportInfo.Created="11/28/2015 07:43:07" ReportInfo.Modified="11/28/2015 07:43:26" ReportInfo.CreatorVersion="2015.3.1.0">
+  <Dictionary/>
+  <ReportPage Name="Page1">
+    <ReportTitleBand Name="ReportTitle1" Width="718.2" Height="37.8"/>
+    <PageHeaderBand Name="PageHeader1" Top="41.84" Width="718.2" Height="28.35"/>
+    <DataBand Name="Data1" Top="74.23" Width="718.2" Height="75.6"/>
+    <PageFooterBand Name="PageFooter1" Top="153.87" Width="718.2" Height="18.9"/>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/esrjournal.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/esrjournal.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/fakturajournal.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/fakturajournal.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/kgetiketten.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/kgetiketten.frx
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="Vb" TextQuality="Regular" ReportInfo.Description="Demonstrates how to use the Table object. Notes:&#13;&#10;- to set the number of columns and rows, use &quot;ColumnCount&quot; and &quot;RowCount&quot; properties. Also you may add new columns/rows from a column/row context menu;&#13;&#10;- to join/split cells, use context menu of the cell;&#13;&#10;- to set the column/row autosize, use context menu of the column/row. " ReportInfo.Created="01/17/2008 17:08:04" ReportInfo.Modified="04/09/2019 18:38:08" ReportInfo.CreatorVersion="2018.4.2.0">
+  <ScriptText>Imports System
+Imports System.Collections
+Imports System.Collections.Generic
+Imports System.ComponentModel
+Imports System.Windows.Forms
+Imports System.Drawing
+Imports Microsoft.VisualBasic
+Imports FastReport
+Imports FastReport.Data
+Imports FastReport.Dialog
+Imports FastReport.Table
+Imports FastReport.Barcode
+Imports FastReport.Utils
+
+Namespace FastReport
+  Public Class ReportScript
+
+
+    Private Sub Text1_BeforePrint(ByVal sender As object, ByVal e As EventArgs)
+      if CType(Report.GetColumnValue(&quot;Daten.nrprivat&quot;), Int32)&lt;0 then text1.Text=&quot;&quot;
+    End Sub
+ 
+
+    Private Sub Text3_BeforePrint(ByVal sender As object, ByVal e As EventArgs)
+      text1.visible=true
+      text2.visible=true
+      text3.visible=true
+      text4.visible=true
+      text5.visible=true
+      text6.visible=true
+      text7.visible=true
+      text8.visible=true
+      text9.visible=true
+      text10.visible=true
+      text11.visible=true      
+      If CType(Report.GetColumnValue(&quot;Daten.NRPRIVAT&quot;), Int32) &lt; 1 Then
+        text1.visible=false
+        text2.visible=false
+        text3.visible=false
+        text4.visible=false
+        text5.visible=false
+        text6.visible=false
+        text7.visible=false
+        text8.visible=false
+        text9.visible=false
+        text10.visible=false
+        text11.visible=false
+      end if      
+    End Sub
+  End Class
+End Namespace
+</ScriptText>
+  <Styles Name="Standard">
+    <Style Name="Title" Font="Arial, 12pt, style=Bold"/>
+    <Style Name="Header" Font="Arial, 10pt, style=Bold"/>
+    <Style Name="Group" Font="Arial, 10pt, style=Bold"/>
+    <Style Name="Data"/>
+    <Style Name="Footer"/>
+    <Style Name="EvenRows" Fill.Color="WhiteSmoke"/>
+  </Styles>
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="NRPRIVAT" DataType="System.Int32"/>
+      <Column Name="MANDANT" DataType="System.Int32"/>
+      <Column Name="GUELTIGAB" DataType="System.DateTime"/>
+      <Column Name="GUELTIGBIS" DataType="System.DateTime"/>
+      <Column Name="STATUS" DataType="System.Int32"/>
+      <Column Name="SPRACHE" DataType="System.String"/>
+      <Column Name="NRANREDE" DataType="System.Int32"/>
+      <Column Name="NRTITEL" DataType="System.Int32"/>
+      <Column Name="NAME" DataType="System.String"/>
+      <Column Name="VORNAME" DataType="System.String"/>
+      <Column Name="STRASSE" DataType="System.String"/>
+      <Column Name="COADRESSE" DataType="System.String"/>
+      <Column Name="PLZ" DataType="System.String"/>
+      <Column Name="ORT" DataType="System.String"/>
+      <Column Name="TELP" DataType="System.String"/>
+      <Column Name="FAXP" DataType="System.String"/>
+      <Column Name="GEBDAT" DataType="System.DateTime"/>
+      <Column Name="GESCHLECHT" DataType="System.Int32"/>
+      <Column Name="NRARBEITGEBER" DataType="System.Int32"/>
+      <Column Name="BERUF" DataType="System.String"/>
+      <Column Name="TELG" DataType="System.String"/>
+      <Column Name="FAXG" DataType="System.String"/>
+      <Column Name="AHVNR" DataType="System.String"/>
+      <Column Name="PATIENT" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="GARANT" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="NRGARANT" DataType="System.Int32"/>
+      <Column Name="GESVERTRETER" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="NRGESVERTRETER" DataType="System.Int32"/>
+      <Column Name="HAUSARZT" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="NRHAUSARZT" DataType="System.Int32"/>
+      <Column Name="ZAHNARZT" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="NRZAHNARZT" DataType="System.Int32"/>
+      <Column Name="BEHANDLER" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="NRBEHANDLER" DataType="System.Int32"/>
+      <Column Name="NRDH" DataType="System.Int32"/>
+      <Column Name="Nrrgtyp" DataType="System.Int32"/>
+      <Column Name="RABATT" DataType="System.Double"/>
+      <Column Name="ZAZRECALL" DataType="System.Int32"/>
+      <Column Name="ZAZRECALLTELEFON" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="ZAZRECALLTYP" DataType="System.Int32"/>
+      <Column Name="ZAZRecallfixmonat" DataType="System.Double"/>
+      <Column Name="ZAZrecallbemerkung" DataType="System.String"/>
+      <Column Name="DHRECALL" DataType="System.Int32"/>
+      <Column Name="DHRECALLTELEFON" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="DHRECALLTYP" DataType="System.Int32"/>
+      <Column Name="DHRecallfixmonat" DataType="System.Double"/>
+      <Column Name="Dhrecallbemerkung" DataType="System.String"/>
+      <Column Name="TAXPUNKTTYP" DataType="System.Int32"/>
+      <Column Name="NRVS" DataType="System.Int32"/>
+      <Column Name="VSNR" DataType="System.String"/>
+      <Column Name="NRKK" DataType="System.Int32"/>
+      <Column Name="KKNR" DataType="System.String"/>
+      <Column Name="NRIV" DataType="System.Int32"/>
+      <Column Name="IVNR" DataType="System.String"/>
+      <Column Name="NRFS" DataType="System.Int32"/>
+      <Column Name="FSNR" DataType="System.String"/>
+      <Column Name="KORRANREDE" DataType="System.String"/>
+      <Column Name="KORRTITEL" DataType="System.String"/>
+      <Column Name="KORRNAME" DataType="System.String"/>
+      <Column Name="KORRVORNAME" DataType="System.String"/>
+      <Column Name="KORRSTRASSE" DataType="System.String"/>
+      <Column Name="KORRCOADRESSE" DataType="System.String"/>
+      <Column Name="KORRPLZ" DataType="System.String"/>
+      <Column Name="KORRORT" DataType="System.String"/>
+      <Column Name="ESTYP" DataType="System.Int32"/>
+      <Column Name="BEMERKUNG" DataType="System.String"/>
+      <Column Name="Betreibung" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="Nichtaufbieten" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="Nichtannehmen" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="Natel" DataType="System.String"/>
+      <Column Name="E_Mail" DataType="System.String"/>
+      <Column Name="Web" DataType="System.String"/>
+      <Column Name="Briefanrede" DataType="System.String"/>
+      <Column Name="dhpat" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="erstellt_am" DataType="System.DateTime"/>
+      <Column Name="mutiert_am" DataType="System.DateTime"/>
+      <Column Name="mutierer" DataType="System.Int32"/>
+      <Column Name="aktiv" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="GLN" DataType="System.String"/>
+      <Column Name="Kanton" DataType="System.String"/>
+      <Column Name="ZSR" DataType="System.String"/>
+      <Column Name="NRANREDE1" DataType="System.Int32"/>
+      <Column Name="Mandant1" DataType="System.Int32"/>
+      <Column Name="Anrede_D" DataType="System.String"/>
+      <Column Name="Anrede_F" DataType="System.String"/>
+      <Column Name="Anrede_I" DataType="System.String"/>
+      <Column Name="erstellt_am1" DataType="System.DateTime"/>
+      <Column Name="mutiert_am1" DataType="System.DateTime"/>
+      <Column Name="mutierer1" DataType="System.Int32"/>
+      <Column Name="aktiv1" DataType="System.Boolean" BindableControl="CheckBox"/>
+      <Column Name="anrede_d1" DataType="System.String"/>
+    </TableDataSource>
+    <Parameter Name="Absender" DataType="System.String"/>
+    <Parameter Name="Startposition" DataType="System.String"/>
+    <Parameter Name="Nummern (Komma-Getrennt)" DataType="System.String"/>
+  </Dictionary>
+  <ReportPage Name="Page1" RawPaperSize="9" TopMargin="5" BottomMargin="0" FirstPageSource="15" OtherPagesSource="15" Columns.Count="2" Columns.Width="105" Columns.Positions="0,95">
+    <DataBand Name="Data1" Width="396.9" Height="274.05" CanGrow="true" DataSource="Daten">
+      <TextObject Name="Text1" Left="95.5" Top="18.9" Width="94.5" Height="18.9" BeforePrintEvent="Text1_BeforePrint" Text="[Daten.NRPRIVAT]" HideValue="&lt; 0" Format="Date" Format.Format="d" Font="Arial, 12pt, style=Bold"/>
+      <TextObject Name="Text2" Left="94.5" Top="61.15" Width="283.5" Height="18.9" Text="[Daten.NAME] [Daten.VORNAME]" HideValue="daten.nrprivat  1" Font="Arial, 12pt, style=Bold"/>
+      <TextObject Name="Text3" Left="9.45" Top="18.9" Width="66.15" Height="18.9" BeforePrintEvent="Text3_BeforePrint" Text="Patient:" Font="Arial, 12pt, style=Bold"/>
+      <TextObject Name="Text4" Left="94.5" Top="44.25" Width="122.85" Height="18.9" Text="[Daten.anrede_d1]" HideValue="daten.nrprivat  1"/>
+      <TextObject Name="Text5" Left="94.5" Top="82.05" Width="283.5" Height="18.9" Text="[Daten.STRASSE]" Format="Date" Format.Format="d"/>
+      <TextObject Name="Text6" Left="94.5" Top="97.5" Width="283.5" Height="18.9" Text="[Daten.PLZ] [Daten.ORT]"/>
+      <TextObject Name="Text7" Left="94.5" Top="132.3" Width="283.5" Height="28.35" Text="[Daten.GEBDAT]&#13;&#10;[Daten.BERUF]" Format="Date" Format.Format="d"/>
+      <TextObject Name="Text8" Left="9.45" Top="132.3" Width="94.5" Height="28.35" Text="Geb.-Dat.:&#13;&#10;Beruf:"/>
+      <TextObject Name="Text9" Left="9.45" Top="179.55" Width="94.5" Height="47.25" Text="Tel-/Handy P:&#13;&#10;Tel./Fax. G:&#13;&#10;E-Mail:"/>
+      <TextObject Name="Text10" Left="103.95" Top="141.75" Height="9.45" Text="[Daten.GEBDAT]&#13;&#10;[Daten.BERUF]" Format="Date" Format.Format="d" Font="Arial, 9pt"/>
+      <TextObject Name="Text11" Left="94.5" Top="179.55" Width="283.5" Height="47.25" Text="[Daten.TELP] / [Daten.Natel]&#13;&#10;[Daten.TELG] / [Daten.FAXG]&#13;&#10;[Daten.E_Mail]" Format="Date" Format.Format="d"/>
+    </DataBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/mahnliste.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/mahnliste.frx
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/zahlungen_nach_behandler.frx
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/Report/zahlungen_nach_behandler.frx
@@ -0,0 +1,151 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report ScriptLanguage="Vb" ReportInfo.Created="12/18/2011 16:31:16" ReportInfo.Modified="09/03/2018 19:56:01" ReportInfo.CreatorVersion="2018.2.11.0">
+  <ScriptText>Imports System
+Imports System.Collections
+Imports System.Collections.Generic
+Imports System.ComponentModel
+Imports System.Windows.Forms
+Imports System.Drawing
+Imports Microsoft.VisualBasic
+Imports FastReport
+Imports FastReport.Data
+Imports FastReport.Dialog
+Imports FastReport.Table
+Imports FastReport.Barcode
+Imports FastReport.Utils
+
+Namespace FastReport
+  Public Class ReportScript
+
+
+    Private Sub Picture1_BeforePrint(ByVal sender As object, ByVal e As EventArgs)
+      dim s as String()
+      s=report.FileName.Split(&quot;Reporting&quot;)
+      Dim ReportLogo as String
+      ReportLogo=s(0)+&quot;\Reporting\Logo\reportlogo.png&quot;
+      picture1.ImageLocation=Reportlogo
+
+    End Sub
+
+    Private Sub Text32_BeforePrint(ByVal sender As object, ByVal e As EventArgs)
+      text32.Text=CType(Report.GetParameterValue(&quot;Prozentsatz&quot;), string) 
+      text32.Text=text32.Text+&quot;%&quot;
+
+    End Sub
+  End Class
+End Namespace
+</ScriptText>
+  <Dictionary>
+    <TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
+      <Column Name="Nrfaktura" DataType="System.Int32"/>
+      <Column Name="Nrbehandlung" DataType="System.Int32"/>
+      <Column Name="Behandlungsbeginn" DataType="System.DateTime"/>
+      <Column Name="Behandlungsende" DataType="System.DateTime"/>
+      <Column Name="Nrbehandler" DataType="System.Int32"/>
+      <Column Name="Behandler" DataType="System.String"/>
+      <Column Name="Nrpatient" DataType="System.Int32"/>
+      <Column Name="Patient" DataType="System.String"/>
+      <Column Name="Fakturatotal" DataType="System.Double"/>
+      <Column Name="Leistungen_4000_Total" DataType="System.Decimal"/>
+      <Column Name="Leistungen_4000_Behandler" DataType="System.Decimal"/>
+      <Column Name="Leistungen_Rest" DataType="System.Decimal"/>
+      <Column Name="Jahr" DataType="System.Int32" PropName="Column" Calculated="true" Expression="ToString(Year(ToDateTime([Daten.Valuta])))"/>
+      <Column Name="Monat" DataType="System.Int32" PropName="Column" Calculated="true" Expression="ToInt32(ToString(Month(ToDateTime([Daten.Valuta]))))"/>
+      <Column Name="Leistungen " DataType="System.Int32" PropName="Column" Calculated="true" Expression="[Daten.Leistungen_4000_Behandler]/28*100"/>
+      <Column Name="Leistungen_NE_Rupf" DataType="System.Decimal"/>
+      <Column Name="Zahlungsbetrag" DataType="System.Double"/>
+      <Column Name="valuta" DataType="System.String"/>
+      <Column Name="Prozent" DataType="System.Decimal"/>
+      <Column Name="TeilbetragProzent" DataType="System.Decimal"/>
+      <Column Name="ZuZahlen" DataType="System.Int32" PropName="Column" Calculated="true" Expression="[Daten.Leistungen_4000_Behandler]/100*[Daten.TeilbetragProzent]"/>
+      <Column Name="Column" Alias="Star" DataType="System.Int32" Calculated="true" Expression="IIf([Daten.TeilbetragProzent]&lt;100,&quot;*&quot;,&quot;&quot;)"/>
+      <Column Name="Leistungen" DataType="System.Decimal"/>
+      <Column Name="Vorauszahlung" DataType="System.Decimal"/>
+      <Column Name="ZuZahlen1" DataType="System.Decimal"/>
+    </TableDataSource>
+    <Parameter Name="Datum von" DataType="System.String"/>
+    <Parameter Name="Datum bis" DataType="System.String"/>
+    <Parameter Name="Absender" DataType="System.String"/>
+    <Parameter Name="Behandler" DataType="System.String"/>
+    <Parameter Name="Prozentsatz" DataType="System.String"/>
+    <Total Name="Total1" Expression="[Daten.ZuZahlen1]" Evaluator="Data1" PrintOn="GroupFooter2"/>
+    <Total Name="Total" Expression="[Daten.Fakturatotal]" Evaluator="Data1" PrintOn="GroupFooter2"/>
+    <Total Name="Total2" Expression="[Daten.Fakturatotal]" Evaluator="Data1" PrintOn="GroupFooter1"/>
+    <Total Name="Total3" Expression="[Daten.ZuZahlen1]" Evaluator="Data1" PrintOn="GroupFooter1"/>
+    <Total Name="Total4" Expression="[Daten.Leistungen ]" Evaluator="Data1" PrintOn="GroupFooter2"/>
+    <Total Name="Total5" Expression="[Daten.Leistungen ]" Evaluator="Data1" PrintOn="GroupFooter1"/>
+  </Dictionary>
+  <ReportPage Name="Page1" Landscape="true" PaperWidth="297" PaperHeight="210" RawPaperSize="9">
+    <ReportTitleBand Name="ReportTitle1" Width="1047.06" Height="66.15">
+      <TextObject Name="Text27" Left="491.4" Width="529.2" Height="18.9" Text="Abrechnung [Behandler] [Datum von] - [Datum bis]" HorzAlign="Right" Font="Arial, 12pt, style=Bold"/>
+      <PictureObject Name="Picture1" Left="18.9" Width="132.3" Height="47.25" BeforePrintEvent="Picture1_BeforePrint" ImageLocation="E:\Software-Projekte\DPM\DPM2016\DPM2016\bin\Debug\Dentis\\Reporting\Logo\reportlogo.png"/>
+      <TextObject Name="Text26" Left="18.9" Top="47.25" Width="368.55" Height="18.9" Text="[Absender]"/>
+    </ReportTitleBand>
+    <PageHeaderBand Name="PageHeader1" Top="69.48" Width="1047.06" Height="18.9"/>
+    <GroupHeaderBand Name="GroupHeader1" Top="91.72" Width="1047.06" Height="28.35" StartNewPage="true" Condition="[Daten.Jahr]">
+      <TextObject Name="Text19" Left="75.6" Width="94.5" Height="18.9" Text="[[Daten.Jahr]]" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text22" Left="18.9" Width="47.25" Height="18.9" Text="Jahr:" Font="Arial, 10pt, style=Bold"/>
+      <GroupHeaderBand Name="GroupHeader2" Top="123.4" Width="1047.06" Height="56.7" RepeatOnEveryPage="true" Condition="[Daten.Monat]" KeepTogether="true">
+        <TextObject Name="Text20" Left="75.6" Width="94.5" Height="18.9" Text="[[Daten.Monat]]"/>
+        <TextObject Name="Text23" Left="18.9" Width="56.7" Height="18.9" Text="Monat" Font="Arial, 10pt, style=Bold"/>
+        <LineObject Name="Line1" Left="18.9" Top="47.25" Width="1011.15"/>
+        <TextObject Name="Text2" Left="18.9" Top="28.35" Width="66.15" Height="18.9" Text="Valuta" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text4" Left="103.95" Top="28.35" Width="94.5" Height="18.9" Text="Patient" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text7" Left="311.85" Top="28.35" Width="56.7" Height="18.9" Text="Beginn" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text9" Left="387.45" Top="28.35" Width="94.5" Height="18.9" Text="Ende" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text11" Left="576.45" Top="28.35" Width="75.6" Height="18.9" Text="RGTotal" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text13" Left="652.05" Top="28.35" Width="75.6" Height="18.9" Text="Total" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text15" Left="897.75" Width="132.3" Height="18.9" Text="Leistungen As." HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text17" Left="463.05" Top="28.35" Width="113.4" Height="18.9" Text="Haupt-Behandler" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text32" Left="973.35" Top="28.35" Width="56.7" Height="18.9" BeforePrintEvent="Text32_BeforePrint" Text="28%" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text33" Left="907.2" Top="28.35" Width="47.25" Height="18.9" Text="Total" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text37" Left="737.1" Top="28.35" Width="66.15" Height="18.9" Text="n. Assist." HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text31" Left="803.25" Top="28.35" Width="85.05" Height="18.9" Text="n.v. Leistung" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text38" Left="652.05" Width="151.2" Height="18.9" Text="4000/7000/7997 Leist." HorzAlign="Center" Font="Arial, 9pt, style=Bold"/>
+        <LineObject Name="Line4" Left="652.05" Top="18.9" Width="151.2"/>
+        <LineObject Name="Line5" Left="907.2" Top="18.9" Width="122.85"/>
+        <DataBand Name="Data1" Top="183.43" Width="1047.06" Height="18.9" CanGrow="true" DataSource="Daten">
+          <TextObject Name="Text1" Left="18.9" Width="75.6" Height="18.9" Text="[Daten.Valuta]" Font="Arial, 9pt"/>
+          <TextObject Name="Text3" Left="103.95" Width="47.25" Height="18.9" Text="[Daten.Nrpatient]" Font="Arial, 9pt"/>
+          <TextObject Name="Text5" Left="160.65" Width="151.2" Height="18.9" CanGrow="true" GrowToBottom="true" Text="[Daten.Patient]" Font="Arial, 9pt"/>
+          <TextObject Name="Text6" Left="311.85" Width="75.6" Height="18.9" Text="[Daten.Behandlungsbeginn]" Format="Date" Format.Format="d" Font="Arial, 9pt"/>
+          <TextObject Name="Text8" Left="387.45" Width="75.6" Height="18.9" Text="[Daten.Behandlungsende]" Format="Date" Format.Format="d" Font="Arial, 9pt"/>
+          <TextObject Name="Text10" Left="585.9" Width="66.15" Height="18.9" Text="[Daten.Fakturatotal]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" WordWrap="false" Font="Arial, 9pt" Trimming="EllipsisCharacter"/>
+          <TextObject Name="Text12" Left="661.5" Width="66.15" Height="18.9" Text="[Daten.Leistungen_4000_Total]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" WordWrap="false" Font="Arial, 9pt" Trimming="EllipsisCharacter"/>
+          <TextObject Name="Text14" Left="954.45" Width="75.6" Height="18.9" Visible="false" Text="[Daten.Leistungen_4000_Behandler]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" WordWrap="false" Font="Arial, 9pt" Trimming="EllipsisCharacter"/>
+          <TextObject Name="Text16" Left="463.05" Width="122.85" Height="18.9" CanGrow="true" GrowToBottom="true" Text="[Daten.Behandler]" Font="Arial, 9pt"/>
+          <TextObject Name="Text34" Left="897.75" Width="56.7" Height="18.9" Text="[Daten.Leistungen ]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" Font="Arial, 9pt"/>
+          <TextObject Name="Text35" Left="737.1" Width="66.15" Height="18.9" Text="[Daten.Leistungen_NE_Rupf]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" WordWrap="false" Font="Arial, 9pt" Trimming="EllipsisCharacter"/>
+          <TextObject Name="Text30" Left="831.6" Width="56.7" Height="18.9" Text="[Daten.Leistungen_Rest]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" WordWrap="false" Font="Arial, 9pt" Trimming="EllipsisCharacter"/>
+          <TextObject Name="Text45" Left="1030.05" Width="18.9" Height="18.9" Text="[Daten.Star]"/>
+          <TextObject Name="Text50" Left="954.45" Width="75.6" Height="18.9" Text="[Daten.ZuZahlen1]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" WordWrap="false" Font="Arial, 9pt" Trimming="EllipsisCharacter"/>
+          <Sort>
+            <Sort Expression="[Daten.Valuta]"/>
+          </Sort>
+        </DataBand>
+        <GroupFooterBand Name="GroupFooter2" Top="205.67" Width="1047.06" Height="47.25">
+          <TextObject Name="Text18" Left="963.9" Top="9.45" Width="66.15" Height="18.9" Text="[Total1]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+          <TextObject Name="Text21" Left="557.55" Top="9.45" Width="94.5" Height="18.9" Text="[Total]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+          <TextObject Name="Text36" Left="859.95" Top="9.45" Width="94.5" Height="18.9" Text="[Total4]" Format="Number" Format.UseLocale="true" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+          <TextObject Name="Text40" Left="18.9" Top="9.45" Width="122.85" Height="18.9" Text="Monatstotal" Font="Arial, 10pt, style=Bold"/>
+        </GroupFooterBand>
+      </GroupHeaderBand>
+      <GroupFooterBand Name="GroupFooter1" Top="256.25" Width="1047.06" Height="37.8">
+        <TextObject Name="Text28" Left="557.55" Top="9.45" Width="94.5" Height="18.9" Text="[Total2]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text29" Left="954.45" Top="9.45" Width="75.6" Height="18.9" Text="[Total3]" Format="Number" Format.UseLocale="false" Format.DecimalDigits="2" Format.DecimalSeparator="." Format.GroupSeparator="'" Format.NegativePattern="1" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text39" Left="859.95" Top="9.45" Width="94.5" Height="18.9" Text="[Total5]" Format="Number" Format.UseLocale="true" HorzAlign="Right" Font="Arial, 9pt, style=Bold"/>
+        <TextObject Name="Text41" Left="18.9" Top="9.45" Width="122.85" Height="18.9" Text="Gesamttotal" Font="Arial, 10pt, style=Bold"/>
+        <LineObject Name="Line6" Left="18.9" Width="1011.15"/>
+      </GroupFooterBand>
+    </GroupHeaderBand>
+    <PageFooterBand Name="PageFooter1" Top="297.38" Width="1047.06" Height="103.95">
+      <TextObject Name="Text25" Left="18.9" Top="75.6" Width="245.7" Height="18.9" Text="[Date]"/>
+      <LineObject Name="Line2" Left="18.9" Top="9.45" Width="1011.15"/>
+      <LineObject Name="Line3" Left="28.35" Top="9.45" Height="9.45"/>
+      <TextObject Name="Text24" Left="926.1" Top="85.05" Width="103.95" Height="18.9" Text="[Page#]" HorzAlign="Right"/>
+      <TextObject Name="Text42" Left="103.95" Top="18.9" Width="94.5" Height="47.25" Text="n. Assist&#13;&#10;n.v. Leistung&#13;&#10;*"/>
+      <TextObject Name="Text43" Left="18.9" Top="18.9" Width="75.6" Height="18.9" Text="Legende" Font="Arial, 10pt, style=Bold"/>
+      <TextObject Name="Text44" Left="207.9" Top="18.9" Width="415.8" Height="47.25" Text="Leistungen welche nicht durch Assistent erbracht wurden&#13;&#10;nicht verrechenbare Leistungen (Medikamente, Labor usw.)&#13;&#10;* Teilbetrag aufgrund Teilzahlung"/>
+    </PageFooterBand>
+  </ReportPage>
+</Report>
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/Abgeschlossene_Behandlungen.sql
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/Abgeschlossene_Behandlungen.sql
@@ -0,0 +1,4 @@
+-SQL-
+SELECT        Behandlungsbeginn, Behandlungsende, Total, dbo.get_name(Nrpatient) AS Patient, dbo.get_name(Nrbehandler) AS Behandler, Status, aktiv
+FROM            dbo.Behandlu
+WHERE        (Status = 2) AND (aktiv = 1)
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/Abgeschlossene_KV.sql
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/Abgeschlossene_KV.sql
@@ -0,0 +1,4 @@
+-SQL-
+SELECT        Behandlungsbeginn, Behandlungsende, Total, dbo.get_name(Nrpatient) AS Patient, dbo.get_name(Nrbehandler) AS Behandler, Status, aktiv
+FROM            dbo.Behandlu
+WHERE        (Status = 4) AND (aktiv = 1)
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/CAMT_Journal.sql
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/CAMT_Journal.sql
@@ -0,0 +1,18 @@
+#Parameter1:Journal:DataTable:select nreintrag as keyvalue, convert(varchar(10),erstellt_am,104) FROM camt_Run ORDER BY nreintrag desc, erstellt_am desc 
+-SQL-
+SELECT        dbo.CAMT_Run.NrEIntrag AS CAMT_RUN_NrEintrag, dbo.CAMT_Run.Datum AS CAMT_Run_Datum, dbo.CAMT_Run.aktiv AS CAMT_Run_Aktiv, dbo.CAMT_Run.erstellt_am AS CAMT_Run_Erstelltam, 
+                         dbo.CAMT_Run.mutiert_am AS CAMT_Run_Mutiertam, dbo.CAMT_Run.mutierer AS CAMT_Run_Mutierer, dbo.CAMT_Run.Sourcefilename AS CAMT_Run_Filename, dbo.CAMT_File.Nreintrag AS CAMT_File_Nreintrag, 
+                         dbo.CAMT_File.CAMT_RunNr AS CAMT_File_CAMT_Run_NrEintrag, dbo.CAMT_File.Filename AS CAMT_File_Filename, dbo.CAMT_File.CreateDateTime AS CAMT_File_CreateDateTime, dbo.CAMT_File.IBAN AS CAMT_File_IBSN, 
+                         dbo.CAMT_File.REF AS CAMT_File_Referenz, dbo.CAMT_File.Anzahl_Buchungen AS CAMT_File_Anzhal_Buchungen, dbo.CAMT_File.ID AS CAMT_File_ID, dbo.CAMT_File.Total AS CAMT_File_Total, 
+                         dbo.CAMT_File.aktiv AS CAMT_File_Aktiv, dbo.CAMT_File.erstellt_am AS CAMT_File_Erstellt_am, dbo.CAMT_File.mutiert_am AS CAMT_File_Mutiert_am, dbo.CAMT_File.mutierer AS CAMT_File_Mutierer, 
+                         dbo.CAMT_Record.nreintrag AS CAMT_Record_NrEintrag, dbo.CAMT_Record.CAMT_FileNr AS CAMT_Record_CAMT_Filen_NrEintrag, dbo.CAMT_Record.Referenz AS CAMT_Record_Referenz, 
+                         dbo.CAMT_Record.Valuta AS CAMT_Record_Valuta, dbo.CAMT_Record.Buchungsdatum AS CAMT_Record_Buchungsdatum, dbo.CAMT_Record.Betrag AS CAMT_Record_Betrag, dbo.CAMT_Record.Taxen AS CAMT_Record_Taxen,
+                          dbo.CAMT_Record.aktiv AS CAMT_Record_Aktiv, dbo.CAMT_Record.erstellt_am AS CAMT_Record_erstellt_am, dbo.CAMT_Record.mutiert_am AS CAMT_Record_Mutiert_am, 
+                         dbo.CAMT_Record.mutierer AS CAMT_Record_Mutierer, dbo.CAMT_Record.verbucht AS CAMT_Record_Verbucht, SUBSTRING(dbo.CAMT_Record.Referenz, 7, 10) AS fakturanr, dbo.get_name(dbo.Faktura.Nrpatient) AS Patient, 
+                         dbo.get_name(dbo.Faktura.Nrdebitor) AS Debitor
+FROM            dbo.CAMT_Run INNER JOIN
+                         dbo.CAMT_File ON dbo.CAMT_Run.NrEIntrag = dbo.CAMT_File.CAMT_RunNr INNER JOIN
+                         dbo.CAMT_Record ON dbo.CAMT_File.Nreintrag = dbo.CAMT_Record.CAMT_FileNr LEFT OUTER JOIN
+                         dbo.Faktura ON SUBSTRING(dbo.CAMT_Record.Referenz, 7, 10) = dbo.Faktura.Nrfaktura
+WHERE        (dbo.CAMT_Run.NrEIntrag = #Parameter1)
+
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/ESR-Journal
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/ESR-Journal
@@ -0,0 +1,13 @@
+#Parameter1:Journal:DataTable:select datum FROM besrt ORDER BY eintragnr desc, datum desc 
+-SQL-
+SELECT        dbo.BESRT.Datum, dbo.BESRT.Betrag, SUBSTRING(dbo.BESRI.Referenz, 8, 10) AS fakturanr, dbo.BESRI.Transaktion, dbo.BESRI.Betrag AS Einzelbetrag, dbo.BESRI.Datumverarbeitung AS Valuta, dbo.BESRI.Taxen_PTT, 
+                         dbo.BESRI.Verbucht
+into #tmp1
+FROM            dbo.BESRT INNER JOIN
+                         dbo.BESRI ON dbo.BESRT.Eintragnr = dbo.BESRI.besrtnr
+                where dbo.besrt.datum='#Parameter1';
+SELECT        dbo.#tmp1.Datum, dbo.#tmp1.Betrag, dbo.#tmp1.fakturanr, dbo.#tmp1.Transaktion, dbo.#tmp1.Einzelbetrag, dbo.#tmp1.Valuta, dbo.#tmp1.Taxen_PTT, dbo.#tmp1.Verbucht, dbo.get_name(dbo.Faktura.Nrpatient) AS Patient, 
+                         dbo.get_name(dbo.Faktura.Nrdebitor) AS Debitor
+FROM            dbo.#tmp1 INNER JOIN
+                         dbo.Faktura ON dbo.#tmp1.fakturanr = dbo.Faktura.Nrfaktura
+drop table #tmp1;
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/ESR-Journal.sql
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/ESR-Journal.sql
@@ -0,0 +1,13 @@
+#Parameter1:Journal:DataTable:select eintragnr as keyvalue, convert(varchar(10),datum,104) FROM besrt ORDER BY eintragnr desc, datum desc 
+-SQL-
+SELECT        dbo.BESRT.Datum, dbo.BESRT.Betrag, SUBSTRING(dbo.BESRI.Referenz, 8, 10) AS fakturanr, dbo.BESRI.Transaktion, dbo.BESRI.Betrag AS Einzelbetrag, dbo.BESRI.Datumverarbeitung AS Valuta, dbo.BESRI.Taxen_PTT, 
+                         dbo.BESRI.Verbucht
+into #tmp1
+FROM            dbo.BESRT INNER JOIN
+                         dbo.BESRI ON dbo.BESRT.Eintragnr = dbo.BESRI.besrtnr
+                where dbo.besrt.eintragnr=#Parameter1;
+SELECT        #tmp1.Datum, #tmp1.Betrag, #tmp1.fakturanr, #tmp1.Transaktion, #tmp1.Einzelbetrag, #tmp1.Valuta, #tmp1.Taxen_PTT, #tmp1.Verbucht, dbo.get_name(dbo.Faktura.Nrpatient) AS Patient, 
+                         dbo.get_name(dbo.Faktura.Nrdebitor) AS Debitor
+FROM            #tmp1 INNER JOIN
+                         dbo.Faktura ON #tmp1.fakturanr = dbo.Faktura.Nrfaktura;
+drop table #tmp1;
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/FakturaJournal.sql
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/FakturaJournal.sql
@@ -0,0 +1,8 @@
+#Parameter1:Datum von:datetime:firstofcurrentyear
+#Parameter2:Datum bis:datetime:currentdate
+#Parameter3:Behandler:DataTable:select name+' '+vorname from privat where behandler=1 AND aktiv=1 order by nrprivat
+-SQL-
+SELECT        Nrfaktura, Nrdebitor, Nrpatient, Datum, Total, dbo.faktura.Status, dbo.get_name(Nrpatient) AS Patient, case when nrdebitor<>nrpatient then dbo.get_name(Nrdebitor) else '' end AS Debitor, dbo.privat.name+' '+dbo.privat.vorname as behandler
+FROM            dbo.Faktura  JOIN
+                         dbo.PRIVAT ON dbo.Faktura.Nrbehandler = dbo.PRIVAT.NRPRIVAT
+where  datum>='#Parameter1 00:00:00' and datum <='#Parameter2 23:59:59' and (''='#Parameter3' or '#Parameter3'= dbo.privat.name+' '+dbo.privat.vorname)  
--- a/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/Fakturierungen_Nach_Behandler.sql
+++ b/DPM2016/bin/Debug/DPM/Reporting/Archiv/SQL/Fakturierungen_Nach_Behandler.sql
@@ -0,0 +1,47 @@
+#Parameter1:Datum von:datetime:firstofcurrentyear
+#Parameter2:Datum bis:datetime:currentdate
+#Parameter3:Behandler:DataTable:select name+' '+vorname from privat where behandler=1 AND aktiv=1 order by nrprivat
+#Parameter4:Prozentsatz:Text:0.28
+-SQL-
+SELECT 
+  faktura.Nrfaktura,
+  behandlu.Nrbehandlung,
+  behandlu.Behandlungsbeginn,
+  behandlu.Behandlungsende,
+  behandlu.Nrbehandler,
+  concat(privat.name, ' ', privat.vorname) AS Behandler,
+  behandlu.Nrpatient,
+  Concat(privat1.name, ' ', privat1.vorname) AS Patient,
+  faktura.total as fakturatotal,
+  cast(0 AS DECIMAL(10,2)) as Leistungen_4000_Total,
+  CAST(0 AS DECIMAL(10,2)) as Leistungen_4000_Behandler,
+  CAST(0 AS DECIMAL(10,2)) as Leistungen_NE_Rupf,
+  CAST(9 AS DECIMAL(10,2)) as Leistungen_Rest
+  INTO #tmp2
+FROM
+  faktura
+  INNER JOIN behandlu ON (faktura.Nrbehandlung = behandlu.Nrbehandlung)
+  INNER JOIN privat ON (behandlu.Nrbehandler = privat.NRPRIVAT)
+  INNER JOIN privat privat1 ON (behandlu.Nrpatient = privat1.NRPRIVAT)
+where datum >= '#Parameter1 00:00:00' and datum < '#Parameter2 23:59:59' AND faktura.status<>9
+
+
+DECLARE @nrbehandler INT
+SELECT @nrbehandler=nrprivat FROM privat WHERE (''='#Parameter3' or '#Parameter3'= dbo.privat.name+' '+dbo.privat.vorname) 
+
+UPDATE #tmp2 set leistungen_4000_Total = (select sum(leistung.total) from leistung 
+   WHERE leistung.nrbehandlung=#tmp2.nrbehandlung and (left(leistung.sso_nummer,1)='4'));
+
+update #tmp2 set leistungen_4000_Behandler = (select sum(leistung.total)*#Parameter4 from leistung where 
+   leistung.nrbehandler=@nrbehandler and leistung.nrbehandlung=#tmp2.nrbehandlung and (LEFT(leistung.SSO_Nummer,1)='4'));
+    
+update #tmp2 set leistungen_ne_rupf = (select sum(leistung.total) from leistung 
+   WHERE leistung.nrbehandler<>1 and leistung.nrbehandlung=#tmp2.nrbehandlung and (LEFT(leistung.sso_nummer,1)='4'));
+    
+update #tmp2 set leistungen_Rest = (select sum(leistung.total) from leistung 
+   WHERE leistung.nrbehandlung=#tmp2.nrbehandlung and ((LEFT(leistung.SSO_Nummer,1)<>'4')));
+
+UPDATE #tmp2 set behandler = 'Terlinden-Dünner' where behandler='Terlinden-Dünner Dominique';
+select * from #tmp2 where leistungen_4000_behandler > 0 order by nrfaktura;
+
+DROP TABLE #tmp2 
--- a/Show More
+++ b/Show More