Update 20220311 - Mahnfunktionen
This commit is contained in:
Binary file not shown.
Binary file not shown.
Binary file not shown.
36
DPM2016/Behandlung/Behandlung.Designer.vb
generated
36
DPM2016/Behandlung/Behandlung.Designer.vb
generated
@@ -59,6 +59,10 @@ Partial Class Behandlung
|
||||
Me.ToolStripMenuItem5 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.RechungKVVorschauToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.RechnungKVEntwurfToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripMenuItem8 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ErsteMahnungDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ZweiteMahnungDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.LetzteMahnungDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
|
||||
Me.Node2 = New DevComponents.AdvTree.Node()
|
||||
Me.NodeConnector1 = New DevComponents.AdvTree.NodeConnector()
|
||||
@@ -149,7 +153,6 @@ Partial Class Behandlung
|
||||
'treebehandlungen
|
||||
'
|
||||
Me.treebehandlungen.AccessibleRole = System.Windows.Forms.AccessibleRole.Outline
|
||||
Me.treebehandlungen.AllowDrop = True
|
||||
Me.treebehandlungen.AllowExternalDrop = False
|
||||
Me.treebehandlungen.AllowUserToResizeColumns = False
|
||||
Me.treebehandlungen.BackColor = System.Drawing.SystemColors.Window
|
||||
@@ -178,9 +181,9 @@ Partial Class Behandlung
|
||||
'ctxmenubehandlung
|
||||
'
|
||||
Me.ctxmenubehandlung.ImageScalingSize = New System.Drawing.Size(20, 20)
|
||||
Me.ctxmenubehandlung.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NeueBehandlungToolStripMenuItem1, Me.ToolStripMenuItem2, Me.BehandlungabschliessenToolStripMenuItem1, Me.BehandlungZurücksetzenToolStripMenuItem, Me.BehandlungKopierenToolStripMenuItem, Me.ToolStripMenuItem4, Me.SofortRechnungDruckenToolStripMenuItem, Me.KopieErstellenToolStripMenuItem, Me.ToolStripMenuItem3, Me.BehandlungLöschenToolStripMenuItem1, Me.ToolStripMenuItem5, Me.RechungKVVorschauToolStripMenuItem, Me.RechnungKVEntwurfToolStripMenuItem})
|
||||
Me.ctxmenubehandlung.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NeueBehandlungToolStripMenuItem1, Me.ToolStripMenuItem2, Me.BehandlungabschliessenToolStripMenuItem1, Me.BehandlungZurücksetzenToolStripMenuItem, Me.BehandlungKopierenToolStripMenuItem, Me.ToolStripMenuItem4, Me.SofortRechnungDruckenToolStripMenuItem, Me.KopieErstellenToolStripMenuItem, Me.ToolStripMenuItem3, Me.BehandlungLöschenToolStripMenuItem1, Me.ToolStripMenuItem5, Me.RechungKVVorschauToolStripMenuItem, Me.RechnungKVEntwurfToolStripMenuItem, Me.ToolStripMenuItem8, Me.ErsteMahnungDruckenToolStripMenuItem, Me.ZweiteMahnungDruckenToolStripMenuItem, Me.LetzteMahnungDruckenToolStripMenuItem})
|
||||
Me.ctxmenubehandlung.Name = "ContextMenuStrip1"
|
||||
Me.ctxmenubehandlung.Size = New System.Drawing.Size(212, 226)
|
||||
Me.ctxmenubehandlung.Size = New System.Drawing.Size(212, 320)
|
||||
'
|
||||
'NeueBehandlungToolStripMenuItem1
|
||||
'
|
||||
@@ -347,6 +350,29 @@ Partial Class Behandlung
|
||||
Me.RechnungKVEntwurfToolStripMenuItem.Size = New System.Drawing.Size(211, 22)
|
||||
Me.RechnungKVEntwurfToolStripMenuItem.Text = "Rechnung/KV Entwurf"
|
||||
'
|
||||
'ToolStripMenuItem8
|
||||
'
|
||||
Me.ToolStripMenuItem8.Name = "ToolStripMenuItem8"
|
||||
Me.ToolStripMenuItem8.Size = New System.Drawing.Size(208, 6)
|
||||
'
|
||||
'ErsteMahnungDruckenToolStripMenuItem
|
||||
'
|
||||
Me.ErsteMahnungDruckenToolStripMenuItem.Name = "ErsteMahnungDruckenToolStripMenuItem"
|
||||
Me.ErsteMahnungDruckenToolStripMenuItem.Size = New System.Drawing.Size(211, 22)
|
||||
Me.ErsteMahnungDruckenToolStripMenuItem.Text = "Erste Mahnung drucken"
|
||||
'
|
||||
'ZweiteMahnungDruckenToolStripMenuItem
|
||||
'
|
||||
Me.ZweiteMahnungDruckenToolStripMenuItem.Name = "ZweiteMahnungDruckenToolStripMenuItem"
|
||||
Me.ZweiteMahnungDruckenToolStripMenuItem.Size = New System.Drawing.Size(211, 22)
|
||||
Me.ZweiteMahnungDruckenToolStripMenuItem.Text = "Zweite Mahnung drucken"
|
||||
'
|
||||
'LetzteMahnungDruckenToolStripMenuItem
|
||||
'
|
||||
Me.LetzteMahnungDruckenToolStripMenuItem.Name = "LetzteMahnungDruckenToolStripMenuItem"
|
||||
Me.LetzteMahnungDruckenToolStripMenuItem.Size = New System.Drawing.Size(211, 22)
|
||||
Me.LetzteMahnungDruckenToolStripMenuItem.Text = "Letzte Mahnung drucken"
|
||||
'
|
||||
'ImageList1
|
||||
'
|
||||
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
|
||||
@@ -649,4 +675,8 @@ Partial Class Behandlung
|
||||
Friend WithEvents AbschlussUndSofortrechungAlsPDFToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents AbschlussUndSofortrechnungAlsOutlookMailToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents AbschlussUndVerbuchenOhneRGQuittungToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ToolStripMenuItem8 As ToolStripSeparator
|
||||
Friend WithEvents ErsteMahnungDruckenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ZweiteMahnungDruckenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents LetzteMahnungDruckenToolStripMenuItem As ToolStripMenuItem
|
||||
End Class
|
||||
|
||||
@@ -236,7 +236,7 @@
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
|
||||
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
|
||||
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABO
|
||||
DQAAAk1TRnQBSQFMAgEBBQEAAfgBAwH4AQMBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
DQAAAk1TRnQBSQFMAgEBBQEAAQgBBAEIAQQBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
AwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
|
||||
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
|
||||
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
|
||||
|
||||
@@ -785,7 +785,7 @@ Public Class Behandlung
|
||||
Me.BehandlungLöschenToolStripMenuItem1.Text = "Behandlung löschen"
|
||||
Me.BehandlungKopierenToolStripMenuItem.Text = "Behandlung kopieren"
|
||||
Case < -20 And
|
||||
Me.BehandlungabschliessenToolStripMenuItem1.Text = "Kostenvoranschlag abschliessen"
|
||||
Me.BehandlungabschliessenToolStripMenuItem1.Text = "Kostenvoranschlag abschliessen"
|
||||
BehandlungabschliessenToolStripMenuItem1.Enabled = True
|
||||
Me.BehandlungabschliessenToolStripMenuItem1.Text = "Kostenvoranschlag abschliessen"
|
||||
Me.NeueBehandlungToolStripMenuItem1.Text = "Neuer Kostenvoranschlag"
|
||||
@@ -818,11 +818,34 @@ Public Class Behandlung
|
||||
s = DB.Get_Option(9106)
|
||||
If s <> "" Then Me.AbschlussUndVerbuchenOhneRGQuittungToolStripMenuItem.Text = s
|
||||
|
||||
ErsteMahnungDruckenToolStripMenuItem.Visible = False
|
||||
ZweiteMahnungDruckenToolStripMenuItem.Visible = False
|
||||
LetzteMahnungDruckenToolStripMenuItem.Visible = False
|
||||
Try
|
||||
If Me.Behandungdetail1.txtrgnummer.Text <> "" Then
|
||||
DB.Get_Tabledata("Mahnung", "", "Select * from View_Offene_Mahnungen where nrfaktura=" + Microsoft.VisualBasic.Left(Me.Behandungdetail1.txtrgnummer.Text, 10), "", False)
|
||||
If DB.dsDaten.Tables(0).Rows.Count > 0 Then
|
||||
Select Case DB.dsDaten.Tables(0).Rows(0).Item("Mahnstufe")
|
||||
Case 1
|
||||
ErsteMahnungDruckenToolStripMenuItem.Visible = True
|
||||
Case 2
|
||||
ZweiteMahnungDruckenToolStripMenuItem.Visible = True
|
||||
Case 3
|
||||
LetzteMahnungDruckenToolStripMenuItem.Visible = True
|
||||
End Select
|
||||
Else
|
||||
|
||||
End If
|
||||
End If
|
||||
Catch
|
||||
End Try
|
||||
|
||||
|
||||
If UCase(DB.Get_Option(60020)) = "FALSE" Then Exit Sub
|
||||
Dim sec As New DPMSecurity
|
||||
sec.Set_Form_Security(Me.ParentForm)
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
Dim sec As New DPMSecurity
|
||||
sec.Set_Form_Security(Me.ParentForm)
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
Me.ctxmenubehandlung.Enabled = False
|
||||
End Try
|
||||
|
||||
@@ -1203,6 +1226,25 @@ Public Class Behandlung
|
||||
'evh.Fire_Finanzen_Anzeigen(Me.PatientNr)
|
||||
End Sub
|
||||
|
||||
Private Sub ErsteMahnungDruckenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ErsteMahnungDruckenToolStripMenuItem.Click, ZweiteMahnungDruckenToolStripMenuItem.Click, LetzteMahnungDruckenToolStripMenuItem.Click
|
||||
Try
|
||||
Select Case sender.name
|
||||
Case "ErsteMahnungDruckenToolStripMenuItem"
|
||||
Dim s As String = Microsoft.VisualBasic.Left(Me.Behandungdetail1.txtrgnummer.Text, 10)
|
||||
Globals.Rg_Funktionen.Mahnung(s, 1, False, False)
|
||||
Case "ZweiteMahnungDruckenToolStripMenuItem"
|
||||
Dim s As String = Microsoft.VisualBasic.Left(Me.Behandungdetail1.txtrgnummer.Text, 10)
|
||||
Globals.Rg_Funktionen.Mahnung(s, 2, False, False)
|
||||
Case "LetzteMahnungDruckenToolStripMenuItem"
|
||||
Dim s As String = Microsoft.VisualBasic.Left(Me.Behandungdetail1.txtrgnummer.Text, 10)
|
||||
Globals.Rg_Funktionen.Mahnung(s, 3, False, False)
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
232
DPM2016/Finanzaen/Finanzen.Designer.vb
generated
232
DPM2016/Finanzaen/Finanzen.Designer.vb
generated
@@ -48,6 +48,9 @@ Partial Class Finanzen
|
||||
Me.C1OffeneRechnungen = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
|
||||
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.ZahlungBuchenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ErsteMahnungMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ZweiteMahnungMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.LetzteMahnungMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.btnzurücksetzen3 = New System.Windows.Forms.Button()
|
||||
Me.btnzurücksetzen2 = New System.Windows.Forms.Button()
|
||||
@@ -85,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(1320, 31)
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(990, 25)
|
||||
Me.ToolStrip1.TabIndex = 0
|
||||
Me.ToolStrip1.Text = "ToolStrip1"
|
||||
'
|
||||
@@ -104,30 +107,26 @@ Partial Class Finanzen
|
||||
Me.GrpZahlung.Controls.Add(Me.txtRGNummer)
|
||||
Me.GrpZahlung.Controls.Add(Me.lblRechnungsnummer)
|
||||
Me.GrpZahlung.Dock = System.Windows.Forms.DockStyle.Left
|
||||
Me.GrpZahlung.Location = New System.Drawing.Point(0, 31)
|
||||
Me.GrpZahlung.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.GrpZahlung.Location = New System.Drawing.Point(0, 25)
|
||||
Me.GrpZahlung.Name = "GrpZahlung"
|
||||
Me.GrpZahlung.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.GrpZahlung.Size = New System.Drawing.Size(575, 691)
|
||||
Me.GrpZahlung.Size = New System.Drawing.Size(431, 562)
|
||||
Me.GrpZahlung.TabIndex = 1
|
||||
Me.GrpZahlung.TabStop = False
|
||||
Me.GrpZahlung.Text = "Zahlung"
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.Location = New System.Drawing.Point(412, 37)
|
||||
Me.Button1.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.Button1.Location = New System.Drawing.Point(309, 30)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(20, 28)
|
||||
Me.Button1.Size = New System.Drawing.Size(15, 23)
|
||||
Me.Button1.TabIndex = 20
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnBuchen
|
||||
'
|
||||
Me.btnBuchen.Location = New System.Drawing.Point(29, 203)
|
||||
Me.btnBuchen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.btnBuchen.Location = New System.Drawing.Point(22, 165)
|
||||
Me.btnBuchen.Name = "btnBuchen"
|
||||
Me.btnBuchen.Size = New System.Drawing.Size(100, 28)
|
||||
Me.btnBuchen.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btnBuchen.TabIndex = 19
|
||||
Me.btnBuchen.Text = "Buchen"
|
||||
Me.btnBuchen.UseVisualStyleBackColor = True
|
||||
@@ -135,8 +134,7 @@ Partial Class Finanzen
|
||||
'chkVorauszahlung
|
||||
'
|
||||
Me.chkVorauszahlung.AutoSize = True
|
||||
Me.chkVorauszahlung.Location = New System.Drawing.Point(196, 171)
|
||||
Me.chkVorauszahlung.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.chkVorauszahlung.Location = New System.Drawing.Point(147, 139)
|
||||
Me.chkVorauszahlung.Name = "chkVorauszahlung"
|
||||
Me.chkVorauszahlung.Size = New System.Drawing.Size(15, 14)
|
||||
Me.chkVorauszahlung.TabIndex = 18
|
||||
@@ -145,10 +143,9 @@ Partial Class Finanzen
|
||||
'lblVorauszahlung
|
||||
'
|
||||
Me.lblVorauszahlung.AutoSize = True
|
||||
Me.lblVorauszahlung.Location = New System.Drawing.Point(27, 171)
|
||||
Me.lblVorauszahlung.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.lblVorauszahlung.Location = New System.Drawing.Point(20, 139)
|
||||
Me.lblVorauszahlung.Name = "lblVorauszahlung"
|
||||
Me.lblVorauszahlung.Size = New System.Drawing.Size(103, 17)
|
||||
Me.lblVorauszahlung.Size = New System.Drawing.Size(77, 13)
|
||||
Me.lblVorauszahlung.TabIndex = 17
|
||||
Me.lblVorauszahlung.Text = "Vorauszahlung"
|
||||
'
|
||||
@@ -156,10 +153,9 @@ Partial Class Finanzen
|
||||
'
|
||||
Me.cbboxKonto.Dataselection = Nothing
|
||||
Me.cbboxKonto.Displaymember = Nothing
|
||||
Me.cbboxKonto.Location = New System.Drawing.Point(196, 134)
|
||||
Me.cbboxKonto.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.cbboxKonto.Location = New System.Drawing.Point(147, 109)
|
||||
Me.cbboxKonto.Name = "cbboxKonto"
|
||||
Me.cbboxKonto.Size = New System.Drawing.Size(235, 24)
|
||||
Me.cbboxKonto.Size = New System.Drawing.Size(177, 21)
|
||||
Me.cbboxKonto.TabIndex = 15
|
||||
Me.cbboxKonto.Table = Nothing
|
||||
Me.cbboxKonto.TableAlias = ""
|
||||
@@ -168,20 +164,18 @@ Partial Class Finanzen
|
||||
'lblKonto
|
||||
'
|
||||
Me.lblKonto.AutoSize = True
|
||||
Me.lblKonto.Location = New System.Drawing.Point(27, 138)
|
||||
Me.lblKonto.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.lblKonto.Location = New System.Drawing.Point(20, 112)
|
||||
Me.lblKonto.Name = "lblKonto"
|
||||
Me.lblKonto.Size = New System.Drawing.Size(86, 17)
|
||||
Me.lblKonto.Size = New System.Drawing.Size(66, 13)
|
||||
Me.lblKonto.TabIndex = 16
|
||||
Me.lblKonto.Text = "Gegenkonto"
|
||||
'
|
||||
'lblBetrag
|
||||
'
|
||||
Me.lblBetrag.AutoSize = True
|
||||
Me.lblBetrag.Location = New System.Drawing.Point(27, 107)
|
||||
Me.lblBetrag.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.lblBetrag.Location = New System.Drawing.Point(20, 87)
|
||||
Me.lblBetrag.Name = "lblBetrag"
|
||||
Me.lblBetrag.Size = New System.Drawing.Size(50, 17)
|
||||
Me.lblBetrag.Size = New System.Drawing.Size(38, 13)
|
||||
Me.lblBetrag.TabIndex = 11
|
||||
Me.lblBetrag.Text = "Betrag"
|
||||
'
|
||||
@@ -194,20 +188,18 @@ 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(196, 100)
|
||||
Me.diBetrag.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.diBetrag.Location = New System.Drawing.Point(147, 81)
|
||||
Me.diBetrag.Name = "diBetrag"
|
||||
Me.diBetrag.ShowUpDown = True
|
||||
Me.diBetrag.Size = New System.Drawing.Size(115, 22)
|
||||
Me.diBetrag.Size = New System.Drawing.Size(86, 20)
|
||||
Me.diBetrag.TabIndex = 10
|
||||
'
|
||||
'lbldatum
|
||||
'
|
||||
Me.lbldatum.AutoSize = True
|
||||
Me.lbldatum.Location = New System.Drawing.Point(27, 76)
|
||||
Me.lbldatum.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.lbldatum.Location = New System.Drawing.Point(20, 62)
|
||||
Me.lbldatum.Name = "lbldatum"
|
||||
Me.lbldatum.Size = New System.Drawing.Size(49, 17)
|
||||
Me.lbldatum.Size = New System.Drawing.Size(38, 13)
|
||||
Me.lbldatum.TabIndex = 3
|
||||
Me.lbldatum.Text = "Datum"
|
||||
'
|
||||
@@ -221,8 +213,7 @@ 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(196, 68)
|
||||
Me.dtdatum.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.dtdatum.Location = New System.Drawing.Point(147, 55)
|
||||
'
|
||||
'
|
||||
'
|
||||
@@ -253,25 +244,23 @@ 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(236, 22)
|
||||
Me.dtdatum.Size = New System.Drawing.Size(177, 20)
|
||||
Me.dtdatum.Style = DevComponents.DotNetBar.eDotNetBarStyle.StyleManagerControlled
|
||||
Me.dtdatum.TabIndex = 2
|
||||
'
|
||||
'txtRGNummer
|
||||
'
|
||||
Me.txtRGNummer.Location = New System.Drawing.Point(196, 39)
|
||||
Me.txtRGNummer.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.txtRGNummer.Location = New System.Drawing.Point(147, 32)
|
||||
Me.txtRGNummer.Name = "txtRGNummer"
|
||||
Me.txtRGNummer.Size = New System.Drawing.Size(213, 22)
|
||||
Me.txtRGNummer.Size = New System.Drawing.Size(161, 20)
|
||||
Me.txtRGNummer.TabIndex = 1
|
||||
'
|
||||
'lblRechnungsnummer
|
||||
'
|
||||
Me.lblRechnungsnummer.AutoSize = True
|
||||
Me.lblRechnungsnummer.Location = New System.Drawing.Point(27, 43)
|
||||
Me.lblRechnungsnummer.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.lblRechnungsnummer.Location = New System.Drawing.Point(20, 35)
|
||||
Me.lblRechnungsnummer.Name = "lblRechnungsnummer"
|
||||
Me.lblRechnungsnummer.Size = New System.Drawing.Size(131, 17)
|
||||
Me.lblRechnungsnummer.Size = New System.Drawing.Size(99, 13)
|
||||
Me.lblRechnungsnummer.TabIndex = 0
|
||||
Me.lblRechnungsnummer.Text = "Rechnungsnummer"
|
||||
'
|
||||
@@ -279,11 +268,9 @@ Partial Class Finanzen
|
||||
'
|
||||
Me.GrpZahlungen.Controls.Add(Me.C1Zahlungen)
|
||||
Me.GrpZahlungen.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.GrpZahlungen.Location = New System.Drawing.Point(575, 31)
|
||||
Me.GrpZahlungen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.GrpZahlungen.Location = New System.Drawing.Point(431, 25)
|
||||
Me.GrpZahlungen.Name = "GrpZahlungen"
|
||||
Me.GrpZahlungen.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.GrpZahlungen.Size = New System.Drawing.Size(745, 465)
|
||||
Me.GrpZahlungen.Size = New System.Drawing.Size(559, 247)
|
||||
Me.GrpZahlungen.TabIndex = 2
|
||||
Me.GrpZahlungen.TabStop = False
|
||||
Me.GrpZahlungen.Text = "Verbuchte Zahlungen"
|
||||
@@ -296,14 +283,13 @@ 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(4, 19)
|
||||
Me.C1Zahlungen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.C1Zahlungen.Location = New System.Drawing.Point(3, 16)
|
||||
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(737, 442)
|
||||
Me.C1Zahlungen.Size = New System.Drawing.Size(553, 228)
|
||||
Me.C1Zahlungen.TabIndex = 3
|
||||
Me.C1Zahlungen.Text = "C1TrueDBGrid1"
|
||||
Me.C1Zahlungen.PropBag = resources.GetString("C1Zahlungen.PropBag")
|
||||
@@ -313,35 +299,33 @@ 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(342, 76)
|
||||
Me.ContextMenuStrip2.Size = New System.Drawing.Size(286, 70)
|
||||
'
|
||||
'ZahlungStornierenToolStripMenuItem
|
||||
'
|
||||
Me.ZahlungStornierenToolStripMenuItem.Name = "ZahlungStornierenToolStripMenuItem"
|
||||
Me.ZahlungStornierenToolStripMenuItem.Size = New System.Drawing.Size(341, 24)
|
||||
Me.ZahlungStornierenToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
|
||||
Me.ZahlungStornierenToolStripMenuItem.Text = "&Zahlung stornieren"
|
||||
'
|
||||
'VorauszahlungAnBehandlungZuweisenToolStripMenuItem
|
||||
'
|
||||
Me.VorauszahlungAnBehandlungZuweisenToolStripMenuItem.Name = "VorauszahlungAnBehandlungZuweisenToolStripMenuItem"
|
||||
Me.VorauszahlungAnBehandlungZuweisenToolStripMenuItem.Size = New System.Drawing.Size(341, 24)
|
||||
Me.VorauszahlungAnBehandlungZuweisenToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
|
||||
Me.VorauszahlungAnBehandlungZuweisenToolStripMenuItem.Text = "Vorauszahlung an Behandlung zuweisen"
|
||||
'
|
||||
'VorauszahlungVonBehandlungLösenToolStripMenuItem
|
||||
'
|
||||
Me.VorauszahlungVonBehandlungLösenToolStripMenuItem.Name = "VorauszahlungVonBehandlungLösenToolStripMenuItem"
|
||||
Me.VorauszahlungVonBehandlungLösenToolStripMenuItem.Size = New System.Drawing.Size(341, 24)
|
||||
Me.VorauszahlungVonBehandlungLösenToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
|
||||
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(575, 496)
|
||||
Me.GrpBehandlungen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.GrpBehandlungen.Location = New System.Drawing.Point(431, 272)
|
||||
Me.GrpBehandlungen.Name = "GrpBehandlungen"
|
||||
Me.GrpBehandlungen.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.GrpBehandlungen.Size = New System.Drawing.Size(745, 214)
|
||||
Me.GrpBehandlungen.Size = New System.Drawing.Size(559, 174)
|
||||
Me.GrpBehandlungen.TabIndex = 3
|
||||
Me.GrpBehandlungen.TabStop = False
|
||||
Me.GrpBehandlungen.Text = "Offene Rechnungen"
|
||||
@@ -354,14 +338,13 @@ 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(4, 19)
|
||||
Me.C1OffeneRechnungen.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.C1OffeneRechnungen.Location = New System.Drawing.Point(3, 16)
|
||||
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(737, 191)
|
||||
Me.C1OffeneRechnungen.Size = New System.Drawing.Size(553, 155)
|
||||
Me.C1OffeneRechnungen.TabIndex = 4
|
||||
Me.C1OffeneRechnungen.Text = "C1OffeneRechnungen"
|
||||
Me.C1OffeneRechnungen.PropBag = resources.GetString("C1OffeneRechnungen.PropBag")
|
||||
@@ -369,16 +352,34 @@ Partial Class Finanzen
|
||||
'ContextMenuStrip1
|
||||
'
|
||||
Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
|
||||
Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ZahlungBuchenToolStripMenuItem})
|
||||
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(185, 28)
|
||||
Me.ContextMenuStrip1.Size = New System.Drawing.Size(201, 92)
|
||||
'
|
||||
'ZahlungBuchenToolStripMenuItem
|
||||
'
|
||||
Me.ZahlungBuchenToolStripMenuItem.Name = "ZahlungBuchenToolStripMenuItem"
|
||||
Me.ZahlungBuchenToolStripMenuItem.Size = New System.Drawing.Size(184, 24)
|
||||
Me.ZahlungBuchenToolStripMenuItem.Size = New System.Drawing.Size(200, 22)
|
||||
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"
|
||||
'
|
||||
'ZweiteMahnungMenuItem
|
||||
'
|
||||
Me.ZweiteMahnungMenuItem.Name = "ZweiteMahnungMenuItem"
|
||||
Me.ZweiteMahnungMenuItem.Size = New System.Drawing.Size(200, 22)
|
||||
Me.ZweiteMahnungMenuItem.Text = "Zweite Mahnung"
|
||||
'
|
||||
'LetzteMahnungMenuItem
|
||||
'
|
||||
Me.LetzteMahnungMenuItem.Name = "LetzteMahnungMenuItem"
|
||||
Me.LetzteMahnungMenuItem.Size = New System.Drawing.Size(200, 22)
|
||||
Me.LetzteMahnungMenuItem.Text = "Letzte Mahnung"
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.btnzurücksetzen3)
|
||||
@@ -401,41 +402,36 @@ 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(575, 710)
|
||||
Me.GroupBox1.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(431, 446)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Padding = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(745, 12)
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(559, 141)
|
||||
Me.GroupBox1.TabIndex = 4
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Mahnungen"
|
||||
'
|
||||
'btnzurücksetzen3
|
||||
'
|
||||
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.Location = New System.Drawing.Point(379, 85)
|
||||
Me.btnzurücksetzen3.Name = "btnzurücksetzen3"
|
||||
Me.btnzurücksetzen3.Size = New System.Drawing.Size(131, 28)
|
||||
Me.btnzurücksetzen3.Size = New System.Drawing.Size(98, 23)
|
||||
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(505, 76)
|
||||
Me.btnzurücksetzen2.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.btnzurücksetzen2.Location = New System.Drawing.Point(379, 62)
|
||||
Me.btnzurücksetzen2.Name = "btnzurücksetzen2"
|
||||
Me.btnzurücksetzen2.Size = New System.Drawing.Size(131, 28)
|
||||
Me.btnzurücksetzen2.Size = New System.Drawing.Size(98, 23)
|
||||
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(505, 48)
|
||||
Me.btnZurücksetzen1.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
|
||||
Me.btnZurücksetzen1.Location = New System.Drawing.Point(379, 39)
|
||||
Me.btnZurücksetzen1.Name = "btnZurücksetzen1"
|
||||
Me.btnZurücksetzen1.Size = New System.Drawing.Size(131, 28)
|
||||
Me.btnZurücksetzen1.Size = New System.Drawing.Size(98, 23)
|
||||
Me.btnZurücksetzen1.TabIndex = 16
|
||||
Me.btnZurücksetzen1.Text = "Zurücksetzen"
|
||||
Me.btnZurücksetzen1.UseVisualStyleBackColor = True
|
||||
@@ -443,120 +439,108 @@ Partial Class Finanzen
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.AutoSize = True
|
||||
Me.Label10.Location = New System.Drawing.Point(9, 111)
|
||||
Me.Label10.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Label10.Location = New System.Drawing.Point(7, 90)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(16, 17)
|
||||
Me.Label10.Size = New System.Drawing.Size(13, 13)
|
||||
Me.Label10.TabIndex = 15
|
||||
Me.Label10.Text = "3"
|
||||
'
|
||||
'Mahngebühr3
|
||||
'
|
||||
Me.Mahngebühr3.AutoSize = True
|
||||
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.Location = New System.Drawing.Point(292, 90)
|
||||
Me.Mahngebühr3.Name = "Mahngebühr3"
|
||||
Me.Mahngebühr3.Size = New System.Drawing.Size(51, 17)
|
||||
Me.Mahngebühr3.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Mahngebühr3.TabIndex = 14
|
||||
Me.Mahngebühr3.Text = "Label8"
|
||||
'
|
||||
'Mahnfaelligkeit3
|
||||
'
|
||||
Me.Mahnfaelligkeit3.AutoSize = True
|
||||
Me.Mahnfaelligkeit3.Location = New System.Drawing.Point(233, 110)
|
||||
Me.Mahnfaelligkeit3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Mahnfaelligkeit3.Location = New System.Drawing.Point(175, 89)
|
||||
Me.Mahnfaelligkeit3.Name = "Mahnfaelligkeit3"
|
||||
Me.Mahnfaelligkeit3.Size = New System.Drawing.Size(59, 17)
|
||||
Me.Mahnfaelligkeit3.Size = New System.Drawing.Size(45, 13)
|
||||
Me.Mahnfaelligkeit3.TabIndex = 13
|
||||
Me.Mahnfaelligkeit3.Text = "Label12"
|
||||
'
|
||||
'Mahndatum3
|
||||
'
|
||||
Me.Mahndatum3.AutoSize = True
|
||||
Me.Mahndatum3.Location = New System.Drawing.Point(103, 110)
|
||||
Me.Mahndatum3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Mahndatum3.Location = New System.Drawing.Point(77, 89)
|
||||
Me.Mahndatum3.Name = "Mahndatum3"
|
||||
Me.Mahndatum3.Size = New System.Drawing.Size(51, 17)
|
||||
Me.Mahndatum3.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Mahndatum3.TabIndex = 12
|
||||
Me.Mahndatum3.Text = "Label5"
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Location = New System.Drawing.Point(9, 82)
|
||||
Me.Label9.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Label9.Location = New System.Drawing.Point(7, 67)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(16, 17)
|
||||
Me.Label9.Size = New System.Drawing.Size(13, 13)
|
||||
Me.Label9.TabIndex = 11
|
||||
Me.Label9.Text = "2"
|
||||
'
|
||||
'Mahngebühr2
|
||||
'
|
||||
Me.Mahngebühr2.AutoSize = True
|
||||
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.Location = New System.Drawing.Point(292, 67)
|
||||
Me.Mahngebühr2.Name = "Mahngebühr2"
|
||||
Me.Mahngebühr2.Size = New System.Drawing.Size(51, 17)
|
||||
Me.Mahngebühr2.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Mahngebühr2.TabIndex = 10
|
||||
Me.Mahngebühr2.Text = "Label8"
|
||||
'
|
||||
'Mahnfaelligkeit2
|
||||
'
|
||||
Me.Mahnfaelligkeit2.AutoSize = True
|
||||
Me.Mahnfaelligkeit2.Location = New System.Drawing.Point(233, 81)
|
||||
Me.Mahnfaelligkeit2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Mahnfaelligkeit2.Location = New System.Drawing.Point(175, 66)
|
||||
Me.Mahnfaelligkeit2.Name = "Mahnfaelligkeit2"
|
||||
Me.Mahnfaelligkeit2.Size = New System.Drawing.Size(51, 17)
|
||||
Me.Mahnfaelligkeit2.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Mahnfaelligkeit2.TabIndex = 9
|
||||
Me.Mahnfaelligkeit2.Text = "Label7"
|
||||
'
|
||||
'Mahndatum2
|
||||
'
|
||||
Me.Mahndatum2.AutoSize = True
|
||||
Me.Mahndatum2.Location = New System.Drawing.Point(103, 81)
|
||||
Me.Mahndatum2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Mahndatum2.Location = New System.Drawing.Point(77, 66)
|
||||
Me.Mahndatum2.Name = "Mahndatum2"
|
||||
Me.Mahndatum2.Size = New System.Drawing.Size(51, 17)
|
||||
Me.Mahndatum2.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Mahndatum2.TabIndex = 8
|
||||
Me.Mahndatum2.Text = "Label5"
|
||||
'
|
||||
'Mahngebühr1
|
||||
'
|
||||
Me.Mahngebühr1.AutoSize = True
|
||||
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.Location = New System.Drawing.Point(292, 44)
|
||||
Me.Mahngebühr1.Name = "Mahngebühr1"
|
||||
Me.Mahngebühr1.Size = New System.Drawing.Size(51, 17)
|
||||
Me.Mahngebühr1.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Mahngebühr1.TabIndex = 7
|
||||
Me.Mahngebühr1.Text = "Label8"
|
||||
'
|
||||
'Mahnfaelligkeit1
|
||||
'
|
||||
Me.Mahnfaelligkeit1.AutoSize = True
|
||||
Me.Mahnfaelligkeit1.Location = New System.Drawing.Point(233, 54)
|
||||
Me.Mahnfaelligkeit1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Mahnfaelligkeit1.Location = New System.Drawing.Point(175, 44)
|
||||
Me.Mahnfaelligkeit1.Name = "Mahnfaelligkeit1"
|
||||
Me.Mahnfaelligkeit1.Size = New System.Drawing.Size(51, 17)
|
||||
Me.Mahnfaelligkeit1.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Mahnfaelligkeit1.TabIndex = 6
|
||||
Me.Mahnfaelligkeit1.Text = "Label7"
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(9, 54)
|
||||
Me.Label6.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Label6.Location = New System.Drawing.Point(7, 44)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(16, 17)
|
||||
Me.Label6.Size = New System.Drawing.Size(13, 13)
|
||||
Me.Label6.TabIndex = 5
|
||||
Me.Label6.Text = "1"
|
||||
'
|
||||
'Mahndatum1
|
||||
'
|
||||
Me.Mahndatum1.AutoSize = True
|
||||
Me.Mahndatum1.Location = New System.Drawing.Point(103, 54)
|
||||
Me.Mahndatum1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Mahndatum1.Location = New System.Drawing.Point(77, 44)
|
||||
Me.Mahndatum1.Name = "Mahndatum1"
|
||||
Me.Mahndatum1.Size = New System.Drawing.Size(51, 17)
|
||||
Me.Mahndatum1.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Mahndatum1.TabIndex = 4
|
||||
Me.Mahndatum1.Text = "Label5"
|
||||
'
|
||||
@@ -564,10 +548,9 @@ 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(9, 20)
|
||||
Me.Label4.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Label4.Location = New System.Drawing.Point(7, 16)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(46, 17)
|
||||
Me.Label4.Size = New System.Drawing.Size(37, 13)
|
||||
Me.Label4.TabIndex = 3
|
||||
Me.Label4.Text = "Stufe"
|
||||
'
|
||||
@@ -575,10 +558,9 @@ 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(389, 20)
|
||||
Me.Label3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Label3.Location = New System.Drawing.Point(292, 16)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(98, 17)
|
||||
Me.Label3.Size = New System.Drawing.Size(77, 13)
|
||||
Me.Label3.TabIndex = 2
|
||||
Me.Label3.Text = "Mahngebühr"
|
||||
'
|
||||
@@ -586,10 +568,9 @@ 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(233, 20)
|
||||
Me.Label2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Label2.Location = New System.Drawing.Point(175, 16)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(108, 17)
|
||||
Me.Label2.Size = New System.Drawing.Size(86, 13)
|
||||
Me.Label2.TabIndex = 1
|
||||
Me.Label2.Text = "Mahnfälligkeit"
|
||||
'
|
||||
@@ -597,25 +578,23 @@ 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(103, 20)
|
||||
Me.Label1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.Label1.Location = New System.Drawing.Point(77, 16)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(91, 17)
|
||||
Me.Label1.Size = New System.Drawing.Size(72, 13)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Mahndatum"
|
||||
'
|
||||
'Finanzen
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!)
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.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(1320, 722)
|
||||
Me.Size = New System.Drawing.Size(990, 587)
|
||||
Me.GrpZahlung.ResumeLayout(False)
|
||||
Me.GrpZahlung.PerformLayout()
|
||||
CType(Me.diBetrag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
@@ -676,4 +655,7 @@ Partial Class Finanzen
|
||||
Friend WithEvents btnZurücksetzen1 As Button
|
||||
Friend WithEvents btnzurücksetzen3 As Button
|
||||
Friend WithEvents btnzurücksetzen2 As Button
|
||||
Friend WithEvents ErsteMahnungMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ZweiteMahnungMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents LetzteMahnungMenuItem As ToolStripMenuItem
|
||||
End Class
|
||||
|
||||
@@ -127,7 +127,7 @@
|
||||
<data name="C1Zahlungen.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
|
||||
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
@@ -161,7 +161,7 @@
|
||||
</value>
|
||||
</data>
|
||||
<data name="C1Zahlungen.PropBag" xml:space="preserve">
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>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;}</Data></Styles><Splits><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"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 735, 440</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>21</DefaultRecSelWidth><ClientArea>0, 0, 735, 440</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>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{}</Data></Styles><Splits><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"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 551, 226</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth><ClientArea>0, 0, 551, 226</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></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
|
||||
YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
|
||||
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
@@ -203,6 +203,6 @@
|
||||
</value>
|
||||
</data>
|
||||
<data name="C1OffeneRechnungen.PropBag" xml:space="preserve">
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;ForeColor:ControlText;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;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}</Data></Styles><Splits><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"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 735, 189</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>21</DefaultRecSelWidth><ClientArea>0, 0, 735, 189</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>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{}</Data></Styles><Splits><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"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 551, 153</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth><ClientArea>0, 0, 551, 153</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||
</data>
|
||||
</root>
|
||||
@@ -323,4 +323,49 @@ Public Class Finanzen
|
||||
Private Sub C1OffeneRechnungen_MouseDown(sender As Object, e As MouseEventArgs) Handles C1OffeneRechnungen.MouseDown
|
||||
Me.C1OffeneRechnungen.Bookmark = Me.C1OffeneRechnungen.RowContaining(e.Y)
|
||||
End Sub
|
||||
|
||||
Private Sub ContextMenuStrip1_Opening(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles ContextMenuStrip1.Opening
|
||||
Me.ErsteMahnungMenuItem.Visible = False
|
||||
Me.ZweiteMahnungMenuItem.Visible = False
|
||||
Me.LetzteMahnungMenuItem.Visible = False
|
||||
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")
|
||||
Case 1
|
||||
ErsteMahnungMenuItem.Visible = True
|
||||
Case 2
|
||||
ZweiteMahnungMenuItem.Visible = True
|
||||
Case 3
|
||||
LetzteMahnungMenuItem.Visible = True
|
||||
End Select
|
||||
Else
|
||||
|
||||
End If
|
||||
Catch
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub DruckenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ErsteMahnungMenuItem.Click, ZweiteMahnungMenuItem.Click, LetzteMahnungMenuItem.Click
|
||||
Try
|
||||
Select Case sender.name
|
||||
Case "ErsteMahnungMenuItem"
|
||||
Dim s As String = Me.C1OffeneRechnungen.Columns("nrfaktura").Value.ToString
|
||||
Globals.Rg_Funktionen.Mahnung(s, 1, False, False)
|
||||
Refresh_Data()
|
||||
Case "ZweiteMahnungMenuItem"
|
||||
Dim s As String = Me.C1OffeneRechnungen.Columns("nrfaktura").Value.ToString
|
||||
Globals.Rg_Funktionen.Mahnung(s, 2, False, False)
|
||||
Refresh_Data()
|
||||
Case "LetzteMahnungMenuItem"
|
||||
Dim s As String = Me.C1OffeneRechnungen.Columns("nrfaktura").Value.ToString
|
||||
Globals.Rg_Funktionen.Mahnung(s, 3, False, False)
|
||||
Refresh_Data()
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
81
DPM2016/Finanzaen/frmMahnungen.Designer.vb
generated
81
DPM2016/Finanzaen/frmMahnungen.Designer.vb
generated
@@ -56,6 +56,8 @@ Partial Class Mahnungen
|
||||
Me.MahnstopEntfernenToolStrip2MenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripMenuItem4 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.MahnstufeZurücksetzen2ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripMenuItem7 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.PatientAnzeigenToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStrip3 = New System.Windows.Forms.ToolStrip()
|
||||
Me.tsbtnMahnlauf2 = New System.Windows.Forms.ToolStripButton()
|
||||
Me.grpOffeneRechnungen = New System.Windows.Forms.GroupBox()
|
||||
@@ -71,6 +73,8 @@ Partial Class Mahnungen
|
||||
Me.MahnstopEntfernenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.MahnstufeZurücksetzenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripMenuItem6 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.PatientAnzeigenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStrip2 = New System.Windows.Forms.ToolStrip()
|
||||
Me.tsbtnMahnlauf1 = New System.Windows.Forms.ToolStripButton()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
@@ -86,12 +90,17 @@ Partial Class Mahnungen
|
||||
Me.MahnstopEntfernenToolStrip3MenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripMenuItem5 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.MahnstufeZurücksetzen3ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripMenuItem8 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.PatientAnzeigenToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStrip4 = New System.Windows.Forms.ToolStrip()
|
||||
Me.tsbtnMahnlauf3 = New System.Windows.Forms.ToolStripButton()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.C1Mahnungen4 = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
|
||||
Me.ContextMenuMahnungen4 = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.MahnstufeZurücksetzen4ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.DebitorAnzeigenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.DebitorAnzeigenToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.DebitorAnzeigenToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.MenuStrip1.SuspendLayout()
|
||||
Me.GrpAusgeschlosseneRechnungen.SuspendLayout()
|
||||
@@ -319,9 +328,9 @@ Partial Class Mahnungen
|
||||
'
|
||||
'ContextMenuMahnung2
|
||||
'
|
||||
Me.ContextMenuMahnung2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DruckenToolStrip2MenuItem, Me.VorschauToolStrip2MenuItem, Me.DesignToolStrip2MenuItem, Me.ToolStripSeparator1, Me.AusListeLöschenToolStrip2MenuItem, Me.ToolStripSeparator2, Me.MahnstopSetzenToolStrip2MenuItem, Me.MahnstopEntfernenToolStrip2MenuItem, Me.ToolStripMenuItem4, Me.MahnstufeZurücksetzen2ToolStripMenuItem})
|
||||
Me.ContextMenuMahnung2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DruckenToolStrip2MenuItem, Me.VorschauToolStrip2MenuItem, Me.DesignToolStrip2MenuItem, Me.ToolStripSeparator1, Me.AusListeLöschenToolStrip2MenuItem, Me.ToolStripSeparator2, Me.MahnstopSetzenToolStrip2MenuItem, Me.MahnstopEntfernenToolStrip2MenuItem, Me.ToolStripMenuItem4, Me.MahnstufeZurücksetzen2ToolStripMenuItem, Me.ToolStripMenuItem7, Me.PatientAnzeigenToolStripMenuItem1, Me.DebitorAnzeigenToolStripMenuItem1})
|
||||
Me.ContextMenuMahnung2.Name = "ContextMenuStrip1"
|
||||
Me.ContextMenuMahnung2.Size = New System.Drawing.Size(203, 176)
|
||||
Me.ContextMenuMahnung2.Size = New System.Drawing.Size(203, 226)
|
||||
'
|
||||
'DruckenToolStrip2MenuItem
|
||||
'
|
||||
@@ -380,6 +389,17 @@ Partial Class Mahnungen
|
||||
Me.MahnstufeZurücksetzen2ToolStripMenuItem.Size = New System.Drawing.Size(202, 22)
|
||||
Me.MahnstufeZurücksetzen2ToolStripMenuItem.Text = "Mahnstufe zurücksetzen"
|
||||
'
|
||||
'ToolStripMenuItem7
|
||||
'
|
||||
Me.ToolStripMenuItem7.Name = "ToolStripMenuItem7"
|
||||
Me.ToolStripMenuItem7.Size = New System.Drawing.Size(199, 6)
|
||||
'
|
||||
'PatientAnzeigenToolStripMenuItem1
|
||||
'
|
||||
Me.PatientAnzeigenToolStripMenuItem1.Name = "PatientAnzeigenToolStripMenuItem1"
|
||||
Me.PatientAnzeigenToolStripMenuItem1.Size = New System.Drawing.Size(202, 22)
|
||||
Me.PatientAnzeigenToolStripMenuItem1.Text = "Patient anzeigen"
|
||||
'
|
||||
'ToolStrip3
|
||||
'
|
||||
Me.ToolStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbtnMahnlauf2})
|
||||
@@ -433,9 +453,9 @@ Partial Class Mahnungen
|
||||
'
|
||||
'ContextMenuMahnungen1
|
||||
'
|
||||
Me.ContextMenuMahnungen1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DruckenToolStripMenuItem, Me.VorschauToolStripMenuItem, Me.DesignToolStripMenuItem, Me.ToolStripMenuItem2, Me.AusListeLöschenToolStripMenuItem, Me.ToolStripMenuItem1, Me.MahnstopSetzenToolStripMenuItem, Me.MahnstopEntfernenToolStripMenuItem, Me.ToolStripMenuItem3, Me.MahnstufeZurücksetzenToolStripMenuItem})
|
||||
Me.ContextMenuMahnungen1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DruckenToolStripMenuItem, Me.VorschauToolStripMenuItem, Me.DesignToolStripMenuItem, Me.ToolStripMenuItem2, Me.AusListeLöschenToolStripMenuItem, Me.ToolStripMenuItem1, Me.MahnstopSetzenToolStripMenuItem, Me.MahnstopEntfernenToolStripMenuItem, Me.ToolStripMenuItem3, Me.MahnstufeZurücksetzenToolStripMenuItem, Me.ToolStripMenuItem6, Me.PatientAnzeigenToolStripMenuItem, Me.DebitorAnzeigenToolStripMenuItem2})
|
||||
Me.ContextMenuMahnungen1.Name = "ContextMenuStrip1"
|
||||
Me.ContextMenuMahnungen1.Size = New System.Drawing.Size(203, 176)
|
||||
Me.ContextMenuMahnungen1.Size = New System.Drawing.Size(203, 248)
|
||||
'
|
||||
'DruckenToolStripMenuItem
|
||||
'
|
||||
@@ -496,6 +516,17 @@ Partial Class Mahnungen
|
||||
Me.MahnstufeZurücksetzenToolStripMenuItem.Text = "Mahnstufe zurücksetzen"
|
||||
Me.MahnstufeZurücksetzenToolStripMenuItem.Visible = False
|
||||
'
|
||||
'ToolStripMenuItem6
|
||||
'
|
||||
Me.ToolStripMenuItem6.Name = "ToolStripMenuItem6"
|
||||
Me.ToolStripMenuItem6.Size = New System.Drawing.Size(199, 6)
|
||||
'
|
||||
'PatientAnzeigenToolStripMenuItem
|
||||
'
|
||||
Me.PatientAnzeigenToolStripMenuItem.Name = "PatientAnzeigenToolStripMenuItem"
|
||||
Me.PatientAnzeigenToolStripMenuItem.Size = New System.Drawing.Size(202, 22)
|
||||
Me.PatientAnzeigenToolStripMenuItem.Text = "Patient anzeigen"
|
||||
'
|
||||
'ToolStrip2
|
||||
'
|
||||
Me.ToolStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbtnMahnlauf1})
|
||||
@@ -549,9 +580,9 @@ Partial Class Mahnungen
|
||||
'
|
||||
'ContextMenuMahnung3
|
||||
'
|
||||
Me.ContextMenuMahnung3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DruckenToolStrip3MenuItem, Me.VorschauToolStrip3MenuItem, Me.DesignToolStrip3MenuItem, Me.ToolStripSeparator3, Me.AusListeLöschenToolStrip3MenuItem, Me.ToolStripSeparator4, Me.MahnstopSetzenToolStrip3MenuItem, Me.MahnstopEntfernenToolStrip3MenuItem, Me.ToolStripMenuItem5, Me.MahnstufeZurücksetzen3ToolStripMenuItem})
|
||||
Me.ContextMenuMahnung3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DruckenToolStrip3MenuItem, Me.VorschauToolStrip3MenuItem, Me.DesignToolStrip3MenuItem, Me.ToolStripSeparator3, Me.AusListeLöschenToolStrip3MenuItem, Me.ToolStripSeparator4, Me.MahnstopSetzenToolStrip3MenuItem, Me.MahnstopEntfernenToolStrip3MenuItem, Me.ToolStripMenuItem5, Me.MahnstufeZurücksetzen3ToolStripMenuItem, Me.ToolStripMenuItem8, Me.PatientAnzeigenToolStripMenuItem2, Me.DebitorAnzeigenToolStripMenuItem})
|
||||
Me.ContextMenuMahnung3.Name = "ContextMenuStrip1"
|
||||
Me.ContextMenuMahnung3.Size = New System.Drawing.Size(203, 176)
|
||||
Me.ContextMenuMahnung3.Size = New System.Drawing.Size(203, 226)
|
||||
'
|
||||
'DruckenToolStrip3MenuItem
|
||||
'
|
||||
@@ -610,6 +641,17 @@ Partial Class Mahnungen
|
||||
Me.MahnstufeZurücksetzen3ToolStripMenuItem.Size = New System.Drawing.Size(202, 22)
|
||||
Me.MahnstufeZurücksetzen3ToolStripMenuItem.Text = "Mahnstufe zurücksetzen"
|
||||
'
|
||||
'ToolStripMenuItem8
|
||||
'
|
||||
Me.ToolStripMenuItem8.Name = "ToolStripMenuItem8"
|
||||
Me.ToolStripMenuItem8.Size = New System.Drawing.Size(199, 6)
|
||||
'
|
||||
'PatientAnzeigenToolStripMenuItem2
|
||||
'
|
||||
Me.PatientAnzeigenToolStripMenuItem2.Name = "PatientAnzeigenToolStripMenuItem2"
|
||||
Me.PatientAnzeigenToolStripMenuItem2.Size = New System.Drawing.Size(202, 22)
|
||||
Me.PatientAnzeigenToolStripMenuItem2.Text = "Patient anzeigen"
|
||||
'
|
||||
'ToolStrip4
|
||||
'
|
||||
Me.ToolStrip4.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbtnMahnlauf3})
|
||||
@@ -672,6 +714,24 @@ Partial Class Mahnungen
|
||||
Me.MahnstufeZurücksetzen4ToolStripMenuItem.Size = New System.Drawing.Size(202, 22)
|
||||
Me.MahnstufeZurücksetzen4ToolStripMenuItem.Text = "Mahnstufe zurücksetzen"
|
||||
'
|
||||
'DebitorAnzeigenToolStripMenuItem
|
||||
'
|
||||
Me.DebitorAnzeigenToolStripMenuItem.Name = "DebitorAnzeigenToolStripMenuItem"
|
||||
Me.DebitorAnzeigenToolStripMenuItem.Size = New System.Drawing.Size(202, 22)
|
||||
Me.DebitorAnzeigenToolStripMenuItem.Text = "Debitor Anzeigen"
|
||||
'
|
||||
'DebitorAnzeigenToolStripMenuItem1
|
||||
'
|
||||
Me.DebitorAnzeigenToolStripMenuItem1.Name = "DebitorAnzeigenToolStripMenuItem1"
|
||||
Me.DebitorAnzeigenToolStripMenuItem1.Size = New System.Drawing.Size(202, 22)
|
||||
Me.DebitorAnzeigenToolStripMenuItem1.Text = "Debitor anzeigen"
|
||||
'
|
||||
'DebitorAnzeigenToolStripMenuItem2
|
||||
'
|
||||
Me.DebitorAnzeigenToolStripMenuItem2.Name = "DebitorAnzeigenToolStripMenuItem2"
|
||||
Me.DebitorAnzeigenToolStripMenuItem2.Size = New System.Drawing.Size(202, 22)
|
||||
Me.DebitorAnzeigenToolStripMenuItem2.Text = "Debitor anzeigen"
|
||||
'
|
||||
'Mahnungen
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
@@ -783,4 +843,13 @@ Partial Class Mahnungen
|
||||
Friend WithEvents DesignToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents DesignToolStrip2MenuItem As ToolStripMenuItem
|
||||
Friend WithEvents DesignToolStrip3MenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ToolStripMenuItem6 As ToolStripSeparator
|
||||
Friend WithEvents PatientAnzeigenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ToolStripMenuItem7 As ToolStripSeparator
|
||||
Friend WithEvents PatientAnzeigenToolStripMenuItem1 As ToolStripMenuItem
|
||||
Friend WithEvents ToolStripMenuItem8 As ToolStripSeparator
|
||||
Friend WithEvents PatientAnzeigenToolStripMenuItem2 As ToolStripMenuItem
|
||||
Friend WithEvents DebitorAnzeigenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents DebitorAnzeigenToolStripMenuItem1 As ToolStripMenuItem
|
||||
Friend WithEvents DebitorAnzeigenToolStripMenuItem2 As ToolStripMenuItem
|
||||
End Class
|
||||
|
||||
@@ -437,7 +437,7 @@
|
||||
</value>
|
||||
</data>
|
||||
<data name="C1Mahnungen2.PropBag" xml:space="preserve">
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>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;}</Data></Styles><Splits><C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 792, 123</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth><ClientArea>0, 0, 792, 123</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>Style11{}Style10{}Style13{}Style12{}Footer{}Style2{}Style3{}FilterBar{BackColor:Info;}RecordSelector{AlignImage:Center;}Style15{}OddRow{BackColor:ControlLight;}Caption{AlignHorz:Center;}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;ForeColor:ControlText;BackColor:Control;Wrap:True;}Style6{}Normal{}Style7{}Editor{}Style4{}Style14{}Style16{}</Data></Styles><Splits><C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 792, 123</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth><ClientArea>0, 0, 792, 123</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||
</data>
|
||||
<metadata name="ToolStrip3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>560, 17</value>
|
||||
@@ -497,7 +497,7 @@
|
||||
</value>
|
||||
</data>
|
||||
<data name="C1Mahnungen1.PropBag" xml:space="preserve">
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;ForeColor:ControlText;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;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}</Data></Styles><Splits><C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 792, 168</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth><ClientArea>0, 0, 792, 168</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>Style11{}Style10{}Style13{}Style12{}Footer{}Style2{}Style3{}FilterBar{BackColor:Info;}RecordSelector{AlignImage:Center;}Style15{}OddRow{BackColor:ControlLight;}Caption{AlignHorz:Center;}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{ForeColor:ControlText;Border:Flat,ControlDark,0, 1, 0, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style6{}Normal{}Style7{}Editor{}Style4{}Style14{}Style16{}</Data></Styles><Splits><C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 792, 168</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth><ClientArea>0, 0, 792, 168</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||
</data>
|
||||
<metadata name="ToolStrip2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>453, 17</value>
|
||||
@@ -517,6 +517,9 @@
|
||||
TgDQASA1MVpwzwAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="ToolStrip4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>667, 17</value>
|
||||
</metadata>
|
||||
<metadata name="ContextMenuMahnung3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>174, 56</value>
|
||||
</metadata>
|
||||
@@ -557,7 +560,7 @@
|
||||
</value>
|
||||
</data>
|
||||
<data name="C1Mahnungen3.PropBag" xml:space="preserve">
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:ControlLight;}Style3{}Footer{}Style14{}FilterBar{BackColor:Info;}Heading{AlignVert:Center;Border:Flat,ControlDark,0, 1, 0, 1;Wrap:True;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;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}</Data></Styles><Splits><C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 792, 123</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth><ClientArea>0, 0, 792, 123</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>Style11{}Style10{}Style13{}Style12{}Footer{}Style2{}Style3{}FilterBar{BackColor:Info;}RecordSelector{AlignImage:Center;}Style15{}OddRow{BackColor:ControlLight;}Caption{AlignHorz:Center;}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{}Normal{}Style7{}Editor{}Style4{}Style14{}Style16{}</Data></Styles><Splits><C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 792, 123</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth><ClientArea>0, 0, 792, 123</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||
</data>
|
||||
<metadata name="ToolStrip4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>667, 17</value>
|
||||
@@ -617,7 +620,7 @@
|
||||
</value>
|
||||
</data>
|
||||
<data name="C1Mahnungen4.PropBag" xml:space="preserve">
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>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;}</Data></Styles><Splits><C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 792, 138</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth><ClientArea>0, 0, 792, 138</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>Style11{}Style10{}Style13{}Style12{}Footer{}Style2{}Style3{}FilterBar{BackColor:Info;}RecordSelector{AlignImage:Center;}Style15{}OddRow{BackColor:ControlLight;}Caption{AlignHorz:Center;}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{}Normal{}Style7{}Editor{}Style4{}Style14{}Style16{}</Data></Styles><Splits><C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 792, 138</ClientRect><BorderSide>0</BorderSide></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth><ClientArea>0, 0, 792, 138</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||
</data>
|
||||
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>108</value>
|
||||
|
||||
@@ -358,4 +358,73 @@ Public Class Mahnungen
|
||||
Private Sub tsbtnquit_Click(sender As Object, e As EventArgs) Handles tsbtnquit.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub PatientAnzeigenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PatientAnzeigenToolStripMenuItem.Click, PatientAnzeigenToolStripMenuItem1.Click, PatientAnzeigenToolStripMenuItem2.Click
|
||||
Dim key As Integer
|
||||
Try
|
||||
Select Case sender.name
|
||||
Case "PatientAnzeigenToolStripMenuItem"
|
||||
key = Me.C1Mahnungen1.Columns(7).Value
|
||||
Case "PatientAnzeigenToolStripMenuItem1"
|
||||
key = Me.C1Mahnungen2.Columns(7).Value
|
||||
Case "PatientAnzeigenToolStripMenuItem2"
|
||||
key = Me.C1Mahnungen3.Columns(7).Value
|
||||
|
||||
End Select
|
||||
'key = Me.C1Mahnungen1.Columns(7).Value
|
||||
If key < 49999 Then
|
||||
Cursor = Cursors.WaitCursor
|
||||
Dim f As New Patient
|
||||
f.MdiParent = Me.MdiParent
|
||||
f.PatientNr = key
|
||||
f.Show()
|
||||
|
||||
Cursor = Cursors.Default
|
||||
Else
|
||||
Cursor = Cursors.WaitCursor
|
||||
Dim f As New frmFirma
|
||||
f.MdiParent = Me.MdiParent
|
||||
f.Show()
|
||||
f.Firmanr = key
|
||||
Cursor = Cursors.Default
|
||||
End If
|
||||
Catch
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub DebitorAnzeigenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DebitorAnzeigenToolStripMenuItem.Click, DebitorAnzeigenToolStripMenuItem1.Click, DebitorAnzeigenToolStripMenuItem2.Click
|
||||
Dim key As Integer
|
||||
Try
|
||||
Select Case sender.name
|
||||
Case "DebitorAnzeigenToolStripMenuItem2"
|
||||
key = Me.C1Mahnungen1.Columns(9).Value
|
||||
Case "DebitorAnzeigenToolStripMenuItem1"
|
||||
key = Me.C1Mahnungen2.Columns(9).Value
|
||||
Case "DebitorAnzeigenToolStripMenuItem2"
|
||||
key = Me.C1Mahnungen3.Columns(9).Value
|
||||
|
||||
End Select
|
||||
'key = Me.C1Mahnungen1.Columns(7).Value
|
||||
If key < 49999 Then
|
||||
Cursor = Cursors.WaitCursor
|
||||
Dim f As New Patient
|
||||
f.MdiParent = Me.MdiParent
|
||||
f.PatientNr = key
|
||||
f.Show()
|
||||
|
||||
Cursor = Cursors.Default
|
||||
Else
|
||||
Cursor = Cursors.WaitCursor
|
||||
Dim f As New frmFirma
|
||||
f.MdiParent = Me.MdiParent
|
||||
f.Show()
|
||||
f.Firmanr = key
|
||||
Cursor = Cursors.Default
|
||||
End If
|
||||
Catch
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
|
||||
@@ -1,7 +1,7 @@
|
||||
§›ƒ˜–˜¡¶¶ÂµeŽºº°ª‹Æªº‚q¾¼°¬¡‘¤p©¢¹§²¸²Œ¡›©‡¥‘Œ¢½³ÆºµÆ¦Æ³©hÀª±È´®Æº‘¨¡—s ¹ª¸ºf¼°²ÃŽ¹¿a·¶»Ã‘«³ÁÁ¹€É½·³À¹¯Ç«´Àa½¹‹‚¨™“£µºa¸¯À®ˆƒ~ŒŠ€»´³ºu½¸‚Ŷ‰Ä¦ÅÁ¼·¿©‹}µÇs
|
||||
˜ª´µ·»¸µ¹³uÁúıª…ÀÃr€»¯½É·¨¤X“™Ä§´ƒ°½Â¼Ç¤xq€z½Â¹·¼Àµ¹·²e»²¨ÃÅ«¹Ë~§¨žs¨•ªÃ¯´¹f¹®®ÄÀ¼È¾fª¼®Ä‘º¦¾È³¼ÁÀ°»Á¦Â¼±³rª¸’‰·™››Äf´®À«†‡‰º¹¦Àh¾¸‘¸³¾µ¸ÅÅ´º±‚xƪº„z
|
||||
§›ƒ˜–˜¡¶¶ÂµeŽºº°ª‹Æªº‚q¾¼°¬¡‘¤p©¢¹§²¸²Œ¡›©‡¥‘Œ¢½³ÆºµÆ¦Æ³©hÀª±È´®Æº‘¨¡—s ¹ª¸ºf¼°²ÃŽ¹¿a·¶»Ã‘«³ÁÁ¹€É½·³À¹¯Ç«´Àa½¹‹‚¨™“£µºa¸¯À®ˆƒ~ŒŠ€»´³ºu½¸‚Ŷ‰Ä¦ÅÁ¼·¿©‹}µÇs
|
||||
˜ª´µ¯´‡§Á®¾ºˆ¸¦Æ¯e»¼ºÀ¶§‚Å©É…~‚¡¦™¬¹§e©§½¬»½º‘©¶®¬ºÂȦ¾‡ÁÁ®¾³€½ÀªÀs«©´µ¾¨««§§Âª~o¹®¾}ˆ
|
||||
˜‘½¼ºÂŽ©³É¯t¸Á÷«²‚Á»·u‚|½Ã·»¡™œX³§µ¦²µ°ˆ³¾À³©®¬º·É¹Â€»Ã¹¬Ä¯¹±eÁ¸¥ºÄªÈ΋š‹ˆysÀ«³¸¯¹½k³¶É·¯µÇh¾Âº´»¯À¸·‰¼·¿°ÁÇ£¹»°Âu·«us ™³±¦¹f¹²Å´‹‡„~||ûºÆt®¶’Áµ€Â¯¸»Ä´À·oũɇ‡
|
||||
˜ª´µ·»¸µ¹³uÁúıª…ÀÃr€»¯½É·¨¤X“™Ä§´ƒ»¼·¹³ºªÁƒ¾ÂȪ¹Ç¯Èª¶n¸°ºÀ¼¶¾”§¥—‚¨¢«¹¹µe¹«¬ÀÁ·ÇÍe¯¯´·’ºµ±Åº‰Ë´Ä¹¸¼®¹·Â°e»¥‘¾¨›£•¬p¹ª¿«ƒ}{ˆ„ŽÉ¸«³n±¹‘ǦůǸɽ·¬ŠoÁ»·w‹
|
||||
¦´«º±ÃŽ¸¦Æ¶nÇ´ÇÀ¨Š¸¶ÈruªÂ¾Â°™¤P›±º¢±µ†¯¿»²Æ´«º±Ã³†u„†~‹xƒ‰®¶ÁªµÅ£¹·¥tȳªª™¬Éƒ”˜–„»´Àƽ¸ºaÁ¸ÉÆ®ÆÎn½³¸½‚®®±Á¸}¼Á³¿È¨¬¡Ÿ¦p¯¥‚¶ª®º³Çt¸¯»³…‰„{ÊÁ¹·r·©…À¦‰Ã£¸Å¸ÃDz„b«˜‚
|
||||
˜Š“ˆ¬¶ÈµeÅÄÃƨ·‹¸°Âu~Ž«³»µ½¶ºg›™¤™¼µ¨‚ª¶¶ª³³ÁȦ²sÁµ¾À¹€»Ã¹¬Ä¯¹±eÁ¸¥ºÄªÈ΋š‹ˆysÀ«³¸¯¹½k³¶É·¯µÇh¾Âº´»¯À¸·‰¼·¿°ÁÇ£¹»°Âu·«us ™³±¦¹f¹²Å´‹‡„~||ûºÆt®¶’Áµ€Â¯¸»Ä´À·oũɇ‡
|
||||
¤·§¹·»¸µ¹³uÁúıª…ÀÃr€»¯½É·¨¤X“™Ä§´ƒ»¼£Æ¦¾ªÁƒ¾ÂȪ¹Ç¯Èª¶n¸°ºÀ¼¶¾”§¥—‚¨¢«¹¹µe¹«¬ÀÁ·ÇÍe¯¯´·’ºµ±Åº‰Ë´Ä¹¸¼®¹·Â°e»¥‘¾¨›£•¬p¹ª¿«ƒ}{ˆ„ŽÉ¸«³n±¹‘ǦůǸɽ·¬ŠoÁ»·w‹
|
||||
|
||||
@@ -14,7 +14,7 @@
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
|
||||
<dsig:DigestValue>KeU9XEtAG8BcC2eO2tw4Bo+b1NEgQkq7GV1xuaNr2eo=</dsig:DigestValue>
|
||||
<dsig:DigestValue>Rb3azFGq7yxGBSPjH10UsEYmbTor+83Ce2G/L1D48AY=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
|
||||
Binary file not shown.
@@ -163,14 +163,14 @@
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="DPM2018.exe" size="6838272">
|
||||
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="DPM2018.exe" size="6846464">
|
||||
<assemblyIdentity name="DPM2018" 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>OPdnFzaXC2xlqGJX2JE7ImblyXExgNPx4wshtkNwMuw=</dsig:DigestValue>
|
||||
<dsig:DigestValue>0IT5TH+FkyjGHJi/TwPqkNbTQ6+wp9i4CvawoQMTZEo=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
|
||||
Binary file not shown.
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: 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: 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: 78 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: 81 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: 81 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: 81 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: 81 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: 81 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: 81 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 81 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: 81 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: 81 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: 81 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: 81 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: 81 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: 81 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: 81 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 79 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 88 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 88 KiB |
Some files were not shown because too many files have changed in this diff Show More
Reference in New Issue
Block a user