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

update Auftragsmanagement

Browse Source
This commit is contained in:
Stefan Hutter
2022-06-20 22:36:47 +02:00
parent 6e55982c50
commit 4921fbefbe
927 changed files with 13122 additions and 4080 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -81,10 +81,11 @@ Partial Class Patient
'ToolStrip1
'
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, 24)
Me.ToolStrip1.Name = "ToolStrip1"
Me.ToolStrip1.Size = New System.Drawing.Size(1278, 25)
Me.ToolStrip1.Size = New System.Drawing.Size(1278, 27)
Me.ToolStrip1.TabIndex = 15
Me.ToolStrip1.Text = "ToolStrip1"
'
@@ -94,7 +95,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(23, 22)
Me.tsbtnquit.Size = New System.Drawing.Size(24, 24)
Me.tsbtnquit.Text = "Schliessen"
'
'tsbtnnew
@@ -103,7 +104,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(23, 22)
Me.tsbtnnew.Size = New System.Drawing.Size(24, 24)
Me.tsbtnnew.Text = "Neuer Datensatz"
'
'tsbtnSave
@@ -112,7 +113,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(23, 22)
Me.tsbtnSave.Size = New System.Drawing.Size(24, 24)
Me.tsbtnSave.Text = "Speichern"
'
'ToolStripButton4
@@ -121,15 +122,14 @@ 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(23, 22)
Me.ToolStripButton4.Size = New System.Drawing.Size(24, 24)
Me.ToolStripButton4.Text = "Dokumentinformationen bearbeiten"
Me.ToolStripButton4.Visible = False
'
'tstxtsuche
'
Me.tstxtsuche.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.tstxtsuche.Name = "tstxtsuche"
Me.tstxtsuche.Size = New System.Drawing.Size(100, 25)
Me.tstxtsuche.Size = New System.Drawing.Size(100, 27)
'
'ToolStripButton2
'
@@ -137,7 +137,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(23, 22)
Me.ToolStripButton2.Size = New System.Drawing.Size(24, 24)
Me.ToolStripButton2.Text = "Dokument löschen"
Me.ToolStripButton2.Visible = False
'
@@ -147,14 +147,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(23, 22)
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(39, 22)
Me.ToolStripLabel1.Size = New System.Drawing.Size(39, 24)
Me.ToolStripLabel1.Text = "Suche"
'
'tsbtnfirst
@@ -163,7 +163,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(23, 22)
Me.tsbtnfirst.Size = New System.Drawing.Size(24, 24)
Me.tsbtnfirst.Text = "Erster Datensatz"
'
'tsbtprev
@@ -172,7 +172,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(23, 22)
Me.tsbtprev.Size = New System.Drawing.Size(24, 24)
Me.tsbtprev.Text = "Vorheriger Datensatz"
'
'tsbtnnext
@@ -181,7 +181,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(23, 22)
Me.tsbtnnext.Size = New System.Drawing.Size(24, 24)
Me.tsbtnnext.Text = "nächster Datensatz"
'
'tsbtnlast
@@ -190,13 +190,13 @@ 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(23, 22)
Me.tsbtnlast.Size = New System.Drawing.Size(24, 24)
Me.tsbtnlast.Text = "Letzter Datensatz"
'
'ToolStripSeparator1
'
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 27)
'
'tsbtnVTX
'
@@ -204,7 +204,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(23, 22)
Me.tsbtnVTX.Size = New System.Drawing.Size(24, 24)
Me.tsbtnVTX.Text = "ToolStripButton1"
'
'SuperTabControl1
@@ -230,12 +230,12 @@ Partial Class Patient
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel2)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel5)
Me.SuperTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.SuperTabControl1.Location = New System.Drawing.Point(0, 49)
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(1278, 637)
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.Abrechnung, Me.Behandlungen, Me.Finanzen, Me.Recall, Me.Dokumente, Me.Krankengeschichte})
@@ -248,7 +248,7 @@ Partial Class Patient
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(1278, 612)
Me.SuperTabControlPanel1.Size = New System.Drawing.Size(1278, 610)
Me.SuperTabControlPanel1.TabIndex = 1
Me.SuperTabControlPanel1.TabItem = Me.Stammdaten
'
@@ -266,10 +266,11 @@ Partial Class Patient
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, 4, 4, 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, 612)
Me.PatientDetails1.Size = New System.Drawing.Size(1278, 610)
Me.PatientDetails1.TabIndex = 17
'
'Stammdaten
@@ -293,6 +294,7 @@ Partial Class Patient
'
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, 4, 4, 4)
Me.Krankengeschichte1.Name = "Krankengeschichte1"
Me.Krankengeschichte1.Patientnr = 0
Me.Krankengeschichte1.Size = New System.Drawing.Size(1278, 612)
@@ -319,6 +321,7 @@ Partial Class Patient
'
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, 4, 4, 4)
Me.ClsDokumente1.Name = "ClsDokumente1"
Me.ClsDokumente1.Patientnr = 0
Me.ClsDokumente1.Size = New System.Drawing.Size(1278, 612)
@@ -345,6 +348,7 @@ Partial Class Patient
'
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, 4, 4, 4)
Me.Recall1.Name = "Recall1"
Me.Recall1.Patientnr = 0
Me.Recall1.Size = New System.Drawing.Size(1278, 612)
@@ -372,6 +376,7 @@ Partial Class Patient
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, 4, 4, 4)
Me.Behandlung1.Name = "Behandlung1"
Me.Behandlung1.PatientNr = 0
Me.Behandlung1.Size = New System.Drawing.Size(1278, 612)
@@ -399,6 +404,7 @@ Partial Class Patient
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, 4, 4, 4)
Me.PatientAbrechnung1.Name = "PatientAbrechnung1"
Me.PatientAbrechnung1.PatientNr = 0
Me.PatientAbrechnung1.Size = New System.Drawing.Size(1278, 612)
@@ -425,6 +431,7 @@ Partial Class Patient
'
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, 4, 4, 4)
Me.Finanzen1.Name = "Finanzen1"
Me.Finanzen1.Patientnr = 0
Me.Finanzen1.Size = New System.Drawing.Size(1278, 612)
@@ -440,9 +447,11 @@ Partial Class Patient
'MenuStrip1
'
Me.MenuStrip1.AllowMerge = False
Me.MenuStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
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(4, 2, 0, 2)
Me.MenuStrip1.Size = New System.Drawing.Size(1278, 24)
Me.MenuStrip1.TabIndex = 19
Me.MenuStrip1.Text = "MenuStrip1"

2
DPM2016/Patient/Patient.resx
View File

@@ -402,7 +402,7 @@
<data name="btnVTX.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACEAAAAhCAYAAABX5MJvAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAADF1JREFUWEftV/lXk2ca7d8wM6c/zEgFhAQSSMK+iEurgrKH7Alh09bWdnSsrbZ1
wAAADsABataJCQAADF1JREFUWEftV/lXk2ca7d8wM6c/zEgFhAQSSMK+iEurgrKH7Alh09bWdnSsrbZ1
4yhYBNlllbDvEBbZUdyqraitjB6XutUNrFSwUjdc5s79Ek7P/BGTc14Svu/9vve+z3Of+9z3nb+lWOGQ
3AtndQ98TScgjeyDQjsEV00rJGs68J65GqLV9XDR10BmtmJBdDtk8UfgpD8KkfkEXLU9cNN0wU3bATGH
xNANSXwPxMY+uOgOQmwYtA9jPwevmzohjm+F2NwAH1MO3hE+7ya1wSGhA/MiGuClG4Qitgd+hiE+2AFH