edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

cFakt, Kundenblatt, etc.

Browse Source
This commit is contained in:
d.breimaier
2025-12-17 17:16:16 +01:00
parent e9ce8f66c8
commit da8cf8854a
8 changed files with 535 additions and 297 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
SDL/Fakturierung/cFakturierung.vb
View File

@@ -2353,8 +2353,9 @@ Public Class cFakturierung
Case Else
rpt.lblLeistungUeberschrift.Text = "RENR"
rpt.lblLeistungUeberschrift.Text = "RE Datum"
rpt.lblAnzahlUeberschrift.Text = "VZ Tage"
rpt.lblSteuerpflichtigUeberschrift.Text = "Zahlungsbetrag"
rpt.lblSteuerpflichtigUeberschrift.Text = "RE Betrag"
rpt.lblSteuerfreiUeberschrift.Text = "Verzugszinsen"
'rpt.lbl_onlyZR_ZinsenUeberschrift.Text = "Zinsen p.a."
End Select

2
SDL/kunden/frmKundenblatt.vb
View File

@@ -219,6 +219,8 @@ Public Class frmKundenblatt
Dim path = DS.GET_TOP1_PATH 'cDATENSERVER.getTOP1Path("GRAFIK", "FIRMENLOGOS", kdNr)
If path <> "" Then
picLogo.ImageLocation = path
Else
picLogo.ImageLocation = Nothing
End If
Catch ex As Exception

602
SDL/kunden/usrcntlKundeBearbeitenFull.Designer.vb generated
View File

@@ -23,34 +23,34 @@ Partial Class usrcntlKundeBearbeitenFull
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle13 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle14 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle15 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle16 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle17 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle19 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle20 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle21 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle22 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle23 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle24 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle25 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle26 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle27 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle28 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle29 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle30 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle31 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle32 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle33 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle34 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle35 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle36 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle37 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle38 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle39 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle40 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle41 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle42 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle43 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle44 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle45 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle46 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle47 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle48 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle49 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle50 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle51 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle52 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle53 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle54 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle55 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle56 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Me.tbcntrDetails = New System.Windows.Forms.TabControl()
Me.tbAbfertigung = New System.Windows.Forms.TabPage()
Me.cbxVerzolltBeiExport = New System.Windows.Forms.CheckBox()
@@ -285,6 +285,11 @@ Partial Class usrcntlKundeBearbeitenFull
Me.dgvIDS_Standard = New System.Windows.Forms.DataGridView()
Me.Kunden = New System.Windows.Forms.TabPage()
Me.dgvIDS_Rabatte = New System.Windows.Forms.DataGridView()
Me.TabPage2 = New System.Windows.Forms.TabPage()
Me.txtATEZ_GreenpulseID = New System.Windows.Forms.TextBox()
Me.Label118 = New System.Windows.Forms.Label()
Me.txtATEZ_LogicustID = New System.Windows.Forms.TextBox()
Me.Label119 = New System.Windows.Forms.Label()
Me.cbxCSInsolvent = New System.Windows.Forms.CheckBox()
Me.cbxCS_Added = New System.Windows.Forms.CheckBox()
Me.Label113 = New System.Windows.Forms.Label()
@@ -428,11 +433,10 @@ Partial Class usrcntlKundeBearbeitenFull
Me.cboFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboAuswahl = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.TabPage2 = New System.Windows.Forms.TabPage()
Me.txtATEZ_GreenpulseID = New System.Windows.Forms.TextBox()
Me.Label118 = New System.Windows.Forms.Label()
Me.txtATEZ_LogicustID = New System.Windows.Forms.TextBox()
Me.Label119 = New System.Windows.Forms.Label()
Me.Label120 = New System.Windows.Forms.Label()
Me.txtSEG_vom = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtSEG_Summe = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Label121 = New System.Windows.Forms.Label()
Me.tbcntrDetails.SuspendLayout()
Me.tbAbfertigung.SuspendLayout()
Me.tbcntrAbf.SuspendLayout()
@@ -465,6 +469,7 @@ Partial Class usrcntlKundeBearbeitenFull
CType(Me.dgvIDS_Standard, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Kunden.SuspendLayout()
CType(Me.dgvIDS_Rabatte, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPage2.SuspendLayout()
CType(Me.dgvSonst_IDSKunden, System.ComponentModel.ISupportInitialize).BeginInit()
Me.tbSchnittstellen.SuspendLayout()
CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -479,7 +484,6 @@ Partial Class usrcntlKundeBearbeitenFull
Me.TabPage11.SuspendLayout()
Me.pnlNeukunde.SuspendLayout()
Me.cnsBankverbindungen.SuspendLayout()
Me.TabPage2.SuspendLayout()
Me.SuspendLayout()
'
'tbcntrDetails
@@ -2282,6 +2286,10 @@ Partial Class usrcntlKundeBearbeitenFull
'
'tbVersicherung
'
Me.tbVersicherung.Controls.Add(Me.Label121)
Me.tbVersicherung.Controls.Add(Me.Label120)
Me.tbVersicherung.Controls.Add(Me.txtSEG_vom)
Me.tbVersicherung.Controls.Add(Me.txtSEG_Summe)
Me.tbVersicherung.Controls.Add(Me.cbxBlanko)
Me.tbVersicherung.Controls.Add(Me.Label105)
Me.tbVersicherung.Controls.Add(Me.Label106)
@@ -2396,7 +2404,7 @@ Partial Class usrcntlKundeBearbeitenFull
'Label81
'
Me.Label81.AutoSize = True
Me.Label81.Location = New System.Drawing.Point(419, 168)
Me.Label81.Location = New System.Drawing.Point(419, 181)
Me.Label81.Name = "Label81"
Me.Label81.Size = New System.Drawing.Size(98, 13)
Me.Label81.TabIndex = 45
@@ -2405,7 +2413,7 @@ Partial Class usrcntlKundeBearbeitenFull
'Label82
'
Me.Label82.AutoSize = True
Me.Label82.Location = New System.Drawing.Point(311, 168)
Me.Label82.Location = New System.Drawing.Point(311, 181)
Me.Label82.Name = "Label82"
Me.Label82.Size = New System.Drawing.Size(24, 13)
Me.Label82.TabIndex = 43
@@ -2414,7 +2422,7 @@ Partial Class usrcntlKundeBearbeitenFull
'cbxInkassoUebergeben
'
Me.cbxInkassoUebergeben.AutoSize = True
Me.cbxInkassoUebergeben.Location = New System.Drawing.Point(159, 167)
Me.cbxInkassoUebergeben.Location = New System.Drawing.Point(159, 180)
Me.cbxInkassoUebergeben.Name = "cbxInkassoUebergeben"
Me.cbxInkassoUebergeben.Size = New System.Drawing.Size(156, 17)
Me.cbxInkassoUebergeben.TabIndex = 42
@@ -2434,7 +2442,7 @@ Partial Class usrcntlKundeBearbeitenFull
'Label35
'
Me.Label35.AutoSize = True
Me.Label35.Location = New System.Drawing.Point(419, 142)
Me.Label35.Location = New System.Drawing.Point(419, 155)
Me.Label35.Name = "Label35"
Me.Label35.Size = New System.Drawing.Size(22, 13)
Me.Label35.TabIndex = 22
@@ -2443,7 +2451,7 @@ Partial Class usrcntlKundeBearbeitenFull
'Label27
'
Me.Label27.AutoSize = True
Me.Label27.Location = New System.Drawing.Point(419, 116)
Me.Label27.Location = New System.Drawing.Point(419, 129)
Me.Label27.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(98, 13)
Me.Label27.TabIndex = 17
@@ -2452,7 +2460,7 @@ Partial Class usrcntlKundeBearbeitenFull
'Label24
'
Me.Label24.AutoSize = True
Me.Label24.Location = New System.Drawing.Point(419, 89)
Me.Label24.Location = New System.Drawing.Point(419, 102)
Me.Label24.Name = "Label24"
Me.Label24.Size = New System.Drawing.Size(55, 13)
Me.Label24.TabIndex = 12
@@ -2462,7 +2470,7 @@ Partial Class usrcntlKundeBearbeitenFull
'cbxNichtVersicherbar
'
Me.cbxNichtVersicherbar.AutoSize = True
Me.cbxNichtVersicherbar.Location = New System.Drawing.Point(159, 39)
Me.cbxNichtVersicherbar.Location = New System.Drawing.Point(159, 30)
Me.cbxNichtVersicherbar.Name = "cbxNichtVersicherbar"
Me.cbxNichtVersicherbar.Size = New System.Drawing.Size(142, 17)
Me.cbxNichtVersicherbar.TabIndex = 2
@@ -2472,7 +2480,7 @@ Partial Class usrcntlKundeBearbeitenFull
'Label17
'
Me.Label17.AutoSize = True
Me.Label17.Location = New System.Drawing.Point(419, 65)
Me.Label17.Location = New System.Drawing.Point(419, 54)
Me.Label17.Name = "Label17"
Me.Label17.Size = New System.Drawing.Size(86, 13)
Me.Label17.TabIndex = 7
@@ -2481,7 +2489,7 @@ Partial Class usrcntlKundeBearbeitenFull
'Label8
'
Me.Label8.AutoSize = True
Me.Label8.Location = New System.Drawing.Point(311, 142)
Me.Label8.Location = New System.Drawing.Point(311, 155)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(24, 13)
Me.Label8.TabIndex = 20
@@ -2490,7 +2498,7 @@ Partial Class usrcntlKundeBearbeitenFull
'cbxAnerkVersFall
'
Me.cbxAnerkVersFall.AutoSize = True
Me.cbxAnerkVersFall.Location = New System.Drawing.Point(159, 141)
Me.cbxAnerkVersFall.Location = New System.Drawing.Point(159, 154)
Me.cbxAnerkVersFall.Name = "cbxAnerkVersFall"
Me.cbxAnerkVersFall.Size = New System.Drawing.Size(130, 17)
Me.cbxAnerkVersFall.TabIndex = 19
@@ -2500,7 +2508,7 @@ Partial Class usrcntlKundeBearbeitenFull
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(311, 116)
Me.Label2.Location = New System.Drawing.Point(311, 129)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(24, 13)
Me.Label2.TabIndex = 15
@@ -2509,7 +2517,7 @@ Partial Class usrcntlKundeBearbeitenFull
'cbxVersicherungUebergeben
'
Me.cbxVersicherungUebergeben.AutoSize = True
Me.cbxVersicherungUebergeben.Location = New System.Drawing.Point(159, 115)
Me.cbxVersicherungUebergeben.Location = New System.Drawing.Point(159, 128)
Me.cbxVersicherungUebergeben.Name = "cbxVersicherungUebergeben"
Me.cbxVersicherungUebergeben.Size = New System.Drawing.Size(142, 17)
Me.cbxVersicherungUebergeben.TabIndex = 14
@@ -2519,7 +2527,7 @@ Partial Class usrcntlKundeBearbeitenFull
'Label6
'
Me.Label6.AutoSize = True
Me.Label6.Location = New System.Drawing.Point(305, 89)
Me.Label6.Location = New System.Drawing.Point(305, 102)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(30, 13)
Me.Label6.TabIndex = 10
@@ -2528,7 +2536,7 @@ Partial Class usrcntlKundeBearbeitenFull
'cbxDeckungsstopp
'
Me.cbxDeckungsstopp.AutoSize = True
Me.cbxDeckungsstopp.Location = New System.Drawing.Point(159, 88)
Me.cbxDeckungsstopp.Location = New System.Drawing.Point(159, 101)
Me.cbxDeckungsstopp.Name = "cbxDeckungsstopp"
Me.cbxDeckungsstopp.Size = New System.Drawing.Size(101, 17)
Me.cbxDeckungsstopp.TabIndex = 9
@@ -2573,7 +2581,7 @@ Partial Class usrcntlKundeBearbeitenFull
'Label55
'
Me.Label55.AutoSize = True
Me.Label55.Location = New System.Drawing.Point(305, 65)
Me.Label55.Location = New System.Drawing.Point(305, 54)
Me.Label55.Name = "Label55"
Me.Label55.Size = New System.Drawing.Size(30, 13)
Me.Label55.TabIndex = 5
@@ -2622,7 +2630,7 @@ Partial Class usrcntlKundeBearbeitenFull
'
Me.Label54.AutoSize = True
Me.Label54.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label54.Location = New System.Drawing.Point(7, 65)
Me.Label54.Location = New System.Drawing.Point(6, 58)
Me.Label54.Name = "Label54"
Me.Label54.Size = New System.Drawing.Size(110, 13)
Me.Label54.TabIndex = 3
@@ -2762,7 +2770,7 @@ Partial Class usrcntlKundeBearbeitenFull
Me.txtInkasso_GemeldeterBetrag._Waehrung = True
Me.txtInkasso_GemeldeterBetrag._WaehrungZeichen = True
Me.txtInkasso_GemeldeterBetrag.ForeColor = System.Drawing.Color.Red
Me.txtInkasso_GemeldeterBetrag.Location = New System.Drawing.Point(523, 165)
Me.txtInkasso_GemeldeterBetrag.Location = New System.Drawing.Point(523, 178)
Me.txtInkasso_GemeldeterBetrag.MaxLength = 10
Me.txtInkasso_GemeldeterBetrag.MaxLineLength = -1
Me.txtInkasso_GemeldeterBetrag.MaxLines_Warning = ""
@@ -2788,7 +2796,7 @@ Partial Class usrcntlKundeBearbeitenFull
Me.txtInkassoUebergebenAm._WaehrungZeichen = True
Me.txtInkassoUebergebenAm.Enabled = False
Me.txtInkassoUebergebenAm.ForeColor = System.Drawing.Color.Red
Me.txtInkassoUebergebenAm.Location = New System.Drawing.Point(341, 165)
Me.txtInkassoUebergebenAm.Location = New System.Drawing.Point(341, 178)
Me.txtInkassoUebergebenAm.MaxLength = 10
Me.txtInkassoUebergebenAm.MaxLineLength = -1
Me.txtInkassoUebergebenAm.MaxLines_Warning = ""
@@ -2836,7 +2844,7 @@ Partial Class usrcntlKundeBearbeitenFull
Me.txtAnerkVersFallAb._Waehrung = False
Me.txtAnerkVersFallAb._WaehrungZeichen = True
Me.txtAnerkVersFallAb.ForeColor = System.Drawing.Color.Red
Me.txtAnerkVersFallAb.Location = New System.Drawing.Point(449, 139)
Me.txtAnerkVersFallAb.Location = New System.Drawing.Point(449, 152)
Me.txtAnerkVersFallAb.MaxLength = 10
Me.txtAnerkVersFallAb.MaxLineLength = -1
Me.txtAnerkVersFallAb.MaxLines_Warning = ""
@@ -2861,7 +2869,7 @@ Partial Class usrcntlKundeBearbeitenFull
Me.txtVersicherung_GemeldeterBetrag._Waehrung = True
Me.txtVersicherung_GemeldeterBetrag._WaehrungZeichen = True
Me.txtVersicherung_GemeldeterBetrag.ForeColor = System.Drawing.Color.Red
Me.txtVersicherung_GemeldeterBetrag.Location = New System.Drawing.Point(523, 113)
Me.txtVersicherung_GemeldeterBetrag.Location = New System.Drawing.Point(523, 126)
Me.txtVersicherung_GemeldeterBetrag.MaxLength = 10
Me.txtVersicherung_GemeldeterBetrag.MaxLineLength = -1
Me.txtVersicherung_GemeldeterBetrag.MaxLines_Warning = ""
@@ -2886,7 +2894,7 @@ Partial Class usrcntlKundeBearbeitenFull
Me.txtVersUebergebenOPSaldo._Waehrung = True
Me.txtVersUebergebenOPSaldo._WaehrungZeichen = True
Me.txtVersUebergebenOPSaldo.ForeColor = System.Drawing.Color.Red
Me.txtVersUebergebenOPSaldo.Location = New System.Drawing.Point(480, 86)
Me.txtVersUebergebenOPSaldo.Location = New System.Drawing.Point(480, 99)
Me.txtVersUebergebenOPSaldo.MaxLength = 10
Me.txtVersUebergebenOPSaldo.MaxLineLength = -1
Me.txtVersUebergebenOPSaldo.MaxLines_Warning = ""
@@ -2912,7 +2920,7 @@ Partial Class usrcntlKundeBearbeitenFull
Me.txtVersicherungDeckungsquote._Waehrung = False
Me.txtVersicherungDeckungsquote._WaehrungZeichen = True
Me.txtVersicherungDeckungsquote.ForeColor = System.Drawing.Color.Red
Me.txtVersicherungDeckungsquote.Location = New System.Drawing.Point(523, 62)
Me.txtVersicherungDeckungsquote.Location = New System.Drawing.Point(523, 51)
Me.txtVersicherungDeckungsquote.MaxLength = 10
Me.txtVersicherungDeckungsquote.MaxLineLength = -1
Me.txtVersicherungDeckungsquote.MaxLines_Warning = ""
@@ -2938,7 +2946,7 @@ Partial Class usrcntlKundeBearbeitenFull
Me.txtAnerkVersFallAm._WaehrungZeichen = True
Me.txtAnerkVersFallAm.Enabled = False
Me.txtAnerkVersFallAm.ForeColor = System.Drawing.Color.Red
Me.txtAnerkVersFallAm.Location = New System.Drawing.Point(341, 139)
Me.txtAnerkVersFallAm.Location = New System.Drawing.Point(341, 152)
Me.txtAnerkVersFallAm.MaxLength = 10
Me.txtAnerkVersFallAm.MaxLineLength = -1
Me.txtAnerkVersFallAm.MaxLines_Warning = ""
@@ -2964,7 +2972,7 @@ Partial Class usrcntlKundeBearbeitenFull
Me.txtVersicherungUebergebenAm._WaehrungZeichen = True
Me.txtVersicherungUebergebenAm.Enabled = False
Me.txtVersicherungUebergebenAm.ForeColor = System.Drawing.Color.Red
Me.txtVersicherungUebergebenAm.Location = New System.Drawing.Point(341, 113)
Me.txtVersicherungUebergebenAm.Location = New System.Drawing.Point(341, 126)
Me.txtVersicherungUebergebenAm.MaxLength = 10
Me.txtVersicherungUebergebenAm.MaxLineLength = -1
Me.txtVersicherungUebergebenAm.MaxLines_Warning = ""
@@ -2990,7 +2998,7 @@ Partial Class usrcntlKundeBearbeitenFull
Me.txtDeckungsstoppDatum._WaehrungZeichen = True
Me.txtDeckungsstoppDatum.Enabled = False
Me.txtDeckungsstoppDatum.ForeColor = System.Drawing.Color.Red
Me.txtDeckungsstoppDatum.Location = New System.Drawing.Point(341, 86)
Me.txtDeckungsstoppDatum.Location = New System.Drawing.Point(341, 99)
Me.txtDeckungsstoppDatum.MaxLength = 10
Me.txtDeckungsstoppDatum.MaxLineLength = -1
Me.txtDeckungsstoppDatum.MaxLines_Warning = ""
@@ -3089,7 +3097,7 @@ Partial Class usrcntlKundeBearbeitenFull
Me.txtVers_VersicherungssummeVon._Waehrung = False
Me.txtVers_VersicherungssummeVon._WaehrungZeichen = True
Me.txtVers_VersicherungssummeVon.ForeColor = System.Drawing.Color.Red
Me.txtVers_VersicherungssummeVon.Location = New System.Drawing.Point(341, 62)
Me.txtVers_VersicherungssummeVon.Location = New System.Drawing.Point(341, 51)
Me.txtVers_VersicherungssummeVon.MaxLength = 10
Me.txtVers_VersicherungssummeVon.MaxLineLength = -1
Me.txtVers_VersicherungssummeVon.MaxLines_Warning = ""
@@ -3187,7 +3195,7 @@ Partial Class usrcntlKundeBearbeitenFull
Me.txtVers_Versicherungssumme._Waehrung = True
Me.txtVers_Versicherungssumme._WaehrungZeichen = True
Me.txtVers_Versicherungssumme.ForeColor = System.Drawing.Color.Red
Me.txtVers_Versicherungssumme.Location = New System.Drawing.Point(159, 62)
Me.txtVers_Versicherungssumme.Location = New System.Drawing.Point(159, 51)
Me.txtVers_Versicherungssumme.MaxLineLength = -1
Me.txtVers_Versicherungssumme.MaxLines_Warning = ""
Me.txtVers_Versicherungssumme.MaxLines_Warning_Label = Nothing
@@ -3271,8 +3279,8 @@ Partial Class usrcntlKundeBearbeitenFull
Me.dgvUmsatzbericht.AllowUserToDeleteRows = False
Me.dgvUmsatzbericht.AllowUserToOrderColumns = True
Me.dgvUmsatzbericht.AllowUserToResizeRows = False
DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvUmsatzbericht.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
DataGridViewCellStyle29.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvUmsatzbericht.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle29
Me.dgvUmsatzbericht.BackgroundColor = System.Drawing.Color.White
Me.dgvUmsatzbericht.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvUmsatzbericht.Location = New System.Drawing.Point(6, 25)
@@ -3371,8 +3379,8 @@ Partial Class usrcntlKundeBearbeitenFull
Me.dgvOffenePosten.AllowUserToDeleteRows = False
Me.dgvOffenePosten.AllowUserToOrderColumns = True
Me.dgvOffenePosten.AllowUserToResizeRows = False
DataGridViewCellStyle2.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvOffenePosten.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
DataGridViewCellStyle30.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvOffenePosten.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle30
Me.dgvOffenePosten.BackgroundColor = System.Drawing.Color.White
Me.dgvOffenePosten.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvOffenePosten.Location = New System.Drawing.Point(6, 38)
@@ -3547,40 +3555,40 @@ Partial Class usrcntlKundeBearbeitenFull
Me.dgvKreditkarten.AllowUserToDeleteRows = False
Me.dgvKreditkarten.AllowUserToOrderColumns = True
Me.dgvKreditkarten.AllowUserToResizeRows = False
DataGridViewCellStyle3.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvKreditkarten.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
DataGridViewCellStyle31.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvKreditkarten.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle31
Me.dgvKreditkarten.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvKreditkarten.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle4
DataGridViewCellStyle32.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle32.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle32.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle32.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle32.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle32.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle32.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvKreditkarten.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle32
Me.dgvKreditkarten.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle5.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvKreditkarten.DefaultCellStyle = DataGridViewCellStyle5
DataGridViewCellStyle33.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle33.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle33.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle33.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle33.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle33.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle33.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvKreditkarten.DefaultCellStyle = DataGridViewCellStyle33
Me.dgvKreditkarten.Location = New System.Drawing.Point(9, 20)
Me.dgvKreditkarten.MultiSelect = False
Me.dgvKreditkarten.Name = "dgvKreditkarten"
DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle6.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle6.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvKreditkarten.RowHeadersDefaultCellStyle = DataGridViewCellStyle6
DataGridViewCellStyle34.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle34.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle34.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle34.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle34.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle34.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle34.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvKreditkarten.RowHeadersDefaultCellStyle = DataGridViewCellStyle34
Me.dgvKreditkarten.RowHeadersVisible = False
DataGridViewCellStyle7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.dgvKreditkarten.RowsDefaultCellStyle = DataGridViewCellStyle7
DataGridViewCellStyle35.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.dgvKreditkarten.RowsDefaultCellStyle = DataGridViewCellStyle35
Me.dgvKreditkarten.RowTemplate.DefaultCellStyle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.dgvKreditkarten.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
Me.dgvKreditkarten.Size = New System.Drawing.Size(642, 312)
@@ -3660,26 +3668,26 @@ Partial Class usrcntlKundeBearbeitenFull
'
'dgvMWST
'
DataGridViewCellStyle8.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvMWST.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle8
DataGridViewCellStyle36.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvMWST.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle36
Me.dgvMWST.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle9.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle9.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle9.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle9.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle9.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvMWST.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle9
DataGridViewCellStyle37.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle37.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle37.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle37.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle37.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle37.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle37.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvMWST.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle37
Me.dgvMWST.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
DataGridViewCellStyle10.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle10.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle10.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle10.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle10.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvMWST.DefaultCellStyle = DataGridViewCellStyle10
DataGridViewCellStyle38.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle38.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle38.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle38.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle38.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle38.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle38.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvMWST.DefaultCellStyle = DataGridViewCellStyle38
Me.dgvMWST.Location = New System.Drawing.Point(9, 359)
Me.dgvMWST.Name = "dgvMWST"
Me.dgvMWST.Size = New System.Drawing.Size(171, 125)
@@ -3764,26 +3772,26 @@ Partial Class usrcntlKundeBearbeitenFull
'
'dgvUstv_LaenderUndSteuernummern
'
DataGridViewCellStyle11.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvUstv_LaenderUndSteuernummern.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle11
DataGridViewCellStyle39.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvUstv_LaenderUndSteuernummern.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle39
Me.dgvUstv_LaenderUndSteuernummern.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle12.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle12.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle12.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle12.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle12.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvUstv_LaenderUndSteuernummern.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle12
DataGridViewCellStyle40.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle40.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle40.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle40.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle40.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle40.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle40.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvUstv_LaenderUndSteuernummern.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle40
Me.dgvUstv_LaenderUndSteuernummern.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
DataGridViewCellStyle13.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle13.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle13.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle13.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle13.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle13.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvUstv_LaenderUndSteuernummern.DefaultCellStyle = DataGridViewCellStyle13
DataGridViewCellStyle41.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle41.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle41.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle41.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle41.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle41.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle41.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvUstv_LaenderUndSteuernummern.DefaultCellStyle = DataGridViewCellStyle41
Me.dgvUstv_LaenderUndSteuernummern.Location = New System.Drawing.Point(9, 94)
Me.dgvUstv_LaenderUndSteuernummern.Name = "dgvUstv_LaenderUndSteuernummern"
Me.dgvUstv_LaenderUndSteuernummern.Size = New System.Drawing.Size(657, 259)
@@ -4035,26 +4043,26 @@ Partial Class usrcntlKundeBearbeitenFull
Me.dgvIDS_Standard.AllowUserToAddRows = False
Me.dgvIDS_Standard.AllowUserToDeleteRows = False
Me.dgvIDS_Standard.AllowUserToResizeRows = False
DataGridViewCellStyle14.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvIDS_Standard.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle14
DataGridViewCellStyle42.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvIDS_Standard.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle42
Me.dgvIDS_Standard.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle15.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle15.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle15.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle15.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle15.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvIDS_Standard.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle15
DataGridViewCellStyle43.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle43.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle43.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle43.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle43.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle43.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle43.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvIDS_Standard.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle43
Me.dgvIDS_Standard.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
DataGridViewCellStyle16.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle16.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle16.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle16.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle16.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle16.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvIDS_Standard.DefaultCellStyle = DataGridViewCellStyle16
DataGridViewCellStyle44.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle44.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle44.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle44.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle44.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle44.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle44.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvIDS_Standard.DefaultCellStyle = DataGridViewCellStyle44
Me.dgvIDS_Standard.Dock = System.Windows.Forms.DockStyle.Fill
Me.dgvIDS_Standard.Location = New System.Drawing.Point(3, 3)
Me.dgvIDS_Standard.Name = "dgvIDS_Standard"
@@ -4077,32 +4085,80 @@ Partial Class usrcntlKundeBearbeitenFull
Me.dgvIDS_Rabatte.AllowUserToAddRows = False
Me.dgvIDS_Rabatte.AllowUserToDeleteRows = False
Me.dgvIDS_Rabatte.AllowUserToResizeRows = False
DataGridViewCellStyle17.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvIDS_Rabatte.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle17
DataGridViewCellStyle45.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvIDS_Rabatte.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle45
Me.dgvIDS_Rabatte.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle18.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle18.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle18.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle18.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle18.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle18.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvIDS_Rabatte.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle18
DataGridViewCellStyle46.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle46.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle46.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle46.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle46.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle46.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle46.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvIDS_Rabatte.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle46
Me.dgvIDS_Rabatte.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
DataGridViewCellStyle19.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle19.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle19.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle19.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle19.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle19.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvIDS_Rabatte.DefaultCellStyle = DataGridViewCellStyle19
DataGridViewCellStyle47.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle47.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle47.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle47.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle47.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle47.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle47.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvIDS_Rabatte.DefaultCellStyle = DataGridViewCellStyle47
Me.dgvIDS_Rabatte.Dock = System.Windows.Forms.DockStyle.Fill
Me.dgvIDS_Rabatte.Location = New System.Drawing.Point(3, 3)
Me.dgvIDS_Rabatte.Name = "dgvIDS_Rabatte"
Me.dgvIDS_Rabatte.Size = New System.Drawing.Size(645, 169)
Me.dgvIDS_Rabatte.TabIndex = 34
'
'TabPage2
'
Me.TabPage2.Controls.Add(Me.txtATEZ_GreenpulseID)
Me.TabPage2.Controls.Add(Me.Label118)
Me.TabPage2.Controls.Add(Me.txtATEZ_LogicustID)
Me.TabPage2.Controls.Add(Me.Label119)
Me.TabPage2.Location = New System.Drawing.Point(4, 22)
Me.TabPage2.Name = "TabPage2"
Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
Me.TabPage2.Size = New System.Drawing.Size(651, 175)
Me.TabPage2.TabIndex = 2
Me.TabPage2.Text = "ATEZ KundenNr"
Me.TabPage2.UseVisualStyleBackColor = True
'
'txtATEZ_GreenpulseID
'
Me.txtATEZ_GreenpulseID.Location = New System.Drawing.Point(97, 43)
Me.txtATEZ_GreenpulseID.Name = "txtATEZ_GreenpulseID"
Me.txtATEZ_GreenpulseID.Size = New System.Drawing.Size(314, 20)
Me.txtATEZ_GreenpulseID.TabIndex = 17
'
'Label118
'
Me.Label118.AutoSize = True
Me.Label118.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label118.Location = New System.Drawing.Point(14, 46)
Me.Label118.Name = "Label118"
Me.Label118.Size = New System.Drawing.Size(78, 13)
Me.Label118.TabIndex = 16
Me.Label118.Text = "Greenpulse-ID:"
'
'txtATEZ_LogicustID
'
Me.txtATEZ_LogicustID.Location = New System.Drawing.Point(97, 14)
Me.txtATEZ_LogicustID.Name = "txtATEZ_LogicustID"
Me.txtATEZ_LogicustID.Size = New System.Drawing.Size(314, 20)
Me.txtATEZ_LogicustID.TabIndex = 15
'
'Label119
'
Me.Label119.AutoSize = True
Me.Label119.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label119.Location = New System.Drawing.Point(14, 17)
Me.Label119.Name = "Label119"
Me.Label119.Size = New System.Drawing.Size(64, 13)
Me.Label119.TabIndex = 14
Me.Label119.Text = "Logicust-ID:"
'
'cbxCSInsolvent
'
Me.cbxCSInsolvent.AutoSize = True
@@ -4268,26 +4324,26 @@ Partial Class usrcntlKundeBearbeitenFull
Me.dgvSonst_IDSKunden.AllowUserToAddRows = False
Me.dgvSonst_IDSKunden.AllowUserToDeleteRows = False
Me.dgvSonst_IDSKunden.AllowUserToResizeRows = False
DataGridViewCellStyle20.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvSonst_IDSKunden.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle20
DataGridViewCellStyle48.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvSonst_IDSKunden.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle48
Me.dgvSonst_IDSKunden.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle21.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle21.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle21.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle21.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle21.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle21.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle21.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvSonst_IDSKunden.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle21
DataGridViewCellStyle49.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle49.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle49.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle49.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle49.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle49.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle49.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvSonst_IDSKunden.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle49
Me.dgvSonst_IDSKunden.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
DataGridViewCellStyle22.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle22.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle22.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle22.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle22.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle22.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvSonst_IDSKunden.DefaultCellStyle = DataGridViewCellStyle22
DataGridViewCellStyle50.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle50.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle50.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle50.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle50.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle50.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle50.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvSonst_IDSKunden.DefaultCellStyle = DataGridViewCellStyle50
Me.dgvSonst_IDSKunden.Location = New System.Drawing.Point(9, 214)
Me.dgvSonst_IDSKunden.MultiSelect = False
Me.dgvSonst_IDSKunden.Name = "dgvSonst_IDSKunden"
@@ -4598,26 +4654,26 @@ Partial Class usrcntlKundeBearbeitenFull
'DataGridView1
'
Me.DataGridView1.AllowUserToResizeRows = False
DataGridViewCellStyle23.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.DataGridView1.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle23
DataGridViewCellStyle51.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.DataGridView1.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle51
Me.DataGridView1.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle24.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle24.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle24.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle24.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle24.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle24.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle24.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.DataGridView1.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle24
DataGridViewCellStyle52.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle52.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle52.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle52.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle52.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle52.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle52.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.DataGridView1.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle52
Me.DataGridView1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
DataGridViewCellStyle25.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle25.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle25.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle25.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle25.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle25.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle25.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.DataGridView1.DefaultCellStyle = DataGridViewCellStyle25
DataGridViewCellStyle53.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle53.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle53.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle53.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle53.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle53.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle53.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.DataGridView1.DefaultCellStyle = DataGridViewCellStyle53
Me.DataGridView1.Enabled = False
Me.DataGridView1.Location = New System.Drawing.Point(6, 111)
Me.DataGridView1.MultiSelect = False
@@ -4684,26 +4740,26 @@ Partial Class usrcntlKundeBearbeitenFull
'
Me.dgvBankverbindungen.AllowUserToDeleteRows = False
Me.dgvBankverbindungen.AllowUserToResizeRows = False
DataGridViewCellStyle26.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvBankverbindungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle26
DataGridViewCellStyle54.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvBankverbindungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle54
Me.dgvBankverbindungen.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle27.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle27.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle27.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle27.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle27.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle27.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle27.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvBankverbindungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle27
DataGridViewCellStyle55.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle55.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle55.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle55.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle55.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle55.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle55.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvBankverbindungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle55
Me.dgvBankverbindungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
DataGridViewCellStyle28.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle28.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle28.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle28.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle28.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle28.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle28.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvBankverbindungen.DefaultCellStyle = DataGridViewCellStyle28
DataGridViewCellStyle56.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle56.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle56.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle56.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle56.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle56.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle56.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvBankverbindungen.DefaultCellStyle = DataGridViewCellStyle56
Me.dgvBankverbindungen.Location = New System.Drawing.Point(3, 40)
Me.dgvBankverbindungen.MultiSelect = False
Me.dgvBankverbindungen.Name = "dgvBankverbindungen"
@@ -5859,53 +5915,73 @@ Partial Class usrcntlKundeBearbeitenFull
Me.DataGridViewTextBoxColumn2.HeaderText = "E-Mail"
Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
'
'TabPage2
'Label120
'
Me.TabPage2.Controls.Add(Me.txtATEZ_GreenpulseID)
Me.TabPage2.Controls.Add(Me.Label118)
Me.TabPage2.Controls.Add(Me.txtATEZ_LogicustID)
Me.TabPage2.Controls.Add(Me.Label119)
Me.TabPage2.Location = New System.Drawing.Point(4, 22)
Me.TabPage2.Name = "TabPage2"
Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
Me.TabPage2.Size = New System.Drawing.Size(651, 175)
Me.TabPage2.TabIndex = 2
Me.TabPage2.Text = "ATEZ KundenNr"
Me.TabPage2.UseVisualStyleBackColor = True
Me.Label120.AutoSize = True
Me.Label120.Location = New System.Drawing.Point(305, 78)
Me.Label120.Name = "Label120"
Me.Label120.Size = New System.Drawing.Size(30, 13)
Me.Label120.TabIndex = 57
Me.Label120.Text = "vom:"
'
'txtATEZ_GreenpulseID
'txtSEG_vom
'
Me.txtATEZ_GreenpulseID.Location = New System.Drawing.Point(97, 43)
Me.txtATEZ_GreenpulseID.Name = "txtATEZ_GreenpulseID"
Me.txtATEZ_GreenpulseID.Size = New System.Drawing.Size(314, 20)
Me.txtATEZ_GreenpulseID.TabIndex = 17
Me.txtSEG_vom._DateTimeOnly = False
Me.txtSEG_vom._numbersOnly = False
Me.txtSEG_vom._numbersOnlyKommastellen = ""
Me.txtSEG_vom._numbersOnlyTrennzeichen = True
Me.txtSEG_vom._Prozent = False
Me.txtSEG_vom._ShortDateNew = True
Me.txtSEG_vom._ShortDateOnly = False
Me.txtSEG_vom._TimeOnly = False
Me.txtSEG_vom._TimeOnly_Seconds = False
Me.txtSEG_vom._value = ""
Me.txtSEG_vom._Waehrung = False
Me.txtSEG_vom._WaehrungZeichen = True
Me.txtSEG_vom.ForeColor = System.Drawing.Color.Red
Me.txtSEG_vom.Location = New System.Drawing.Point(341, 75)
Me.txtSEG_vom.MaxLength = 10
Me.txtSEG_vom.MaxLineLength = -1
Me.txtSEG_vom.MaxLines_Warning = ""
Me.txtSEG_vom.MaxLines_Warning_Label = Nothing
Me.txtSEG_vom.Name = "txtSEG_vom"
Me.txtSEG_vom.Size = New System.Drawing.Size(60, 20)
Me.txtSEG_vom.TabIndex = 58
Me.txtSEG_vom.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'Label118
'txtSEG_Summe
'
Me.Label118.AutoSize = True
Me.Label118.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label118.Location = New System.Drawing.Point(14, 46)
Me.Label118.Name = "Label118"
Me.Label118.Size = New System.Drawing.Size(78, 13)
Me.Label118.TabIndex = 16
Me.Label118.Text = "Greenpulse-ID:"
Me.txtSEG_Summe._DateTimeOnly = False
Me.txtSEG_Summe._numbersOnly = False
Me.txtSEG_Summe._numbersOnlyKommastellen = ""
Me.txtSEG_Summe._numbersOnlyTrennzeichen = True
Me.txtSEG_Summe._Prozent = False
Me.txtSEG_Summe._ShortDateNew = False
Me.txtSEG_Summe._ShortDateOnly = False
Me.txtSEG_Summe._TimeOnly = False
Me.txtSEG_Summe._TimeOnly_Seconds = False
Me.txtSEG_Summe._value = ""
Me.txtSEG_Summe._Waehrung = True
Me.txtSEG_Summe._WaehrungZeichen = True
Me.txtSEG_Summe.ForeColor = System.Drawing.Color.Red
Me.txtSEG_Summe.Location = New System.Drawing.Point(159, 75)
Me.txtSEG_Summe.MaxLineLength = -1
Me.txtSEG_Summe.MaxLines_Warning = ""
Me.txtSEG_Summe.MaxLines_Warning_Label = Nothing
Me.txtSEG_Summe.Name = "txtSEG_Summe"
Me.txtSEG_Summe.Size = New System.Drawing.Size(100, 20)
Me.txtSEG_Summe.TabIndex = 56
Me.txtSEG_Summe.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'txtATEZ_LogicustID
'Label121
'
Me.txtATEZ_LogicustID.Location = New System.Drawing.Point(97, 14)
Me.txtATEZ_LogicustID.Name = "txtATEZ_LogicustID"
Me.txtATEZ_LogicustID.Size = New System.Drawing.Size(314, 20)
Me.txtATEZ_LogicustID.TabIndex = 15
'
'Label119
'
Me.Label119.AutoSize = True
Me.Label119.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label119.Location = New System.Drawing.Point(14, 17)
Me.Label119.Name = "Label119"
Me.Label119.Size = New System.Drawing.Size(64, 13)
Me.Label119.TabIndex = 14
Me.Label119.Text = "Logicust-ID:"
Me.Label121.AutoSize = True
Me.Label121.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label121.Location = New System.Drawing.Point(7, 78)
Me.Label121.Name = "Label121"
Me.Label121.Size = New System.Drawing.Size(32, 13)
Me.Label121.TabIndex = 59
Me.Label121.Text = "SEG:"
'
'usrcntlKundeBearbeitenFull
'
@@ -5990,6 +6066,8 @@ Partial Class usrcntlKundeBearbeitenFull
CType(Me.dgvIDS_Standard, System.ComponentModel.ISupportInitialize).EndInit()
Me.Kunden.ResumeLayout(False)
CType(Me.dgvIDS_Rabatte, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPage2.ResumeLayout(False)
Me.TabPage2.PerformLayout()
CType(Me.dgvSonst_IDSKunden, System.ComponentModel.ISupportInitialize).EndInit()
Me.tbSchnittstellen.ResumeLayout(False)
Me.tbSchnittstellen.PerformLayout()
@@ -6011,8 +6089,6 @@ Partial Class usrcntlKundeBearbeitenFull
Me.pnlNeukunde.ResumeLayout(False)
Me.pnlNeukunde.PerformLayout()
Me.cnsBankverbindungen.ResumeLayout(False)
Me.TabPage2.ResumeLayout(False)
Me.TabPage2.PerformLayout()
Me.ResumeLayout(False)
Me.PerformLayout()
@@ -6399,4 +6475,8 @@ Partial Class usrcntlKundeBearbeitenFull
Friend WithEvents Label118 As Label
Friend WithEvents txtATEZ_LogicustID As TextBox
Friend WithEvents Label119 As Label
Friend WithEvents Label121 As Label
Friend WithEvents Label120 As Label
Friend WithEvents txtSEG_vom As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents txtSEG_Summe As VERAG_PROG_ALLGEMEIN.MyTextBox
End Class

7
SDL/kunden/usrcntlKundeBearbeitenFull.vb
View File

@@ -275,6 +275,8 @@ Public Class usrcntlKundeBearbeitenFull
txtVers_HermesRefNr.Text = loadValue(KUNDE.Referenznummer, "")
txtVers_Versicherungssumme._value = loadValue(KUNDE.Versicherungssumme, "")
txtVers_VersicherungssummeVon._value = loadValue(KUNDE.Entscheidung_vom, "")
txtSEG_Summe._value = loadValue(KUNDE_ERW.kde_SEG_Summe, "")
txtSEG_vom._value = loadValue(KUNDE_ERW.kde_SEG_Datum, "")
txtVers_Antragssumme._value = loadValue(KUNDE.Antragssumme, "")
txtVers_AntragssummeVon._value = loadValue(KUNDE.Antrag_vom, "")
txtVers_Kreditlimit._value = loadValue(KUNDE.Kreditlimit, "")
@@ -703,8 +705,11 @@ Public Class usrcntlKundeBearbeitenFull
'End If
KUNDE.Versicherungssumme = isLeerNothingDbl(txtVers_Versicherungssumme._value)
KUNDE.Entscheidung_vom = isLeerNothing(txtVers_VersicherungssummeVon._value)
KUNDE_ERW.kde_SEG_Summe = isLeerNothingDbl(txtSEG_Summe._value)
KUNDE_ERW.kde_SEG_Datum = isLeerNothing(txtSEG_vom._value)
KUNDE.Antragssumme = isLeerNothingDbl(txtVers_Antragssumme._value)
KUNDE.Antrag_vom = isLeerNothing(txtVers_AntragssummeVon._value)
KUNDE.Kreditlimit = isLeerNothingDbl(txtVers_Kreditlimit._value)

166
SDL/mdm/usrCntlMDMAuswertungen.Designer.vb generated
View File

@@ -111,6 +111,13 @@ Partial Class usrCntlMDMAuswertungen
Me.Label32 = New System.Windows.Forms.Label()
Me.tbcntr = New System.Windows.Forms.TabControl()
Me.TabPage1 = New System.Windows.Forms.TabPage()
Me.Label44 = New System.Windows.Forms.Label()
Me.GroupBox19 = New System.Windows.Forms.GroupBox()
Me.cbx_nuraktiveKunden = New System.Windows.Forms.CheckBox()
Me.Label61 = New System.Windows.Forms.Label()
Me.PictureBox6 = New System.Windows.Forms.PictureBox()
Me.Label63 = New System.Windows.Forms.Label()
Me.Button19 = New System.Windows.Forms.Button()
Me.Label33 = New System.Windows.Forms.Label()
Me.GroupBox9 = New System.Windows.Forms.GroupBox()
Me.Button9 = New System.Windows.Forms.Button()
@@ -120,7 +127,6 @@ Partial Class usrCntlMDMAuswertungen
Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label36 = New System.Windows.Forms.Label()
Me.TabPage3 = New System.Windows.Forms.TabPage()
Me.UsrCntlWoelfl_IM_CSVRg1 = New SDL.usrCntlWoelfl_IM_CSVRg()
Me.tbIDS = New System.Windows.Forms.TabPage()
Me.Label62 = New System.Windows.Forms.Label()
Me.GroupBox13 = New System.Windows.Forms.GroupBox()
@@ -157,7 +163,6 @@ Partial Class usrCntlMDMAuswertungen
Me.Label41 = New System.Windows.Forms.Label()
Me.Button12 = New System.Windows.Forms.Button()
Me.TabPage4 = New System.Windows.Forms.TabPage()
Me.UsrCntlMSE_KonvertCSV1 = New SDL.usrCntlMSE_KonvertCSV()
Me.TabPage5 = New System.Windows.Forms.TabPage()
Me.Label56 = New System.Windows.Forms.Label()
Me.GroupBox17 = New System.Windows.Forms.GroupBox()
@@ -182,6 +187,8 @@ Partial Class usrCntlMDMAuswertungen
Me.btnContractdaten = New System.Windows.Forms.Button()
Me.Button15 = New System.Windows.Forms.Button()
Me.pnl = New System.Windows.Forms.Panel()
Me.UsrCntlWoelfl_IM_CSVRg1 = New SDL.usrCntlWoelfl_IM_CSVRg()
Me.UsrCntlMSE_KonvertCSV1 = New SDL.usrCntlMSE_KonvertCSV()
Me.GroupBox1.SuspendLayout()
Me.GroupBox2.SuspendLayout()
CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -197,6 +204,8 @@ Partial Class usrCntlMDMAuswertungen
Me.GroupBox8.SuspendLayout()
Me.tbcntr.SuspendLayout()
Me.TabPage1.SuspendLayout()
Me.GroupBox19.SuspendLayout()
CType(Me.PictureBox6, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GroupBox9.SuspendLayout()
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPage3.SuspendLayout()
@@ -422,7 +431,7 @@ Partial Class usrCntlMDMAuswertungen
Me.Label8.AutoSize = True
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.Label8.Location = New System.Drawing.Point(7, 153)
Me.Label8.Location = New System.Drawing.Point(9, 119)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(186, 17)
Me.Label8.TabIndex = 11
@@ -442,9 +451,9 @@ Partial Class usrCntlMDMAuswertungen
Me.GroupBox3.Controls.Add(Me.datUeberfaelligeBestVon)
Me.GroupBox3.Controls.Add(Me.Label11)
Me.GroupBox3.Controls.Add(Me.Button2)
Me.GroupBox3.Location = New System.Drawing.Point(6, 164)
Me.GroupBox3.Location = New System.Drawing.Point(8, 130)
Me.GroupBox3.Name = "GroupBox3"
Me.GroupBox3.Size = New System.Drawing.Size(697, 149)
Me.GroupBox3.Size = New System.Drawing.Size(697, 137)
Me.GroupBox3.TabIndex = 10
Me.GroupBox3.TabStop = False
'
@@ -592,7 +601,7 @@ Partial Class usrCntlMDMAuswertungen
Me.Label13.AutoSize = True
Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label13.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.Label13.Location = New System.Drawing.Point(7, 332)
Me.Label13.Location = New System.Drawing.Point(9, 379)
Me.Label13.Name = "Label13"
Me.Label13.Size = New System.Drawing.Size(78, 17)
Me.Label13.TabIndex = 13
@@ -608,7 +617,7 @@ Partial Class usrCntlMDMAuswertungen
Me.GroupBox4.Controls.Add(Me.Label15)
Me.GroupBox4.Controls.Add(Me.Label17)
Me.GroupBox4.Controls.Add(Me.Button3)
Me.GroupBox4.Location = New System.Drawing.Point(6, 343)
Me.GroupBox4.Location = New System.Drawing.Point(8, 390)
Me.GroupBox4.Name = "GroupBox4"
Me.GroupBox4.Size = New System.Drawing.Size(697, 110)
Me.GroupBox4.TabIndex = 12
@@ -722,7 +731,7 @@ Partial Class usrCntlMDMAuswertungen
Me.Label16.AutoSize = True
Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label16.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.Label16.Location = New System.Drawing.Point(7, 471)
Me.Label16.Location = New System.Drawing.Point(9, 518)
Me.Label16.Name = "Label16"
Me.Label16.Size = New System.Drawing.Size(287, 17)
Me.Label16.TabIndex = 15
@@ -739,7 +748,7 @@ Partial Class usrCntlMDMAuswertungen
Me.GroupBox5.Controls.Add(Me.datBenachrichtigungVon)
Me.GroupBox5.Controls.Add(Me.Label21)
Me.GroupBox5.Controls.Add(Me.Button4)
Me.GroupBox5.Location = New System.Drawing.Point(6, 482)
Me.GroupBox5.Location = New System.Drawing.Point(8, 529)
Me.GroupBox5.Name = "GroupBox5"
Me.GroupBox5.Size = New System.Drawing.Size(697, 98)
Me.GroupBox5.TabIndex = 14
@@ -795,7 +804,7 @@ Partial Class usrCntlMDMAuswertungen
'Label19
'
Me.Label19.AutoSize = True
Me.Label19.Location = New System.Drawing.Point(322, 81)
Me.Label19.Location = New System.Drawing.Point(322, 72)
Me.Label19.Name = "Label19"
Me.Label19.Size = New System.Drawing.Size(23, 13)
Me.Label19.TabIndex = 10
@@ -805,7 +814,7 @@ Partial Class usrCntlMDMAuswertungen
'datBenachrichtigungBis
'
Me.datBenachrichtigungBis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
Me.datBenachrichtigungBis.Location = New System.Drawing.Point(351, 78)
Me.datBenachrichtigungBis.Location = New System.Drawing.Point(351, 69)
Me.datBenachrichtigungBis.Name = "datBenachrichtigungBis"
Me.datBenachrichtigungBis.Size = New System.Drawing.Size(93, 20)
Me.datBenachrichtigungBis.TabIndex = 9
@@ -814,7 +823,7 @@ Partial Class usrCntlMDMAuswertungen
'Label20
'
Me.Label20.AutoSize = True
Me.Label20.Location = New System.Drawing.Point(145, 81)
Me.Label20.Location = New System.Drawing.Point(145, 72)
Me.Label20.Name = "Label20"
Me.Label20.Size = New System.Drawing.Size(72, 13)
Me.Label20.TabIndex = 8
@@ -824,7 +833,7 @@ Partial Class usrCntlMDMAuswertungen
'datBenachrichtigungVon
'
Me.datBenachrichtigungVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
Me.datBenachrichtigungVon.Location = New System.Drawing.Point(223, 78)
Me.datBenachrichtigungVon.Location = New System.Drawing.Point(223, 69)
Me.datBenachrichtigungVon.Name = "datBenachrichtigungVon"
Me.datBenachrichtigungVon.Size = New System.Drawing.Size(93, 20)
Me.datBenachrichtigungVon.TabIndex = 7
@@ -856,7 +865,7 @@ Partial Class usrCntlMDMAuswertungen
Me.Label23.AutoSize = True
Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label23.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.Label23.Location = New System.Drawing.Point(7, 597)
Me.Label23.Location = New System.Drawing.Point(9, 630)
Me.Label23.Name = "Label23"
Me.Label23.Size = New System.Drawing.Size(88, 17)
Me.Label23.TabIndex = 17
@@ -872,9 +881,9 @@ Partial Class usrCntlMDMAuswertungen
Me.GroupBox6.Controls.Add(Me.PictureBox4)
Me.GroupBox6.Controls.Add(Me.Label28)
Me.GroupBox6.Controls.Add(Me.Button5)
Me.GroupBox6.Location = New System.Drawing.Point(6, 608)
Me.GroupBox6.Location = New System.Drawing.Point(8, 641)
Me.GroupBox6.Name = "GroupBox6"
Me.GroupBox6.Size = New System.Drawing.Size(697, 86)
Me.GroupBox6.Size = New System.Drawing.Size(697, 73)
Me.GroupBox6.TabIndex = 16
Me.GroupBox6.TabStop = False
'
@@ -1196,6 +1205,8 @@ Partial Class usrCntlMDMAuswertungen
'
'TabPage1
'
Me.TabPage1.Controls.Add(Me.Label44)
Me.TabPage1.Controls.Add(Me.GroupBox19)
Me.TabPage1.Controls.Add(Me.Label33)
Me.TabPage1.Controls.Add(Me.GroupBox9)
Me.TabPage1.Controls.Add(Me.Label3)
@@ -1216,12 +1227,89 @@ Partial Class usrCntlMDMAuswertungen
Me.TabPage1.Text = "VERAG Auswertungen"
Me.TabPage1.UseVisualStyleBackColor = True
'
'Label44
'
Me.Label44.AutoSize = True
Me.Label44.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label44.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.Label44.Location = New System.Drawing.Point(11, 270)
Me.Label44.Name = "Label44"
Me.Label44.Size = New System.Drawing.Size(93, 17)
Me.Label44.TabIndex = 21
Me.Label44.Text = "Kundenliste"
'
'GroupBox19
'
Me.GroupBox19.Controls.Add(Me.cbx_nuraktiveKunden)
Me.GroupBox19.Controls.Add(Me.Label61)
Me.GroupBox19.Controls.Add(Me.PictureBox6)
Me.GroupBox19.Controls.Add(Me.Label63)
Me.GroupBox19.Controls.Add(Me.Button19)
Me.GroupBox19.Location = New System.Drawing.Point(9, 284)
Me.GroupBox19.Name = "GroupBox19"
Me.GroupBox19.Size = New System.Drawing.Size(697, 80)
Me.GroupBox19.TabIndex = 20
Me.GroupBox19.TabStop = False
'
'cbx_nuraktiveKunden
'
Me.cbx_nuraktiveKunden.AutoSize = True
Me.cbx_nuraktiveKunden.Checked = True
Me.cbx_nuraktiveKunden.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbx_nuraktiveKunden.Location = New System.Drawing.Point(148, 37)
Me.cbx_nuraktiveKunden.Name = "cbx_nuraktiveKunden"
Me.cbx_nuraktiveKunden.Size = New System.Drawing.Size(15, 14)
Me.cbx_nuraktiveKunden.TabIndex = 24
Me.cbx_nuraktiveKunden.UseVisualStyleBackColor = True
'
'Label61
'
Me.Label61.AutoSize = True
Me.Label61.Location = New System.Drawing.Point(169, 38)
Me.Label61.Name = "Label61"
Me.Label61.Size = New System.Drawing.Size(94, 13)
Me.Label61.TabIndex = 21
Me.Label61.Text = "nur aktive Kunden"
'
'PictureBox6
'
Me.PictureBox6.Image = CType(resources.GetObject("PictureBox6.Image"), System.Drawing.Image)
Me.PictureBox6.Location = New System.Drawing.Point(640, 8)
Me.PictureBox6.Name = "PictureBox6"
Me.PictureBox6.Size = New System.Drawing.Size(51, 24)
Me.PictureBox6.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.PictureBox6.TabIndex = 11
Me.PictureBox6.TabStop = False
'
'Label63
'
Me.Label63.AutoSize = True
Me.Label63.Location = New System.Drawing.Point(145, 19)
Me.Label63.Name = "Label63"
Me.Label63.Size = New System.Drawing.Size(255, 13)
Me.Label63.TabIndex = 5
Me.Label63.Text = "Kundenliste mit Kundennummern bei den Lieferanten"
'
'Button19
'
Me.Button19.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button19.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.Button19.Image = Global.SDL.My.Resources.Resources.Excel_logo
Me.Button19.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button19.Location = New System.Drawing.Point(6, 19)
Me.Button19.Name = "Button19"
Me.Button19.Size = New System.Drawing.Size(121, 49)
Me.Button19.TabIndex = 4
Me.Button19.Text = "Kundenliste"
Me.Button19.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button19.UseVisualStyleBackColor = True
'
'Label33
'
Me.Label33.AutoSize = True
Me.Label33.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label33.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.Label33.Location = New System.Drawing.Point(7, 712)
Me.Label33.Location = New System.Drawing.Point(9, 717)
Me.Label33.Name = "Label33"
Me.Label33.Size = New System.Drawing.Size(145, 17)
Me.Label33.TabIndex = 19
@@ -1235,7 +1323,7 @@ Partial Class usrCntlMDMAuswertungen
Me.GroupBox9.Controls.Add(Me.PictureBox5)
Me.GroupBox9.Controls.Add(Me.MyComboBox2)
Me.GroupBox9.Controls.Add(Me.Label36)
Me.GroupBox9.Location = New System.Drawing.Point(6, 723)
Me.GroupBox9.Location = New System.Drawing.Point(8, 728)
Me.GroupBox9.Name = "GroupBox9"
Me.GroupBox9.Size = New System.Drawing.Size(697, 107)
Me.GroupBox9.TabIndex = 18
@@ -1327,14 +1415,6 @@ Partial Class usrCntlMDMAuswertungen
Me.TabPage3.Text = "WÖLFL"
Me.TabPage3.UseVisualStyleBackColor = True
'
'UsrCntlWoelfl_IM_CSVRg1
'
Me.UsrCntlWoelfl_IM_CSVRg1.BackColor = System.Drawing.Color.White
Me.UsrCntlWoelfl_IM_CSVRg1.Location = New System.Drawing.Point(6, 167)
Me.UsrCntlWoelfl_IM_CSVRg1.Name = "UsrCntlWoelfl_IM_CSVRg1"
Me.UsrCntlWoelfl_IM_CSVRg1.Size = New System.Drawing.Size(728, 97)
Me.UsrCntlWoelfl_IM_CSVRg1.TabIndex = 10
'
'tbIDS
'
Me.tbIDS.Controls.Add(Me.Label62)
@@ -1713,14 +1793,6 @@ Partial Class usrCntlMDMAuswertungen
Me.TabPage4.Text = "MSE"
Me.TabPage4.UseVisualStyleBackColor = True
'
'UsrCntlMSE_KonvertCSV1
'
Me.UsrCntlMSE_KonvertCSV1.BackColor = System.Drawing.Color.White
Me.UsrCntlMSE_KonvertCSV1.Location = New System.Drawing.Point(7, 7)
Me.UsrCntlMSE_KonvertCSV1.Name = "UsrCntlMSE_KonvertCSV1"
Me.UsrCntlMSE_KonvertCSV1.Size = New System.Drawing.Size(728, 97)
Me.UsrCntlMSE_KonvertCSV1.TabIndex = 0
'
'TabPage5
'
Me.TabPage5.Controls.Add(Me.Label56)
@@ -1980,6 +2052,22 @@ Partial Class usrCntlMDMAuswertungen
Me.pnl.Size = New System.Drawing.Size(1057, 54)
Me.pnl.TabIndex = 26
'
'UsrCntlWoelfl_IM_CSVRg1
'
Me.UsrCntlWoelfl_IM_CSVRg1.BackColor = System.Drawing.Color.White
Me.UsrCntlWoelfl_IM_CSVRg1.Location = New System.Drawing.Point(6, 167)
Me.UsrCntlWoelfl_IM_CSVRg1.Name = "UsrCntlWoelfl_IM_CSVRg1"
Me.UsrCntlWoelfl_IM_CSVRg1.Size = New System.Drawing.Size(728, 97)
Me.UsrCntlWoelfl_IM_CSVRg1.TabIndex = 10
'
'UsrCntlMSE_KonvertCSV1
'
Me.UsrCntlMSE_KonvertCSV1.BackColor = System.Drawing.Color.White
Me.UsrCntlMSE_KonvertCSV1.Location = New System.Drawing.Point(7, 7)
Me.UsrCntlMSE_KonvertCSV1.Name = "UsrCntlMSE_KonvertCSV1"
Me.UsrCntlMSE_KonvertCSV1.Size = New System.Drawing.Size(728, 97)
Me.UsrCntlMSE_KonvertCSV1.TabIndex = 0
'
'usrCntlMDMAuswertungen
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -2013,6 +2101,9 @@ Partial Class usrCntlMDMAuswertungen
Me.tbcntr.ResumeLayout(False)
Me.TabPage1.ResumeLayout(False)
Me.TabPage1.PerformLayout()
Me.GroupBox19.ResumeLayout(False)
Me.GroupBox19.PerformLayout()
CType(Me.PictureBox6, System.ComponentModel.ISupportInitialize).EndInit()
Me.GroupBox9.ResumeLayout(False)
Me.GroupBox9.PerformLayout()
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).EndInit()
@@ -2208,4 +2299,11 @@ Partial Class usrCntlMDMAuswertungen
Friend WithEvents GroupBox13 As GroupBox
Friend WithEvents Button18 As Button
Friend WithEvents Button14 As Button
Friend WithEvents Label44 As Label
Friend WithEvents GroupBox19 As GroupBox
Friend WithEvents cbx_nuraktiveKunden As CheckBox
Friend WithEvents Label61 As Label
Friend WithEvents PictureBox6 As PictureBox
Friend WithEvents Label63 As Label
Friend WithEvents Button19 As Button
End Class

8
SDL/mdm/usrCntlMDMAuswertungen.resx
View File

@@ -132,6 +132,14 @@
0MEJgDAMQNHflXQmxxDcQt1CvAr1rq7hHIriKa1QQxQs/EtbHm0AMufcZhGQ8xoIjECVkJfQHXhcTlml
hL4BLXoXfPDl2DrHIMEeKJR1AWiRfOEKLMrWGGg+Q38cKBsC0CL5wvba0FTHQPMZzkCjbApAi/4B7lqo
BXidk8YAAAAAAElFTkSuQmCC
</value>
</data>
<data name="PictureBox6.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAH1JREFUOE/V
0MEJgDAMQNHflXQmxxDcQt1CvAr1rq7hHIriKa1QQxQs/EtbHm0AMufcZhGQ8xoIjECVkJfQHXhcTlml
hL4BLXoXfPDl2DrHIMEeKJR1AWiRfOEKLMrWGGg+Q38cKBsC0CL5wvba0FTHQPMZzkCjbApAi/4B7lqo
BXidk8YAAAAAAElFTkSuQmCC
</value>
</data>
<data name="PictureBox5.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">

40
SDL/mdm/usrCntlMDMAuswertungen.vb
View File

@@ -1536,6 +1536,46 @@ Public Class usrCntlMDMAuswertungen
End Sub
Private Sub Button19_Click_1(sender As Object, e As EventArgs) Handles Button19.Click
Me.Cursor = Cursors.WaitCursor
Dim SQLstr = " SELECT AD.Auswahl,AD.AdressenNr AS KundenNr,AD.[Name 1] AS Kundenname,AD.Ort,AD.LandKz,ISNULL(kde_betreuer,'-') AS Betreuer,kde_keineMWSt AS keineMWST,AD.AdressenNr AS ASFINAG_KundenNr,AD.PLOSEKundenNr AS Plose_KundenNr,tblMSECustomers.customer_id AS MSE_KundenNr,ids.CustomerCode AS IDS_KundenNr, AD.UTAKundenNr AS UTA_KundenNr,
ISNULL(CAST(WölflKundenNr AS nvarchar(50)), '') +
CASE
WHEN WölflKundenNr IS NOT NULL
AND weitereWölflKundenNr IS NOT NULL
THEN ', ' ELSE ''
END +
ISNULL(CAST(weitereWölflKundenNr AS nvarchar(50)), '') AS RMC_KundenNr
FROM Adressen AD
INNER JOIN Kunden KD ON KD.KundenNr = AD.AdressenNr
INNER JOIN tblKundenErweitert ON KD.KundenNr = kde_KundenNr
LEFT JOIN tblMSECustomers ON partner_customer_number = KD.KundenNr
LEFT JOIN tbl_IDS_Kunden AS ids
ON ids.KdNrVERAG = KD.KundenNr
AND ISNULL(ids.KdNrAlt,0) <> 1
AND ids.Zeitstempel =
(
SELECT MAX(i2.Zeitstempel)
FROM tbl_IDS_Kunden AS i2
WHERE
i2.KdNrVERAG = ids.KdNrVERAG
AND ISNULL(i2.KdNrAlt,0) <> 1
)
WHERE
KD.FilialenNr = 8001 " & IIf(cbx_nuraktiveKunden.Checked, "and AD.Auswahl = 'A' ", "")
Dim dt = (New VERAG_PROG_ALLGEMEIN.SQL).loadDgvBySql(SQLstr, "FMZOLL")
cProgramFunctions.genExcelFromDT_NEW(dt)
Me.Cursor = Cursors.Default
End Sub
End Class

4
VERAG_PROG_ALLGEMEIN/Classes/cKundenErweitert.vb
View File

@@ -105,6 +105,8 @@ Public Class cKundenErweitert
Property kde_betreuer As Object = Nothing
Property kde_ATEZ_LogicustID As Object = Nothing
Property kde_ATEZ_GreenpulseID As Object = Nothing
Property kde_SEG_Summe As Object = Nothing
Property kde_SEG_Datum As Object = Nothing
Dim SQL As New SQL
@@ -216,6 +218,8 @@ Public Class cKundenErweitert
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_betreuer", kde_betreuer))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_ATEZ_LogicustID", kde_ATEZ_LogicustID))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_ATEZ_GreenpulseID", kde_ATEZ_GreenpulseID))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_SEG_Summe", kde_SEG_Summe))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_SEG_Datum", kde_SEG_Datum))
Return list
End Function