Update 20230215

master
Stefan Hutter 3 years ago
parent 35df876d21
commit e83b2e6f35

Binary file not shown.

@ -75,6 +75,9 @@ Partial Class Behandlung
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.SuperTabControlPanel4 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
Me.c1akonto = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
@ -94,13 +97,8 @@ Partial Class Behandlung
Me.ToolStripLabel2 = New System.Windows.Forms.ToolStripLabel()
Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
Me.STAkonto = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel1 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.Panel2 = New System.Windows.Forms.Panel()
Me.Behandungdetail1 = New DPM2016.Benhandungdetail()
Me.STBehandlung = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel2 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Leistungen1 = New DPM2016.Leistungen()
Me.STLeistung = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel3 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.tsbtnnew = New System.Windows.Forms.ToolStripButton()
@ -161,19 +159,21 @@ Partial Class Behandlung
Me.tsamdrittemahnung = New System.Windows.Forms.ToolStripMenuItem()
Me.C1Leistungen = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
Me.Behandungdetail1 = New DPM2016.Benhandungdetail()
Me.Leistungen1 = New DPM2016.Leistungen()
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.SuperTabControlPanel4.SuspendLayout()
Me.GroupBox2.SuspendLayout()
CType(Me.c1akonto, System.ComponentModel.ISupportInitialize).BeginInit()
Me.ctxmenuakonto.SuspendLayout()
Me.ToolStrip1.SuspendLayout()
Me.SuperTabControlPanel1.SuspendLayout()
Me.Panel2.SuspendLayout()
Me.SuperTabControlPanel2.SuspendLayout()
Me.Panel1.SuspendLayout()
Me.tsbtnbehandlungdelete.SuspendLayout()
@ -188,7 +188,7 @@ Partial Class Behandlung
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(1713, 27)
Me.tsbtndelete.Size = New System.Drawing.Size(1713, 31)
Me.tsbtndelete.TabIndex = 1
Me.tsbtndelete.Text = "ToolStrip1"
'
@ -198,7 +198,7 @@ Partial Class Behandlung
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(29, 24)
Me.tsbtnnewbehandlung.Size = New System.Drawing.Size(29, 28)
Me.tsbtnnewbehandlung.Text = "Neue Behandlung"
'
'tsbtndeletebehandlung
@ -207,7 +207,7 @@ Partial Class Behandlung
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(29, 24)
Me.tsbtndeletebehandlung.Size = New System.Drawing.Size(29, 28)
Me.tsbtndeletebehandlung.Text = "Behandlung löschen"
'
'ToolStripButton2
@ -216,18 +216,18 @@ Partial Class Behandlung
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(29, 28)
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.Location = New System.Drawing.Point(0, 31)
Me.GroupBox1.Margin = New System.Windows.Forms.Padding(4)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Padding = New System.Windows.Forms.Padding(4)
Me.GroupBox1.Size = New System.Drawing.Size(273, 1004)
Me.GroupBox1.Size = New System.Drawing.Size(273, 1000)
Me.GroupBox1.TabIndex = 2
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Behandlungen"
@ -256,7 +256,7 @@ Partial Class Behandlung
Me.treebehandlungen.NodesConnector = Me.NodeConnector1
Me.treebehandlungen.NodeStyle = Me.ElementStyle1
Me.treebehandlungen.PathSeparator = ";"
Me.treebehandlungen.Size = New System.Drawing.Size(265, 981)
Me.treebehandlungen.Size = New System.Drawing.Size(265, 977)
Me.treebehandlungen.Styles.Add(Me.ElementStyle1)
Me.treebehandlungen.TabIndex = 0
Me.treebehandlungen.Text = "AdvTree1"
@ -541,18 +541,45 @@ Partial Class Behandlung
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(273, 27)
Me.SuperTabControl1.Location = New System.Drawing.Point(273, 31)
Me.SuperTabControl1.Margin = New System.Windows.Forms.Padding(4)
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(1440, 1004)
Me.SuperTabControl1.Size = New System.Drawing.Size(1440, 1000)
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.STAkonto})
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, 28)
Me.SuperTabControlPanel1.Margin = New System.Windows.Forms.Padding(4)
Me.SuperTabControlPanel1.Name = "SuperTabControlPanel1"
Me.SuperTabControlPanel1.Size = New System.Drawing.Size(1440, 972)
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.Margin = New System.Windows.Forms.Padding(4)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(1416, 970)
Me.Panel2.TabIndex = 9
'
'STBehandlung
'
Me.STBehandlung.AttachedControl = Me.SuperTabControlPanel1
Me.STBehandlung.GlobalItem = False
Me.STBehandlung.Name = "STBehandlung"
Me.STBehandlung.Text = "Behandlung"
'
'SuperTabControlPanel4
'
Me.SuperTabControlPanel4.Controls.Add(Me.GroupBox2)
@ -705,45 +732,6 @@ Partial Class Behandlung
Me.STAkonto.Name = "STAkonto"
Me.STAkonto.Text = "Akonto"
'
'SuperTabControlPanel1
'
Me.SuperTabControlPanel1.Controls.Add(Me.Panel2)
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.Name = "SuperTabControlPanel1"
Me.SuperTabControlPanel1.Size = New System.Drawing.Size(1440, 976)
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.Margin = New System.Windows.Forms.Padding(4)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(1416, 970)
Me.Panel2.TabIndex = 9
'
'Behandungdetail1
'
Me.Behandungdetail1.Behandlungsnr = 0
Me.Behandungdetail1.Behandlungsstatus = 0
Me.Behandungdetail1.HasChanges = False
Me.Behandungdetail1.Location = New System.Drawing.Point(4, 7)
Me.Behandungdetail1.Margin = New System.Windows.Forms.Padding(5)
Me.Behandungdetail1.Name = "Behandungdetail1"
Me.Behandungdetail1.Patientnr = 0
Me.Behandungdetail1.Size = New System.Drawing.Size(1412, 959)
Me.Behandungdetail1.TabIndex = 0
'
'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)
@ -765,20 +753,6 @@ Partial Class Behandlung
Me.Panel1.Size = New System.Drawing.Size(1440, 972)
Me.Panel1.TabIndex = 1
'
'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(5)
Me.Leistungen1.Name = "Leistungen1"
Me.Leistungen1.Size = New System.Drawing.Size(1440, 972)
Me.Leistungen1.TabIndex = 0
'
'STLeistung
'
Me.STLeistung.AttachedControl = Me.SuperTabControlPanel2
@ -792,7 +766,7 @@ Partial Class Behandlung
Me.SuperTabControlPanel3.Location = New System.Drawing.Point(0, 0)
Me.SuperTabControlPanel3.Margin = New System.Windows.Forms.Padding(4)
Me.SuperTabControlPanel3.Name = "SuperTabControlPanel3"
Me.SuperTabControlPanel3.Size = New System.Drawing.Size(1440, 1004)
Me.SuperTabControlPanel3.Size = New System.Drawing.Size(1440, 1000)
Me.SuperTabControlPanel3.TabIndex = 0
'
'tsbtnnew
@ -1167,6 +1141,32 @@ Partial Class Behandlung
'
Me.OpenFileDialog1.FileName = "OpenFileDialog1"
'
'Behandungdetail1
'
Me.Behandungdetail1.Behandlungsnr = 0
Me.Behandungdetail1.Behandlungsstatus = 0
Me.Behandungdetail1.HasChanges = False
Me.Behandungdetail1.Location = New System.Drawing.Point(4, 7)
Me.Behandungdetail1.Margin = New System.Windows.Forms.Padding(5)
Me.Behandungdetail1.Name = "Behandungdetail1"
Me.Behandungdetail1.Patientnr = 0
Me.Behandungdetail1.Size = New System.Drawing.Size(1412, 959)
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(5)
Me.Leistungen1.Name = "Leistungen1"
Me.Leistungen1.Size = New System.Drawing.Size(1440, 972)
Me.Leistungen1.TabIndex = 0
'
'Behandlung
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!)
@ -1184,6 +1184,8 @@ Partial Class Behandlung
Me.ctxmenubehandlung.ResumeLayout(False)
CType(Me.SuperTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.SuperTabControl1.ResumeLayout(False)
Me.SuperTabControlPanel1.ResumeLayout(False)
Me.Panel2.ResumeLayout(False)
Me.SuperTabControlPanel4.ResumeLayout(False)
Me.GroupBox2.ResumeLayout(False)
Me.GroupBox2.PerformLayout()
@ -1191,8 +1193,6 @@ Partial Class Behandlung
Me.ctxmenuakonto.ResumeLayout(False)
Me.ToolStrip1.ResumeLayout(False)
Me.ToolStrip1.PerformLayout()
Me.SuperTabControlPanel1.ResumeLayout(False)
Me.Panel2.ResumeLayout(False)
Me.SuperTabControlPanel2.ResumeLayout(False)
Me.Panel1.ResumeLayout(False)
Me.tsbtnbehandlungdelete.ResumeLayout(False)

@ -236,7 +236,7 @@
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABO
DQAAAk1TRnQBSQFMAgEBBQEAAaABBgGgAQYBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
DQAAAk1TRnQBSQFMAgEBBQEAAbABBgGwAQYBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
@ -338,7 +338,7 @@
</value>
</data>
<data name="c1akonto.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="21" DefRecSelWidth="21" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 1363, 444&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;21&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 1363, 444&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{ForeColor:ControlText;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="21" DefRecSelWidth="21" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 1363, 444&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;21&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 1363, 444&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>662, 17</value>
@ -509,7 +509,7 @@
</value>
</data>
<data name="C1Leistungen.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Style4{}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{ForeColor:ControlText;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style9{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="21" DefRecSelWidth="21" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 1363, 444&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;21&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 1363, 444&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Style4{}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style9{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="21" DefRecSelWidth="21" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 1363, 444&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;21&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 1363, 444&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>950, 17</value>

@ -380,6 +380,7 @@ Public Class Behandlung
End Sub
Sub enable_disable_tabs(ByVal enable As Boolean)
Try
Me.SuperTabControl1.Tabs(1).Enabled = enable
Me.SuperTabControl1.Tabs(0).Enabled = enable
Me.SuperTabControl1.Visible = enable
@ -389,6 +390,8 @@ Public Class Behandlung
Me.SuperTabControl1.Tabs(2).Visible = False
End If
'Me.SuperTabControl1.Tabs(0).Focus()
Catch
End Try
End Sub

@ -196,7 +196,7 @@
f.Visible = False
f.Show()
If Not Preview And Not Design Then f.Visible = False
f.Mahnungg(Stufe, reportnr, Behandlungsnr, "", i, True, Fakturanr, buchen, Preview, Design)
f.Mahnungg(Stufe, reportnr, Behandlungsnr, "", i, True, Fakturanr, buchen, Preview, Design, asPDF)
If Not Preview Then f.Close()
If Design Then f.Close()
If anzahlraten > 1 And i < 2 And Folgeauswertung > 0 Then
@ -226,6 +226,8 @@
If Preview = False And Design = False Then
Dim pdfh As New clspdfhelper
pdfh.Create_Archivdoc(clspdfhelper.GetEmpfaengerType.FromFaktura, Fakturanr, "Mahnung:")
pdfh.HandlePDF(asPDF, False, False, clsMailClient.EmpfangerFrom.Behandlung, Fakturanr)
pdfh = Nothing
pdfh = Nothing
End If

@ -8,7 +8,7 @@
<OutputType>WinExe</OutputType>
<StartupObject>DPM2016.Program</StartupObject>
<RootNamespace>DPM2016</RootNamespace>
<AssemblyName>PADM</AssemblyName>
<AssemblyName>DPM</AssemblyName>
<FileAlignment>512</FileAlignment>
<MyType>WindowsFormsWithCustomSubMain</MyType>
<TargetFrameworkVersion>v4.6</TargetFrameworkVersion>
@ -37,7 +37,7 @@
<DefineDebug>true</DefineDebug>
<DefineTrace>true</DefineTrace>
<OutputPath>bin\Debug\</OutputPath>
<DocumentationFile>PADM.xml</DocumentationFile>
<DocumentationFile>DPM.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
<Prefer32Bit>false</Prefer32Bit>
</PropertyGroup>
@ -48,7 +48,7 @@
<DefineTrace>true</DefineTrace>
<Optimize>true</Optimize>
<OutputPath>bin\Release\</OutputPath>
<DocumentationFile>PADM.xml</DocumentationFile>
<DocumentationFile>DPM.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
<Prefer32Bit>false</Prefer32Bit>
</PropertyGroup>
@ -65,7 +65,7 @@
<OptionInfer>On</OptionInfer>
</PropertyGroup>
<PropertyGroup>
<ApplicationIcon>PADM.ico</ApplicationIcon>
<ApplicationIcon>DPMNeu.ico</ApplicationIcon>
</PropertyGroup>
<PropertyGroup>
<ApplicationManifest>My Project\app.manifest</ApplicationManifest>

@ -893,7 +893,7 @@ Public Class clsDB
Dim faelligkeit As Date
Dim mahngebuehr As Double
mahndatum = daten.Rows(0).Item("Mahndatum")
mahndatum = Now()
faelligkeit = daten.Rows(0).Item("Mahnfaelligkeit")
mahngebuehr = daten.Rows(0).Item("mahnzuschlag")
Select Case Stufe

@ -88,7 +88,7 @@ Partial Class Finanzen
Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
Me.ToolStrip1.Name = "ToolStrip1"
Me.ToolStrip1.Size = New System.Drawing.Size(990, 25)
Me.ToolStrip1.Size = New System.Drawing.Size(1320, 25)
Me.ToolStrip1.TabIndex = 0
Me.ToolStrip1.Text = "ToolStrip1"
'
@ -108,25 +108,29 @@ Partial Class Finanzen
Me.GrpZahlung.Controls.Add(Me.lblRechnungsnummer)
Me.GrpZahlung.Dock = System.Windows.Forms.DockStyle.Left
Me.GrpZahlung.Location = New System.Drawing.Point(0, 25)
Me.GrpZahlung.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.GrpZahlung.Name = "GrpZahlung"
Me.GrpZahlung.Size = New System.Drawing.Size(431, 562)
Me.GrpZahlung.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.GrpZahlung.Size = New System.Drawing.Size(575, 697)
Me.GrpZahlung.TabIndex = 1
Me.GrpZahlung.TabStop = False
Me.GrpZahlung.Text = "Zahlung"
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(309, 30)
Me.Button1.Location = New System.Drawing.Point(412, 37)
Me.Button1.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(15, 23)
Me.Button1.Size = New System.Drawing.Size(20, 28)
Me.Button1.TabIndex = 20
Me.Button1.UseVisualStyleBackColor = True
'
'btnBuchen
'
Me.btnBuchen.Location = New System.Drawing.Point(22, 165)
Me.btnBuchen.Location = New System.Drawing.Point(29, 203)
Me.btnBuchen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.btnBuchen.Name = "btnBuchen"
Me.btnBuchen.Size = New System.Drawing.Size(75, 23)
Me.btnBuchen.Size = New System.Drawing.Size(100, 28)
Me.btnBuchen.TabIndex = 19
Me.btnBuchen.Text = "Buchen"
Me.btnBuchen.UseVisualStyleBackColor = True
@ -134,18 +138,20 @@ Partial Class Finanzen
'chkVorauszahlung
'
Me.chkVorauszahlung.AutoSize = True
Me.chkVorauszahlung.Location = New System.Drawing.Point(147, 139)
Me.chkVorauszahlung.Location = New System.Drawing.Point(196, 171)
Me.chkVorauszahlung.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.chkVorauszahlung.Name = "chkVorauszahlung"
Me.chkVorauszahlung.Size = New System.Drawing.Size(15, 14)
Me.chkVorauszahlung.Size = New System.Drawing.Size(18, 17)
Me.chkVorauszahlung.TabIndex = 18
Me.chkVorauszahlung.UseVisualStyleBackColor = True
'
'lblVorauszahlung
'
Me.lblVorauszahlung.AutoSize = True
Me.lblVorauszahlung.Location = New System.Drawing.Point(20, 139)
Me.lblVorauszahlung.Location = New System.Drawing.Point(27, 171)
Me.lblVorauszahlung.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.lblVorauszahlung.Name = "lblVorauszahlung"
Me.lblVorauszahlung.Size = New System.Drawing.Size(77, 13)
Me.lblVorauszahlung.Size = New System.Drawing.Size(103, 17)
Me.lblVorauszahlung.TabIndex = 17
Me.lblVorauszahlung.Text = "Vorauszahlung"
'
@ -153,9 +159,10 @@ Partial Class Finanzen
'
Me.cbboxKonto.Dataselection = Nothing
Me.cbboxKonto.Displaymember = Nothing
Me.cbboxKonto.Location = New System.Drawing.Point(147, 109)
Me.cbboxKonto.Location = New System.Drawing.Point(196, 134)
Me.cbboxKonto.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.cbboxKonto.Name = "cbboxKonto"
Me.cbboxKonto.Size = New System.Drawing.Size(177, 21)
Me.cbboxKonto.Size = New System.Drawing.Size(235, 24)
Me.cbboxKonto.TabIndex = 15
Me.cbboxKonto.Table = Nothing
Me.cbboxKonto.TableAlias = ""
@ -164,18 +171,20 @@ Partial Class Finanzen
'lblKonto
'
Me.lblKonto.AutoSize = True
Me.lblKonto.Location = New System.Drawing.Point(20, 112)
Me.lblKonto.Location = New System.Drawing.Point(27, 138)
Me.lblKonto.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.lblKonto.Name = "lblKonto"
Me.lblKonto.Size = New System.Drawing.Size(66, 13)
Me.lblKonto.Size = New System.Drawing.Size(86, 17)
Me.lblKonto.TabIndex = 16
Me.lblKonto.Text = "Gegenkonto"
'
'lblBetrag
'
Me.lblBetrag.AutoSize = True
Me.lblBetrag.Location = New System.Drawing.Point(20, 87)
Me.lblBetrag.Location = New System.Drawing.Point(27, 107)
Me.lblBetrag.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.lblBetrag.Name = "lblBetrag"
Me.lblBetrag.Size = New System.Drawing.Size(38, 13)
Me.lblBetrag.Size = New System.Drawing.Size(50, 17)
Me.lblBetrag.TabIndex = 11
Me.lblBetrag.Text = "Betrag"
'
@ -188,18 +197,20 @@ Partial Class Finanzen
Me.diBetrag.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square
Me.diBetrag.ButtonFreeText.Shortcut = DevComponents.DotNetBar.eShortcut.F2
Me.diBetrag.Increment = 1.0R
Me.diBetrag.Location = New System.Drawing.Point(147, 81)
Me.diBetrag.Location = New System.Drawing.Point(196, 100)
Me.diBetrag.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.diBetrag.Name = "diBetrag"
Me.diBetrag.ShowUpDown = True
Me.diBetrag.Size = New System.Drawing.Size(86, 20)
Me.diBetrag.Size = New System.Drawing.Size(115, 22)
Me.diBetrag.TabIndex = 10
'
'lbldatum
'
Me.lbldatum.AutoSize = True
Me.lbldatum.Location = New System.Drawing.Point(20, 62)
Me.lbldatum.Location = New System.Drawing.Point(27, 76)
Me.lbldatum.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.lbldatum.Name = "lbldatum"
Me.lbldatum.Size = New System.Drawing.Size(38, 13)
Me.lbldatum.Size = New System.Drawing.Size(49, 17)
Me.lbldatum.TabIndex = 3
Me.lbldatum.Text = "Datum"
'
@ -213,7 +224,8 @@ Partial Class Finanzen
Me.dtdatum.ButtonDropDown.Shortcut = DevComponents.DotNetBar.eShortcut.AltDown
Me.dtdatum.ButtonDropDown.Visible = True
Me.dtdatum.IsPopupCalendarOpen = False
Me.dtdatum.Location = New System.Drawing.Point(147, 55)
Me.dtdatum.Location = New System.Drawing.Point(196, 68)
Me.dtdatum.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
'
'
'
@ -244,23 +256,25 @@ Partial Class Finanzen
Me.dtdatum.MonthCalendar.NavigationBackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square
Me.dtdatum.MonthCalendar.TodayButtonVisible = True
Me.dtdatum.Name = "dtdatum"
Me.dtdatum.Size = New System.Drawing.Size(177, 20)
Me.dtdatum.Size = New System.Drawing.Size(236, 22)
Me.dtdatum.Style = DevComponents.DotNetBar.eDotNetBarStyle.StyleManagerControlled
Me.dtdatum.TabIndex = 2
'
'txtRGNummer
'
Me.txtRGNummer.Location = New System.Drawing.Point(147, 32)
Me.txtRGNummer.Location = New System.Drawing.Point(196, 39)
Me.txtRGNummer.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.txtRGNummer.Name = "txtRGNummer"
Me.txtRGNummer.Size = New System.Drawing.Size(161, 20)
Me.txtRGNummer.Size = New System.Drawing.Size(213, 22)
Me.txtRGNummer.TabIndex = 1
'
'lblRechnungsnummer
'
Me.lblRechnungsnummer.AutoSize = True
Me.lblRechnungsnummer.Location = New System.Drawing.Point(20, 35)
Me.lblRechnungsnummer.Location = New System.Drawing.Point(27, 43)
Me.lblRechnungsnummer.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.lblRechnungsnummer.Name = "lblRechnungsnummer"
Me.lblRechnungsnummer.Size = New System.Drawing.Size(99, 13)
Me.lblRechnungsnummer.Size = New System.Drawing.Size(131, 17)
Me.lblRechnungsnummer.TabIndex = 0
Me.lblRechnungsnummer.Text = "Rechnungsnummer"
'
@ -268,9 +282,11 @@ Partial Class Finanzen
'
Me.GrpZahlungen.Controls.Add(Me.C1Zahlungen)
Me.GrpZahlungen.Dock = System.Windows.Forms.DockStyle.Top
Me.GrpZahlungen.Location = New System.Drawing.Point(431, 25)
Me.GrpZahlungen.Location = New System.Drawing.Point(575, 25)
Me.GrpZahlungen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.GrpZahlungen.Name = "GrpZahlungen"
Me.GrpZahlungen.Size = New System.Drawing.Size(559, 247)
Me.GrpZahlungen.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.GrpZahlungen.Size = New System.Drawing.Size(745, 304)
Me.GrpZahlungen.TabIndex = 2
Me.GrpZahlungen.TabStop = False
Me.GrpZahlungen.Text = "Verbuchte Zahlungen"
@ -283,13 +299,14 @@ Partial Class Finanzen
Me.C1Zahlungen.FilterBar = True
Me.C1Zahlungen.GroupByCaption = "Drag a column header here to group by that column"
Me.C1Zahlungen.Images.Add(CType(resources.GetObject("C1Zahlungen.Images"), System.Drawing.Image))
Me.C1Zahlungen.Location = New System.Drawing.Point(3, 16)
Me.C1Zahlungen.Location = New System.Drawing.Point(4, 19)
Me.C1Zahlungen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.C1Zahlungen.Name = "C1Zahlungen"
Me.C1Zahlungen.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.C1Zahlungen.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.C1Zahlungen.PreviewInfo.ZoomFactor = 75.0R
Me.C1Zahlungen.PrintInfo.PageSettings = CType(resources.GetObject("C1Zahlungen.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.C1Zahlungen.Size = New System.Drawing.Size(553, 228)
Me.C1Zahlungen.Size = New System.Drawing.Size(737, 281)
Me.C1Zahlungen.TabIndex = 3
Me.C1Zahlungen.Text = "C1TrueDBGrid1"
Me.C1Zahlungen.PropBag = resources.GetString("C1Zahlungen.PropBag")
@ -299,33 +316,35 @@ Partial Class Finanzen
Me.ContextMenuStrip2.ImageScalingSize = New System.Drawing.Size(20, 20)
Me.ContextMenuStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ZahlungStornierenToolStripMenuItem, Me.VorauszahlungAnBehandlungZuweisenToolStripMenuItem, Me.VorauszahlungVonBehandlungLösenToolStripMenuItem})
Me.ContextMenuStrip2.Name = "ContextMenuStrip2"
Me.ContextMenuStrip2.Size = New System.Drawing.Size(286, 70)
Me.ContextMenuStrip2.Size = New System.Drawing.Size(342, 76)
'
'ZahlungStornierenToolStripMenuItem
'
Me.ZahlungStornierenToolStripMenuItem.Name = "ZahlungStornierenToolStripMenuItem"
Me.ZahlungStornierenToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
Me.ZahlungStornierenToolStripMenuItem.Size = New System.Drawing.Size(341, 24)
Me.ZahlungStornierenToolStripMenuItem.Text = "&Zahlung stornieren"
'
'VorauszahlungAnBehandlungZuweisenToolStripMenuItem
'
Me.VorauszahlungAnBehandlungZuweisenToolStripMenuItem.Name = "VorauszahlungAnBehandlungZuweisenToolStripMenuItem"
Me.VorauszahlungAnBehandlungZuweisenToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
Me.VorauszahlungAnBehandlungZuweisenToolStripMenuItem.Size = New System.Drawing.Size(341, 24)
Me.VorauszahlungAnBehandlungZuweisenToolStripMenuItem.Text = "Vorauszahlung an Behandlung zuweisen"
'
'VorauszahlungVonBehandlungLösenToolStripMenuItem
'
Me.VorauszahlungVonBehandlungLösenToolStripMenuItem.Name = "VorauszahlungVonBehandlungLösenToolStripMenuItem"
Me.VorauszahlungVonBehandlungLösenToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
Me.VorauszahlungVonBehandlungLösenToolStripMenuItem.Size = New System.Drawing.Size(341, 24)
Me.VorauszahlungVonBehandlungLösenToolStripMenuItem.Text = "Vorauszahlung von Behandlung lösen"
'
'GrpBehandlungen
'
Me.GrpBehandlungen.Controls.Add(Me.C1OffeneRechnungen)
Me.GrpBehandlungen.Dock = System.Windows.Forms.DockStyle.Top
Me.GrpBehandlungen.Location = New System.Drawing.Point(431, 272)
Me.GrpBehandlungen.Location = New System.Drawing.Point(575, 329)
Me.GrpBehandlungen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.GrpBehandlungen.Name = "GrpBehandlungen"
Me.GrpBehandlungen.Size = New System.Drawing.Size(559, 174)
Me.GrpBehandlungen.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.GrpBehandlungen.Size = New System.Drawing.Size(745, 214)
Me.GrpBehandlungen.TabIndex = 3
Me.GrpBehandlungen.TabStop = False
Me.GrpBehandlungen.Text = "Offene Rechnungen"
@ -338,13 +357,14 @@ Partial Class Finanzen
Me.C1OffeneRechnungen.FilterBar = True
Me.C1OffeneRechnungen.GroupByCaption = "Drag a column header here to group by that column"
Me.C1OffeneRechnungen.Images.Add(CType(resources.GetObject("C1OffeneRechnungen.Images"), System.Drawing.Image))
Me.C1OffeneRechnungen.Location = New System.Drawing.Point(3, 16)
Me.C1OffeneRechnungen.Location = New System.Drawing.Point(4, 19)
Me.C1OffeneRechnungen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.C1OffeneRechnungen.Name = "C1OffeneRechnungen"
Me.C1OffeneRechnungen.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.C1OffeneRechnungen.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.C1OffeneRechnungen.PreviewInfo.ZoomFactor = 75.0R
Me.C1OffeneRechnungen.PrintInfo.PageSettings = CType(resources.GetObject("C1OffeneRechnungen.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.C1OffeneRechnungen.Size = New System.Drawing.Size(553, 155)
Me.C1OffeneRechnungen.Size = New System.Drawing.Size(737, 191)
Me.C1OffeneRechnungen.TabIndex = 4
Me.C1OffeneRechnungen.Text = "C1OffeneRechnungen"
Me.C1OffeneRechnungen.PropBag = resources.GetString("C1OffeneRechnungen.PropBag")
@ -354,30 +374,30 @@ Partial Class Finanzen
Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ZahlungBuchenToolStripMenuItem, Me.ErsteMahnungMenuItem, Me.ZweiteMahnungMenuItem, Me.LetzteMahnungMenuItem})
Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
Me.ContextMenuStrip1.Size = New System.Drawing.Size(201, 92)
Me.ContextMenuStrip1.Size = New System.Drawing.Size(211, 128)
'
'ZahlungBuchenToolStripMenuItem
'
Me.ZahlungBuchenToolStripMenuItem.Name = "ZahlungBuchenToolStripMenuItem"
Me.ZahlungBuchenToolStripMenuItem.Size = New System.Drawing.Size(200, 22)
Me.ZahlungBuchenToolStripMenuItem.Size = New System.Drawing.Size(210, 24)
Me.ZahlungBuchenToolStripMenuItem.Text = "&Zahlung buchen"
'
'ErsteMahnungMenuItem
'
Me.ErsteMahnungMenuItem.Name = "ErsteMahnungMenuItem"
Me.ErsteMahnungMenuItem.Size = New System.Drawing.Size(200, 22)
Me.ErsteMahnungMenuItem.Text = "Erste Mahnung drucken"
Me.ErsteMahnungMenuItem.Size = New System.Drawing.Size(210, 24)
Me.ErsteMahnungMenuItem.Text = "Erste Mahnung"
'
'ZweiteMahnungMenuItem
'
Me.ZweiteMahnungMenuItem.Name = "ZweiteMahnungMenuItem"
Me.ZweiteMahnungMenuItem.Size = New System.Drawing.Size(200, 22)
Me.ZweiteMahnungMenuItem.Size = New System.Drawing.Size(210, 24)
Me.ZweiteMahnungMenuItem.Text = "Zweite Mahnung"
'
'LetzteMahnungMenuItem
'
Me.LetzteMahnungMenuItem.Name = "LetzteMahnungMenuItem"
Me.LetzteMahnungMenuItem.Size = New System.Drawing.Size(200, 22)
Me.LetzteMahnungMenuItem.Size = New System.Drawing.Size(210, 24)
Me.LetzteMahnungMenuItem.Text = "Letzte Mahnung"
'
'GroupBox1
@ -402,36 +422,41 @@ Partial Class Finanzen
Me.GroupBox1.Controls.Add(Me.Label2)
Me.GroupBox1.Controls.Add(Me.Label1)
Me.GroupBox1.Dock = System.Windows.Forms.DockStyle.Fill
Me.GroupBox1.Location = New System.Drawing.Point(431, 446)
Me.GroupBox1.Location = New System.Drawing.Point(575, 543)
Me.GroupBox1.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(559, 141)
Me.GroupBox1.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.GroupBox1.Size = New System.Drawing.Size(745, 179)
Me.GroupBox1.TabIndex = 4
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Mahnungen"
'
'btnzurücksetzen3
'
Me.btnzurücksetzen3.Location = New System.Drawing.Point(379, 85)
Me.btnzurücksetzen3.Location = New System.Drawing.Point(505, 105)
Me.btnzurücksetzen3.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.btnzurücksetzen3.Name = "btnzurücksetzen3"
Me.btnzurücksetzen3.Size = New System.Drawing.Size(98, 23)
Me.btnzurücksetzen3.Size = New System.Drawing.Size(131, 28)
Me.btnzurücksetzen3.TabIndex = 18
Me.btnzurücksetzen3.Text = "Zurücksetzen"
Me.btnzurücksetzen3.UseVisualStyleBackColor = True
'
'btnzurücksetzen2
'
Me.btnzurücksetzen2.Location = New System.Drawing.Point(379, 62)
Me.btnzurücksetzen2.Location = New System.Drawing.Point(505, 76)
Me.btnzurücksetzen2.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.btnzurücksetzen2.Name = "btnzurücksetzen2"
Me.btnzurücksetzen2.Size = New System.Drawing.Size(98, 23)
Me.btnzurücksetzen2.Size = New System.Drawing.Size(131, 28)
Me.btnzurücksetzen2.TabIndex = 17
Me.btnzurücksetzen2.Text = "Zurücksetzen"
Me.btnzurücksetzen2.UseVisualStyleBackColor = True
'
'btnZurücksetzen1
'
Me.btnZurücksetzen1.Location = New System.Drawing.Point(379, 39)
Me.btnZurücksetzen1.Location = New System.Drawing.Point(505, 48)
Me.btnZurücksetzen1.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.btnZurücksetzen1.Name = "btnZurücksetzen1"
Me.btnZurücksetzen1.Size = New System.Drawing.Size(98, 23)
Me.btnZurücksetzen1.Size = New System.Drawing.Size(131, 28)
Me.btnZurücksetzen1.TabIndex = 16
Me.btnZurücksetzen1.Text = "Zurücksetzen"
Me.btnZurücksetzen1.UseVisualStyleBackColor = True
@ -439,108 +464,120 @@ Partial Class Finanzen
'Label10
'
Me.Label10.AutoSize = True
Me.Label10.Location = New System.Drawing.Point(7, 90)
Me.Label10.Location = New System.Drawing.Point(9, 111)
Me.Label10.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(13, 13)
Me.Label10.Size = New System.Drawing.Size(16, 17)
Me.Label10.TabIndex = 15
Me.Label10.Text = "3"
'
'Mahngebühr3
'
Me.Mahngebühr3.AutoSize = True
Me.Mahngebühr3.Location = New System.Drawing.Point(292, 90)
Me.Mahngebühr3.Location = New System.Drawing.Point(389, 111)
Me.Mahngebühr3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Mahngebühr3.Name = "Mahngebühr3"
Me.Mahngebühr3.Size = New System.Drawing.Size(39, 13)
Me.Mahngebühr3.Size = New System.Drawing.Size(51, 17)
Me.Mahngebühr3.TabIndex = 14
Me.Mahngebühr3.Text = "Label8"
'
'Mahnfaelligkeit3
'
Me.Mahnfaelligkeit3.AutoSize = True
Me.Mahnfaelligkeit3.Location = New System.Drawing.Point(175, 89)
Me.Mahnfaelligkeit3.Location = New System.Drawing.Point(233, 110)
Me.Mahnfaelligkeit3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Mahnfaelligkeit3.Name = "Mahnfaelligkeit3"
Me.Mahnfaelligkeit3.Size = New System.Drawing.Size(45, 13)
Me.Mahnfaelligkeit3.Size = New System.Drawing.Size(59, 17)
Me.Mahnfaelligkeit3.TabIndex = 13
Me.Mahnfaelligkeit3.Text = "Label12"
'
'Mahndatum3
'
Me.Mahndatum3.AutoSize = True
Me.Mahndatum3.Location = New System.Drawing.Point(77, 89)
Me.Mahndatum3.Location = New System.Drawing.Point(103, 110)
Me.Mahndatum3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Mahndatum3.Name = "Mahndatum3"
Me.Mahndatum3.Size = New System.Drawing.Size(39, 13)
Me.Mahndatum3.Size = New System.Drawing.Size(51, 17)
Me.Mahndatum3.TabIndex = 12
Me.Mahndatum3.Text = "Label5"
'
'Label9
'
Me.Label9.AutoSize = True
Me.Label9.Location = New System.Drawing.Point(7, 67)
Me.Label9.Location = New System.Drawing.Point(9, 82)
Me.Label9.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(13, 13)
Me.Label9.Size = New System.Drawing.Size(16, 17)
Me.Label9.TabIndex = 11
Me.Label9.Text = "2"
'
'Mahngebühr2
'
Me.Mahngebühr2.AutoSize = True
Me.Mahngebühr2.Location = New System.Drawing.Point(292, 67)
Me.Mahngebühr2.Location = New System.Drawing.Point(389, 82)
Me.Mahngebühr2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Mahngebühr2.Name = "Mahngebühr2"
Me.Mahngebühr2.Size = New System.Drawing.Size(39, 13)
Me.Mahngebühr2.Size = New System.Drawing.Size(51, 17)
Me.Mahngebühr2.TabIndex = 10
Me.Mahngebühr2.Text = "Label8"
'
'Mahnfaelligkeit2
'
Me.Mahnfaelligkeit2.AutoSize = True
Me.Mahnfaelligkeit2.Location = New System.Drawing.Point(175, 66)
Me.Mahnfaelligkeit2.Location = New System.Drawing.Point(233, 81)
Me.Mahnfaelligkeit2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Mahnfaelligkeit2.Name = "Mahnfaelligkeit2"
Me.Mahnfaelligkeit2.Size = New System.Drawing.Size(39, 13)
Me.Mahnfaelligkeit2.Size = New System.Drawing.Size(51, 17)
Me.Mahnfaelligkeit2.TabIndex = 9
Me.Mahnfaelligkeit2.Text = "Label7"
'
'Mahndatum2
'
Me.Mahndatum2.AutoSize = True
Me.Mahndatum2.Location = New System.Drawing.Point(77, 66)
Me.Mahndatum2.Location = New System.Drawing.Point(103, 81)
Me.Mahndatum2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Mahndatum2.Name = "Mahndatum2"
Me.Mahndatum2.Size = New System.Drawing.Size(39, 13)
Me.Mahndatum2.Size = New System.Drawing.Size(51, 17)
Me.Mahndatum2.TabIndex = 8
Me.Mahndatum2.Text = "Label5"
'
'Mahngebühr1
'
Me.Mahngebühr1.AutoSize = True
Me.Mahngebühr1.Location = New System.Drawing.Point(292, 44)
Me.Mahngebühr1.Location = New System.Drawing.Point(389, 54)
Me.Mahngebühr1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Mahngebühr1.Name = "Mahngebühr1"
Me.Mahngebühr1.Size = New System.Drawing.Size(39, 13)
Me.Mahngebühr1.Size = New System.Drawing.Size(51, 17)
Me.Mahngebühr1.TabIndex = 7
Me.Mahngebühr1.Text = "Label8"
'
'Mahnfaelligkeit1
'
Me.Mahnfaelligkeit1.AutoSize = True
Me.Mahnfaelligkeit1.Location = New System.Drawing.Point(175, 44)
Me.Mahnfaelligkeit1.Location = New System.Drawing.Point(233, 54)
Me.Mahnfaelligkeit1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Mahnfaelligkeit1.Name = "Mahnfaelligkeit1"
Me.Mahnfaelligkeit1.Size = New System.Drawing.Size(39, 13)
Me.Mahnfaelligkeit1.Size = New System.Drawing.Size(51, 17)
Me.Mahnfaelligkeit1.TabIndex = 6
Me.Mahnfaelligkeit1.Text = "Label7"
'
'Label6
'
Me.Label6.AutoSize = True
Me.Label6.Location = New System.Drawing.Point(7, 44)
Me.Label6.Location = New System.Drawing.Point(9, 54)
Me.Label6.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(13, 13)
Me.Label6.Size = New System.Drawing.Size(16, 17)
Me.Label6.TabIndex = 5
Me.Label6.Text = "1"
'
'Mahndatum1
'
Me.Mahndatum1.AutoSize = True
Me.Mahndatum1.Location = New System.Drawing.Point(77, 44)
Me.Mahndatum1.Location = New System.Drawing.Point(103, 54)
Me.Mahndatum1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Mahndatum1.Name = "Mahndatum1"
Me.Mahndatum1.Size = New System.Drawing.Size(39, 13)
Me.Mahndatum1.Size = New System.Drawing.Size(51, 17)
Me.Mahndatum1.TabIndex = 4
Me.Mahndatum1.Text = "Label5"
'
@ -548,9 +585,10 @@ Partial Class Finanzen
'
Me.Label4.AutoSize = True
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label4.Location = New System.Drawing.Point(7, 16)
Me.Label4.Location = New System.Drawing.Point(9, 20)
Me.Label4.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(37, 13)
Me.Label4.Size = New System.Drawing.Size(46, 17)
Me.Label4.TabIndex = 3
Me.Label4.Text = "Stufe"
'
@ -558,9 +596,10 @@ Partial Class Finanzen
'
Me.Label3.AutoSize = True
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label3.Location = New System.Drawing.Point(292, 16)
Me.Label3.Location = New System.Drawing.Point(389, 20)
Me.Label3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(77, 13)
Me.Label3.Size = New System.Drawing.Size(98, 17)
Me.Label3.TabIndex = 2
Me.Label3.Text = "Mahngebühr"
'
@ -568,9 +607,10 @@ Partial Class Finanzen
'
Me.Label2.AutoSize = True
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label2.Location = New System.Drawing.Point(175, 16)
Me.Label2.Location = New System.Drawing.Point(233, 20)
Me.Label2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(86, 13)
Me.Label2.Size = New System.Drawing.Size(108, 17)
Me.Label2.TabIndex = 1
Me.Label2.Text = "Mahnfälligkeit"
'
@ -578,23 +618,25 @@ Partial Class Finanzen
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(77, 16)
Me.Label1.Location = New System.Drawing.Point(103, 20)
Me.Label1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(72, 13)
Me.Label1.Size = New System.Drawing.Size(91, 17)
Me.Label1.TabIndex = 0
Me.Label1.Text = "Mahndatum"
'
'Finanzen
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Controls.Add(Me.GroupBox1)
Me.Controls.Add(Me.GrpBehandlungen)
Me.Controls.Add(Me.GrpZahlungen)
Me.Controls.Add(Me.GrpZahlung)
Me.Controls.Add(Me.ToolStrip1)
Me.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
Me.Name = "Finanzen"
Me.Size = New System.Drawing.Size(990, 587)
Me.Size = New System.Drawing.Size(1320, 722)
Me.GrpZahlung.ResumeLayout(False)
Me.GrpZahlung.PerformLayout()
CType(Me.diBetrag, System.ComponentModel.ISupportInitialize).EndInit()

@ -127,7 +127,7 @@
<data name="C1Zahlungen.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
@ -161,7 +161,7 @@
</value>
</data>
<data name="C1Zahlungen.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;Style11{}Style10{}Style13{}Style12{}Footer{}Style2{}Style3{}FilterBar{BackColor:Info;}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Caption{AlignHorz:Center;}Style14{}Style4{}EvenRow{BackColor:White;}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style1{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Style9{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style5{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style8{}Heading{Wrap:True;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style6{}Style7{}Editor{}Style15{}Normal{}Style16{}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 551, 226&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 551, 226&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;Style16{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style14{}Footer{}Style5{}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style6{}Editor{}Style10{}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style2{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="21" DefRecSelWidth="21" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 735, 279&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;21&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 735, 279&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>124, 17</value>
@ -169,7 +169,7 @@
<data name="C1OffeneRechnungen.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
@ -203,6 +203,6 @@
</value>
</data>
<data name="C1OffeneRechnungen.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;Style11{}Style10{}Style13{}Style12{}Footer{}Style2{}Style3{}FilterBar{BackColor:Info;}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Caption{AlignHorz:Center;}Style14{}Style4{}EvenRow{BackColor:White;}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style1{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Style9{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style5{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style8{}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;BackColor:Control;ForeColor:ControlText;}Style6{}Style7{}Editor{}Style15{}Normal{}Style16{}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 551, 153&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 551, 153&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;Style16{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:ControlLight;}Style14{}Footer{}Style5{}Heading{ForeColor:ControlText;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style6{}Editor{}Style10{}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style2{}FilterBar{BackColor:Info;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="21" DefRecSelWidth="21" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FilterWatermarkStyle parent="FilterWatermark" me="Style14" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 735, 189&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="FilterBar" me="FilterWatermark" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;21&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 735, 189&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style15" /&gt;&lt;PrintPageFooterStyle parent="" me="Style16" /&gt;&lt;/Blob&gt;</value>
</data>
</root>

@ -142,7 +142,7 @@ Public Class Finanzen
Me.dtdatum.Value = Now
Me.txtRGNummer.Text = Me.C1OffeneRechnungen.Columns("nrfaktura").Value
Me.diBetrag.Value = Me.C1OffeneRechnungen.Columns("Betrag").Value
get_mahndaten
Get_Mahndaten()
Catch ex As Exception
End Try
@ -331,8 +331,8 @@ Public Class Finanzen
Dim db As New clsDB
Try
db.Get_Tabledata("Mahnung", "", "Select * from View_Offene_Mahnungen where nrfaktura=" + Me.C1OffeneRechnungen.Columns("nrfaktura").Value.ToString, "", False)
If DB.dsDaten.Tables(0).Rows.Count > 0 Then
Select Case DB.dsDaten.Tables(0).Rows(0).Item("Mahnstufe")
If db.dsDaten.Tables(0).Rows.Count > 0 Then
Select Case db.dsDaten.Tables(0).Rows(0).Item("Mahnstufe")
Case 1
ErsteMahnungMenuItem.Visible = True
Case 2
@ -352,15 +352,15 @@ Public Class Finanzen
Select Case sender.name
Case "ErsteMahnungMenuItem"
Dim s As String = Me.C1OffeneRechnungen.Columns("nrfaktura").Value.ToString
Globals.Rg_Funktionen.Mahnung(s, 1, False, False)
Globals.Rg_Funktionen.Mahnung(s, 1, False, False, True)
Refresh_Data()
Case "ZweiteMahnungMenuItem"
Dim s As String = Me.C1OffeneRechnungen.Columns("nrfaktura").Value.ToString
Globals.Rg_Funktionen.Mahnung(s, 2, False, False)
Globals.Rg_Funktionen.Mahnung(s, 2, False, False, True)
Refresh_Data()
Case "LetzteMahnungMenuItem"
Dim s As String = Me.C1OffeneRechnungen.Columns("nrfaktura").Value.ToString
Globals.Rg_Funktionen.Mahnung(s, 3, False, False)
Globals.Rg_Funktionen.Mahnung(s, 3, False, False, True)
Refresh_Data()
End Select
Catch ex As Exception

@ -39,6 +39,9 @@ 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()
@ -55,9 +58,6 @@ Partial Class Patient
Me.SuperTabControlPanel6 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.Recall1 = New DPM2016.Recall()
Me.Recall = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel5 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.Finanzen1 = New DPM2016.Finanzen()
Me.Finanzen = New DevComponents.DotNetBar.SuperTabItem()
Me.SuperTabControlPanel3 = New DevComponents.DotNetBar.SuperTabControlPanel()
Me.Behandlung1 = New DPM2016.Behandlung()
Me.Behandlungen = New DevComponents.DotNetBar.SuperTabItem()
@ -71,12 +71,12 @@ Partial Class Patient
Me.ToolStrip1.SuspendLayout()
CType(Me.SuperTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuperTabControl1.SuspendLayout()
Me.SuperTabControlPanel5.SuspendLayout()
Me.SuperTabControlPanel1.SuspendLayout()
Me.SuperTabControlPanel8.SuspendLayout()
Me.SuperTabControlPanel4.SuspendLayout()
Me.SuperTabControlPanel7.SuspendLayout()
Me.SuperTabControlPanel6.SuspendLayout()
Me.SuperTabControlPanel5.SuspendLayout()
Me.SuperTabControlPanel3.SuspendLayout()
Me.SuperTabControlPanel2.SuspendLayout()
Me.MenuStrip1.SuspendLayout()
@ -228,11 +228,11 @@ 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.SuperTabControlPanel4)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel7)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel6)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel5)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel3)
Me.SuperTabControl1.Controls.Add(Me.SuperTabControlPanel2)
Me.SuperTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
@ -248,6 +248,34 @@ Partial Class Patient
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)
@ -401,34 +429,6 @@ Partial Class Patient
Me.Recall.Name = "Recall"
Me.Recall.Text = "Recall"
'
'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, 755)
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, 755)
Me.Finanzen1.TabIndex = 0
'
'Finanzen
'
Me.Finanzen.AttachedControl = Me.SuperTabControlPanel5
Me.Finanzen.GlobalItem = False
Me.Finanzen.Name = "Finanzen"
Me.Finanzen.Text = "Finanzen"
'
'SuperTabControlPanel3
'
Me.SuperTabControlPanel3.Controls.Add(Me.Behandlung1)
@ -544,12 +544,12 @@ 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.SuperTabControlPanel4.ResumeLayout(False)
Me.SuperTabControlPanel7.ResumeLayout(False)
Me.SuperTabControlPanel6.ResumeLayout(False)
Me.SuperTabControlPanel5.ResumeLayout(False)
Me.SuperTabControlPanel3.ResumeLayout(False)
Me.SuperTabControlPanel2.ResumeLayout(False)
Me.MenuStrip1.ResumeLayout(False)

@ -261,7 +261,7 @@
End If
If SuperTabControl1.SelectedTab.Name = "Dokumente" Then
Me.ClsDokumente1.Patientnr = Me.PatientNr
Me.ClsDokumente1.Refreshdata()
Me.ClsDokumente1.refreshdata()
End If
End Sub
@ -357,4 +357,8 @@
Private Sub tstxtsuche_Click(sender As Object, e As EventArgs) Handles tstxtsuche.Click
End Sub
Private Sub Finanzen1_Load(sender As Object, e As EventArgs) Handles Finanzen1.Load
End Sub
End Class

@ -66,19 +66,20 @@ Public Class frmReportView
db.Rechnung_buchen(1, daten.Tables("esdaten").Rows(0).Item("fakturanr"), rate, daten.Tables("behandlungsdaten").Rows(0).Item("nrbehandlung"), Betrag)
End Sub
Public Sub Mahnungg(ByVal Stufe As Integer, ByVal reportnr As String, ByVal nrbehandlung As Integer, ByVal Parameter As String, ByVal rate As Integer, Optional kopie As Integer = 0, Optional fakturanr As Integer = 0, Optional buchen As Boolean = True, Optional Preview As Boolean = False, Optional design As Boolean = False)
Public Sub Mahnungg(ByVal Stufe As Integer, ByVal reportnr As String, ByVal nrbehandlung As Integer, ByVal Parameter As String, ByVal rate As Integer, Optional kopie As Integer = 0, Optional fakturanr As Integer = 0, Optional buchen As Boolean = True, Optional Preview As Boolean = False, Optional design As Boolean = False, Optional aspdf As Boolean = False)
Me.ReportNr = reportnr
Me.Parameter = Parameter
Me.NrBehandlung = nrbehandlung
If Globals.FakturaNr <> 0 Then fakturanr = Globals.FakturaNr
Print_Mahnung(Stufe, Preview, design, rate, 1, fakturanr)
Print_Mahnung(Stufe, Preview, design, rate, 1, fakturanr, aspdf)
If Preview Then Exit Sub
If buchen = False Then Exit Sub
db.Mahnung_Buchen(fakturanr, Stufe, daten.Tables("esdaten"))
' rechnung_buchen(rate, daten.Tables("ESDaten").Rows(0).Item("Nur_Franken") + daten.Tables("ESDaten").Rows(0).Item("Nur_Rappen") / 100)
End Sub
Public Sub Print_Mahnung(ByVal Stufe As Integer, Optional vorschau As Boolean = False, Optional design As Boolean = False, Optional Rate As Integer = 0, Optional kopie As Integer = 0, Optional Fakturanr As Integer = 0)
Public Sub Print_Mahnung(ByVal Stufe As Integer, Optional vorschau As Boolean = False, Optional design As Boolean = False, Optional Rate As Integer = 0, Optional kopie As Integer = 0, Optional Fakturanr As Integer = 0, Optional aspdf As Boolean = False)
If Rate > 1 Then ReportNr = ReportNr + 1
Dim kopien As Integer = 1
@ -243,6 +244,41 @@ Public Class frmReportView
freport.Preview = Me.previewControl1
freport.Show()
End If
If aspdf Then
If aspdf Then
Dim s As String = My.Settings.DocArchivPath + "\" + Now.ToString("yyyyddMMhhmmssfff") + "_" + Me.NrBehandlung.ToString
Dim xpsfilename As String = s + ".xps"
Dim pdffilename As String = s + ".pdf"
Dim imagefilename As String = s + ".jpg"
Dim rtffilename As String = s + ".rtf"
Dim pdfexport As New FastReport.Export.Pdf.PDFExport
pdfexport.ShowProgress = False
pdfexport.Subject = "Export"
pdfexport.Title = "Export"
pdfexport.Compressed = UCase(db.Get_Option(50000)) = "TRUE"
pdfexport.AllowPrint = UCase(db.Get_Option(50002)) = "TRUE"
pdfexport.TextInCurves = UCase(db.Get_Option(50001)) = "TRUE"
'pdfexport.EmbeddingFonts = True
'pdfexport.PdfCompliance = FastReport.Export.Pdf.PDFExport.PdfStandard.PdfX_4
'pdfexport.Compressed = False
'pdfexport.AllowPrint = True
' pdfexport.EmbeddingFonts = True
'pdfexport.TextInCurves = True
'pdfexport.Compressed = True
'pdfexport.PdfCompliance = FastReport.Export.Pdf.PDFExport.PdfStandard.PdfA_2a
freport.Prepare()
freport.Export(pdfexport, s + ".PDF")
'Process.Start(s + ".pdf")
Dim pdfitem As New clspdfcollectionitem(Globals.FakturaNr.ToString, s + ".pdf")
Globals.pdfCollection.Add(pdfitem)
' Globals.pdfCollection.Add(s + ".pdf")
Exit Sub
End If
End If
If vorschau = False And design = False Then
Dim printer As New clsPrinter

@ -142,24 +142,24 @@
<data name="tsbtnSave.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAP4SURBVEhLnZVtbFN1FMaZGl8hzPjJmKDxE2owxkRdlrrb
dl2cOBMlThdHNCQmyId9MaiJUUdkCASKvGSCa6NCO0bSWLe5TKf4EmFCS63QbEAwa9qusoEbay3r7cu9
9/Gc2/svlw4Y2T95crbm3ud3nnNubxeJMzAw8LAsy5dIM9lsNjVy5pyy8cS/kAZDqjT0lyoNBtWV7oC2
cjCJFvewFhsfT8fj8WM9PT0PSZJ0G4tsqkpu1zgej+dR0Ekmk1pR1fDxkTiW7Q1h6c4AlpC4LvecRav3
KDq/8mqZTAZTU1MYGRlRnE6n5HA4lra3t99i2M09LpfrcQG4OFtEa28M9++KoHr7SVRvC6PaeQp2XwKf
7t6H6elpFItFXalUCsFgUHW73e8TZBkluZPs5iSp6urqeoIBfFKygvU/p7DCdQGPfDGJ5fsm8NiXl/CG
Lw7nzl1QVVUXAzhJOp1GIBBQyeNdhjQ1Nd1dmUYHaJpWulHR0BVWYPcqsOwv4tkDRVgPAev84wTYU+6e
RfvSAQLS1tb2qt1uf6CxsfEOM6QMUBQFXL85o+ElH2D1APVewMGA3vPY8lmnblwoFJBIJDA6OopwOIxI
JKL/TeNK1tXVPVVfX39fc3PzrYb/FYDQj2MaVvcC0gFQEsB2EFjTN4Mtu116E0K8A1427yUajSIUCimU
YK3NZnuQALcb/lcn4DGFzqtYN0gJDIC1G2jxZ7B1r0fvniWScM3n8zqMIWS+nlKsqKmpucvwLwHE8ljR
tIaPfqfxkLGNE1B9rU+D09VTnr9ZAspjo/FsoBRPNjQ03GP4lwCXcwouZ2XIuRxOJ2ewaTiP52n2vAeG
tHwPdH7t0424YzbmKv7P0X0GoIP3MAeQllUEE1k4h/7G9p+SeO9wHi/ToiUDsKoP+Nx/BFk5h1mZDAv0
FOVKADavBNB3YrHhf2VEhaKC4KSGzQHgncPA698aAJLDq+Gt73LYfFzFnrCG/tEMJmey5fGwbgjgBXNs
rn/+o+CTo8DbP5QeU4bwqF6gRGt/BT70ncTZ+AW965tOwMZ8saiRiQI6aA+r/EDdfuA52sebQ8AO/zFM
XJwqG4v504tyfoBIITR86hw++OU/vELfiTX9WfQGE+Wu2bhSN5VAPB1Cv504jU3HNfwRzZS7Fp1z16LO
m0AYVwJmZ0uLrHxihLGoCwKIcVSamo35c37pseYFsNm1JIBmCahZNwQII67mm/izyq7NnYs6bwJzxwJW
KTPYLAG9LqC7u/tFs+n1TEStlDkB/aptpZfd07W1tUsM/0VV9B5vjcVi+gUL1djYmC4y32i1Wp+5CmCx
WO6lSBZSB+kQXdC/QB2k+zeURiQt/h8hRTZ62wkMuQAAAABJRU5ErkJggg==
YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAP2SURBVEhLnZVtbFN1FMaZGl8hjPiJmKDxE2owxkRdlrrb
dl2cOBMlThdHNCQmyId9MYgJUUdkCESqwIJgO42sGyNprNtcplNQ48CWUhpoVlg0a9pusoEbay3r6733
8Zzb+y+XDhjZP3lytube53eec25vl4gzMDDwaCaTuUKaTafTiZHwqLz99L+QBv2KNHRGkQZ9ylqHV107
OIEmx7AaHR9PxmIxb09PzyOSJN3FIpuKotsNjsvlehx04vG4WlBUfDwcw6qDASzfewrLSFxXu0bR3HUC
7V93qqlUCtPT0xgZGZHtdrtks9mWt7a23qHbzT9Op/NJAbg8V0BzbxQr94VQuecsKj8LotJ+DlZ3HJ/u
P4SZmRkUCgVNiUQCPp9P6ejo+IAgqyjJvWQ3L0mFw+F4igF8EhkZm48nsMZ5CY99NYXVhybxxDdX8JY7
BvvefVAURRMDOEkymYTX61XI432GNDQ03F+eRgOoqlq8UVbhCMqwdskwHS7g+c4CzEeBTZ5xArSXumfR
vjSAgLS0tLxutVofqq+vv8cIKQFkWQbX7y6oeMUNmF1AbRdgY0DvRez64oBmnM/neZwIh8MIBoMIhULa
336/f6KmpuaZ2traBxsbG+/U/a8BhH4eU7G+F5A6QUkAyxFgQ98sdu13ak0I8Q542byXSCSCQCAgU4KN
FovlYQLcrftfn4DHFLioYNMgJdAB5m6gyZPC7oMurXuWSMI1l8tpMIaQ+WZKsaaqquo+3b8IEMtjRZIq
PvqDxkPGFk5A9Y0+FXZnT2n+Rgkoj43Gs41SPF1XV/eA7l8EXM3KuJrOIJPN4vzELHaczOFFmj3vgSFN
PwIHvnVrRtwxG3MV/2fpPh3QxnuYB0hmFPjjadiH/saeXyaw5VgOr9KiJR2wrg/40jOMdCaLuQwZ5ukp
yhYBbF4OoO/EUt3/2ojyBRn+KRU7TwHvHQPe/F4HkGxdKt75IYudPgXtQRX94RSmZtOl8bBuCeAFc2yu
Z/6R8ckJ4N2fio8pQ3hUL1Gijb8BH7rPYjR2Sev6thOwMV8samgyjzbawzoPUHMYeIH28fYQ8LnHi8nL
0yVjMX96US4MECmETp77C1t//Q+v0XdiQ38avf54qWs2LtdtJRBPh9Dvp89jh0/Fn5FUqWvROXct6oIJ
hHE5YG6uuMjyJ0YYi7oogBhHuanRmD/nlx5rQQCb3UgCaJSAGnVLgDDiaryJPyvv2ti5qAsmMHYsYOUy
go0S0JsCuru7Xzaa3sxE1HIZE9Cv2m562T1bXV29TPdfUkHv8eZoNKpdsFiNjY1pIvPtZrP5uesAJpNp
BUUykdpIR+mC/kXqCN2/rTgiaen/Xd02RBehQoMAAAAASUVORK5CYII=
</value>
</data>
<metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">

@ -25,7 +25,9 @@
<!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
</sharedListeners>
</system.diagnostics>
<startup><supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6" /></startup>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6" />
</startup>
<userSettings>
<DPM2016.My.MySettings>
<setting name="LogLevel" serializeAs="String">
@ -56,7 +58,7 @@
<value>http://192.168.111.67</value>
</setting>
<setting name="SoftwareType" serializeAs="String">
<value>PADM</value>
<value>DPM</value>
</setting>
</DPM2016.My.MySettings>
</userSettings>

@ -1,20 +1,20 @@
<?xml version="1.0" encoding="utf-8"?>
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xrml="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2">
<assemblyIdentity name="PADM.application" version="1.0.0.2" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" xmlns="urn:schemas-microsoft-com:asm.v1" />
<description asmv2:publisher="PADM" asmv2:product="PADM" xmlns="urn:schemas-microsoft-com:asm.v1" />
<assemblyIdentity name="DPM.application" version="1.0.0.2" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" xmlns="urn:schemas-microsoft-com:asm.v1" />
<description asmv2:publisher="DPM" asmv2:product="DPM" xmlns="urn:schemas-microsoft-com:asm.v1" />
<deployment install="true" mapFileExtensions="true" />
<compatibleFrameworks xmlns="urn:schemas-microsoft-com:clickonce.v2">
<framework targetVersion="4.6" profile="Full" supportedRuntime="4.0.30319" />
</compatibleFrameworks>
<dependency>
<dependentAssembly dependencyType="install" codebase="PADM.exe.manifest" size="90978">
<assemblyIdentity name="PADM.exe" version="1.0.0.2" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" type="win32" />
<dependentAssembly dependencyType="install" codebase="DPM.exe.manifest" size="90974">
<assemblyIdentity name="DPM.exe" version="1.0.0.2" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" type="win32" />
<hash>
<dsig:Transforms>
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>iEajZlzvX50g+NuuamiCaVSi2CsN7TaU+Z7RZ1gbtNA=</dsig:DigestValue>
<dsig:DigestValue>8nOiS+q84n7KLg9Pe9Dhu2cEJXROPY7nrwS7tZEQ4JM=</dsig:DigestValue>
</hash>
</dependentAssembly>
</dependency>

@ -0,0 +1,81 @@
<?xml version="1.0" encoding="utf-8"?>
<configuration>
<configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<section name="DPM2016.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
</sectionGroup>
</configSections>
<system.diagnostics>
<sources>
<!-- Dieser Abschnitt definiert die Protokollierungskonfiguration für My.Application.Log -->
<source name="DefaultSource" switchName="DefaultSwitch">
<listeners>
<add name="FileLog" />
<!-- Auskommentierung des nachfolgenden Abschnitts aufheben, um in das Anwendungsereignisprotokoll zu schreiben -->
<!--<add name="EventLog"/>-->
</listeners>
</source>
</sources>
<switches>
<add name="DefaultSwitch" value="Information" />
</switches>
<sharedListeners>
<add name="FileLog" type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL" initializeData="FileLogWriter" />
<!-- Auskommentierung des nachfolgenden Abschnitts aufheben und APPLICATION_NAME durch den Namen der Anwendung ersetzen, um in das Anwendungsereignisprotokoll zu schreiben -->
<!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
</sharedListeners>
</system.diagnostics>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6" />
</startup>
<userSettings>
<DPM2016.My.MySettings>
<setting name="LogLevel" serializeAs="String">
<value>2</value>
</setting>
<setting name="TempPath" serializeAs="String">
<value>h:\dpm\dmp1\dmp2</value>
</setting>
<setting name="DocArchivPath" serializeAs="String">
<value>h:\dpm\docarchiv</value>
</setting>
<setting name="ConnectionString" serializeAs="String">
<value>data source=shu00;initial catalog=SHUB_PADM;persist security info=false;workstation id=;packet size=4096;user id=sa;password=*shu29</value>
</setting>
<setting name="ConnectionStringMobie" serializeAs="String">
<value>data source=shu00;initial catalog=DPM_Mobile;persist security info=false;workstation id=;packet size=4096;user id=sa;password=*shu29</value>
</setting>
<setting name="APIKey" serializeAs="String">
<value>BgWSbwCNM3pEiCxgIlDEyD7HFpUgKPeL8OPDqH9n</value>
</setting>
<setting name="IV" serializeAs="String">
<value>Q.6qYq0_C+mGmymX</value>
</setting>
<setting name="SecretKey" serializeAs="String">
<value>3hba8fOumOPrMG0.G?-mkF-scGOkPwyW</value>
</setting>
<setting name="WebAPI" serializeAs="String">
<value>http://192.168.111.67</value>
</setting>
<setting name="SoftwareType" serializeAs="String">
<value>DPM</value>
</setting>
</DPM2016.My.MySettings>
</userSettings>
<runtime>
<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
<dependentAssembly>
<assemblyIdentity name="DevComponents.DotNetBar2" publicKeyToken="7eb7c3a35b91de04" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-12.9.0.0" newVersion="12.9.0.0" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="Syncfusion.Shared.Base" publicKeyToken="3d67ed1f87d44c89" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-16.2350.0.41" newVersion="16.2350.0.41" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="Newtonsoft.Json" publicKeyToken="30ad4fe6b2a6aeed" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-13.0.0.0" newVersion="13.0.0.0" />
</dependentAssembly>
</assemblyBinding>
</runtime>
</configuration>

@ -1,11 +1,11 @@
<?xml version="1.0" encoding="utf-8"?>
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2">
<asmv1:assemblyIdentity name="PADM.exe" version="1.0.0.2" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" type="win32" />
<description asmv2:iconFile="PADM.ico" xmlns="urn:schemas-microsoft-com:asm.v1" />
<asmv1:assemblyIdentity name="DPM.exe" version="1.0.0.2" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" type="win32" />
<description asmv2:iconFile="DPMNeu.ico" xmlns="urn:schemas-microsoft-com:asm.v1" />
<application />
<entryPoint>
<assemblyIdentity name="PADM" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
<commandLine file="PADM.exe" parameters="" />
<assemblyIdentity name="DPM" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
<commandLine file="DPM.exe" parameters="" />
</entryPoint>
<trustInfo>
<security>
@ -162,6 +162,18 @@
</hash>
</dependentAssembly>
</dependency>
<dependency>
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="DPM.exe" size="7444480">
<assemblyIdentity name="DPM" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
<hash>
<dsig:Transforms>
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>fs3SsvqE8fJNUPQ057vWQLK5pDXVQ3LvNJg+F48mypc=</dsig:DigestValue>
</hash>
</dependentAssembly>
</dependency>
<dependency>
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="FastReport.dll" size="6450184">
<assemblyIdentity name="FastReport" version="2022.2.0.0" publicKeyToken="DB7E5CE63278458C" language="neutral" processorArchitecture="msil" />
@ -462,18 +474,6 @@
</hash>
</dependentAssembly>
</dependency>
<dependency>
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="PADM.exe" size="7382528">
<assemblyIdentity name="PADM" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
<hash>
<dsig:Transforms>
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>REnZZ21iKAM8//xzZ6sNyrWYrpGVwnfG4P10nYD6nZk=</dsig:DigestValue>
</hash>
</dependentAssembly>
</dependency>
<dependency>
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="PropertyGridEx.dll" size="48128">
<assemblyIdentity name="PropertyGridEx" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
@ -1512,22 +1512,22 @@
<dsig:DigestValue>T92PpISzKuFvoRCaXDKcSaiMyMOICRIrhQVQN101KX8=</dsig:DigestValue>
</hash>
</file>
<file name="DPMNeu.ico" size="156974">
<file name="DPM.exe.config" size="4181">
<hash>
<dsig:Transforms>
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>NLnqVMsy3w9jN63XtqsXl3zuDEd+8S6tWSYv9gZKS4Q=</dsig:DigestValue>
<dsig:DigestValue>0prST3unFNQNU2HVldsrddDuCgCJokfAhMVNgXbX/v4=</dsig:DigestValue>
</hash>
</file>
<file name="PADM.exe.config" size="4516">
<file name="DPMNeu.ico" size="156974">
<hash>
<dsig:Transforms>
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>IaVDJykS3T+/E78HSobZb/PRwAUull+7KpQZYT2d52E=</dsig:DigestValue>
<dsig:DigestValue>NLnqVMsy3w9jN63XtqsXl3zuDEd+8S6tWSYv9gZKS4Q=</dsig:DigestValue>
</hash>
</file>
<file name="PADM.ico" size="96694">

@ -2,7 +2,7 @@
<doc>
<assembly>
<name>
PADM
DPM
</name>
</assembly>
<members>

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 81 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 81 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 80 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 79 KiB

Some files were not shown because too many files have changed in this diff Show More

Loading…
Cancel
Save