shu/DPM_PADM
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Update 2024-01-10

Browse Source
This commit is contained in:
Stefan Hutter
2024-01-10 09:40:00 +01:00
parent 6164ec3d16
commit 2d7f517e98
148 changed files with 2871 additions and 940 deletions
Download Patch File Download Diff File Expand all files Collapse all files

181
DPM2016/Sysadmin/frmStammdaten.Designer.vb generated
View File

@@ -39,33 +39,34 @@ Partial Class frmStammdaten
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 Zusatz")
Dim TreeNode18 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Produkt Zusatz Details")
Dim TreeNode19 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})
Dim TreeNode20 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Ansatz")
Dim TreeNode21 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Abrechnungstyp")
Dim TreeNode22 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Formulartyp / Einzahlungsschein")
Dim TreeNode23 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Rechnungstyp")
Dim TreeNode24 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Standards")
Dim TreeNode25 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Rechnungstexte")
Dim TreeNode26 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Abrechnung", New System.Windows.Forms.TreeNode() {TreeNode20, TreeNode21, TreeNode22, TreeNode23, TreeNode24, TreeNode25})
Dim TreeNode27 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Behandlungsart")
Dim TreeNode28 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Gesetz")
Dim TreeNode29 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Diverse Stammdaten", New System.Windows.Forms.TreeNode() {TreeNode27, TreeNode28})
Dim TreeNode30 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Auswertung")
Dim TreeNode31 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Reporting")
Dim TreeNode32 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Auswertung_Statistiken", New System.Windows.Forms.TreeNode() {TreeNode30, TreeNode31})
Dim TreeNode33 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Einstellungen")
Dim TreeNode34 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Struktur")
Dim TreeNode35 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("DokumentManagement", New System.Windows.Forms.TreeNode() {TreeNode33, TreeNode34})
Dim TreeNode36 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Spalten")
Dim TreeNode37 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Options")
Dim TreeNode38 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("User")
Dim TreeNode39 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Absender")
Dim TreeNode40 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Konto-Angaben")
Dim TreeNode41 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("MailTexte")
Dim TreeNode42 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("MailTexte_Replacer")
Dim TreeNode43 As System.Windows.Forms.TreeNode = New System.Windows.Forms.TreeNode("Diverse", New System.Windows.Forms.TreeNode() {TreeNode36, TreeNode37, TreeNode38, TreeNode39, TreeNode40, TreeNode41, TreeNode42})
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()
@@ -147,66 +148,68 @@ Partial Class frmStammdaten
TreeNode15.Text = "Dentotar_Parameter"
TreeNode16.Name = "Dentotar_223"
TreeNode16.Text = "Zahntechnik (223)"
TreeNode17.Name = "ProduktZusatz"
TreeNode17.Text = "Produkt Zusatz"
TreeNode18.Name = "ProduktZusatzDetail"
TreeNode18.Text = "Produkt Zusatz Details"
TreeNode19.Name = "Knoten8"
TreeNode19.Text = "Tarif"
TreeNode20.Name = "Ansatz"
TreeNode20.Tag = "Demo"
TreeNode20.Text = "Ansatz"
TreeNode21.Name = "Abrtyp"
TreeNode21.Text = "Abrechnungstyp"
TreeNode22.Name = "ESTyp"
TreeNode22.Text = "Formulartyp / Einzahlungsschein"
TreeNode23.Name = "RGTyp"
TreeNode23.Text = "Rechnungstyp"
TreeNode24.Name = "Standards"
TreeNode24.Text = "Standards"
TreeNode25.Name = "Rechtext"
TreeNode25.Text = "Rechnungstexte"
TreeNode26.Name = "Knoten14"
TreeNode26.Text = "Abrechnung"
TreeNode27.Name = "Behandlungsart"
TreeNode27.Text = "Behandlungsart"
TreeNode28.Name = "Gesetz"
TreeNode28.Tag = "Demo"
TreeNode28.Text = "Gesetz"
TreeNode29.Name = "Diverse Stammdaten"
TreeNode29.Text = "Diverse Stammdaten"
TreeNode30.Name = "Auswertung"
TreeNode30.Text = "Auswertung"
TreeNode31.Name = "Reporting"
TreeNode31.Text = "Reporting"
TreeNode32.Name = "Auswertung_Statistiken"
TreeNode32.Text = "Auswertung_Statistiken"
TreeNode33.Name = "dms_settings"
TreeNode33.Tag = "DMS"
TreeNode33.Text = "Einstellungen"
TreeNode34.Name = "DMS_Struktur"
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 = "Struktur"
TreeNode35.Name = "DokumentManagement"
TreeNode34.Text = "Einstellungen"
TreeNode35.Name = "DMS_Struktur"
TreeNode35.Tag = "DMS"
TreeNode35.Text = "DokumentManagement"
TreeNode36.Name = "Spalten"
TreeNode36.Text = "Spalten"
TreeNode37.Name = "Options"
TreeNode37.Text = "Options"
TreeNode38.Name = "User"
TreeNode38.Text = "User"
TreeNode39.Name = "Absender"
TreeNode39.Text = "Absender"
TreeNode40.Name = "vdkonti"
TreeNode40.Text = "Konto-Angaben"
TreeNode41.Name = "MailTexte"
TreeNode41.Text = "MailTexte"
TreeNode42.Name = "MailTexte_Replacer"
TreeNode42.Text = "MailTexte_Replacer"
TreeNode43.Name = "Diverse"
TreeNode43.Text = "Diverse"
Me.TreeView1.Nodes.AddRange(New System.Windows.Forms.TreeNode() {TreeNode2, TreeNode7, TreeNode19, TreeNode26, TreeNode29, TreeNode32, TreeNode35, TreeNode43})
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
'
@@ -220,7 +223,8 @@ Partial Class frmStammdaten
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.PageSettings = CType(resources.GetObject("C1TrueDBGrid1.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
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"
@@ -251,7 +255,7 @@ Partial Class frmStammdaten
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, 4, 4, 4)
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
@@ -261,9 +265,10 @@ Partial Class frmStammdaten
'
'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, 4, 4, 4)
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 = ""