Partial Class Behandlung Inherits System.Windows.Forms.UserControl 'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. 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. Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Behandlung)) Me.tsbtndelete = New System.Windows.Forms.ToolStrip() Me.tsbtnnewbehandlung = New System.Windows.Forms.ToolStripButton() Me.tsbtndeletebehandlung = New System.Windows.Forms.ToolStripButton() Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton() Me.GroupBox1 = New System.Windows.Forms.GroupBox() Me.treebehandlungen = New DevComponents.AdvTree.AdvTree() Me.ctxmenubehandlung = New System.Windows.Forms.ContextMenuStrip(Me.components) 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.ToolStripMenuItem7 = New System.Windows.Forms.ToolStripSeparator() Me.AbschlussUndSofortrechnungToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.AbschlussUndSofortrechungAlsPDFToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.AbschlussUndSofortrechnungAlsOutlookMailToolStripMenuItem = 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() Me.SofortRechnungDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.VorschauToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.EntwurfToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem6 = New System.Windows.Forms.ToolStripSeparator() Me.AlsPdfToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() Me.AlsMailToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.KopieErstellenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.AlsPDFToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ÜberDruckerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.AlsPDFPerMailToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripSeparator() Me.BehandlungLöschenToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem5 = New System.Windows.Forms.ToolStripSeparator() Me.RechungKVVorschauToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.RechnungKVEntwurfToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components) Me.Node2 = New DevComponents.AdvTree.Node() Me.NodeConnector1 = New DevComponents.AdvTree.NodeConnector() Me.ElementStyle1 = New DevComponents.DotNetBar.ElementStyle() Me.NeueBehandlungToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.BehandlungAbschliessenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.BehandlungLöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripSeparator() Me.NeuerKostenvoranschlagToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.KostenvoranschlagAbschliessenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.KostenvoranschlagLöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.SuperTabControl1 = New DevComponents.DotNetBar.SuperTabControl() Me.SuperTabControlPanel1 = New DevComponents.DotNetBar.SuperTabControlPanel() Me.Panel2 = New System.Windows.Forms.Panel() Me.STBehandlung = New DevComponents.DotNetBar.SuperTabItem() Me.SuperTabControlPanel2 = New DevComponents.DotNetBar.SuperTabControlPanel() Me.Panel1 = New System.Windows.Forms.Panel() Me.STLeistung = New DevComponents.DotNetBar.SuperTabItem() Me.SuperTabControlPanel3 = New DevComponents.DotNetBar.SuperTabControlPanel() Me.tsbtnnew = New System.Windows.Forms.ToolStripButton() 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.AbschlussUndVerbuchenOhneRGQuittungToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.tsbtndelete.SuspendLayout() Me.GroupBox1.SuspendLayout() CType(Me.treebehandlungen, System.ComponentModel.ISupportInitialize).BeginInit() Me.ctxmenubehandlung.SuspendLayout() CType(Me.SuperTabControl1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuperTabControl1.SuspendLayout() Me.SuperTabControlPanel1.SuspendLayout() Me.Panel2.SuspendLayout() Me.SuperTabControlPanel2.SuspendLayout() Me.Panel1.SuspendLayout() Me.tsbtnbehandlungdelete.SuspendLayout() Me.ContextMenuStrip1.SuspendLayout() Me.SuspendLayout() ' '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, 27) Me.tsbtndelete.TabIndex = 1 Me.tsbtndelete.Text = "ToolStrip1" ' 'tsbtnnewbehandlung ' Me.tsbtnnewbehandlung.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image 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(24, 24) Me.tsbtnnewbehandlung.Text = "Neue Behandlung" ' 'tsbtndeletebehandlung ' Me.tsbtndeletebehandlung.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image 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(24, 24) Me.tsbtndeletebehandlung.Text = "Behandlung löschen" ' '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(24, 24) 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, 27) Me.GroupBox1.Name = "GroupBox1" Me.GroupBox1.Size = New System.Drawing.Size(220, 811) Me.GroupBox1.TabIndex = 2 Me.GroupBox1.TabStop = False Me.GroupBox1.Text = "Behandlungen" ' 'treebehandlungen ' Me.treebehandlungen.AccessibleRole = System.Windows.Forms.AccessibleRole.Outline Me.treebehandlungen.AllowDrop = True Me.treebehandlungen.AllowExternalDrop = False Me.treebehandlungen.AllowUserToResizeColumns = False Me.treebehandlungen.BackColor = System.Drawing.SystemColors.Window ' ' ' Me.treebehandlungen.BackgroundStyle.Class = "TreeBorderKey" Me.treebehandlungen.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square Me.treebehandlungen.ContextMenuStrip = Me.ctxmenubehandlung Me.treebehandlungen.Dock = System.Windows.Forms.DockStyle.Fill Me.treebehandlungen.DragDropEnabled = False 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.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, 792) 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, 248) ' 'NeueBehandlungToolStripMenuItem1 ' Me.NeueBehandlungToolStripMenuItem1.Name = "NeueBehandlungToolStripMenuItem1" Me.NeueBehandlungToolStripMenuItem1.Size = New System.Drawing.Size(211, 22) Me.NeueBehandlungToolStripMenuItem1.Text = "&Neue Behandlung" ' 'ToolStripMenuItem2 ' Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2" Me.ToolStripMenuItem2.Size = New System.Drawing.Size(208, 6) ' 'BehandlungabschliessenToolStripMenuItem1 ' Me.BehandlungabschliessenToolStripMenuItem1.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AbschlussMitRecallAnzeigeToolStripMenuItem, Me.AbshlussOhneRecallAnzeigeToolStripMenuItem, Me.ToolStripMenuItem7, Me.AbschlussUndSofortrechnungToolStripMenuItem, Me.AbschlussUndSofortrechungAlsPDFToolStripMenuItem, Me.AbschlussUndSofortrechnungAlsOutlookMailToolStripMenuItem, Me.AbschlussUndVerbuchenOhneRGQuittungToolStripMenuItem}) Me.BehandlungabschliessenToolStripMenuItem1.Name = "BehandlungabschliessenToolStripMenuItem1" Me.BehandlungabschliessenToolStripMenuItem1.Size = New System.Drawing.Size(211, 22) Me.BehandlungabschliessenToolStripMenuItem1.Text = "Behandlung &abschliessen" ' 'AbschlussMitRecallAnzeigeToolStripMenuItem ' Me.AbschlussMitRecallAnzeigeToolStripMenuItem.Name = "AbschlussMitRecallAnzeigeToolStripMenuItem" Me.AbschlussMitRecallAnzeigeToolStripMenuItem.Size = New System.Drawing.Size(328, 22) Me.AbschlussMitRecallAnzeigeToolStripMenuItem.Text = "Abschluss mit Recall-Anzeige" ' 'AbshlussOhneRecallAnzeigeToolStripMenuItem ' Me.AbshlussOhneRecallAnzeigeToolStripMenuItem.Name = "AbshlussOhneRecallAnzeigeToolStripMenuItem" Me.AbshlussOhneRecallAnzeigeToolStripMenuItem.Size = New System.Drawing.Size(328, 22) Me.AbshlussOhneRecallAnzeigeToolStripMenuItem.Text = "Abshluss ohne Recall-Anzeige" ' 'ToolStripMenuItem7 ' Me.ToolStripMenuItem7.Name = "ToolStripMenuItem7" Me.ToolStripMenuItem7.Size = New System.Drawing.Size(325, 6) ' 'AbschlussUndSofortrechnungToolStripMenuItem ' Me.AbschlussUndSofortrechnungToolStripMenuItem.Name = "AbschlussUndSofortrechnungToolStripMenuItem" Me.AbschlussUndSofortrechnungToolStripMenuItem.Size = New System.Drawing.Size(328, 22) Me.AbschlussUndSofortrechnungToolStripMenuItem.Text = "Abschluss und Sofortrechnung " ' 'AbschlussUndSofortrechungAlsPDFToolStripMenuItem ' Me.AbschlussUndSofortrechungAlsPDFToolStripMenuItem.Name = "AbschlussUndSofortrechungAlsPDFToolStripMenuItem" Me.AbschlussUndSofortrechungAlsPDFToolStripMenuItem.Size = New System.Drawing.Size(328, 22) Me.AbschlussUndSofortrechungAlsPDFToolStripMenuItem.Text = "Abschluss und Sofortrechung als PDF" ' 'AbschlussUndSofortrechnungAlsOutlookMailToolStripMenuItem ' Me.AbschlussUndSofortrechnungAlsOutlookMailToolStripMenuItem.Name = "AbschlussUndSofortrechnungAlsOutlookMailToolStripMenuItem" Me.AbschlussUndSofortrechnungAlsOutlookMailToolStripMenuItem.Size = New System.Drawing.Size(328, 22) Me.AbschlussUndSofortrechnungAlsOutlookMailToolStripMenuItem.Text = "Abschluss und Sofortrechnung als Outlook-Mail" ' 'BehandlungZurücksetzenToolStripMenuItem ' Me.BehandlungZurücksetzenToolStripMenuItem.Name = "BehandlungZurücksetzenToolStripMenuItem" Me.BehandlungZurücksetzenToolStripMenuItem.Size = New System.Drawing.Size(211, 22) Me.BehandlungZurücksetzenToolStripMenuItem.Text = "Behandlung zurücksetzen" ' 'BehandlungKopierenToolStripMenuItem ' Me.BehandlungKopierenToolStripMenuItem.Name = "BehandlungKopierenToolStripMenuItem" Me.BehandlungKopierenToolStripMenuItem.Size = New System.Drawing.Size(211, 22) Me.BehandlungKopierenToolStripMenuItem.Text = "Behandlung kopieren" ' 'ToolStripMenuItem4 ' Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4" Me.ToolStripMenuItem4.Size = New System.Drawing.Size(208, 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.Text = "Sofort-Rechnung drucken" ' 'VorschauToolStripMenuItem ' Me.VorschauToolStripMenuItem.Name = "VorschauToolStripMenuItem" Me.VorschauToolStripMenuItem.Size = New System.Drawing.Size(202, 22) Me.VorschauToolStripMenuItem.Text = "Vorschau" ' 'EntwurfToolStripMenuItem ' Me.EntwurfToolStripMenuItem.Name = "EntwurfToolStripMenuItem" Me.EntwurfToolStripMenuItem.Size = New System.Drawing.Size(202, 22) Me.EntwurfToolStripMenuItem.Text = "Entwurf" ' 'ToolStripMenuItem6 ' Me.ToolStripMenuItem6.Name = "ToolStripMenuItem6" Me.ToolStripMenuItem6.Size = New System.Drawing.Size(199, 6) ' 'AlsPdfToolStripMenuItem1 ' Me.AlsPdfToolStripMenuItem1.Name = "AlsPdfToolStripMenuItem1" Me.AlsPdfToolStripMenuItem1.Size = New System.Drawing.Size(202, 22) Me.AlsPdfToolStripMenuItem1.Text = "als PDF" ' 'AlsMailToolStripMenuItem ' Me.AlsMailToolStripMenuItem.Name = "AlsMailToolStripMenuItem" Me.AlsMailToolStripMenuItem.Size = New System.Drawing.Size(202, 22) Me.AlsMailToolStripMenuItem.Text = "als PDF an Outlook-Mail" ' 'KopieErstellenToolStripMenuItem ' Me.KopieErstellenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AlsPDFToolStripMenuItem, Me.ÜberDruckerToolStripMenuItem, Me.AlsPDFPerMailToolStripMenuItem}) Me.KopieErstellenToolStripMenuItem.Name = "KopieErstellenToolStripMenuItem" Me.KopieErstellenToolStripMenuItem.Size = New System.Drawing.Size(211, 22) Me.KopieErstellenToolStripMenuItem.Text = "Rechnungskopie erstellen" ' 'AlsPDFToolStripMenuItem ' Me.AlsPDFToolStripMenuItem.Name = "AlsPDFToolStripMenuItem" Me.AlsPDFToolStripMenuItem.Size = New System.Drawing.Size(206, 22) Me.AlsPDFToolStripMenuItem.Text = "als PDF" ' 'ÜberDruckerToolStripMenuItem ' Me.ÜberDruckerToolStripMenuItem.Name = "ÜberDruckerToolStripMenuItem" Me.ÜberDruckerToolStripMenuItem.Size = New System.Drawing.Size(206, 22) Me.ÜberDruckerToolStripMenuItem.Text = "über Drucker" ' 'AlsPDFPerMailToolStripMenuItem ' Me.AlsPDFPerMailToolStripMenuItem.Name = "AlsPDFPerMailToolStripMenuItem" Me.AlsPDFPerMailToolStripMenuItem.Size = New System.Drawing.Size(206, 22) Me.AlsPDFPerMailToolStripMenuItem.Text = "als PDF per Outlook-Mail" ' 'ToolStripMenuItem3 ' Me.ToolStripMenuItem3.Name = "ToolStripMenuItem3" Me.ToolStripMenuItem3.Size = New System.Drawing.Size(208, 6) ' 'BehandlungLöschenToolStripMenuItem1 ' Me.BehandlungLöschenToolStripMenuItem1.Name = "BehandlungLöschenToolStripMenuItem1" Me.BehandlungLöschenToolStripMenuItem1.Size = New System.Drawing.Size(211, 22) Me.BehandlungLöschenToolStripMenuItem1.Text = "&Behandlung löschen" ' 'ToolStripMenuItem5 ' Me.ToolStripMenuItem5.Name = "ToolStripMenuItem5" Me.ToolStripMenuItem5.Size = New System.Drawing.Size(208, 6) ' 'RechungKVVorschauToolStripMenuItem ' Me.RechungKVVorschauToolStripMenuItem.Name = "RechungKVVorschauToolStripMenuItem" Me.RechungKVVorschauToolStripMenuItem.Size = New System.Drawing.Size(211, 22) Me.RechungKVVorschauToolStripMenuItem.Text = "Rechung/KV Vorschau" ' 'RechnungKVEntwurfToolStripMenuItem ' Me.RechnungKVEntwurfToolStripMenuItem.Name = "RechnungKVEntwurfToolStripMenuItem" Me.RechnungKVEntwurfToolStripMenuItem.Size = New System.Drawing.Size(211, 22) Me.RechnungKVEntwurfToolStripMenuItem.Text = "Rechnung/KV Entwurf" ' '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, "Document Folder_32.png") Me.ImageList1.Images.SetKeyName(1, "Favorites_#2_32.png") Me.ImageList1.Images.SetKeyName(2, "Document_32.png") Me.ImageList1.Images.SetKeyName(3, "Document_properties_32.png") Me.ImageList1.Images.SetKeyName(4, "License_32.png") ' 'Node2 ' Me.Node2.Name = "Node2" ' 'NodeConnector1 ' Me.NodeConnector1.LineColor = System.Drawing.SystemColors.ControlText ' 'ElementStyle1 ' Me.ElementStyle1.CornerType = DevComponents.DotNetBar.eCornerType.Square Me.ElementStyle1.Name = "ElementStyle1" Me.ElementStyle1.TextColor = System.Drawing.SystemColors.ControlText ' 'NeueBehandlungToolStripMenuItem ' Me.NeueBehandlungToolStripMenuItem.Name = "NeueBehandlungToolStripMenuItem" Me.NeueBehandlungToolStripMenuItem.Size = New System.Drawing.Size(243, 22) Me.NeueBehandlungToolStripMenuItem.Text = "&Neue Behandlung" ' 'BehandlungAbschliessenToolStripMenuItem ' Me.BehandlungAbschliessenToolStripMenuItem.Name = "BehandlungAbschliessenToolStripMenuItem" Me.BehandlungAbschliessenToolStripMenuItem.Size = New System.Drawing.Size(243, 22) 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.Text = "Behandlung &löschen" ' 'ToolStripMenuItem1 ' Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1" Me.ToolStripMenuItem1.Size = New System.Drawing.Size(240, 6) ' 'NeuerKostenvoranschlagToolStripMenuItem ' Me.NeuerKostenvoranschlagToolStripMenuItem.Name = "NeuerKostenvoranschlagToolStripMenuItem" Me.NeuerKostenvoranschlagToolStripMenuItem.Size = New System.Drawing.Size(243, 22) Me.NeuerKostenvoranschlagToolStripMenuItem.Text = "Neuer &Kostenvoranschlag" ' 'KostenvoranschlagAbschliessenToolStripMenuItem ' Me.KostenvoranschlagAbschliessenToolStripMenuItem.Name = "KostenvoranschlagAbschliessenToolStripMenuItem" Me.KostenvoranschlagAbschliessenToolStripMenuItem.Size = New System.Drawing.Size(243, 22) 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.Text = "Kostenvoranschlag löschen" ' 'SuperTabControl1 ' ' ' ' ' ' ' Me.SuperTabControl1.ControlBox.CloseBox.Name = "" ' ' ' Me.SuperTabControl1.ControlBox.MenuBox.Name = "" Me.SuperTabControl1.ControlBox.Name = "" Me.SuperTabControl1.ControlBox.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.SuperTabControl1.ControlBox.MenuBox, Me.SuperTabControl1.ControlBox.CloseBox}) Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel1) 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, 27) 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, 811) 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}) Me.SuperTabControl1.Text = "Rechnungstext" ' 'SuperTabControlPanel1 ' 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.Name = "SuperTabControlPanel1" Me.SuperTabControlPanel1.Size = New System.Drawing.Size(1065, 786) Me.SuperTabControlPanel1.TabIndex = 1 Me.SuperTabControlPanel1.TabItem = Me.STBehandlung ' 'Panel2 ' Me.Panel2.Controls.Add(Me.Behandungdetail1) Me.Panel2.Location = New System.Drawing.Point(0, 0) Me.Panel2.Name = "Panel2" Me.Panel2.Size = New System.Drawing.Size(1062, 788) Me.Panel2.TabIndex = 9 ' 'STBehandlung ' Me.STBehandlung.AttachedControl = Me.SuperTabControlPanel1 Me.STBehandlung.GlobalItem = False Me.STBehandlung.Name = "STBehandlung" Me.STBehandlung.Text = "Behandlung" ' 'SuperTabControlPanel2 ' Me.SuperTabControlPanel2.Controls.Add(Me.Panel1) Me.SuperTabControlPanel2.Dock = System.Windows.Forms.DockStyle.Fill Me.SuperTabControlPanel2.Location = New System.Drawing.Point(0, 23) Me.SuperTabControlPanel2.Name = "SuperTabControlPanel2" Me.SuperTabControlPanel2.Size = New System.Drawing.Size(1065, 790) Me.SuperTabControlPanel2.TabIndex = 0 Me.SuperTabControlPanel2.TabItem = Me.STLeistung ' 'Panel1 ' 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.Name = "Panel1" Me.Panel1.Size = New System.Drawing.Size(1065, 790) Me.Panel1.TabIndex = 1 ' 'STLeistung ' Me.STLeistung.AttachedControl = Me.SuperTabControlPanel2 Me.STLeistung.GlobalItem = False Me.STLeistung.Name = "STLeistung" Me.STLeistung.Text = "Leistungen" ' 'SuperTabControlPanel3 ' Me.SuperTabControlPanel3.Dock = System.Windows.Forms.DockStyle.Fill Me.SuperTabControlPanel3.Location = New System.Drawing.Point(0, 0) Me.SuperTabControlPanel3.Name = "SuperTabControlPanel3" Me.SuperTabControlPanel3.Size = New System.Drawing.Size(1065, 811) Me.SuperTabControlPanel3.TabIndex = 0 ' 'tsbtnnew ' Me.tsbtnnew.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image 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(24, 22) Me.tsbtnnew.Text = "Neue Behandlung" ' '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(24, 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" Me.tsbtnbehandlungdelete.Size = New System.Drawing.Size(1050, 25) Me.tsbtnbehandlungdelete.TabIndex = 1 Me.tsbtnbehandlungdelete.Text = "ToolStrip1" ' '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.Margin = New System.Windows.Forms.Padding(4) Me.Behandungdetail1.Name = "Behandungdetail1" Me.Behandungdetail1.Patientnr = 0 Me.Behandungdetail1.Size = New System.Drawing.Size(1059, 779) Me.Behandungdetail1.TabIndex = 0 ' 'Leistungen1 ' Me.Leistungen1.behandler = 0 Me.Leistungen1.Behandlungnr = 0 Me.Leistungen1.Behandlungsstatus = 0 Me.Leistungen1.Dentotar = False 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(4) Me.Leistungen1.Name = "Leistungen1" Me.Leistungen1.Size = New System.Drawing.Size(1065, 790) Me.Leistungen1.TabIndex = 0 ' 'AbschlussUndVerbuchenOhneRGQuittungToolStripMenuItem ' Me.AbschlussUndVerbuchenOhneRGQuittungToolStripMenuItem.Name = "AbschlussUndVerbuchenOhneRGQuittungToolStripMenuItem" Me.AbschlussUndVerbuchenOhneRGQuittungToolStripMenuItem.Size = New System.Drawing.Size(328, 22) Me.AbschlussUndVerbuchenOhneRGQuittungToolStripMenuItem.Text = "Abschluss und verbuchen, ohne RG/Quittung" ' 'Behandlung ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.Controls.Add(Me.SuperTabControl1) Me.Controls.Add(Me.GroupBox1) Me.Controls.Add(Me.tsbtndelete) Me.Name = "Behandlung" Me.Size = New System.Drawing.Size(1285, 838) Me.tsbtndelete.ResumeLayout(False) Me.tsbtndelete.PerformLayout() Me.GroupBox1.ResumeLayout(False) CType(Me.treebehandlungen, System.ComponentModel.ISupportInitialize).EndInit() Me.ctxmenubehandlung.ResumeLayout(False) CType(Me.SuperTabControl1, System.ComponentModel.ISupportInitialize).EndInit() Me.SuperTabControl1.ResumeLayout(False) Me.SuperTabControlPanel1.ResumeLayout(False) Me.Panel2.ResumeLayout(False) Me.SuperTabControlPanel2.ResumeLayout(False) Me.Panel1.ResumeLayout(False) Me.tsbtnbehandlungdelete.ResumeLayout(False) Me.tsbtnbehandlungdelete.PerformLayout() Me.ContextMenuStrip1.ResumeLayout(False) Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents tsbtndelete As System.Windows.Forms.ToolStrip Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox Friend WithEvents treebehandlungen As DevComponents.AdvTree.AdvTree Friend WithEvents NodeConnector1 As DevComponents.AdvTree.NodeConnector Friend WithEvents ElementStyle1 As DevComponents.DotNetBar.ElementStyle Friend WithEvents Node2 As DevComponents.AdvTree.Node Friend WithEvents ImageList1 As System.Windows.Forms.ImageList Friend WithEvents SuperTabControl1 As DevComponents.DotNetBar.SuperTabControl Friend WithEvents SuperTabControlPanel1 As DevComponents.DotNetBar.SuperTabControlPanel Friend WithEvents STBehandlung As DevComponents.DotNetBar.SuperTabItem Friend WithEvents SuperTabControlPanel2 As DevComponents.DotNetBar.SuperTabControlPanel Friend WithEvents Leistungen1 As DPM2016.Leistungen Friend WithEvents STLeistung As DevComponents.DotNetBar.SuperTabItem Friend WithEvents Panel2 As System.Windows.Forms.Panel Friend WithEvents Panel1 As System.Windows.Forms.Panel Friend WithEvents Behandungdetail1 As DPM2016.Benhandungdetail Friend WithEvents tsbtnnew As System.Windows.Forms.ToolStripButton Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton Friend WithEvents tsbtnbehandlungdelete As System.Windows.Forms.ToolStrip Friend WithEvents tsbtnnewbehandlung As System.Windows.Forms.ToolStripButton Friend WithEvents tsbtndeletebehandlung As System.Windows.Forms.ToolStripButton Friend WithEvents ctxmenubehandlung As System.Windows.Forms.ContextMenuStrip Friend WithEvents NeueBehandlungToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents BehandlungAbschliessenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents BehandlungLöschenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ToolStripMenuItem1 As System.Windows.Forms.ToolStripSeparator Friend WithEvents NeuerKostenvoranschlagToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents KostenvoranschlagAbschliessenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents KostenvoranschlagLöschenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents NeueBehandlungToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem Friend WithEvents BehandlungabschliessenToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem Friend WithEvents BehandlungLöschenToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ContextMenuStrip1 As System.Windows.Forms.ContextMenuStrip Friend WithEvents SuperTabControlPanel3 As DevComponents.DotNetBar.SuperTabControlPanel Friend WithEvents ToolStripMenuItem2 As ToolStripSeparator Friend WithEvents BehandlungZurücksetzenToolStripMenuItem As ToolStripMenuItem Friend WithEvents ToolStripMenuItem3 As ToolStripSeparator Friend WithEvents ToolStripButton2 As ToolStripButton Friend WithEvents KopieErstellenToolStripMenuItem As ToolStripMenuItem Friend WithEvents BehandlungKopierenToolStripMenuItem As ToolStripMenuItem Friend WithEvents ToolStripMenuItem4 As ToolStripSeparator Friend WithEvents SofortRechnungDruckenToolStripMenuItem As ToolStripMenuItem Friend WithEvents VorschauToolStripMenuItem As ToolStripMenuItem Friend WithEvents EntwurfToolStripMenuItem As ToolStripMenuItem Friend WithEvents ToolStripMenuItem5 As ToolStripSeparator Friend WithEvents RechungKVVorschauToolStripMenuItem As ToolStripMenuItem Friend WithEvents RechnungKVEntwurfToolStripMenuItem As ToolStripMenuItem Friend WithEvents AlsPDFToolStripMenuItem As ToolStripMenuItem Friend WithEvents ÜberDruckerToolStripMenuItem As ToolStripMenuItem 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 Friend WithEvents AlsPDFPerMailToolStripMenuItem As ToolStripMenuItem Friend WithEvents ToolStripMenuItem7 As ToolStripSeparator Friend WithEvents AbschlussUndSofortrechnungToolStripMenuItem As ToolStripMenuItem Friend WithEvents AbschlussUndSofortrechungAlsPDFToolStripMenuItem As ToolStripMenuItem Friend WithEvents AbschlussUndSofortrechnungAlsOutlookMailToolStripMenuItem As ToolStripMenuItem Friend WithEvents AbschlussUndVerbuchenOhneRGQuittungToolStripMenuItem As ToolStripMenuItem End Class