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

Update 20231016

Browse Source
This commit is contained in:
Stefan Hutter
2023-10-16 18:21:29 +02:00
parent e83b2e6f35
commit 376f51db74
442 changed files with 11311 additions and 7581 deletions
Download Patch File Download Diff File Expand all files Collapse all files

347
DPM2016/Patient/Patient.Designer.vb generated
View File

@@ -39,41 +39,43 @@ Partial Class Patient
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.tsbtnVTX = New System.Windows.Forms.ToolStripButton()
Me.SuperTabControl1 = New DevComponents.DotNetBar.SuperTabControl()
Me.SuperTabControlPanel5 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.Finanzen1 = New DPM2016.Finanzen()
Me.Finanzen = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel1 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.btnVTX = New System.Windows.Forms.Button()
Me.PatientDetails1 = New DPM2016.PatientDetails()
Me.Stammdaten = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel8 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.PatientDetailsFirma1 = New DPM2016.PatientDetailsFirma()
Me.Stammdaten_Firma = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel5 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.Finanzen = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel4 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.Krankengeschichte1 = New DPM2016.Krankengeschichte()
Me.Krankengeschichte = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel7 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.ClsDokumente1 = New DPM2016.clsDokumente()
Me.Dokumente = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel6 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.Recall1 = New DPM2016.Recall()
Me.Recall = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel3 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.Behandlung1 = New DPM2016.Behandlung()
Me.Behandlungen = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel2 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.PatientAbrechnung1 = New DPM2016.PatientAbrechnung()
Me.Abrechnung = New DevComponents.DotNetBar.SuperTabItem()
Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
Me.DateiToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.BeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.Label1 = New System.Windows.Forms.Label()
Me.tsrbprivat = New Syncfusion.Windows.Forms.Tools.ToolStripRadioButton()
Me.tsrbunternehmen = New Syncfusion.Windows.Forms.Tools.ToolStripRadioButton()
Me.PatientDetails1 = New DPM2016.PatientDetails()
Me.PatientDetailsFirma1 = New DPM2016.PatientDetailsFirma()
Me.Finanzen1 = New DPM2016.Finanzen()
Me.Krankengeschichte1 = New DPM2016.Krankengeschichte()
Me.ClsDokumente1 = New DPM2016.clsDokumente()
Me.Recall1 = New DPM2016.Recall()
Me.Behandlung1 = New DPM2016.Behandlung()
Me.PatientAbrechnung1 = New DPM2016.PatientAbrechnung()
Me.ToolStrip1.SuspendLayout()
CType(Me.SuperTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuperTabControl1.SuspendLayout()
Me.SuperTabControlPanel5.SuspendLayout()
Me.SuperTabControlPanel1.SuspendLayout()
Me.SuperTabControlPanel8.SuspendLayout()
Me.SuperTabControlPanel5.SuspendLayout()
Me.SuperTabControlPanel4.SuspendLayout()
Me.SuperTabControlPanel7.SuspendLayout()
Me.SuperTabControlPanel6.SuspendLayout()
@@ -86,10 +88,10 @@ Partial Class Patient
'
Me.ToolStrip1.AllowDrop = True
Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbtnquit, Me.tsbtnnew, Me.tsbtnSave, Me.ToolStripButton4, Me.tstxtsuche, Me.ToolStripButton2, Me.ToolStripButton3, Me.ToolStripLabel1, Me.tsbtnfirst, Me.tsbtprev, Me.tsbtnnext, Me.tsbtnlast, Me.ToolStripSeparator1, Me.tsbtnVTX})
Me.ToolStrip1.Location = New System.Drawing.Point(0, 28)
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbtnquit, Me.tsbtnnew, Me.tsbtnSave, Me.ToolStripButton4, Me.tstxtsuche, Me.ToolStripButton2, Me.ToolStripButton3, Me.ToolStripLabel1, Me.tsbtnfirst, Me.tsbtprev, Me.tsbtnnext, Me.tsbtnlast, Me.ToolStripSeparator1, Me.tsbtnVTX, Me.tsrbprivat, Me.tsrbunternehmen})
Me.ToolStrip1.Location = New System.Drawing.Point(0, 24)
Me.ToolStrip1.Name = "ToolStrip1"
Me.ToolStrip1.Size = New System.Drawing.Size(1704, 27)
Me.ToolStrip1.Size = New System.Drawing.Size(1278, 27)
Me.ToolStrip1.TabIndex = 15
Me.ToolStrip1.Text = "ToolStrip1"
'
@@ -99,7 +101,7 @@ Partial Class Patient
Me.tsbtnquit.Image = CType(resources.GetObject("tsbtnquit.Image"), System.Drawing.Image)
Me.tsbtnquit.ImageTransparentColor = System.Drawing.Color.Magenta
Me.tsbtnquit.Name = "tsbtnquit"
Me.tsbtnquit.Size = New System.Drawing.Size(29, 24)
Me.tsbtnquit.Size = New System.Drawing.Size(24, 24)
Me.tsbtnquit.Text = "Schliessen"
'
'tsbtnnew
@@ -108,7 +110,7 @@ Partial Class Patient
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(29, 24)
Me.tsbtnnew.Size = New System.Drawing.Size(24, 24)
Me.tsbtnnew.Text = "Neuer Datensatz"
'
'tsbtnSave
@@ -117,7 +119,7 @@ Partial Class Patient
Me.tsbtnSave.Image = CType(resources.GetObject("tsbtnSave.Image"), System.Drawing.Image)
Me.tsbtnSave.ImageTransparentColor = System.Drawing.Color.Magenta
Me.tsbtnSave.Name = "tsbtnSave"
Me.tsbtnSave.Size = New System.Drawing.Size(29, 24)
Me.tsbtnSave.Size = New System.Drawing.Size(24, 24)
Me.tsbtnSave.Text = "Speichern"
'
'ToolStripButton4
@@ -126,7 +128,7 @@ Partial Class Patient
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, 24)
Me.ToolStripButton4.Size = New System.Drawing.Size(24, 24)
Me.ToolStripButton4.Text = "Dokumentinformationen bearbeiten"
Me.ToolStripButton4.Visible = False
'
@@ -134,7 +136,7 @@ Partial Class Patient
'
Me.tstxtsuche.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.tstxtsuche.Name = "tstxtsuche"
Me.tstxtsuche.Size = New System.Drawing.Size(132, 27)
Me.tstxtsuche.Size = New System.Drawing.Size(100, 27)
'
'ToolStripButton2
'
@@ -142,7 +144,7 @@ Partial Class Patient
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(29, 24)
Me.ToolStripButton2.Size = New System.Drawing.Size(24, 24)
Me.ToolStripButton2.Text = "Dokument löschen"
Me.ToolStripButton2.Visible = False
'
@@ -152,14 +154,14 @@ Partial Class Patient
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, 24)
Me.ToolStripButton3.Size = New System.Drawing.Size(24, 24)
Me.ToolStripButton3.Text = "Dokument anzeigen"
Me.ToolStripButton3.Visible = False
'
'ToolStripLabel1
'
Me.ToolStripLabel1.Name = "ToolStripLabel1"
Me.ToolStripLabel1.Size = New System.Drawing.Size(48, 24)
Me.ToolStripLabel1.Size = New System.Drawing.Size(39, 24)
Me.ToolStripLabel1.Text = "Suche"
'
'tsbtnfirst
@@ -168,7 +170,7 @@ Partial Class Patient
Me.tsbtnfirst.Image = CType(resources.GetObject("tsbtnfirst.Image"), System.Drawing.Image)
Me.tsbtnfirst.ImageTransparentColor = System.Drawing.Color.Magenta
Me.tsbtnfirst.Name = "tsbtnfirst"
Me.tsbtnfirst.Size = New System.Drawing.Size(29, 24)
Me.tsbtnfirst.Size = New System.Drawing.Size(24, 24)
Me.tsbtnfirst.Text = "Erster Datensatz"
'
'tsbtprev
@@ -177,7 +179,7 @@ Partial Class Patient
Me.tsbtprev.Image = CType(resources.GetObject("tsbtprev.Image"), System.Drawing.Image)
Me.tsbtprev.ImageTransparentColor = System.Drawing.Color.Magenta
Me.tsbtprev.Name = "tsbtprev"
Me.tsbtprev.Size = New System.Drawing.Size(29, 24)
Me.tsbtprev.Size = New System.Drawing.Size(24, 24)
Me.tsbtprev.Text = "Vorheriger Datensatz"
'
'tsbtnnext
@@ -186,7 +188,7 @@ Partial Class Patient
Me.tsbtnnext.Image = CType(resources.GetObject("tsbtnnext.Image"), System.Drawing.Image)
Me.tsbtnnext.ImageTransparentColor = System.Drawing.Color.Magenta
Me.tsbtnnext.Name = "tsbtnnext"
Me.tsbtnnext.Size = New System.Drawing.Size(29, 24)
Me.tsbtnnext.Size = New System.Drawing.Size(24, 24)
Me.tsbtnnext.Text = "nächster Datensatz"
'
'tsbtnlast
@@ -195,7 +197,7 @@ Partial Class Patient
Me.tsbtnlast.Image = CType(resources.GetObject("tsbtnlast.Image"), System.Drawing.Image)
Me.tsbtnlast.ImageTransparentColor = System.Drawing.Color.Magenta
Me.tsbtnlast.Name = "tsbtnlast"
Me.tsbtnlast.Size = New System.Drawing.Size(29, 24)
Me.tsbtnlast.Size = New System.Drawing.Size(24, 24)
Me.tsbtnlast.Text = "Letzter Datensatz"
'
'ToolStripSeparator1
@@ -209,7 +211,7 @@ Partial Class Patient
Me.tsbtnVTX.Image = CType(resources.GetObject("tsbtnVTX.Image"), System.Drawing.Image)
Me.tsbtnVTX.ImageTransparentColor = System.Drawing.Color.Magenta
Me.tsbtnVTX.Name = "tsbtnVTX"
Me.tsbtnVTX.Size = New System.Drawing.Size(29, 24)
Me.tsbtnVTX.Size = New System.Drawing.Size(24, 24)
Me.tsbtnVTX.Text = "ToolStripButton1"
'
'SuperTabControl1
@@ -228,88 +230,45 @@ Partial Class Patient
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.SuperTabControlPanel5)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel8)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel5)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel4)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel7)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel6)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel3)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel2)
Me.SuperTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.SuperTabControl1.Location = New System.Drawing.Point(0, 55)
Me.SuperTabControl1.Margin = New System.Windows.Forms.Padding(4)
Me.SuperTabControl1.Location = New System.Drawing.Point(0, 51)
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(1704, 789)
Me.SuperTabControl1.Size = New System.Drawing.Size(1278, 635)
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 = 18
Me.SuperTabControl1.Tabs.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.Stammdaten, Me.Stammdaten_Firma, Me.Abrechnung, Me.Behandlungen, Me.Finanzen, Me.Recall, Me.Dokumente, Me.Krankengeschichte})
Me.SuperTabControl1.Text = "SuperTabControl1"
'
'SuperTabControlPanel5
'
Me.SuperTabControlPanel5.Controls.Add(Me.Finanzen1)
Me.SuperTabControlPanel5.Dock = System.Windows.Forms.DockStyle.Fill
Me.SuperTabControlPanel5.Location = New System.Drawing.Point(0, 28)
Me.SuperTabControlPanel5.Margin = New System.Windows.Forms.Padding(4)
Me.SuperTabControlPanel5.Name = "SuperTabControlPanel5"
Me.SuperTabControlPanel5.Size = New System.Drawing.Size(1704, 761)
Me.SuperTabControlPanel5.TabIndex = 0
Me.SuperTabControlPanel5.TabItem = Me.Finanzen
'
'Finanzen1
'
Me.Finanzen1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Finanzen1.Location = New System.Drawing.Point(0, 0)
Me.Finanzen1.Margin = New System.Windows.Forms.Padding(5)
Me.Finanzen1.Name = "Finanzen1"
Me.Finanzen1.Patientnr = 0
Me.Finanzen1.Size = New System.Drawing.Size(1704, 761)
Me.Finanzen1.TabIndex = 0
'
'Finanzen
'
Me.Finanzen.AttachedControl = Me.SuperTabControlPanel5
Me.Finanzen.GlobalItem = False
Me.Finanzen.Name = "Finanzen"
Me.Finanzen.Text = "Finanzen"
'
'SuperTabControlPanel1
'
Me.SuperTabControlPanel1.Controls.Add(Me.btnVTX)
Me.SuperTabControlPanel1.Controls.Add(Me.PatientDetails1)
Me.SuperTabControlPanel1.Dock = System.Windows.Forms.DockStyle.Fill
Me.SuperTabControlPanel1.Location = New System.Drawing.Point(0, 28)
Me.SuperTabControlPanel1.Margin = New System.Windows.Forms.Padding(4)
Me.SuperTabControlPanel1.Location = New System.Drawing.Point(0, 25)
Me.SuperTabControlPanel1.Name = "SuperTabControlPanel1"
Me.SuperTabControlPanel1.Size = New System.Drawing.Size(1704, 761)
Me.SuperTabControlPanel1.Size = New System.Drawing.Size(1278, 610)
Me.SuperTabControlPanel1.TabIndex = 1
Me.SuperTabControlPanel1.TabItem = Me.Stammdaten
'
'btnVTX
'
Me.btnVTX.Image = CType(resources.GetObject("btnVTX.Image"), System.Drawing.Image)
Me.btnVTX.Location = New System.Drawing.Point(985, 47)
Me.btnVTX.Margin = New System.Windows.Forms.Padding(4)
Me.btnVTX.Location = New System.Drawing.Point(739, 38)
Me.btnVTX.Name = "btnVTX"
Me.btnVTX.Size = New System.Drawing.Size(100, 50)
Me.btnVTX.Size = New System.Drawing.Size(75, 41)
Me.btnVTX.TabIndex = 18
Me.btnVTX.UseVisualStyleBackColor = True
'
'PatientDetails1
'
Me.PatientDetails1.Dock = System.Windows.Forms.DockStyle.Fill
Me.PatientDetails1.HasChanges = False
Me.PatientDetails1.Location = New System.Drawing.Point(0, 0)
Me.PatientDetails1.Margin = New System.Windows.Forms.Padding(5)
Me.PatientDetails1.Name = "PatientDetails1"
Me.PatientDetails1.Patientname = "0 Hutter Stefan Pfäffikon SZ"
Me.PatientDetails1.PatientNr = 0
Me.PatientDetails1.Size = New System.Drawing.Size(1704, 761)
Me.PatientDetails1.TabIndex = 17
'
'Stammdaten
'
Me.Stammdaten.AttachedControl = Me.SuperTabControlPanel1
@@ -321,23 +280,13 @@ Partial Class Patient
'
Me.SuperTabControlPanel8.Controls.Add(Me.PatientDetailsFirma1)
Me.SuperTabControlPanel8.Dock = System.Windows.Forms.DockStyle.Fill
Me.SuperTabControlPanel8.Location = New System.Drawing.Point(0, 28)
Me.SuperTabControlPanel8.Location = New System.Drawing.Point(0, 25)
Me.SuperTabControlPanel8.Margin = New System.Windows.Forms.Padding(2)
Me.SuperTabControlPanel8.Name = "SuperTabControlPanel8"
Me.SuperTabControlPanel8.Size = New System.Drawing.Size(1704, 755)
Me.SuperTabControlPanel8.Size = New System.Drawing.Size(1278, 610)
Me.SuperTabControlPanel8.TabIndex = 0
Me.SuperTabControlPanel8.TabItem = Me.Stammdaten_Firma
'
'PatientDetailsFirma1
'
Me.PatientDetailsFirma1.Dock = System.Windows.Forms.DockStyle.Fill
Me.PatientDetailsFirma1.HasChanges = False
Me.PatientDetailsFirma1.Location = New System.Drawing.Point(0, 0)
Me.PatientDetailsFirma1.Name = "PatientDetailsFirma1"
Me.PatientDetailsFirma1.Patientname = "0 Hutter Stefan Pfäffikon SZ"
Me.PatientDetailsFirma1.PatientNr = 0
Me.PatientDetailsFirma1.Size = New System.Drawing.Size(1704, 755)
Me.PatientDetailsFirma1.TabIndex = 0
'
'Stammdaten_Firma
'
Me.Stammdaten_Firma.AttachedControl = Me.SuperTabControlPanel8
@@ -345,27 +294,33 @@ Partial Class Patient
Me.Stammdaten_Firma.Name = "Stammdaten_Firma"
Me.Stammdaten_Firma.Text = "Stammdaten"
'
'SuperTabControlPanel5
'
Me.SuperTabControlPanel5.Controls.Add(Me.Finanzen1)
Me.SuperTabControlPanel5.Dock = System.Windows.Forms.DockStyle.Fill
Me.SuperTabControlPanel5.Location = New System.Drawing.Point(0, 23)
Me.SuperTabControlPanel5.Name = "SuperTabControlPanel5"
Me.SuperTabControlPanel5.Size = New System.Drawing.Size(1278, 618)
Me.SuperTabControlPanel5.TabIndex = 0
Me.SuperTabControlPanel5.TabItem = Me.Finanzen
'
'Finanzen
'
Me.Finanzen.AttachedControl = Me.SuperTabControlPanel5
Me.Finanzen.GlobalItem = False
Me.Finanzen.Name = "Finanzen"
Me.Finanzen.Text = "Finanzen"
'
'SuperTabControlPanel4
'
Me.SuperTabControlPanel4.Controls.Add(Me.Krankengeschichte1)
Me.SuperTabControlPanel4.Dock = System.Windows.Forms.DockStyle.Fill
Me.SuperTabControlPanel4.Location = New System.Drawing.Point(0, 28)
Me.SuperTabControlPanel4.Margin = New System.Windows.Forms.Padding(4)
Me.SuperTabControlPanel4.Location = New System.Drawing.Point(0, 23)
Me.SuperTabControlPanel4.Name = "SuperTabControlPanel4"
Me.SuperTabControlPanel4.Size = New System.Drawing.Size(1704, 755)
Me.SuperTabControlPanel4.Size = New System.Drawing.Size(1278, 613)
Me.SuperTabControlPanel4.TabIndex = 0
Me.SuperTabControlPanel4.TabItem = Me.Krankengeschichte
'
'Krankengeschichte1
'
Me.Krankengeschichte1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Krankengeschichte1.Location = New System.Drawing.Point(0, 0)
Me.Krankengeschichte1.Margin = New System.Windows.Forms.Padding(5)
Me.Krankengeschichte1.Name = "Krankengeschichte1"
Me.Krankengeschichte1.Patientnr = 0
Me.Krankengeschichte1.Size = New System.Drawing.Size(1704, 755)
Me.Krankengeschichte1.TabIndex = 0
'
'Krankengeschichte
'
Me.Krankengeschichte.AttachedControl = Me.SuperTabControlPanel4
@@ -377,23 +332,12 @@ Partial Class Patient
'
Me.SuperTabControlPanel7.Controls.Add(Me.ClsDokumente1)
Me.SuperTabControlPanel7.Dock = System.Windows.Forms.DockStyle.Fill
Me.SuperTabControlPanel7.Location = New System.Drawing.Point(0, 28)
Me.SuperTabControlPanel7.Margin = New System.Windows.Forms.Padding(4)
Me.SuperTabControlPanel7.Location = New System.Drawing.Point(0, 23)
Me.SuperTabControlPanel7.Name = "SuperTabControlPanel7"
Me.SuperTabControlPanel7.Size = New System.Drawing.Size(1704, 755)
Me.SuperTabControlPanel7.Size = New System.Drawing.Size(1278, 613)
Me.SuperTabControlPanel7.TabIndex = 0
Me.SuperTabControlPanel7.TabItem = Me.Dokumente
'
'ClsDokumente1
'
Me.ClsDokumente1.Dock = System.Windows.Forms.DockStyle.Fill
Me.ClsDokumente1.Location = New System.Drawing.Point(0, 0)
Me.ClsDokumente1.Margin = New System.Windows.Forms.Padding(5)
Me.ClsDokumente1.Name = "ClsDokumente1"
Me.ClsDokumente1.Patientnr = 0
Me.ClsDokumente1.Size = New System.Drawing.Size(1704, 755)
Me.ClsDokumente1.TabIndex = 0
'
'Dokumente
'
Me.Dokumente.AttachedControl = Me.SuperTabControlPanel7
@@ -405,23 +349,12 @@ Partial Class Patient
'
Me.SuperTabControlPanel6.Controls.Add(Me.Recall1)
Me.SuperTabControlPanel6.Dock = System.Windows.Forms.DockStyle.Fill
Me.SuperTabControlPanel6.Location = New System.Drawing.Point(0, 28)
Me.SuperTabControlPanel6.Margin = New System.Windows.Forms.Padding(4)
Me.SuperTabControlPanel6.Location = New System.Drawing.Point(0, 23)
Me.SuperTabControlPanel6.Name = "SuperTabControlPanel6"
Me.SuperTabControlPanel6.Size = New System.Drawing.Size(1704, 755)
Me.SuperTabControlPanel6.Size = New System.Drawing.Size(1278, 613)
Me.SuperTabControlPanel6.TabIndex = 0
Me.SuperTabControlPanel6.TabItem = Me.Recall
'
'Recall1
'
Me.Recall1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Recall1.Location = New System.Drawing.Point(0, 0)
Me.Recall1.Margin = New System.Windows.Forms.Padding(5)
Me.Recall1.Name = "Recall1"
Me.Recall1.Patientnr = 0
Me.Recall1.Size = New System.Drawing.Size(1704, 755)
Me.Recall1.TabIndex = 0
'
'Recall
'
Me.Recall.AttachedControl = Me.SuperTabControlPanel6
@@ -433,25 +366,12 @@ Partial Class Patient
'
Me.SuperTabControlPanel3.Controls.Add(Me.Behandlung1)
Me.SuperTabControlPanel3.Dock = System.Windows.Forms.DockStyle.Fill
Me.SuperTabControlPanel3.Location = New System.Drawing.Point(0, 28)
Me.SuperTabControlPanel3.Margin = New System.Windows.Forms.Padding(4)
Me.SuperTabControlPanel3.Location = New System.Drawing.Point(0, 23)
Me.SuperTabControlPanel3.Name = "SuperTabControlPanel3"
Me.SuperTabControlPanel3.Size = New System.Drawing.Size(1704, 755)
Me.SuperTabControlPanel3.Size = New System.Drawing.Size(1278, 613)
Me.SuperTabControlPanel3.TabIndex = 0
Me.SuperTabControlPanel3.TabItem = Me.Behandlungen
'
'Behandlung1
'
Me.Behandlung1.Auftragsmanagement = False
Me.Behandlung1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Behandlung1.HasChanges = False
Me.Behandlung1.Location = New System.Drawing.Point(0, 0)
Me.Behandlung1.Margin = New System.Windows.Forms.Padding(5)
Me.Behandlung1.Name = "Behandlung1"
Me.Behandlung1.PatientNr = 0
Me.Behandlung1.Size = New System.Drawing.Size(1704, 755)
Me.Behandlung1.TabIndex = 0
'
'Behandlungen
'
Me.Behandlungen.AttachedControl = Me.SuperTabControlPanel3
@@ -463,24 +383,12 @@ Partial Class Patient
'
Me.SuperTabControlPanel2.Controls.Add(Me.PatientAbrechnung1)
Me.SuperTabControlPanel2.Dock = System.Windows.Forms.DockStyle.Fill
Me.SuperTabControlPanel2.Location = New System.Drawing.Point(0, 28)
Me.SuperTabControlPanel2.Margin = New System.Windows.Forms.Padding(4)
Me.SuperTabControlPanel2.Location = New System.Drawing.Point(0, 23)
Me.SuperTabControlPanel2.Name = "SuperTabControlPanel2"
Me.SuperTabControlPanel2.Size = New System.Drawing.Size(1704, 755)
Me.SuperTabControlPanel2.Size = New System.Drawing.Size(1278, 613)
Me.SuperTabControlPanel2.TabIndex = 0
Me.SuperTabControlPanel2.TabItem = Me.Abrechnung
'
'PatientAbrechnung1
'
Me.PatientAbrechnung1.Dock = System.Windows.Forms.DockStyle.Fill
Me.PatientAbrechnung1.HasChanges = False
Me.PatientAbrechnung1.Location = New System.Drawing.Point(0, 0)
Me.PatientAbrechnung1.Margin = New System.Windows.Forms.Padding(5)
Me.PatientAbrechnung1.Name = "PatientAbrechnung1"
Me.PatientAbrechnung1.PatientNr = 0
Me.PatientAbrechnung1.Size = New System.Drawing.Size(1704, 755)
Me.PatientAbrechnung1.TabIndex = 0
'
'Abrechnung
'
Me.Abrechnung.AttachedControl = Me.SuperTabControlPanel2
@@ -495,8 +403,8 @@ Partial Class Patient
Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiToolStripMenuItem})
Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
Me.MenuStrip1.Name = "MenuStrip1"
Me.MenuStrip1.Padding = New System.Windows.Forms.Padding(5, 2, 0, 2)
Me.MenuStrip1.Size = New System.Drawing.Size(1704, 28)
Me.MenuStrip1.Padding = New System.Windows.Forms.Padding(4, 2, 0, 2)
Me.MenuStrip1.Size = New System.Drawing.Size(1278, 24)
Me.MenuStrip1.TabIndex = 19
Me.MenuStrip1.Text = "MenuStrip1"
'
@@ -504,39 +412,138 @@ Partial Class Patient
'
Me.DateiToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BeendenToolStripMenuItem})
Me.DateiToolStripMenuItem.Name = "DateiToolStripMenuItem"
Me.DateiToolStripMenuItem.Size = New System.Drawing.Size(59, 24)
Me.DateiToolStripMenuItem.Size = New System.Drawing.Size(46, 20)
Me.DateiToolStripMenuItem.Text = "&Datei"
'
'BeendenToolStripMenuItem
'
Me.BeendenToolStripMenuItem.Name = "BeendenToolStripMenuItem"
Me.BeendenToolStripMenuItem.Size = New System.Drawing.Size(150, 26)
Me.BeendenToolStripMenuItem.Size = New System.Drawing.Size(120, 22)
Me.BeendenToolStripMenuItem.Text = "&Beenden"
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(1237, 0)
Me.Label1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label1.Location = New System.Drawing.Point(928, 0)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(77, 25)
Me.Label1.Size = New System.Drawing.Size(63, 20)
Me.Label1.TabIndex = 20
Me.Label1.Text = "Label1"
Me.Label1.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'tsrbprivat
'
Me.tsrbprivat.Checked = True
Me.tsrbprivat.CheckState = System.Windows.Forms.CheckState.Checked
Me.tsrbprivat.Name = "tsrbprivat"
Me.tsrbprivat.Size = New System.Drawing.Size(101, 24)
Me.tsrbprivat.Text = "Privat-Adresse"
'
'tsrbunternehmen
'
Me.tsrbunternehmen.Name = "tsrbunternehmen"
Me.tsrbunternehmen.Size = New System.Drawing.Size(98, 24)
Me.tsrbunternehmen.Text = "Unternehmen"
'
'PatientDetails1
'
Me.PatientDetails1.Dock = System.Windows.Forms.DockStyle.Fill
Me.PatientDetails1.HasChanges = False
Me.PatientDetails1.Location = New System.Drawing.Point(0, 0)
Me.PatientDetails1.Margin = New System.Windows.Forms.Padding(4)
Me.PatientDetails1.Name = "PatientDetails1"
Me.PatientDetails1.Patientname = "0 Hutter Stefan Pfäffikon SZ"
Me.PatientDetails1.PatientNr = 0
Me.PatientDetails1.Size = New System.Drawing.Size(1278, 610)
Me.PatientDetails1.TabIndex = 17
'
'PatientDetailsFirma1
'
Me.PatientDetailsFirma1.Dock = System.Windows.Forms.DockStyle.Fill
Me.PatientDetailsFirma1.HasChanges = False
Me.PatientDetailsFirma1.Location = New System.Drawing.Point(0, 0)
Me.PatientDetailsFirma1.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.PatientDetailsFirma1.Name = "PatientDetailsFirma1"
Me.PatientDetailsFirma1.Patientname = "0 Hutter Stefan Pfäffikon SZ"
Me.PatientDetailsFirma1.PatientNr = 0
Me.PatientDetailsFirma1.Size = New System.Drawing.Size(1278, 610)
Me.PatientDetailsFirma1.TabIndex = 0
'
'Finanzen1
'
Me.Finanzen1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Finanzen1.Location = New System.Drawing.Point(0, 0)
Me.Finanzen1.Margin = New System.Windows.Forms.Padding(4)
Me.Finanzen1.Name = "Finanzen1"
Me.Finanzen1.Patientnr = 0
Me.Finanzen1.Size = New System.Drawing.Size(1278, 618)
Me.Finanzen1.TabIndex = 0
'
'Krankengeschichte1
'
Me.Krankengeschichte1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Krankengeschichte1.Location = New System.Drawing.Point(0, 0)
Me.Krankengeschichte1.Margin = New System.Windows.Forms.Padding(4)
Me.Krankengeschichte1.Name = "Krankengeschichte1"
Me.Krankengeschichte1.Patientnr = 0
Me.Krankengeschichte1.Size = New System.Drawing.Size(1278, 613)
Me.Krankengeschichte1.TabIndex = 0
'
'ClsDokumente1
'
Me.ClsDokumente1.Dock = System.Windows.Forms.DockStyle.Fill
Me.ClsDokumente1.Location = New System.Drawing.Point(0, 0)
Me.ClsDokumente1.Margin = New System.Windows.Forms.Padding(4)
Me.ClsDokumente1.Name = "ClsDokumente1"
Me.ClsDokumente1.Patientnr = 0
Me.ClsDokumente1.Size = New System.Drawing.Size(1278, 613)
Me.ClsDokumente1.TabIndex = 0
'
'Recall1
'
Me.Recall1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Recall1.Location = New System.Drawing.Point(0, 0)
Me.Recall1.Margin = New System.Windows.Forms.Padding(4)
Me.Recall1.Name = "Recall1"
Me.Recall1.Patientnr = 0
Me.Recall1.Size = New System.Drawing.Size(1278, 613)
Me.Recall1.TabIndex = 0
'
'Behandlung1
'
Me.Behandlung1.Auftragsmanagement = False
Me.Behandlung1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Behandlung1.HasChanges = False
Me.Behandlung1.Location = New System.Drawing.Point(0, 0)
Me.Behandlung1.Margin = New System.Windows.Forms.Padding(4)
Me.Behandlung1.Name = "Behandlung1"
Me.Behandlung1.PatientNr = 0
Me.Behandlung1.Size = New System.Drawing.Size(1278, 613)
Me.Behandlung1.TabIndex = 0
'
'PatientAbrechnung1
'
Me.PatientAbrechnung1.Dock = System.Windows.Forms.DockStyle.Fill
Me.PatientAbrechnung1.HasChanges = False
Me.PatientAbrechnung1.Location = New System.Drawing.Point(0, 0)
Me.PatientAbrechnung1.Margin = New System.Windows.Forms.Padding(4)
Me.PatientAbrechnung1.Name = "PatientAbrechnung1"
Me.PatientAbrechnung1.PatientNr = 0
Me.PatientAbrechnung1.Size = New System.Drawing.Size(1278, 613)
Me.PatientAbrechnung1.TabIndex = 0
'
'Patient
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!)
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1704, 844)
Me.ClientSize = New System.Drawing.Size(1278, 686)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.SuperTabControl1)
Me.Controls.Add(Me.ToolStrip1)
Me.Controls.Add(Me.MenuStrip1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MainMenuStrip = Me.MenuStrip1
Me.Margin = New System.Windows.Forms.Padding(4)
Me.Name = "Patient"
Me.ShowInTaskbar = False
Me.Text = "Patient"
@@ -544,9 +551,9 @@ Partial Class Patient
Me.ToolStrip1.PerformLayout()
CType(Me.SuperTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.SuperTabControl1.ResumeLayout(False)
Me.SuperTabControlPanel5.ResumeLayout(False)
Me.SuperTabControlPanel1.ResumeLayout(False)
Me.SuperTabControlPanel8.ResumeLayout(False)
Me.SuperTabControlPanel5.ResumeLayout(False)
Me.SuperTabControlPanel4.ResumeLayout(False)
Me.SuperTabControlPanel7.ResumeLayout(False)
Me.SuperTabControlPanel6.ResumeLayout(False)
@@ -603,4 +610,6 @@ Partial Class Patient
Friend WithEvents SuperTabControlPanel8 As DevComponents.DotNetBar.SuperTabControlPanel
Friend WithEvents Stammdaten_Firma As DevComponents.DotNetBar.SuperTabItem
Friend WithEvents PatientDetailsFirma1 As PatientDetailsFirma
Friend WithEvents tsrbprivat As Syncfusion.Windows.Forms.Tools.ToolStripRadioButton
Friend WithEvents tsrbunternehmen As Syncfusion.Windows.Forms.Tools.ToolStripRadioButton
End Class