A4 Ausdrucke, Bankverbidungen
This commit is contained in:
508
SDL/kunden/usrcntlKundeBearbeitenFull.Designer.vb
generated
508
SDL/kunden/usrcntlKundeBearbeitenFull.Designer.vb
generated
@@ -22,25 +22,26 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
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()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
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()
|
||||
Dim DataGridViewCellStyle57 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()
|
||||
@@ -51,9 +52,11 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.cboFremdspedition = New System.Windows.Forms.ComboBox()
|
||||
Me.cbxVerzolltBei = New System.Windows.Forms.CheckBox()
|
||||
Me.cbxBesonderheitenNEU = New System.Windows.Forms.CheckBox()
|
||||
Me.UsrCntlKundenBesonderheiten1 = New SDL.usrCntlKundenBesonderheiten()
|
||||
Me.tbcntrAbf = New System.Windows.Forms.TabControl()
|
||||
Me.TabPage4 = New System.Windows.Forms.TabPage()
|
||||
Me.FlowLayoutPanel1 = New System.Windows.Forms.FlowLayoutPanel()
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1 = New SDL.usrCntlKundenAvisoMailBenachrichtigung()
|
||||
Me.rtbLKWFreigabeSenden = New System.Windows.Forms.RichTextBox()
|
||||
Me.Label18 = New System.Windows.Forms.Label()
|
||||
Me.TabPage3 = New System.Windows.Forms.TabPage()
|
||||
@@ -67,6 +70,7 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.cboAbfVerb_Abfertigungsverbot = New System.Windows.Forms.CheckBox()
|
||||
Me.txtAbfVerb_AbfertigungsverbotSeit = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.tbAufschub = New System.Windows.Forms.TabPage()
|
||||
Me.usrCntlAufschubkonten = New SDL.usrCntlAufschubkonten()
|
||||
Me.TabPage1 = New System.Windows.Forms.TabPage()
|
||||
Me.Label78 = New System.Windows.Forms.Label()
|
||||
Me.cbxAbf_ZollVM = New System.Windows.Forms.CheckBox()
|
||||
@@ -91,6 +95,7 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.rtbAbf_Besonderheiten = New System.Windows.Forms.RichTextBox()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.tbFiskal = New System.Windows.Forms.TabPage()
|
||||
Me.UsrCntlKundeFiskaldaten1 = New SDL.usrCntlKundeFiskaldaten()
|
||||
Me.tbVerrechnung = New System.Windows.Forms.TabPage()
|
||||
Me.cbxKapitalWaehrung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label103 = New System.Windows.Forms.Label()
|
||||
@@ -272,6 +277,11 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.tbZahlungsinfo = New System.Windows.Forms.TabPage()
|
||||
Me.Label102 = New System.Windows.Forms.Label()
|
||||
Me.rtb_Zahlungsinfo = New System.Windows.Forms.RichTextBox()
|
||||
Me.tbBankverbindungen = New System.Windows.Forms.TabPage()
|
||||
Me.dgvBankverbindungen = New System.Windows.Forms.DataGridView()
|
||||
Me.btnBankspeichern = New VERAG_PROG_ALLGEMEIN.FlatButton()
|
||||
Me.cbxAlleBVanzeigen = New System.Windows.Forms.CheckBox()
|
||||
Me.Label108 = New System.Windows.Forms.Label()
|
||||
Me.lblEORI = New System.Windows.Forms.Label()
|
||||
Me.Label84 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
|
||||
@@ -335,6 +345,7 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.tbKontakt = New System.Windows.Forms.TabControl()
|
||||
Me.TabPage10 = New System.Windows.Forms.TabPage()
|
||||
Me.TabPage11 = New System.Windows.Forms.TabPage()
|
||||
Me.ucKundenKontakte = New SDL.usrCntlKundenKontakte()
|
||||
Me.Label50 = New System.Windows.Forms.Label()
|
||||
Me.Label68 = New System.Windows.Forms.Label()
|
||||
Me.pnlNeukunde = New System.Windows.Forms.Panel()
|
||||
@@ -356,16 +367,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.tbBankverbindungen = New System.Windows.Forms.TabPage()
|
||||
Me.Label108 = New System.Windows.Forms.Label()
|
||||
Me.cbxAlleBVanzeigen = New System.Windows.Forms.CheckBox()
|
||||
Me.btnBankspeichern = New VERAG_PROG_ALLGEMEIN.FlatButton()
|
||||
Me.ucKundenKontakte = New SDL.usrCntlKundenKontakte()
|
||||
Me.UsrCntlKundenBesonderheiten1 = New SDL.usrCntlKundenBesonderheiten()
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1 = New SDL.usrCntlKundenAvisoMailBenachrichtigung()
|
||||
Me.usrCntlAufschubkonten = New SDL.usrCntlAufschubkonten()
|
||||
Me.UsrCntlKundeFiskaldaten1 = New SDL.usrCntlKundeFiskaldaten()
|
||||
Me.dgvBankverbindungen = New System.Windows.Forms.DataGridView()
|
||||
Me.cnsBankverbindungen = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.ArchivierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.DokumentLöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.DokumentHinzufügenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.tbcntrDetails.SuspendLayout()
|
||||
Me.tbAbfertigung.SuspendLayout()
|
||||
Me.tbcntrAbf.SuspendLayout()
|
||||
@@ -392,6 +397,8 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.tbSchnittstellen.SuspendLayout()
|
||||
CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.tbZahlungsinfo.SuspendLayout()
|
||||
Me.tbBankverbindungen.SuspendLayout()
|
||||
CType(Me.dgvBankverbindungen, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.GroupBox3.SuspendLayout()
|
||||
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
@@ -399,8 +406,7 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.TabPage10.SuspendLayout()
|
||||
Me.TabPage11.SuspendLayout()
|
||||
Me.pnlNeukunde.SuspendLayout()
|
||||
Me.tbBankverbindungen.SuspendLayout()
|
||||
CType(Me.dgvBankverbindungen, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.cnsBankverbindungen.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'tbcntrDetails
|
||||
@@ -546,6 +552,16 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.cbxBesonderheitenNEU.Text = "Besonderheiten NEU"
|
||||
Me.cbxBesonderheitenNEU.UseVisualStyleBackColor = True
|
||||
'
|
||||
'UsrCntlKundenBesonderheiten1
|
||||
'
|
||||
Me.UsrCntlKundenBesonderheiten1.BackColor = System.Drawing.Color.White
|
||||
Me.UsrCntlKundenBesonderheiten1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.UsrCntlKundenBesonderheiten1.Location = New System.Drawing.Point(6, 25)
|
||||
Me.UsrCntlKundenBesonderheiten1.Name = "UsrCntlKundenBesonderheiten1"
|
||||
Me.UsrCntlKundenBesonderheiten1.Size = New System.Drawing.Size(107, 52)
|
||||
Me.UsrCntlKundenBesonderheiten1.TabIndex = 235
|
||||
Me.UsrCntlKundenBesonderheiten1.Visible = False
|
||||
'
|
||||
'tbcntrAbf
|
||||
'
|
||||
Me.tbcntrAbf.Controls.Add(Me.TabPage4)
|
||||
@@ -580,6 +596,15 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.FlowLayoutPanel1.Size = New System.Drawing.Size(200, 100)
|
||||
Me.FlowLayoutPanel1.TabIndex = 7
|
||||
'
|
||||
'UsrCntlKundenAvisoMailBenachrichtigung1
|
||||
'
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.AutoScroll = True
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.BackColor = System.Drawing.Color.White
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.Location = New System.Drawing.Point(0, 6)
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.Name = "UsrCntlKundenAvisoMailBenachrichtigung1"
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.Size = New System.Drawing.Size(479, 172)
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.TabIndex = 6
|
||||
'
|
||||
'rtbLKWFreigabeSenden
|
||||
'
|
||||
Me.rtbLKWFreigabeSenden.Location = New System.Drawing.Point(485, 33)
|
||||
@@ -748,6 +773,14 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.tbAufschub.Text = "Aufschubkonten"
|
||||
Me.tbAufschub.UseVisualStyleBackColor = True
|
||||
'
|
||||
'usrCntlAufschubkonten
|
||||
'
|
||||
Me.usrCntlAufschubkonten.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.usrCntlAufschubkonten.Location = New System.Drawing.Point(3, 3)
|
||||
Me.usrCntlAufschubkonten.Name = "usrCntlAufschubkonten"
|
||||
Me.usrCntlAufschubkonten.Size = New System.Drawing.Size(652, 172)
|
||||
Me.usrCntlAufschubkonten.TabIndex = 0
|
||||
'
|
||||
'TabPage1
|
||||
'
|
||||
Me.TabPage1.Controls.Add(Me.Label78)
|
||||
@@ -1053,6 +1086,15 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.tbFiskal.Text = "Fiskal"
|
||||
Me.tbFiskal.UseVisualStyleBackColor = True
|
||||
'
|
||||
'UsrCntlKundeFiskaldaten1
|
||||
'
|
||||
Me.UsrCntlKundeFiskaldaten1.BackColor = System.Drawing.Color.White
|
||||
Me.UsrCntlKundeFiskaldaten1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.UsrCntlKundeFiskaldaten1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.UsrCntlKundeFiskaldaten1.Name = "UsrCntlKundeFiskaldaten1"
|
||||
Me.UsrCntlKundeFiskaldaten1.Size = New System.Drawing.Size(672, 495)
|
||||
Me.UsrCntlKundeFiskaldaten1.TabIndex = 0
|
||||
'
|
||||
'tbVerrechnung
|
||||
'
|
||||
Me.tbVerrechnung.Controls.Add(Me.cbxKapitalWaehrung)
|
||||
@@ -2833,8 +2875,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
|
||||
DataGridViewCellStyle39.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvUmsatzbericht.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle39
|
||||
Me.dgvUmsatzbericht.BackgroundColor = System.Drawing.Color.White
|
||||
Me.dgvUmsatzbericht.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dgvUmsatzbericht.Location = New System.Drawing.Point(6, 25)
|
||||
@@ -2933,8 +2975,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
|
||||
DataGridViewCellStyle40.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvOffenePosten.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle40
|
||||
Me.dgvOffenePosten.BackgroundColor = System.Drawing.Color.White
|
||||
Me.dgvOffenePosten.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dgvOffenePosten.Location = New System.Drawing.Point(6, 38)
|
||||
@@ -3095,41 +3137,41 @@ 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
|
||||
DataGridViewCellStyle41.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvKreditkarten.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle41
|
||||
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
|
||||
DataGridViewCellStyle42.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle42.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle42.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle42.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle42.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle42.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle42.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvKreditkarten.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle42
|
||||
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
|
||||
DataGridViewCellStyle43.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle43.BackColor = System.Drawing.SystemColors.Window
|
||||
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.ControlText
|
||||
DataGridViewCellStyle43.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle43.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle43.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.dgvKreditkarten.DefaultCellStyle = DataGridViewCellStyle43
|
||||
Me.dgvKreditkarten.Location = New System.Drawing.Point(9, 20)
|
||||
Me.dgvKreditkarten.MultiSelect = False
|
||||
Me.dgvKreditkarten.Name = "dgvKreditkarten"
|
||||
Me.dgvKreditkarten.ReadOnly = True
|
||||
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
|
||||
DataGridViewCellStyle44.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle44.BackColor = System.Drawing.SystemColors.Control
|
||||
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.WindowText
|
||||
DataGridViewCellStyle44.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle44.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle44.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvKreditkarten.RowHeadersDefaultCellStyle = DataGridViewCellStyle44
|
||||
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
|
||||
DataGridViewCellStyle45.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.dgvKreditkarten.RowsDefaultCellStyle = DataGridViewCellStyle45
|
||||
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)
|
||||
@@ -3268,26 +3310,26 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
'
|
||||
'dgvUstv_LaenderUndSteuernummern
|
||||
'
|
||||
DataGridViewCellStyle8.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvUstv_LaenderUndSteuernummern.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle8
|
||||
DataGridViewCellStyle46.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvUstv_LaenderUndSteuernummern.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle46
|
||||
Me.dgvUstv_LaenderUndSteuernummern.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.dgvUstv_LaenderUndSteuernummern.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle9
|
||||
DataGridViewCellStyle47.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle47.BackColor = System.Drawing.SystemColors.Control
|
||||
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.WindowText
|
||||
DataGridViewCellStyle47.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle47.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle47.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvUstv_LaenderUndSteuernummern.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle47
|
||||
Me.dgvUstv_LaenderUndSteuernummern.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.dgvUstv_LaenderUndSteuernummern.DefaultCellStyle = DataGridViewCellStyle10
|
||||
DataGridViewCellStyle48.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle48.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle48.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle48.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle48.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle48.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle48.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.dgvUstv_LaenderUndSteuernummern.DefaultCellStyle = DataGridViewCellStyle48
|
||||
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, 321)
|
||||
@@ -3524,26 +3566,26 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
'dgvSonst_IDSKunden
|
||||
'
|
||||
Me.dgvSonst_IDSKunden.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle11.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvSonst_IDSKunden.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle11
|
||||
DataGridViewCellStyle49.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvSonst_IDSKunden.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle49
|
||||
Me.dgvSonst_IDSKunden.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.dgvSonst_IDSKunden.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle12
|
||||
DataGridViewCellStyle50.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle50.BackColor = System.Drawing.SystemColors.Control
|
||||
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.WindowText
|
||||
DataGridViewCellStyle50.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle50.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle50.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvSonst_IDSKunden.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle50
|
||||
Me.dgvSonst_IDSKunden.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.dgvSonst_IDSKunden.DefaultCellStyle = DataGridViewCellStyle13
|
||||
DataGridViewCellStyle51.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle51.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle51.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle51.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle51.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle51.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle51.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.dgvSonst_IDSKunden.DefaultCellStyle = DataGridViewCellStyle51
|
||||
Me.dgvSonst_IDSKunden.Location = New System.Drawing.Point(9, 251)
|
||||
Me.dgvSonst_IDSKunden.MultiSelect = False
|
||||
Me.dgvSonst_IDSKunden.Name = "dgvSonst_IDSKunden"
|
||||
@@ -3760,26 +3802,26 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
'DataGridView1
|
||||
'
|
||||
Me.DataGridView1.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle14.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.DataGridView1.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle14
|
||||
DataGridViewCellStyle52.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.DataGridView1.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle52
|
||||
Me.DataGridView1.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.DataGridView1.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle15
|
||||
DataGridViewCellStyle53.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle53.BackColor = System.Drawing.SystemColors.Control
|
||||
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.WindowText
|
||||
DataGridViewCellStyle53.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle53.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle53.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.DataGridView1.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle53
|
||||
Me.DataGridView1.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.DataGridView1.DefaultCellStyle = DataGridViewCellStyle16
|
||||
DataGridViewCellStyle54.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle54.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle54.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle54.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle54.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle54.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle54.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.DataGridView1.DefaultCellStyle = DataGridViewCellStyle54
|
||||
Me.DataGridView1.Enabled = False
|
||||
Me.DataGridView1.Location = New System.Drawing.Point(6, 111)
|
||||
Me.DataGridView1.MultiSelect = False
|
||||
@@ -3816,6 +3858,85 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.rtb_Zahlungsinfo.TabIndex = 40
|
||||
Me.rtb_Zahlungsinfo.Text = ""
|
||||
'
|
||||
'tbBankverbindungen
|
||||
'
|
||||
Me.tbBankverbindungen.Controls.Add(Me.dgvBankverbindungen)
|
||||
Me.tbBankverbindungen.Controls.Add(Me.btnBankspeichern)
|
||||
Me.tbBankverbindungen.Controls.Add(Me.cbxAlleBVanzeigen)
|
||||
Me.tbBankverbindungen.Controls.Add(Me.Label108)
|
||||
Me.tbBankverbindungen.Location = New System.Drawing.Point(4, 22)
|
||||
Me.tbBankverbindungen.Name = "tbBankverbindungen"
|
||||
Me.tbBankverbindungen.Size = New System.Drawing.Size(672, 495)
|
||||
Me.tbBankverbindungen.TabIndex = 12
|
||||
Me.tbBankverbindungen.Text = "Bankverbindung"
|
||||
Me.tbBankverbindungen.UseVisualStyleBackColor = True
|
||||
'
|
||||
'dgvBankverbindungen
|
||||
'
|
||||
Me.dgvBankverbindungen.AllowUserToDeleteRows = False
|
||||
Me.dgvBankverbindungen.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle55.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvBankverbindungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle55
|
||||
Me.dgvBankverbindungen.BackgroundColor = System.Drawing.Color.White
|
||||
DataGridViewCellStyle56.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle56.BackColor = System.Drawing.SystemColors.Control
|
||||
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.WindowText
|
||||
DataGridViewCellStyle56.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle56.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle56.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvBankverbindungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle56
|
||||
Me.dgvBankverbindungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
DataGridViewCellStyle57.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle57.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle57.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle57.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle57.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle57.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle57.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.dgvBankverbindungen.DefaultCellStyle = DataGridViewCellStyle57
|
||||
Me.dgvBankverbindungen.Location = New System.Drawing.Point(3, 40)
|
||||
Me.dgvBankverbindungen.MultiSelect = False
|
||||
Me.dgvBankverbindungen.Name = "dgvBankverbindungen"
|
||||
Me.dgvBankverbindungen.Size = New System.Drawing.Size(669, 243)
|
||||
Me.dgvBankverbindungen.TabIndex = 137
|
||||
'
|
||||
'btnBankspeichern
|
||||
'
|
||||
Me.btnBankspeichern.allowBorder = False
|
||||
Me.btnBankspeichern.Enabled = False
|
||||
Me.btnBankspeichern.FlatAppearance.BorderSize = 0
|
||||
Me.btnBankspeichern.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnBankspeichern.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnBankspeichern.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnBankspeichern.Location = New System.Drawing.Point(503, 289)
|
||||
Me.btnBankspeichern.Name = "btnBankspeichern"
|
||||
Me.btnBankspeichern.Size = New System.Drawing.Size(157, 23)
|
||||
Me.btnBankspeichern.TabIndex = 136
|
||||
Me.btnBankspeichern.Text = "Änderungen speichern"
|
||||
Me.btnBankspeichern.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnBankspeichern.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cbxAlleBVanzeigen
|
||||
'
|
||||
Me.cbxAlleBVanzeigen.AutoSize = True
|
||||
Me.cbxAlleBVanzeigen.Location = New System.Drawing.Point(578, 14)
|
||||
Me.cbxAlleBVanzeigen.Name = "cbxAlleBVanzeigen"
|
||||
Me.cbxAlleBVanzeigen.Size = New System.Drawing.Size(88, 17)
|
||||
Me.cbxAlleBVanzeigen.TabIndex = 135
|
||||
Me.cbxAlleBVanzeigen.Text = "alle anzeigen"
|
||||
Me.cbxAlleBVanzeigen.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label108
|
||||
'
|
||||
Me.Label108.AutoSize = True
|
||||
Me.Label108.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label108.Location = New System.Drawing.Point(12, 18)
|
||||
Me.Label108.Name = "Label108"
|
||||
Me.Label108.Size = New System.Drawing.Size(100, 13)
|
||||
Me.Label108.TabIndex = 133
|
||||
Me.Label108.Text = "Bankverbindungen:"
|
||||
'
|
||||
'lblEORI
|
||||
'
|
||||
Me.lblEORI.AutoSize = True
|
||||
@@ -4602,6 +4723,14 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.TabPage11.Text = "Spezifisch"
|
||||
Me.TabPage11.UseVisualStyleBackColor = True
|
||||
'
|
||||
'ucKundenKontakte
|
||||
'
|
||||
Me.ucKundenKontakte.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.ucKundenKontakte.Location = New System.Drawing.Point(3, 3)
|
||||
Me.ucKundenKontakte.Name = "ucKundenKontakte"
|
||||
Me.ucKundenKontakte.Size = New System.Drawing.Size(439, 169)
|
||||
Me.ucKundenKontakte.TabIndex = 0
|
||||
'
|
||||
'Label50
|
||||
'
|
||||
Me.Label50.AutoSize = True
|
||||
@@ -4854,127 +4983,33 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.DataGridViewTextBoxColumn2.HeaderText = "E-Mail"
|
||||
Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
|
||||
'
|
||||
'tbBankverbindungen
|
||||
'cnsBankverbindungen
|
||||
'
|
||||
Me.tbBankverbindungen.Controls.Add(Me.dgvBankverbindungen)
|
||||
Me.tbBankverbindungen.Controls.Add(Me.btnBankspeichern)
|
||||
Me.tbBankverbindungen.Controls.Add(Me.cbxAlleBVanzeigen)
|
||||
Me.tbBankverbindungen.Controls.Add(Me.Label108)
|
||||
Me.tbBankverbindungen.Location = New System.Drawing.Point(4, 22)
|
||||
Me.tbBankverbindungen.Name = "tbBankverbindungen"
|
||||
Me.tbBankverbindungen.Size = New System.Drawing.Size(672, 495)
|
||||
Me.tbBankverbindungen.TabIndex = 12
|
||||
Me.tbBankverbindungen.Text = "Bankverbindung"
|
||||
Me.tbBankverbindungen.UseVisualStyleBackColor = True
|
||||
Me.cnsBankverbindungen.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ArchivierenToolStripMenuItem, Me.DokumentHinzufügenToolStripMenuItem, Me.DokumentLöschenToolStripMenuItem})
|
||||
Me.cnsBankverbindungen.Name = "cnsBankverbindungen"
|
||||
Me.cnsBankverbindungen.Size = New System.Drawing.Size(194, 92)
|
||||
'
|
||||
'Label108
|
||||
'ArchivierenToolStripMenuItem
|
||||
'
|
||||
Me.Label108.AutoSize = True
|
||||
Me.Label108.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label108.Location = New System.Drawing.Point(12, 18)
|
||||
Me.Label108.Name = "Label108"
|
||||
Me.Label108.Size = New System.Drawing.Size(100, 13)
|
||||
Me.Label108.TabIndex = 133
|
||||
Me.Label108.Text = "Bankverbindungen:"
|
||||
Me.ArchivierenToolStripMenuItem.Image = Global.SDL.My.Resources.Resources.stift1
|
||||
Me.ArchivierenToolStripMenuItem.Name = "ArchivierenToolStripMenuItem"
|
||||
Me.ArchivierenToolStripMenuItem.Size = New System.Drawing.Size(193, 22)
|
||||
Me.ArchivierenToolStripMenuItem.Text = "archivieren"
|
||||
Me.ArchivierenToolStripMenuItem.Visible = False
|
||||
'
|
||||
'cbxAlleBVanzeigen
|
||||
'DokumentLöschenToolStripMenuItem
|
||||
'
|
||||
Me.cbxAlleBVanzeigen.AutoSize = True
|
||||
Me.cbxAlleBVanzeigen.Location = New System.Drawing.Point(578, 14)
|
||||
Me.cbxAlleBVanzeigen.Name = "cbxAlleBVanzeigen"
|
||||
Me.cbxAlleBVanzeigen.Size = New System.Drawing.Size(88, 17)
|
||||
Me.cbxAlleBVanzeigen.TabIndex = 135
|
||||
Me.cbxAlleBVanzeigen.Text = "alle anzeigen"
|
||||
Me.cbxAlleBVanzeigen.UseVisualStyleBackColor = True
|
||||
Me.DokumentLöschenToolStripMenuItem.Image = Global.SDL.My.Resources.Resources.del
|
||||
Me.DokumentLöschenToolStripMenuItem.Name = "DokumentLöschenToolStripMenuItem"
|
||||
Me.DokumentLöschenToolStripMenuItem.Size = New System.Drawing.Size(193, 22)
|
||||
Me.DokumentLöschenToolStripMenuItem.Text = "Dokument löschen"
|
||||
'
|
||||
'btnBankspeichern
|
||||
'DokumentHinzufügenToolStripMenuItem
|
||||
'
|
||||
Me.btnBankspeichern.allowBorder = False
|
||||
Me.btnBankspeichern.Enabled = False
|
||||
Me.btnBankspeichern.FlatAppearance.BorderSize = 0
|
||||
Me.btnBankspeichern.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnBankspeichern.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnBankspeichern.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnBankspeichern.Location = New System.Drawing.Point(503, 289)
|
||||
Me.btnBankspeichern.Name = "btnBankspeichern"
|
||||
Me.btnBankspeichern.Size = New System.Drawing.Size(157, 23)
|
||||
Me.btnBankspeichern.TabIndex = 136
|
||||
Me.btnBankspeichern.Text = "Änderungen speichern"
|
||||
Me.btnBankspeichern.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnBankspeichern.UseVisualStyleBackColor = True
|
||||
'
|
||||
'ucKundenKontakte
|
||||
'
|
||||
Me.ucKundenKontakte.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.ucKundenKontakte.Location = New System.Drawing.Point(3, 3)
|
||||
Me.ucKundenKontakte.Name = "ucKundenKontakte"
|
||||
Me.ucKundenKontakte.Size = New System.Drawing.Size(439, 169)
|
||||
Me.ucKundenKontakte.TabIndex = 0
|
||||
'
|
||||
'UsrCntlKundenBesonderheiten1
|
||||
'
|
||||
Me.UsrCntlKundenBesonderheiten1.BackColor = System.Drawing.Color.White
|
||||
Me.UsrCntlKundenBesonderheiten1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.UsrCntlKundenBesonderheiten1.Location = New System.Drawing.Point(6, 25)
|
||||
Me.UsrCntlKundenBesonderheiten1.Name = "UsrCntlKundenBesonderheiten1"
|
||||
Me.UsrCntlKundenBesonderheiten1.Size = New System.Drawing.Size(107, 52)
|
||||
Me.UsrCntlKundenBesonderheiten1.TabIndex = 235
|
||||
Me.UsrCntlKundenBesonderheiten1.Visible = False
|
||||
'
|
||||
'UsrCntlKundenAvisoMailBenachrichtigung1
|
||||
'
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.AutoScroll = True
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.BackColor = System.Drawing.Color.White
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.Location = New System.Drawing.Point(0, 6)
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.Name = "UsrCntlKundenAvisoMailBenachrichtigung1"
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.Size = New System.Drawing.Size(479, 172)
|
||||
Me.UsrCntlKundenAvisoMailBenachrichtigung1.TabIndex = 6
|
||||
'
|
||||
'usrCntlAufschubkonten
|
||||
'
|
||||
Me.usrCntlAufschubkonten.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.usrCntlAufschubkonten.Location = New System.Drawing.Point(3, 3)
|
||||
Me.usrCntlAufschubkonten.Name = "usrCntlAufschubkonten"
|
||||
Me.usrCntlAufschubkonten.Size = New System.Drawing.Size(652, 172)
|
||||
Me.usrCntlAufschubkonten.TabIndex = 0
|
||||
'
|
||||
'UsrCntlKundeFiskaldaten1
|
||||
'
|
||||
Me.UsrCntlKundeFiskaldaten1.BackColor = System.Drawing.Color.White
|
||||
Me.UsrCntlKundeFiskaldaten1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.UsrCntlKundeFiskaldaten1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.UsrCntlKundeFiskaldaten1.Name = "UsrCntlKundeFiskaldaten1"
|
||||
Me.UsrCntlKundeFiskaldaten1.Size = New System.Drawing.Size(672, 495)
|
||||
Me.UsrCntlKundeFiskaldaten1.TabIndex = 0
|
||||
'
|
||||
'dgvBankverbindungen
|
||||
'
|
||||
Me.dgvBankverbindungen.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle17.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvBankverbindungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle17
|
||||
Me.dgvBankverbindungen.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.dgvBankverbindungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle18
|
||||
Me.dgvBankverbindungen.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.dgvBankverbindungen.DefaultCellStyle = DataGridViewCellStyle19
|
||||
Me.dgvBankverbindungen.Location = New System.Drawing.Point(3, 40)
|
||||
Me.dgvBankverbindungen.MultiSelect = False
|
||||
Me.dgvBankverbindungen.Name = "dgvBankverbindungen"
|
||||
Me.dgvBankverbindungen.Size = New System.Drawing.Size(657, 243)
|
||||
Me.dgvBankverbindungen.TabIndex = 137
|
||||
Me.DokumentHinzufügenToolStripMenuItem.Image = Global.SDL.My.Resources.Resources.pdf_s
|
||||
Me.DokumentHinzufügenToolStripMenuItem.Name = "DokumentHinzufügenToolStripMenuItem"
|
||||
Me.DokumentHinzufügenToolStripMenuItem.Size = New System.Drawing.Size(193, 22)
|
||||
Me.DokumentHinzufügenToolStripMenuItem.Text = "Dokument hinzufügen"
|
||||
'
|
||||
'usrcntlKundeBearbeitenFull
|
||||
'
|
||||
@@ -5052,6 +5087,9 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.tbZahlungsinfo.ResumeLayout(False)
|
||||
Me.tbZahlungsinfo.PerformLayout()
|
||||
Me.tbBankverbindungen.ResumeLayout(False)
|
||||
Me.tbBankverbindungen.PerformLayout()
|
||||
CType(Me.dgvBankverbindungen, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.GroupBox3.ResumeLayout(False)
|
||||
Me.GroupBox3.PerformLayout()
|
||||
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
@@ -5063,9 +5101,7 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Me.TabPage11.ResumeLayout(False)
|
||||
Me.pnlNeukunde.ResumeLayout(False)
|
||||
Me.pnlNeukunde.PerformLayout()
|
||||
Me.tbBankverbindungen.ResumeLayout(False)
|
||||
Me.tbBankverbindungen.PerformLayout()
|
||||
CType(Me.dgvBankverbindungen, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.cnsBankverbindungen.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
@@ -5395,4 +5431,8 @@ Partial Class usrcntlKundeBearbeitenFull
|
||||
Friend WithEvents cbxAlleBVanzeigen As CheckBox
|
||||
Friend WithEvents btnBankspeichern As VERAG_PROG_ALLGEMEIN.FlatButton
|
||||
Friend WithEvents dgvBankverbindungen As DataGridView
|
||||
Friend WithEvents cnsBankverbindungen As ContextMenuStrip
|
||||
Friend WithEvents ArchivierenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents DokumentLöschenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents DokumentHinzufügenToolStripMenuItem As ToolStripMenuItem
|
||||
End Class
|
||||
|
||||
@@ -117,4 +117,7 @@
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="cnsBankverbindungen.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
</root>
|
||||
@@ -1,4 +1,5 @@
|
||||
Imports System.ComponentModel
|
||||
Imports System.Windows.Documents
|
||||
Imports com.sun.org.apache.bcel.internal.generic
|
||||
Imports com.sun.tools.javac
|
||||
Imports GrapeCity.ActiveReports.ReportsCore.Tools
|
||||
@@ -1136,82 +1137,11 @@ Public Class usrcntlKundeBearbeitenFull
|
||||
End If
|
||||
|
||||
If tbcntrDetails.SelectedTab Is tbBankverbindungen Then
|
||||
|
||||
With dgvBankverbindungen
|
||||
|
||||
cBinding_dgvBankverbindungen.initBinding(" SELECT * " &
|
||||
" FROM tblBankverbindungen " &
|
||||
" WHERE bnk_KundenNr = '" & KUNDE.KundenNr & "' ", "tbl_IDS_Kunden")
|
||||
|
||||
AddHandler btnBankspeichern.Click,
|
||||
Sub(send As Object, evnt As EventArgs)
|
||||
If cBinding_dgvBankverbindungen.updateBinding() Then
|
||||
send.Enabled = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
AddHandler cBinding_dgvBankverbindungen.bindingdataTable.ColumnChanged,
|
||||
Sub(send As Object, evnt As EventArgs)
|
||||
btnBankspeichern.Enabled = True
|
||||
End Sub
|
||||
|
||||
AddHandler .UserDeletedRow,
|
||||
Sub(send As Object, evnt As DataGridViewRowEventArgs)
|
||||
btnBankspeichern.Enabled = True
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
.DataSource = cBinding_dgvBankverbindungen.bindingdataTable
|
||||
|
||||
|
||||
.DataSource.Columns("bnk_KundenNr").DefaultValue = KUNDE.KundenNr
|
||||
|
||||
.Columns(0).Visible = False
|
||||
.Columns(6).Visible = False
|
||||
|
||||
|
||||
.Columns(1).HeaderText = "Kunden-Nummer"
|
||||
.Columns(2).HeaderText = "IBAN"
|
||||
.Columns(3).HeaderText = "BIC"
|
||||
.Columns(4).HeaderText = "Name"
|
||||
.Columns(5).HeaderText = "Adresse"
|
||||
.Columns(7).HeaderText = "Archiv"
|
||||
.Columns(8).HeaderText = "Datum"
|
||||
|
||||
.Columns(2).ReadOnly = False
|
||||
.Columns(3).ReadOnly = False
|
||||
.Columns(4).ReadOnly = False
|
||||
.Columns(5).ReadOnly = False
|
||||
.Columns(7).ReadOnly = False
|
||||
.Columns(8).ReadOnly = False
|
||||
|
||||
|
||||
'Dim c As New DataGridViewImageColumn
|
||||
'c.Name = "clmnPDF" : c.HeaderText = "DOK"
|
||||
|
||||
'c.DefaultCellStyle.NullValue = Nothing
|
||||
'c.ImageLayout = DataGridViewImageCellLayout.Zoom
|
||||
'c.Width = 40 : c.DefaultCellStyle.Padding = New Padding(2) : c.DefaultCellStyle.BackColor = Color.White
|
||||
|
||||
'.Columns.Add(c)
|
||||
|
||||
'For Each r As DataGridViewRow In .Rows
|
||||
' If Not IsDBNull(r.Cells("bnk_daid").Value) AndAlso r.Cells("bnk_daid").Value > 0 Then
|
||||
' DirectCast(r.Cells("clmnPDF"), DataGridViewImageCell).Value = My.Resources.pdf
|
||||
' Else
|
||||
' DirectCast(r.Cells("clmnPDF"), DataGridViewImageCell).Value = Nothing
|
||||
' End If
|
||||
'Next
|
||||
|
||||
|
||||
|
||||
End With
|
||||
|
||||
initdgvBankverbindungen()
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Dim cBinding_dgvUStV As New cBinding("FMZOLL")
|
||||
@@ -1951,4 +1881,180 @@ Public Class usrcntlKundeBearbeitenFull
|
||||
txtWechsel.Enabled = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub cbxAlleBVanzeigen_CheckedChanged(sender As Object, e As EventArgs) Handles cbxAlleBVanzeigen.CheckedChanged
|
||||
|
||||
initdgvBankverbindungen(cbxAlleBVanzeigen.Checked)
|
||||
|
||||
End Sub
|
||||
|
||||
Sub initdgvBankverbindungen(Optional archivierteDSAnzeigen As Boolean = False)
|
||||
With dgvBankverbindungen
|
||||
|
||||
cBinding_dgvBankverbindungen.initBinding(" SELECT * " &
|
||||
" FROM tblBankverbindungen " &
|
||||
" WHERE bnk_KundenNr = '" & KUNDE.KundenNr & "'" & IIf(Not archivierteDSAnzeigen, " AND ISNULL(bnk_archiv,0) = 0", ""), "tbl_IDS_Kunden")
|
||||
|
||||
AddHandler btnBankspeichern.Click,
|
||||
Sub(send As Object, evnt As EventArgs)
|
||||
If cBinding_dgvBankverbindungen.updateBinding() Then
|
||||
send.Enabled = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
AddHandler cBinding_dgvBankverbindungen.bindingdataTable.ColumnChanged,
|
||||
Sub(send As Object, evnt As EventArgs)
|
||||
btnBankspeichern.Enabled = True
|
||||
End Sub
|
||||
|
||||
AddHandler .UserDeletedRow,
|
||||
Sub(send As Object, evnt As DataGridViewRowEventArgs)
|
||||
btnBankspeichern.Enabled = True
|
||||
|
||||
End Sub
|
||||
|
||||
.DataSource = cBinding_dgvBankverbindungen.bindingdataTable
|
||||
|
||||
|
||||
.DataSource.Columns("bnk_KundenNr").DefaultValue = KUNDE.KundenNr
|
||||
|
||||
.Columns(0).Visible = False
|
||||
.Columns(6).Visible = False
|
||||
If archivierteDSAnzeigen Then
|
||||
.Columns(8).Visible = True
|
||||
.Columns(9).Visible = True
|
||||
.Columns(8).HeaderText = "Archiv"
|
||||
.Columns(9).HeaderText = "Datum"
|
||||
'.Columns(8).ReadOnly = False
|
||||
'.Columns(9).ReadOnly = False
|
||||
Else
|
||||
.Columns(8).Visible = False
|
||||
.Columns(9).Visible = False
|
||||
End If
|
||||
|
||||
.Columns(1).HeaderText = "Kunden-Nummer"
|
||||
.Columns(2).HeaderText = "IBAN"
|
||||
.Columns(3).HeaderText = "BIC"
|
||||
.Columns(4).HeaderText = "Name"
|
||||
.Columns(5).HeaderText = "Adresse"
|
||||
.Columns(7).HeaderText = "Hauptkonto"
|
||||
|
||||
|
||||
.Columns(2).ReadOnly = False
|
||||
.Columns(3).ReadOnly = False
|
||||
.Columns(4).ReadOnly = False
|
||||
.Columns(5).ReadOnly = False
|
||||
.Columns(7).ReadOnly = False
|
||||
|
||||
If Not .Columns.Contains("clmnPDF") Then
|
||||
Dim c As New DataGridViewImageColumn
|
||||
c.Name = "clmnPDF" : c.HeaderText = "DOK"
|
||||
c.DefaultCellStyle.NullValue = Nothing
|
||||
c.ImageLayout = DataGridViewImageCellLayout.Zoom
|
||||
c.Width = 40 : c.DefaultCellStyle.Padding = New Padding(2) : c.DefaultCellStyle.BackColor = Color.White
|
||||
.Columns.Add(c)
|
||||
End If
|
||||
|
||||
|
||||
For Each r As DataGridViewRow In .Rows
|
||||
If Not IsDBNull(r.Cells("bnk_daid").Value) AndAlso r.Cells("bnk_daid").Value > 0 Then
|
||||
DirectCast(r.Cells("clmnPDF"), DataGridViewImageCell).Value = My.Resources.pdf
|
||||
Else
|
||||
DirectCast(r.Cells("clmnPDF"), DataGridViewImageCell).Value = Nothing
|
||||
End If
|
||||
Next
|
||||
|
||||
|
||||
End With
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub DokumentLöschenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DokumentLöschenToolStripMenuItem.Click
|
||||
|
||||
If dgvBankverbindungen.CurrentRow.Cells("bnk_daid").Value Is Nothing Or IsDBNull(dgvBankverbindungen.CurrentRow.Cells("bnk_daid").Value) Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If vbYes = MsgBox("Möchten Sie das Dokument wirklich löschen?", vbYesNoCancel) Then
|
||||
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER(dgvBankverbindungen.CurrentRow.Cells("bnk_daid").Value)
|
||||
If DS.DELETE_COMPLETE() Then
|
||||
sql.doSQLVarList("UPDATE [tblBankverbindungen] set bnk_daid = NULL WHERE bnk_id=" & dgvBankverbindungen.CurrentRow.Cells("bnk_id").Value, "FMZOLL")
|
||||
End If
|
||||
|
||||
initdgvBankverbindungen(cbxAlleBVanzeigen.Checked)
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ArchivierenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ArchivierenToolStripMenuItem.Click
|
||||
|
||||
If dgvBankverbindungen.CurrentRow.Cells("bnk_archiv").Value Is Nothing OrElse (Not IsDBNull(dgvBankverbindungen.CurrentRow.Cells("bnk_archiv").Value) AndAlso dgvBankverbindungen.CurrentRow.Cells("bnk_archiv").Value) AndAlso dgvBankverbindungen.CurrentRow.Cells("bnk_id").Value IsNot Nothing Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If vbYes = MsgBox("Möchten Sie diese Bankverbindung wirklich archivieren?", vbYesNoCancel) Then
|
||||
|
||||
sql.doSQLVarList("UPDATE [tblBankverbindungen] set bnk_archiv=1, [bnk_archiviertDatum]=GETDATE() WHERE bnk_id=" & dgvBankverbindungen.CurrentRow.Cells("bnk_id").Value, "FMZOLL")
|
||||
|
||||
initdgvBankverbindungen(cbxAlleBVanzeigen.Checked)
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub dgvBankverbindungen_CellMouseClick(sender As Object, e As DataGridViewCellMouseEventArgs) Handles dgvBankverbindungen.CellMouseClick
|
||||
|
||||
If e.RowIndex < 0 Then Exit Sub 'Es wurde außerhalb einer gültigen Datenzeile geklickt
|
||||
|
||||
DirectCast(sender, DataGridView).Rows(e.RowIndex).Selected = True
|
||||
If e.Button = MouseButtons.Right Then
|
||||
|
||||
|
||||
If sender Is dgvBankverbindungen Then
|
||||
If dgvBankverbindungen.SelectedRows.Count = 0 Then Exit Sub 'Es wurde außerhalb einer gültigen Datenzeile geklickt
|
||||
dgvBankverbindungen.CurrentCell = dgvBankverbindungen.Rows(e.RowIndex).Cells(e.ColumnIndex)
|
||||
|
||||
If dgvBankverbindungen.CurrentRow.Cells("bnk_archiv").Value Is Nothing OrElse (Not IsDBNull(dgvBankverbindungen.CurrentRow.Cells("bnk_archiv").Value) AndAlso dgvBankverbindungen.CurrentRow.Cells("bnk_archiv").Value) AndAlso dgvBankverbindungen.CurrentRow.Cells("bnk_id").Value IsNot Nothing Then
|
||||
ArchivierenToolStripMenuItem.Visible = False
|
||||
Else
|
||||
ArchivierenToolStripMenuItem.Visible = True
|
||||
End If
|
||||
|
||||
|
||||
If dgvBankverbindungen.CurrentRow.Cells("bnk_daid").Value Is Nothing Or IsDBNull(dgvBankverbindungen.CurrentRow.Cells("bnk_daid").Value) Then
|
||||
DokumentLöschenToolStripMenuItem.Visible = False
|
||||
DokumentHinzufügenToolStripMenuItem.Visible = True
|
||||
Else
|
||||
DokumentLöschenToolStripMenuItem.Visible = True
|
||||
DokumentHinzufügenToolStripMenuItem.Visible = False
|
||||
End If
|
||||
|
||||
|
||||
cnsBankverbindungen.Show(Cursor.Position)
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub DokumentHinzufügenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DokumentHinzufügenToolStripMenuItem.Click
|
||||
|
||||
If dgvBankverbindungen.CurrentRow.Cells("bnk_id").Value Is Nothing Or IsDBNull(dgvBankverbindungen.CurrentRow.Cells("bnk_id").Value) Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim Bankname = IIf(dgvBankverbindungen.CurrentRow.Cells("bnk_name").Value IsNot Nothing, dgvBankverbindungen.CurrentRow.Cells("bnk_name").Value, "BANK")
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "KD_ANHÄNGE", "BANKVERBINDUNG", "", "", Bankname, KUNDE.KundenNr)
|
||||
If DS.uploadDataToDATENSERVERFileDialog(, ".pdf", , "PDF") Then
|
||||
sql.doSQLVarList("UPDATE [tblBankverbindungen] set bnk_daid= " & DS.da_id & " WHERE bnk_id=" & dgvBankverbindungen.CurrentRow.Cells("bnk_id").Value, "FMZOLL")
|
||||
initdgvBankverbindungen(cbxAlleBVanzeigen.Checked)
|
||||
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
Reference in New Issue
Block a user