Update 6.12.23

2023-12-06 20:21:17 +01:00
parent bedd741642
commit f2cb99bb17
152 changed files with 19555 additions and 18732 deletions
--- a/DPM2016/Behandlung/Benhandungdetail.Designer.vb
+++ b/DPM2016/Behandlung/Benhandungdetail.Designer.vb
@@ -24,6 +24,8 @@ Partial Class Benhandungdetail
    Private Sub InitializeComponent()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Benhandungdetail))
        Me.GrpPatient = New System.Windows.Forms.GroupBox()
+        Me.cbansprechperson = New DPM2016.MyCombobox()
+        Me.lblAnsprechen = New System.Windows.Forms.Label()
        Me.txtProjekt = New System.Windows.Forms.TextBox()
        Me.lblProjekt = New System.Windows.Forms.Label()
        Me.cbboxNRESTyp = New DPM2016.MyCombobox()
@@ -184,6 +186,8 @@ Partial Class Benhandungdetail
        '
        'GrpPatient
        '
+        Me.GrpPatient.Controls.Add(Me.cbansprechperson)
+        Me.GrpPatient.Controls.Add(Me.lblAnsprechen)
        Me.GrpPatient.Controls.Add(Me.txtProjekt)
        Me.GrpPatient.Controls.Add(Me.lblProjekt)
        Me.GrpPatient.Controls.Add(Me.cbboxNRESTyp)
@@ -192,11 +196,34 @@ Partial Class Benhandungdetail
        Me.GrpPatient.Controls.Add(Me.Label7)
        Me.GrpPatient.Location = New System.Drawing.Point(3, 31)
        Me.GrpPatient.Name = "GrpPatient"
-        Me.GrpPatient.Size = New System.Drawing.Size(300, 84)
+        Me.GrpPatient.Size = New System.Drawing.Size(300, 87)
        Me.GrpPatient.TabIndex = 9
        Me.GrpPatient.TabStop = False
        Me.GrpPatient.Text = "Patient / Behandler"
        '
+        'cbansprechperson
+        '
+        Me.cbansprechperson.Dataselection = Nothing
+        Me.cbansprechperson.Displaymember = Nothing
+        Me.cbansprechperson.Location = New System.Drawing.Point(93, 100)
+        Me.cbansprechperson.Name = "cbansprechperson"
+        Me.cbansprechperson.Size = New System.Drawing.Size(192, 21)
+        Me.cbansprechperson.TabIndex = 24
+        Me.cbansprechperson.Table = Nothing
+        Me.cbansprechperson.TableAlias = ""
+        Me.cbansprechperson.Valuemember = Nothing
+        Me.cbansprechperson.Visible = False
+        '
+        'lblAnsprechen
+        '
+        Me.lblAnsprechen.AutoSize = True
+        Me.lblAnsprechen.Location = New System.Drawing.Point(6, 101)
+        Me.lblAnsprechen.Name = "lblAnsprechen"
+        Me.lblAnsprechen.Size = New System.Drawing.Size(84, 13)
+        Me.lblAnsprechen.TabIndex = 25
+        Me.lblAnsprechen.Text = "Ansprechperson"
+        Me.lblAnsprechen.Visible = False
+        '
        'txtProjekt
        '
        Me.txtProjekt.Location = New System.Drawing.Point(72, 24)
@@ -272,7 +299,7 @@ Partial Class Benhandungdetail
        Me.grpZusammenfassugn.Controls.Add(Me.lblBehandlungstotal)
        Me.grpZusammenfassugn.Controls.Add(Me.txtcKVTotal)
        Me.grpZusammenfassugn.Controls.Add(Me.Label2)
-        Me.grpZusammenfassugn.Location = New System.Drawing.Point(0, 364)
+        Me.grpZusammenfassugn.Location = New System.Drawing.Point(0, 371)
        Me.grpZusammenfassugn.Name = "grpZusammenfassugn"
        Me.grpZusammenfassugn.Size = New System.Drawing.Size(306, 141)
        Me.grpZusammenfassugn.TabIndex = 11
@@ -803,7 +830,7 @@ Partial Class Benhandungdetail
        Me.GrpRaten.Controls.Add(Me.Label3)
        Me.GrpRaten.Controls.Add(Me.lblZuschlagRaten)
        Me.GrpRaten.Controls.Add(Me.lblAnzahlRaten)
-        Me.GrpRaten.Location = New System.Drawing.Point(3, 282)
+        Me.GrpRaten.Location = New System.Drawing.Point(3, 289)
        Me.GrpRaten.Name = "GrpRaten"
        Me.GrpRaten.Size = New System.Drawing.Size(303, 76)
        Me.GrpRaten.TabIndex = 12
@@ -905,7 +932,7 @@ Partial Class Benhandungdetail
        Me.grpBehandlungsdaten.Controls.Add(Me.lblRGStellung)
        Me.grpBehandlungsdaten.Controls.Add(Me.Label15)
        Me.grpBehandlungsdaten.Controls.Add(Me.lblBegin)
-        Me.grpBehandlungsdaten.Location = New System.Drawing.Point(3, 124)
+        Me.grpBehandlungsdaten.Location = New System.Drawing.Point(3, 131)
        Me.grpBehandlungsdaten.Name = "grpBehandlungsdaten"
        Me.grpBehandlungsdaten.Size = New System.Drawing.Size(303, 151)
        Me.grpBehandlungsdaten.TabIndex = 10
@@ -1962,4 +1989,6 @@ Partial Class Benhandungdetail
    Friend WithEvents cbboxNrVerguetungsart As MyCombobox
    Friend WithEvents lblmwstsatz As Label
    Friend WithEvents cbboxmwstsatz As MyCombobox
+    Friend WithEvents cbansprechperson As MyCombobox
+    Friend WithEvents lblAnsprechen As Label
 End Class
--- a/DPM2016/Behandlung/Benhandungdetail.resx
+++ b/DPM2016/Behandlung/Benhandungdetail.resx
@@ -202,9 +202,6 @@
  <metadata name="ToolStrip2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>143, 17</value>
  </metadata>
-  <metadata name="ToolStrip2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>143, 17</value>
-  </metadata>
  <data name="ToolStripButton1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAAgAAAAIACAYAAAD0eNT6AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
@@ -435,7 +432,7 @@
        AHQrG9+C7Bp/GACiFJkBoHxLL3XR+gEAAOiGAaCOU2QzvUzd4ZTyLT3UResDAACgW9n45mTX+MMAEKVI
        DQCbu6uLxg8DAAAA6IMBoI5TaDeNoO5wSvnmruqi9QQAANCtbHwu2TX+MABEKTIDwMnNXdhP+7sDAADo
        tnx8Dtk1/jAARClum2k4dYdTTm7urC5at7j3w95u7MyOLuzMdgAAqCtfftiM7Bp/462G74usaY1i2TRn
-        04Zjx3a6RFRrfERmACjf1JH9tK9LXDq2oj1bMymXzR2VQf5uAAAAerisys/uPGWb+r/fLLYbu4qajd0U
+        04Zjx3a6RFRrfERmACjf1JH9tK9LXDq2oj1bMymXzR2VQf5uAAAAetitys/uPGWb+r/fLLYbu4qajd0U
        2U3D/H+JQMo3dVDLtHNcObG+A1vybhb5+wAAAERLYZ6ptMSlZIq6jb1IDQAb26mlyj8FiA8HFrVm011m
        8ncBAACItqn29PJiu3GQqNzYSpFNyaduNKV8Y1u1WPmnALHvwGJtXzIBAAAQVda0H4scylWidmMnbrvi
        Im8woXxjG7Vc+acAsa18g/rOPx/v/AEAIEZYla+n2pU0Ub2xEbkBoDU7v69tzFs6Dsf8AQAgtrjtpk9E
@@ -467,7 +464,7 @@
        1TU1WNN+nGxt+UtRtbGZeBwANk7VvgFw79LryUUEAACQcXKv1AbA1aJmYzdFNtMz9I2vKVYGgC/eNZK3
        j/LNtnvIhQQAAJBxaNUtZM+QbKb3Rc3GbqQGgOWxMQDMGK7tDAD+ZQ1nD/FLAAMAAOizdc7VZNdQ3Hbl
        cVGzsZuiPNNfqBtP+ToGBoDTG7RvAFz8fntyEQEAAGStmNiN7BqK26H0EjUbu3HbTU9TN54SCwPAoYXa
-        NwCuK+xDLiIAAICseW+0JLvGn8uq/DzZ2vgyUbOxm3gbALYUat8AuHvREHXRHgIAANDl9P4HWbHTTHZN
+        NwCuK+xDLiIAAICseW+0JLvGn92q/DzZ2vgyUbOxm3gbALYUat8AuHvREHXRHgIAANDl9P4HWbHTTHZN
        TaatomJjO4V5pqfoX6CmWBgAvvxA+wbA45vuIBcSAABAxpF1t5I9Q7Ipn4qKje1IDQBldT8AzB6pbQPg
        9PwMduYgvwTw7wAAAHTZMW8g2TUU/iV7omJjO+qNfdL/xgdS1wPAuc3aNwAuHNuGXEQAAABZq6f0ILuG
        UmhTBoiKje2oNzZuBoAjX6SRt4uyekpPchEBAABkLRzbmuwayjRn04aiYmM7bpvyBPULUOp6ANhWrP0M
@@ -484,7 +481,7 @@
        mvbjZGvLX4pajZ/E+gCwcYr2DYD7lg5SF+1uAAAAXU7tltgAaDeuFpUaX1Fv/O9r/jK0uhgAvnhH+wbA
        77beQi4kAACAjMMrh5I9QzO9Jyo1vqLeeO0DwBe1PwDMGKZtAJgxIpNcRAAAAFnbZl9Bdg3JpvxZVGp8
        xW1THiZ/IUJtDwCnN2jfALjk/bbqot0FAACg24pPO5NdQymwKT1FpcZXZAaAI7U8ABxamEbeDsq6wh7k
-        IgIAAMia90Zzsmv8uazKz5OtjS8TlRpfKbSbH6J+KUptDwBbCrVvANyzaIC6aHcCAADocmbf7azYaSa7
+        IgIAAMia90Zzsmv82a3Kz5OtjS8TlRpfKbSbH6J+KUptDwBbCrVvANyzaIC6aHcCAADocmbf7azYaSa7
        xl9BnnGLqNP4C794AfVLUWp7APhynJG8HZSvN91ALiQAAICMo2uvJXsmgP+KOo2/SA0AS2p3AJg1UtsG
        wOn5Fnb2AL2QAAAAMnbM6092TQDPiTqNv7jtpgeJX4hUmwPA2c3aNwAuHNtKXbQ7AAAAdFv9WReyayiF
        NmWAqNP4i8wA8FUtDgB82KBuA2XNlK7kIgIAAMha+HZLsmso05xNG4o6jb+4baYHqF+KUpsDwLZi7ZcA
@@ -501,7 +498,7 @@
        smtqavzDZGvLX4oKje/E0gCwcYr2DYD7l/YnFxEAAEDG6d3aNwAW5BlXifqM/7gdptupX5IS7QHgi3e0
        bwA8sW2IunA3AgAA6HJ4pdQGwPdEfcZ/ZAaAgwuiNwBc2J3KSodpGwBmjMgkFxEAAEDWtlk9ya6hGR8T
        9Rn/cduV2+hfsqZoDgCn1mvfAPjFuFbkIgIAAMha+Wl7smtITnMPUZ/xn1gZAA4uTCP/Tsr6ws7s+wM3
-        AAAA6DZvTA7ZNf5cVuXnWSNSfy3qM/5TnKfcSv2ilGgOAFsKtG8A3LuoL7mIAAAAMs7uvY4VO8xk1/gr
+        AAAA6DZvTA7ZNf7sVuXnWSNSfy3qM/5TnKfcSv2ilGgOAFsKtG8A3LuoL7mIAAAAMs7uvY4VO8xk1/gr
        yDNuEdWZGImVAeDLcUby76R8s3GQunDXAwAA6HJ0zQCyZyhum2mCqM7EiPpL3eL/SwZyYH70BoBZL2vb
        ADg938LO7acXEgAAQMbOz3uRXUOyKc+K6kyMuPPMN5O/KCFaA8DZTdo3AC56pwW5iAAAALJWT+5Adg3J
        oVwlqjMxEgsDwFdLtG8AXDOlo7po1wEAAOi28O3mZNdQZlqNBlGdiZFiu/km6helRGsA2FasfQPgrnm9
@@ -601,7 +598,7 @@
        MhsATY+IGkPCjZ4BYOWHGAAAACAClpnYqgnaNwAWvWTsImoMCTf8KkrknavBtmlZrHxFcwAAAF1Or8lh
        816nu6YGq3Kef4+NqDEk3OgZAL5eex37+fgTAAAAulw48qhnYznVNf4K85QNosIQvaHuYC2+33cvuZAA
        AAAyTu24h+wZSqHd+LGoL0RvqDs4lJkjzOqiPVZjEQEAAGQdLruW7BqK2256WtQXojfUHRxK2UetyEUE
-        AACQtaWkD9k1JIexn6gvRG9cVuVn8k4OYsesXuQiAgAAyFo6ri3ZNZTJ+ZkNRH0hehPOAHB05RByEQEA
+        AACQtaWkD9k1JIexn6gvRG/sVuVn8k4OYsesXuQiAgAAyFo6ri3ZNZTJ+ZkNRH0hehPOAHB05RByEQEA
        AGRcOPo4m+7KILvGX6Gt6S5RXUgkot6pF/zv5FDO7L6LXEgAAAAZp3ffT/YMxW03fiaqC4lE+DmV1B0d
        yHSXwn4+9idyIQEAAGQcXXkD2TUUt830T1FdSCRSZDWdpO7oQJa+n0suIgAAgKzts/qRXUMzXyOqC4lE
        Cu2mtfQdTdtS0o1cRAAAAFnLx7cnu4bidmSkiupCIpFCm/IGdUcHsmZyB3bwi0EAAAC6lQ7PJLumBmva
@@ -613,8 +610,8 @@
        giAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAI
        giAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAI
        giAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAI
-        giAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAxnaSk/wdKel0Z
-        lqGCUQAAAABJRU5ErkJggg==
+        giAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAIgiAxnaSk/wefl10B
+        h339owAAAABJRU5ErkJggg==
 </value>
  </data>
  <data name="ToolStripDropDownButton2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
--- a/DPM2016/Behandlung/Benhandungdetail.vb
+++ b/DPM2016/Behandlung/Benhandungdetail.vb
@@ -19,6 +19,7 @@
                Get_Stammdaten()
                Globals.OnLoad = True
                OnGetData = True
+
                Get_Data()
                OnGetData = False
                Globals.OnLoad = False
@@ -47,6 +48,12 @@


                    GrpPatient.Text = "Verantwortung / Rechnungsart"
+
+                    GrpPatient.Height = GrpPatient.Height + 30
+                    Me.cbansprechperson.Visible = True
+
+
+                    Me.lblAnsprechen.Visible = True
                    Me.grpZusammenfassugn.Top = grpZusammenfassugn.Top + 20
                    Me.GrpRaten.Top = GrpRaten.Top + 20
                    Me.grpBehandlungsdaten.Top = Me.grpBehandlungsdaten.Top + 20
@@ -368,6 +375,22 @@
            End Try
        End If
        chk_dateien()
+
+        If r("nransprechpartner") > 0 Then
+            Dim pap As New clsDB
+            pap.Get_Tabledata("AP", "", "Select name from privat_ansprechpartner where id=" + r("nransprechpartner").ToString)
+            Dim i As Integer = 0
+            Dim x As Integer
+            Dim result As String
+
+            For Each itm As Object In cbansprechperson.Items
+                result = itm.ToString()
+                If result = pap.dsDaten.Tables(0).Rows(0).Item(0) Then
+                    Me.cbansprechperson.SelectedText = pap.dsDaten.Tables(0).Rows(0).Item(0)
+                End If
+            Next
+        End If
+
        AddChanges(Me)
        Me.HasChanges = False
    End Sub
@@ -565,9 +588,16 @@
        r("mutierer") = Globals.ActUser
        r("total") = Me.txtcTotal.Text

+        If Me.cbansprechperson.Text <> "" Then
+            Dim ap As New clsDB
+            ap.Get_Tabledata("Ansprechpartner", "", "select id from privat_ansprechpartner where name='" + Me.cbansprechperson.Text + "' and nrprivat=" + Me.Patientnr.ToString)
+            r("nransprechpartner") = ap.dsDaten.Tables(0).Rows(0).Item(0).ToString
+        End If
+
        db.Update_Data()


+
        Me.HasChanges = False

    End Sub
@@ -706,6 +736,20 @@
        dbx.Dispose()


+        Try
+            Me.cbansprechperson.Items.Clear()
+            Me.cbansprechperson.Items.Add("")
+            Dim ap As New clsDB
+            ap.Get_Tabledata("Ansprechpartner", "", "Select id,Name from privat_ansprechpartner where aktiv=1 and nrprivat=" + Me.Patientnr.ToString + " order by name")
+            Dim i As Integer = 0
+            Me.cbansprechperson.SelectedIndex = i
+            For Each r1 As DataRow In ap.dsDaten.Tables(0).Rows
+                Me.cbansprechperson.Items.Add(r1("Name"))
+            Next
+            ap.Dispose()
+        Catch ex As Exception
+
+        End Try

    End Sub

@@ -1092,6 +1136,7 @@
    End Sub

    Private Sub cbboxNrAnsatz_SelectedIndexChanged_1(sender As Object, e As EventArgs) Handles cbboxNrAnsatz.SelectedIndexChanged
+        If Me.OnLoad Then Exit Sub
        If Me.Behandlungsstatus <> 1 And Me.Behandlungsstatus <> 4 Then Exit Sub
        Me.Save_Data()
        db.Recalc_Leistungen(Me.Behandlungsnr, Me.mtxtTaxpunktwert.Text)
--- a/DPM2016/Behandlung/LeistungDruck.Designer.vb
+++ b/DPM2016/Behandlung/LeistungDruck.Designer.vb
@@ -86,11 +86,11 @@ Partial Class LeistungDruck
        Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
        Me.ToolStripButton3 = New System.Windows.Forms.ToolStripButton()
        Me.ToolStripButton4 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton()
        Me.GroupBox2 = New System.Windows.Forms.GroupBox()
        Me.C1Produktzusatz = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.ToolStrip4 = New System.Windows.Forms.ToolStrip()
        Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
-        Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton()
        CType(Me.diwert, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.DIMenge, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.dtdatum, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -415,7 +415,6 @@ Partial Class LeistungDruck
        '
        Me.lbtarif1.BackgroundStyle.Class = "ListBoxAdv"
        Me.lbtarif1.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square
-        Me.lbtarif1.CheckStateMember = Nothing
        Me.lbtarif1.ContainerControlProcessDialogKey = True
        Me.lbtarif1.ContextMenuStrip = Me.ContextMenuStrip1
        Me.lbtarif1.DragDropSupport = True
@@ -559,7 +558,6 @@ Partial Class LeistungDruck
        '
        Me.lbPakete.BackgroundStyle.Class = "ListBoxAdv"
        Me.lbPakete.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square
-        Me.lbPakete.CheckStateMember = Nothing
        Me.lbPakete.ContainerControlProcessDialogKey = True
        Me.lbPakete.Dock = System.Windows.Forms.DockStyle.Fill
        Me.lbPakete.DragDropSupport = True
@@ -735,7 +733,7 @@ Partial Class LeistungDruck
        '
        Me.GroupBox1.Controls.Add(Me.C1Produkte)
        Me.GroupBox1.Dock = System.Windows.Forms.DockStyle.Left
-        Me.GroupBox1.Location = New System.Drawing.Point(35, 16)
+        Me.GroupBox1.Location = New System.Drawing.Point(27, 16)
        Me.GroupBox1.Name = "GroupBox1"
        Me.GroupBox1.Size = New System.Drawing.Size(498, 152)
        Me.GroupBox1.TabIndex = 0
@@ -766,7 +764,7 @@ Partial Class LeistungDruck
        Me.ToolStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton1, Me.ToolStripButton3, Me.ToolStripButton4, Me.ToolStripButton5})
        Me.ToolStrip3.Location = New System.Drawing.Point(3, 16)
        Me.ToolStrip3.Name = "ToolStrip3"
-        Me.ToolStrip3.Size = New System.Drawing.Size(32, 152)
+        Me.ToolStrip3.Size = New System.Drawing.Size(24, 152)
        Me.ToolStrip3.TabIndex = 5
        Me.ToolStrip3.Text = "ToolStrip3"
        '
@@ -776,7 +774,7 @@ Partial Class LeistungDruck
        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(29, 20)
+        Me.ToolStripButton1.Size = New System.Drawing.Size(21, 20)
        Me.ToolStripButton1.Text = "Neues Produkt"
        '
        'ToolStripButton3
@@ -785,7 +783,7 @@ Partial Class LeistungDruck
        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(29, 20)
+        Me.ToolStripButton3.Size = New System.Drawing.Size(21, 20)
        Me.ToolStripButton3.Text = "Speichern"
        '
        'ToolStripButton4
@@ -794,9 +792,18 @@ Partial Class LeistungDruck
        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(29, 20)
+        Me.ToolStripButton4.Size = New System.Drawing.Size(21, 20)
        Me.ToolStripButton4.Text = "Löschen"
        '
+        '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(21, 20)
+        Me.ToolStripButton5.Text = "Kopieren"
+        '
        'GroupBox2
        '
        Me.GroupBox2.Controls.Add(Me.C1Produktzusatz)
@@ -845,15 +852,6 @@ Partial Class LeistungDruck
        Me.ToolStripButton2.Size = New System.Drawing.Size(21, 20)
        Me.ToolStripButton2.Text = "Speichern"
        '
-        '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(29, 20)
-        Me.ToolStripButton5.Text = "Kopieren"
-        '
        'LeistungDruck
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
--- a/DPM2016/Behandlung/LeistungDruck.resx
+++ b/DPM2016/Behandlung/LeistungDruck.resx
@@ -158,11 +158,8 @@
 </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;}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;}Style1{}Caption{AlignHorz:Center;}Style6{}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, 1140, 104&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, 1140, 104&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;}Style4{}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{ForeColor:ControlText;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style9{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style1{}Caption{AlignHorz:Center;}Style6{}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, 1140, 104&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, 1140, 104&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>983, 17</value>
-  </metadata>
  <metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>826, 17</value>
  </metadata>
@@ -202,26 +199,65 @@
  <metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>1411, 17</value>
  </metadata>
+  <data name="C1Produkte.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="C1Produkte.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="C1Produkte.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;}Style4{}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{}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style9{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style1{}Caption{AlignHorz:Center;}Style6{}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, 490, 131&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, 490, 131&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>1518, 17</value>
  </metadata>
  <data name="ToolStripButton1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAMMSURBVEhLnVXNS1RRFH8VtKhoUf9ECLWRyXnvDmmQMtp7
-        T7GmItq0apNQQURtpi8IglwargohSReziJhm3rvz0apdH2D0YZpR1qIPnCQtUW/nd99743t6HUeP/Bi5
-        99zfue+c3z1HU1laaJuP5uK7zJy+x+LsrOUaAzaPP7O5Pk6/Y/J/Wut0jZ5OJ763jXxTw6kt/vEaJrRN
-        5qPGbTZPNNh51tfOjR82Z6IWOrKxactld7uKTY2t+X3bfSaFEXmXG9ttOvpput17FdmqyLLFds4mTc7O
-        JLP7d/qMIfPJifhi0jUWlCR1wOTGlFVgl1Ol5h0+s2dIC25ei7yTJ8TxUqs4UW5T7lfhxn5ZBaMnNdyw
-        VZKjoMi5xfV3ygMEkJ96elgMfOgXD8fviWOlQ0q/ACaPf+0o6IYMALWgoCrHAN2FFnH1xQUBq8xNid7X
-        15V+AZI5NkPpHkyN0FdAimup5UixRdx8eUkG+D1XEX1vbiv9wsBXWMUE06BzlUMYGwlAqFiOcUPzHlF0
-        EznvLjRLYgDFvfXqigwwTQH6396p7gHwXc5hZtmc7eiO5r3QKDkKmqac49YAyIc+3pcBZub/iOznTHUP
-        SD8/L06Wk5EAHuJjFADPf2kRt4Va1mMImpkYDBEHaPqEL6DesrQInUOKUAvyDSAtIIEt0t/s/Gx1D/j5
-        97twJh+HiAN4ASIpAqBzSBHFBJBzpAUG8vK3fHUP6B25Jr88wvOELZJURzV0xciGAigkcg3DjUGq8gsj
-        ydk/WWS0XJVDGBsJQPBkin6OlqtwqGLdAai7Iv92Xj+gYVign3uLCmcCdA4potAoKHKu8gtgZWOzpM4h
-        2YswiTAs0M9VzgGg88zEA6mWFQUNQXZkl43aOeOgDADDJMKwQD9XHaoXVNgFO8e+WA4751MvGSYRhgX6
-        uerwWpA3J3LTMdI+5UrDJMKwQCeULVdBtAJUO5lzSovy5ssNkwjDAv0cgYikIhtXmJQekdQ57Um1UEEj
-        Oa/HMCzQz6FlPBivpYCMQC8Ua3IPUlzVNO0/43uuD4YnYP8AAAAASUVORK5CYII=
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAMOSURBVEhLnVXNS1RRFH8VtKhoUf9ECLXIzHnvSho0g9p7
+        b8SaimjTqk1CBRG1mb4gCHJpuCqEJF3MohGZee+O2qpdH2D0YZpR1qIPnCQt0bmd333vje85Vx098mPk
+        3nN/575zfvccTWVpoW0+novtMnP6Houz85Zr9Ng89szm+gT9jsv/aS3pGh1JJ7Y3Qb6p/tQW//gqJrRN
+        5pPabTZvqLHzrKuFGz9szsRqaB2om7Fcdr9tqL42nt+33WdSGJG3uXW7TUc/S7d7ryJbEVlWauFsyuTs
+        XPPgwZ0+Y8h8ciK+HHeNRSVJFTC5MW0V2NXUcOMOn9kzpAU3X408yRvEyeG4ODWSUO6X4R74ZRWMjlR/
+        zVZJjoIi5xbX3ykPEEB+5ulR0fOhWzyeeCBODB9R+gUweexra0E3ZACoBQVVOQZoLzSJ6y8uCVhxflp0
+        vr6p9AuQyLFZSndvapS+AlJcSy3HhprE7ZdXZIDf80XR9eau0i8MfIU11MA06FzlEMZGAhCKlmPc0rxH
+        FN1EztsLjZIYQHHvvLomA8xQgO6398p7AHyXc5hZNm87uqN5LzRKjoKmKee4NQDyvo8PZYDZhT9i8HOm
+        vAekn18Up0eaIwE8xMYpAJ7/0iJuC7WsxxA0M9kbIg5Q/wlfQL1laRE6hxShFuQbQFpAAivR39zCXHkP
+        +Pn3u3CmBkLEAbwAkRQB0DmkiGICyDnSAgP5yLd8eQ/oHL0hvzzCM8BKJNUxDV0xsqEAColcw3BjkKr8
+        wohz9k8WGS1X5RDGRgIQPJmin6PlKhzKWHcA6q7Iv53XD2kYFujn3qLCmQCdQ4ooNAqKnKv8AljZ/XOk
+        zj7ZizCJMCzQz1XOAaDzzOQjqZaKgoYgO7LLxuyccVgGgGESYVign6sOVQsq7KKdY18sh13wqZcMkwjD
+        Av1cdXgtyJsTuekYaZ+y0jCJMCzQCWXLVRBVgGonc05pUd58uWESYVignyMQkRRl4wqT0iOSOqc9qRYq
+        aCTn1RiGBfo5tIwH47UUkBHohWJN7kGKK5qm/QcPjq3M/qGargAAAABJRU5ErkJggg==
 </value>
  </data>
  <data name="ToolStripButton3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -315,51 +351,6 @@
        TgDQASA1MVpwzwAAAABJRU5ErkJggg==
 </value>
  </data>
-  <metadata name="ToolStrip4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>1625, 17</value>
-  </metadata>
-  <metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>1411, 17</value>
-  </metadata>
-  <data name="C1Produkte.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="C1Produkte.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="C1Produkte.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;}Style4{}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style9{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style1{}Caption{AlignHorz:Center;}Style6{}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, 490, 131&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, 490, 131&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
-  </data>
  <data name="C1Produktzusatz.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
@@ -397,7 +388,7 @@
 </value>
  </data>
  <data name="C1Produktzusatz.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;}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;}Style1{}Caption{AlignHorz:Center;}Style6{}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, 381, 130&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, 381, 130&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;}Style4{}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style9{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style1{}Caption{AlignHorz:Center;}Style6{}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, 381, 130&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, 381, 130&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>1625, 17</value>