Partial Class frmStammdaten Inherits System.Windows.Forms.Form 'Das Formular ü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 TreeNode1 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Konto") Dim TreeNode2 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Finanzen", New System.Windows.Forms.TreeNode() {TreeNode1}) Dim TreeNode3 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Anreden") Dim TreeNode4 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Titel") Dim TreeNode5 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Orte") Dim TreeNode6 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Status") Dim TreeNode7 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Patienten", New System.Windows.Forms.TreeNode() {TreeNode3, TreeNode4, TreeNode5, TreeNode6}) Dim TreeNode8 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Tarif") Dim TreeNode9 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Tarife") Dim TreeNode10 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("TarifGruppe") Dim TreeNode11 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Taxpunkte") Dim TreeNode12 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Tarifpakete") Dim TreeNode13 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Paketpositionen") Dim TreeNode14 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Dentotar") Dim TreeNode15 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Dentotar_Parameter") Dim TreeNode16 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Zahntechnik (223)") Dim TreeNode17 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Produkt") Dim TreeNode18 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Produkt Zusatz") Dim TreeNode19 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Produkt Zusatz Details") Dim TreeNode20 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Tarif", New System.Windows.Forms.TreeNode() {TreeNode8, TreeNode9, TreeNode10, TreeNode11, TreeNode12, TreeNode13, TreeNode14, TreeNode15, TreeNode16, TreeNode17, TreeNode18, TreeNode19}) Dim TreeNode21 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Ansatz") Dim TreeNode22 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Abrechnungstyp") Dim TreeNode23 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Formulartyp / Einzahlungsschein") Dim TreeNode24 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Rechnungstyp") Dim TreeNode25 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Standards") Dim TreeNode26 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Rechnungstexte") Dim TreeNode27 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Abrechnung", New System.Windows.Forms.TreeNode() {TreeNode21, TreeNode22, TreeNode23, TreeNode24, TreeNode25, TreeNode26}) Dim TreeNode28 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Behandlungsart") Dim TreeNode29 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Gesetz") Dim TreeNode30 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Diverse Stammdaten", New System.Windows.Forms.TreeNode() {TreeNode28, TreeNode29}) Dim TreeNode31 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Auswertung") Dim TreeNode32 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Reporting") Dim TreeNode33 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Auswertung_Statistiken", New System.Windows.Forms.TreeNode() {TreeNode31, TreeNode32}) Dim TreeNode34 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Einstellungen") Dim TreeNode35 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Struktur") Dim TreeNode36 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("DokumentManagement", New System.Windows.Forms.TreeNode() {TreeNode34, TreeNode35}) Dim TreeNode37 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Spalten") Dim TreeNode38 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Options") Dim TreeNode39 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("User") Dim TreeNode40 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Absender") Dim TreeNode41 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Konto-Angaben") Dim TreeNode42 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("MailTexte") Dim TreeNode43 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("MailTexte_Replacer") Dim TreeNode44 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Diverse", New System.Windows.Forms.TreeNode() {TreeNode37, TreeNode38, TreeNode39, TreeNode40, TreeNode41, TreeNode42, TreeNode43}) Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmStammdaten)) Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() Me.SchliessenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.DentotarImportToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.TreeView1 = New System.Windows.Forms.TreeView() Me.C1TrueDBGrid1 = New C1.Win.C1TrueDBGrid.C1TrueDBGrid() Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog() Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ClsStammdaten_Bez1 = New DPM2016.clsStammdaten_Bez() Me.ClsStammdaten_flat1 = New DPM2016.clsStammdaten_flat() Me.MenuStrip1.SuspendLayout() CType(Me.C1TrueDBGrid1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'MenuStrip1 ' Me.MenuStrip1.AllowMerge = False Me.MenuStrip1.ImageScalingSize = New System.Drawing.Size(20, 20) Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.SchliessenToolStripMenuItem, Me.DentotarImportToolStripMenuItem}) Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) Me.MenuStrip1.Name = "MenuStrip1" Me.MenuStrip1.Padding = New System.Windows.Forms.Padding(4, 2, 0, 2) Me.MenuStrip1.Size = New System.Drawing.Size(1200, 24) Me.MenuStrip1.TabIndex = 0 Me.MenuStrip1.Text = "MenuStrip1" ' 'SchliessenToolStripMenuItem ' Me.SchliessenToolStripMenuItem.Name = "SchliessenToolStripMenuItem" Me.SchliessenToolStripMenuItem.Size = New System.Drawing.Size(73, 20) Me.SchliessenToolStripMenuItem.Text = "&Schliessen" ' 'DentotarImportToolStripMenuItem ' Me.DentotarImportToolStripMenuItem.Name = "DentotarImportToolStripMenuItem" Me.DentotarImportToolStripMenuItem.Size = New System.Drawing.Size(106, 20) Me.DentotarImportToolStripMenuItem.Text = "Dentotar-Import" ' 'TreeView1 ' Me.TreeView1.Dock = System.Windows.Forms.DockStyle.Left Me.TreeView1.Location = New System.Drawing.Point(0, 24) Me.TreeView1.Name = "TreeView1" TreeNode1.Name = "Konto" TreeNode1.Text = "Konto" TreeNode2.Name = "Knoten0" TreeNode2.Text = "Finanzen" TreeNode3.Name = "Anrede" TreeNode3.Text = "Anreden" TreeNode4.Name = "Titel" TreeNode4.Text = "Titel" TreeNode5.Name = "Orte" TreeNode5.Tag = "Demo" TreeNode5.Text = "Orte" TreeNode6.Name = "Status" TreeNode6.Text = "Status" TreeNode7.Name = "Knoten7" TreeNode7.Text = "Patienten" TreeNode8.Name = "Tarif" TreeNode8.Tag = "Demo" TreeNode8.Text = "Tarif" TreeNode9.Name = "Tarife" TreeNode9.Text = "Tarife" TreeNode10.Name = "tarifgrp" TreeNode10.Text = "TarifGruppe" TreeNode11.Name = "Taxpunkt" TreeNode11.Text = "Taxpunkte" TreeNode12.Name = "Tarpaket" TreeNode12.Text = "Tarifpakete" TreeNode13.Name = "Paketpositionen" TreeNode13.Tag = "nrpaket;paketbezeichnung;nrtarif;sso_nummer;TarPaket;Tarif;Paketpos" TreeNode13.Text = "Paketpositionen" TreeNode14.Name = "Dentotar" TreeNode14.Tag = "Demo" TreeNode14.Text = "Dentotar" TreeNode15.Name = "Dentotar_Parameter" TreeNode15.Tag = "Demo" TreeNode15.Text = "Dentotar_Parameter" TreeNode16.Name = "Dentotar_223" TreeNode16.Text = "Zahntechnik (223)" TreeNode17.Name = "Produkt" TreeNode17.Text = "Produkt" TreeNode18.Name = "ProduktZusatz" TreeNode18.Text = "Produkt Zusatz" TreeNode19.Name = "ProduktZusatzDetail" TreeNode19.Text = "Produkt Zusatz Details" TreeNode20.Name = "Knoten8" TreeNode20.Text = "Tarif" TreeNode21.Name = "Ansatz" TreeNode21.Tag = "Demo" TreeNode21.Text = "Ansatz" TreeNode22.Name = "Abrtyp" TreeNode22.Text = "Abrechnungstyp" TreeNode23.Name = "ESTyp" TreeNode23.Text = "Formulartyp / Einzahlungsschein" TreeNode24.Name = "RGTyp" TreeNode24.Text = "Rechnungstyp" TreeNode25.Name = "Standards" TreeNode25.Text = "Standards" TreeNode26.Name = "Rechtext" TreeNode26.Text = "Rechnungstexte" TreeNode27.Name = "Knoten14" TreeNode27.Text = "Abrechnung" TreeNode28.Name = "Behandlungsart" TreeNode28.Text = "Behandlungsart" TreeNode29.Name = "Gesetz" TreeNode29.Tag = "Demo" TreeNode29.Text = "Gesetz" TreeNode30.Name = "Diverse Stammdaten" TreeNode30.Text = "Diverse Stammdaten" TreeNode31.Name = "Auswertung" TreeNode31.Text = "Auswertung" TreeNode32.Name = "Reporting" TreeNode32.Text = "Reporting" TreeNode33.Name = "Auswertung_Statistiken" TreeNode33.Text = "Auswertung_Statistiken" TreeNode34.Name = "dms_settings" TreeNode34.Tag = "DMS" TreeNode34.Text = "Einstellungen" TreeNode35.Name = "DMS_Struktur" TreeNode35.Tag = "DMS" TreeNode35.Text = "Struktur" TreeNode36.Name = "DokumentManagement" TreeNode36.Tag = "DMS" TreeNode36.Text = "DokumentManagement" TreeNode37.Name = "Spalten" TreeNode37.Text = "Spalten" TreeNode38.Name = "Options" TreeNode38.Text = "Options" TreeNode39.Name = "User" TreeNode39.Text = "User" TreeNode40.Name = "Absender" TreeNode40.Text = "Absender" TreeNode41.Name = "vdkonti" TreeNode41.Text = "Konto-Angaben" TreeNode42.Name = "MailTexte" TreeNode42.Text = "MailTexte" TreeNode43.Name = "MailTexte_Replacer" TreeNode43.Text = "MailTexte_Replacer" TreeNode44.Name = "Diverse" TreeNode44.Text = "Diverse" Me.TreeView1.Nodes.AddRange(New System.Windows.Forms.TreeNode() {TreeNode2, TreeNode7, TreeNode20, TreeNode27, TreeNode30, TreeNode33, TreeNode36, TreeNode44}) Me.TreeView1.Size = New System.Drawing.Size(204, 425) Me.TreeView1.TabIndex = 1 ' 'C1TrueDBGrid1 ' Me.C1TrueDBGrid1.Dock = System.Windows.Forms.DockStyle.Fill Me.C1TrueDBGrid1.GroupByCaption = "Drag a column header here to group by that column" Me.C1TrueDBGrid1.Images.Add(CType(resources.GetObject("C1TrueDBGrid1.Images"), System.Drawing.Image)) Me.C1TrueDBGrid1.Location = New System.Drawing.Point(204, 24) Me.C1TrueDBGrid1.Name = "C1TrueDBGrid1" Me.C1TrueDBGrid1.PreviewInfo.Location = New System.Drawing.Point(0, 0) Me.C1TrueDBGrid1.PreviewInfo.Size = New System.Drawing.Size(0, 0) Me.C1TrueDBGrid1.PreviewInfo.ZoomFactor = 75.0R Me.C1TrueDBGrid1.PrintInfo.MeasurementDevice = C1.Win.C1TrueDBGrid.PrintInfo.MeasurementDeviceEnum.Screen Me.C1TrueDBGrid1.PrintInfo.MeasurementPrinterName = Nothing Me.C1TrueDBGrid1.Size = New System.Drawing.Size(996, 425) Me.C1TrueDBGrid1.TabIndex = 2 Me.C1TrueDBGrid1.Text = "C1TrueDBGrid1" Me.C1TrueDBGrid1.PropBag = resources.GetString("C1TrueDBGrid1.PropBag") ' 'OpenFileDialog1 ' Me.OpenFileDialog1.FileName = "OpenFileDialog1" Me.OpenFileDialog1.Filter = "Excel-Dateien|*.xlsx|Alle Dateien|*.*" ' 'ContextMenuStrip1 ' Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(20, 20) Me.ContextMenuStrip1.Name = "ContextMenuStrip1" Me.ContextMenuStrip1.Size = New System.Drawing.Size(61, 4) ' 'ContextMenuStrip2 ' Me.ContextMenuStrip2.ImageScalingSize = New System.Drawing.Size(20, 20) Me.ContextMenuStrip2.Name = "ContextMenuStrip2" Me.ContextMenuStrip2.Size = New System.Drawing.Size(61, 4) ' 'ClsStammdaten_Bez1 ' Me.ClsStammdaten_Bez1.Connectionstring = Nothing Me.ClsStammdaten_Bez1.KeyField_left = Nothing Me.ClsStammdaten_Bez1.KeyField_right = Nothing Me.ClsStammdaten_Bez1.Keyfieldbez_left = Nothing Me.ClsStammdaten_Bez1.Keyfieldbez_right = Nothing Me.ClsStammdaten_Bez1.Location = New System.Drawing.Point(575, 294) Me.ClsStammdaten_Bez1.Margin = New System.Windows.Forms.Padding(4) Me.ClsStammdaten_Bez1.Name = "ClsStammdaten_Bez1" Me.ClsStammdaten_Bez1.Size = New System.Drawing.Size(434, 170) Me.ClsStammdaten_Bez1.TabIndex = 4 Me.ClsStammdaten_Bez1.Tablename_bottom = Nothing Me.ClsStammdaten_Bez1.Tablename_left = Nothing Me.ClsStammdaten_Bez1.Tablename_right = Nothing ' 'ClsStammdaten_flat1 ' Me.ClsStammdaten_flat1.AllowAddNew = True Me.ClsStammdaten_flat1.Connectionstring = Nothing Me.ClsStammdaten_flat1.Location = New System.Drawing.Point(232, 56) Me.ClsStammdaten_flat1.Margin = New System.Windows.Forms.Padding(4) Me.ClsStammdaten_flat1.Name = "ClsStammdaten_flat1" Me.ClsStammdaten_flat1.Size = New System.Drawing.Size(558, 232) Me.ClsStammdaten_flat1.SQL = "" Me.ClsStammdaten_flat1.TabIndex = 3 Me.ClsStammdaten_flat1.Tablename = Nothing ' 'frmStammdaten ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1200, 449) Me.Controls.Add(Me.ClsStammdaten_Bez1) Me.Controls.Add(Me.ClsStammdaten_flat1) Me.Controls.Add(Me.C1TrueDBGrid1) Me.Controls.Add(Me.TreeView1) Me.Controls.Add(Me.MenuStrip1) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.MainMenuStrip = Me.MenuStrip1 Me.Name = "frmStammdaten" Me.Text = "frmStammdaten" Me.MenuStrip1.ResumeLayout(False) Me.MenuStrip1.PerformLayout() CType(Me.C1TrueDBGrid1, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip Friend WithEvents SchliessenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents TreeView1 As System.Windows.Forms.TreeView Friend WithEvents C1TrueDBGrid1 As C1.Win.C1TrueDBGrid.C1TrueDBGrid Friend WithEvents ClsStammdaten_flat1 As DPM2016.clsStammdaten_flat Friend WithEvents ClsStammdaten_Bez1 As DPM2016.clsStammdaten_Bez Friend WithEvents DentotarImportToolStripMenuItem As ToolStripMenuItem Friend WithEvents OpenFileDialog1 As OpenFileDialog Friend WithEvents ContextMenuStrip1 As ContextMenuStrip Friend WithEvents ContextMenuStrip2 As ContextMenuStrip End Class