From 7223ee1e98e281d43d92087ab1bf1044880f66b5 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Fri, 7 Feb 2025 11:52:04 +0100 Subject: [PATCH 1/2] MDM USTVA reorder Position --- SDL/Fakturierung/cFakturierung.vb | 2 +- SDL/My Project/AssemblyInfo.vb | 4 +- SDL/USTV/frmMDM_USTVAntrag.vb | 38 ++++++++++++++----- .../Classes/USTV/cUSTVAntrag.vb | 3 +- 4 files changed, 33 insertions(+), 14 deletions(-) diff --git a/SDL/Fakturierung/cFakturierung.vb b/SDL/Fakturierung/cFakturierung.vb index 75eec072..713f9330 100644 --- a/SDL/Fakturierung/cFakturierung.vb +++ b/SDL/Fakturierung/cFakturierung.vb @@ -2059,7 +2059,7 @@ Public Class cFakturierung Dim anzahl As Double = 0 Dim bez As String = "" - Dim einzepreis = 0 + einzelpreis = 0 einzelpreis = IIf(pos.Item("SteuerpflichtigerBetrag") > 0, pos.Item("SteuerpflichtigerBetrag") / checkNull(pos.Item("Anzahl")), pos.Item("SteuerfreierBetrag") / checkNull(pos.Item("Anzahl"))) diff --git a/SDL/My Project/AssemblyInfo.vb b/SDL/My Project/AssemblyInfo.vb index 2e60b488..ad94606e 100644 --- a/SDL/My Project/AssemblyInfo.vb +++ b/SDL/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/SDL/USTV/frmMDM_USTVAntrag.vb b/SDL/USTV/frmMDM_USTVAntrag.vb index 43bd9f03..7090037f 100644 --- a/SDL/USTV/frmMDM_USTVAntrag.vb +++ b/SDL/USTV/frmMDM_USTVAntrag.vb @@ -2,18 +2,9 @@ Imports System.IO Imports System.Reflection Imports System.Windows.Documents -Imports com.sun.org.apache.xml.internal.resolver -Imports com.sun.tools.internal.ws.wsdl.framework -Imports DocumentFormat.OpenXml.Office2010.Drawing.Charts Imports itextsharp.text.pdf Imports itextsharp.text.pdf.parser -Imports java.awt.geom -Imports java.text.Normalizer -Imports jdk.nashorn.internal.objects.annotations -'Imports DocumentFormat.OpenXml.Drawing.Charts Imports Microsoft.Office.Interop -Imports org.BouncyCastle.Pqc.Crypto -Imports sun.swing Imports VERAG_PROG_ALLGEMEIN Public Class frmMDM_USTVAntrag @@ -1383,7 +1374,10 @@ Public Class frmMDM_USTVAntrag End If - UstCntlUSTV_AntragPosition1.UStV_POS.DELETE(UstCntlUSTV_AntragPosition1.UStV_POS.UStVAn_ID, UstCntlUSTV_AntragPosition1.UStV_POS.UStVPo_ID) + If UstCntlUSTV_AntragPosition1.UStV_POS.DELETE(UstCntlUSTV_AntragPosition1.UStV_POS.UStVAn_ID, UstCntlUSTV_AntragPosition1.UStV_POS.UStVPo_ID) Then + reorderPositions(UstCntlUSTV_AntragPosition1.UStV_POS.UStVAn_ID) + End If + init() End If @@ -1806,4 +1800,28 @@ Public Class frmMDM_USTVAntrag End Function + + Private Sub reorderPositions(UStVAn_ID As Integer) + + If UStVAn_ID < 0 Then Exit Sub + + + Dim dtUSTVA As DataTable = SQL.loadDgvBySql("SELECT tblUStVPositionen.UStVPo_ID FROM tblUStVPositionen WHERE tblUStVPositionen.UStVAn_ID=" & UStVAn_ID & " ORDER BY tblUStVPositionen.UStVPo_ID ", "FMZOLL") + Dim counter As Integer = 0 + + For Each row In dtUSTVA.Rows + + counter = counter + 1 + + Dim USTV_POS = New VERAG_PROG_ALLGEMEIN.cUStVPositionen(UStVAn_ID, row("UStVPo_ID")) + If USTV_POS.UStVPo_ID <> counter Then + SQL.doSQL("UPDATE tblUStVPositionen SET UStVPo_ID = " & counter & " WHERE UStVAn_ID=" & UStVAn_ID & " AND UStVPo_ID=" & USTV_POS.UStVPo_ID, "FMZOLL") + End If + + + + + Next + + End Sub End Class \ No newline at end of file diff --git a/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUSTVAntrag.vb b/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUSTVAntrag.vb index 6cf64d42..8cb95c7b 100644 --- a/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUSTVAntrag.vb +++ b/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUSTVAntrag.vb @@ -356,6 +356,7 @@ Public Class cUStVPositionen Return SQL.doSQLVarList(sqlstr, "FMZOLL", , list) End Function + Public Function getUpdateCmd() As String Try Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList() @@ -424,7 +425,7 @@ Public Class cUStVPositionen Public Function DELETE(UStVAn_ID, UStVPo_ID) As Boolean - Dim sqlstr = " DELETE FROM tblUStVPositionen WITH(updlock,serializable) WHERE UStVAn_ID=" & Me.UStVAn_ID & " AND UStVPo_ID=" & Me.UStVPo_ID + Dim sqlstr = " DELETE FROM tblUStVPositionen WHERE UStVAn_ID=" & Me.UStVAn_ID & " AND UStVPo_ID=" & Me.UStVPo_ID Return SQL.doSQL(sqlstr, "FMZOLL") End Function From 76dbe4021a50dca37b03333744b7ade97e651638 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Wed, 12 Feb 2025 10:56:14 +0100 Subject: [PATCH 2/2] cFakt, Kundenblatt, ustva, etc. --- SDL/Fakturierung/cFakturierung.vb | 12 +- SDL/USTV/frmMDM_USTVAntrag.Designer.vb | 129 +- SDL/USTV/frmMDM_USTVAntrag.vb | 90 +- SDL/USTV/frmUSTVoffeneAntraege.Designer.vb | 1 + SDL/USTV/usrCntlUSTV.Designer.vb | 70 +- SDL/USTV/usrCntlUSTV.vb | 74 +- .../ustCntlUSTV_AntragPosition.Designer.vb | 498 +- SDL/USTV/ustCntlUSTV_AntragPosition.vb | 204 +- SDL/kunden/frmKundenblatt.Designer.vb | 185 +- SDL/kunden/frmKundenblatt.vb | 2 + .../usrcntlKundeBearbeitenFull.Designer.vb | 5127 +++++++++-------- SDL/kunden/usrcntlKundeBearbeitenFull.vb | 55 +- SDL/mdm/frmDatumsabfrage.vb | 13 +- .../Classes/USTV/cUStVLeistender.vb | 31 +- .../Classes/cKundenErweitert.vb | 6 + .../VERAG_PROG_ALLGEMEIN.vbproj | 3 + 16 files changed, 3517 insertions(+), 2983 deletions(-) diff --git a/SDL/Fakturierung/cFakturierung.vb b/SDL/Fakturierung/cFakturierung.vb index 713f9330..a3a069cb 100644 --- a/SDL/Fakturierung/cFakturierung.vb +++ b/SDL/Fakturierung/cFakturierung.vb @@ -2061,11 +2061,17 @@ Public Class cFakturierung einzelpreis = 0 - einzelpreis = IIf(pos.Item("SteuerpflichtigerBetrag") > 0, pos.Item("SteuerpflichtigerBetrag") / checkNull(pos.Item("Anzahl")), pos.Item("SteuerfreierBetrag") / checkNull(pos.Item("Anzahl"))) + If IsNumeric(checkNull(pos.Item("Anzahl"))) Then anzahl = CDbl(checkNull(pos.Item("Anzahl"))) + + einzelpreis = IIf(pos.Item("SteuerpflichtigerBetrag") > 0, pos.Item("SteuerpflichtigerBetrag") / anzahl, pos.Item("SteuerfreierBetrag") / anzahl) + + If Double.IsNaN(einzelpreis) Then + einzelpreis = 0 + End If Dim tradeLineItemNew As TradeLineItem = desc.AddTradeLineItem( name:=checkNull(pos.Item("LeistungsBez")), - billedQuantity:=Convert.ToDecimal(checkNull(pos.Item("Anzahl"))), + billedQuantity:=IIf(anzahl <> 0, Convert.ToDecimal(anzahl), 0), unitCode:=QuantityCodes.C62, ' immer in Stück netUnitPrice:=Convert.ToDecimal(einzelpreis), grossUnitPrice:=Convert.ToDecimal(einzelpreis), @@ -2074,7 +2080,7 @@ Public Class cFakturierung taxType:=IIf(pos.Item("SteuerpflichtigerBetrag") > 0, TaxTypes.VAT, TaxTypes.VAT) ) Dim netUnitPrice = Convert.ToDecimal(einzelpreis) - Dim netPricePos = netUnitPrice * Convert.ToDecimal(checkNull(pos.Item("Anzahl"))) + Dim netPricePos = netUnitPrice * IIf(anzahl <> 0, Convert.ToDecimal(anzahl), 0) sumNetto += netPricePos diff --git a/SDL/USTV/frmMDM_USTVAntrag.Designer.vb b/SDL/USTV/frmMDM_USTVAntrag.Designer.vb index 59ba1c9e..d20ed807 100644 --- a/SDL/USTV/frmMDM_USTVAntrag.Designer.vb +++ b/SDL/USTV/frmMDM_USTVAntrag.Designer.vb @@ -26,6 +26,7 @@ Partial Class frmMDM_USTVAntrag Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMDM_USTVAntrag)) Me.Panel3 = New System.Windows.Forms.Panel() + Me.picPDF = New System.Windows.Forms.PictureBox() Me.btnMail = New System.Windows.Forms.Button() Me.btnAntrageeinarbeiten = New System.Windows.Forms.Button() Me.cbxArchivierteEintracheNochmalsEinarbetien = New System.Windows.Forms.CheckBox() @@ -40,6 +41,8 @@ Partial Class frmMDM_USTVAntrag Me.cbxLand = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.lblLand = New System.Windows.Forms.Label() Me.Panel8 = New System.Windows.Forms.Panel() + Me.Label13 = New System.Windows.Forms.Label() + Me.txtGueltig = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label11 = New System.Windows.Forms.Label() Me.txtStNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label9 = New System.Windows.Forms.Label() @@ -92,8 +95,9 @@ Partial Class frmMDM_USTVAntrag Me.btnNeuerEintrag = New System.Windows.Forms.Button() Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components) - Me.picPDF = New System.Windows.Forms.PictureBox() + Me.lblMWSTAbrechnung = New System.Windows.Forms.Label() Me.Panel3.SuspendLayout() + CType(Me.picPDF, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel1.SuspendLayout() Me.Panel9.SuspendLayout() Me.Panel8.SuspendLayout() @@ -105,7 +109,6 @@ Partial Class frmMDM_USTVAntrag Me.pnl.SuspendLayout() Me.Panel2.SuspendLayout() Me.Panel4.SuspendLayout() - CType(Me.picPDF, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Panel3 @@ -124,6 +127,16 @@ Partial Class frmMDM_USTVAntrag Me.Panel3.Size = New System.Drawing.Size(1454, 100) Me.Panel3.TabIndex = 3 ' + 'picPDF + ' + Me.picPDF.Image = Global.SDL.My.Resources.Resources.pdf + Me.picPDF.Location = New System.Drawing.Point(972, 29) + Me.picPDF.Name = "picPDF" + Me.picPDF.Size = New System.Drawing.Size(50, 50) + Me.picPDF.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize + Me.picPDF.TabIndex = 27 + Me.picPDF.TabStop = False + ' 'btnMail ' Me.btnMail.FlatStyle = System.Windows.Forms.FlatStyle.Flat @@ -214,7 +227,7 @@ Partial Class frmMDM_USTVAntrag ' Me.lblWarnung.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblWarnung.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lblWarnung.BackColor = System.Drawing.Color.Transparent Me.lblWarnung.Cursor = System.Windows.Forms.Cursors.Default Me.lblWarnung.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) Me.lblWarnung.ForeColor = System.Drawing.Color.Red @@ -269,7 +282,7 @@ Partial Class frmMDM_USTVAntrag ' Me.lblKdNr.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblKdNr.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lblKdNr.BackColor = System.Drawing.Color.Transparent Me.lblKdNr.Cursor = System.Windows.Forms.Cursors.Default Me.lblKdNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblKdNr.ForeColor = System.Drawing.Color.White @@ -322,6 +335,9 @@ Partial Class frmMDM_USTVAntrag ' Me.Panel8.BackColor = System.Drawing.Color.WhiteSmoke Me.Panel8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.Panel8.Controls.Add(Me.lblMWSTAbrechnung) + Me.Panel8.Controls.Add(Me.Label13) + Me.Panel8.Controls.Add(Me.txtGueltig) Me.Panel8.Controls.Add(Me.Label11) Me.Panel8.Controls.Add(Me.txtStNr) Me.Panel8.Controls.Add(Me.Label9) @@ -346,6 +362,44 @@ Partial Class frmMDM_USTVAntrag Me.Panel8.Size = New System.Drawing.Size(973, 87) Me.Panel8.TabIndex = 19 ' + 'Label13 + ' + Me.Label13.AutoSize = True + Me.Label13.BackColor = System.Drawing.Color.Transparent + Me.Label13.Cursor = System.Windows.Forms.Cursors.Hand + Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label13.ForeColor = System.Drawing.Color.Black + Me.Label13.Location = New System.Drawing.Point(10, 65) + Me.Label13.Name = "Label13" + Me.Label13.Size = New System.Drawing.Size(64, 17) + Me.Label13.TabIndex = 24 + Me.Label13.Text = "gültig bis" + ' + 'txtGueltig + ' + Me.txtGueltig._DateTimeOnly = False + Me.txtGueltig._numbersOnly = False + Me.txtGueltig._numbersOnlyKommastellen = "" + Me.txtGueltig._numbersOnlyTrennzeichen = False + Me.txtGueltig._Prozent = False + Me.txtGueltig._ShortDateNew = False + Me.txtGueltig._ShortDateOnly = True + Me.txtGueltig._TimeOnly = False + Me.txtGueltig._TimeOnly_Seconds = False + Me.txtGueltig._value = "" + Me.txtGueltig._Waehrung = False + Me.txtGueltig._WaehrungZeichen = False + Me.txtGueltig.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + Me.txtGueltig.ForeColor = System.Drawing.Color.Black + Me.txtGueltig.Location = New System.Drawing.Point(101, 62) + Me.txtGueltig.MaxLength = 10 + Me.txtGueltig.MaxLineLength = -1 + Me.txtGueltig.MaxLines_Warning = "" + Me.txtGueltig.MaxLines_Warning_Label = Nothing + Me.txtGueltig.Name = "txtGueltig" + Me.txtGueltig.Size = New System.Drawing.Size(100, 23) + Me.txtGueltig.TabIndex = 23 + ' 'Label11 ' Me.Label11.AutoSize = True @@ -353,7 +407,7 @@ Partial Class frmMDM_USTVAntrag Me.Label11.Cursor = System.Windows.Forms.Cursors.Hand Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label11.ForeColor = System.Drawing.Color.Black - Me.Label11.Location = New System.Drawing.Point(10, 47) + Me.Label11.Location = New System.Drawing.Point(10, 40) Me.Label11.Name = "Label11" Me.Label11.Size = New System.Drawing.Size(74, 17) Me.Label11.TabIndex = 21 @@ -375,7 +429,7 @@ Partial Class frmMDM_USTVAntrag Me.txtStNr._WaehrungZeichen = False Me.txtStNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) Me.txtStNr.ForeColor = System.Drawing.Color.Black - Me.txtStNr.Location = New System.Drawing.Point(101, 44) + Me.txtStNr.Location = New System.Drawing.Point(101, 37) Me.txtStNr.MaxLength = 10 Me.txtStNr.MaxLineLength = -1 Me.txtStNr.MaxLines_Warning = "" @@ -391,7 +445,7 @@ Partial Class frmMDM_USTVAntrag Me.Label9.Cursor = System.Windows.Forms.Cursors.Hand Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label9.ForeColor = System.Drawing.Color.Black - Me.Label9.Location = New System.Drawing.Point(815, 44) + Me.Label9.Location = New System.Drawing.Point(815, 38) Me.Label9.Name = "Label9" Me.Label9.Size = New System.Drawing.Size(30, 17) Me.Label9.TabIndex = 19 @@ -413,7 +467,7 @@ Partial Class frmMDM_USTVAntrag Me.txtVZ._WaehrungZeichen = True Me.txtVZ.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) Me.txtVZ.ForeColor = System.Drawing.Color.Black - Me.txtVZ.Location = New System.Drawing.Point(865, 38) + Me.txtVZ.Location = New System.Drawing.Point(865, 32) Me.txtVZ.MaxLength = 10 Me.txtVZ.MaxLineLength = -1 Me.txtVZ.MaxLines_Warning = "" @@ -438,7 +492,7 @@ Partial Class frmMDM_USTVAntrag Me.txtAbfNr._WaehrungZeichen = False Me.txtAbfNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) Me.txtAbfNr.ForeColor = System.Drawing.Color.Black - Me.txtAbfNr.Location = New System.Drawing.Point(654, 40) + Me.txtAbfNr.Location = New System.Drawing.Point(654, 34) Me.txtAbfNr.MaxLength = 10 Me.txtAbfNr.MaxLineLength = -1 Me.txtAbfNr.MaxLines_Warning = "" @@ -454,7 +508,7 @@ Partial Class frmMDM_USTVAntrag Me.Label8.Cursor = System.Windows.Forms.Cursors.Hand Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label8.ForeColor = System.Drawing.Color.Black - Me.Label8.Location = New System.Drawing.Point(524, 44) + Me.Label8.Location = New System.Drawing.Point(524, 38) Me.Label8.Name = "Label8" Me.Label8.Size = New System.Drawing.Size(112, 17) Me.Label8.TabIndex = 17 @@ -465,10 +519,10 @@ Partial Class frmMDM_USTVAntrag Me.cbxFiliale._allowedValuesFreiText = Nothing Me.cbxFiliale._allowFreiText = False Me.cbxFiliale._value = "" - Me.cbxFiliale.DropDownWidth = 120 + Me.cbxFiliale.DropDownWidth = 150 Me.cbxFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cbxFiliale.FormattingEnabled = True - Me.cbxFiliale.Location = New System.Drawing.Point(429, 39) + Me.cbxFiliale.Location = New System.Drawing.Point(429, 33) Me.cbxFiliale.Name = "cbxFiliale" Me.cbxFiliale.Size = New System.Drawing.Size(89, 24) Me.cbxFiliale.TabIndex = 16 @@ -480,7 +534,7 @@ Partial Class frmMDM_USTVAntrag Me.Label4.Cursor = System.Windows.Forms.Cursors.Hand Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label4.ForeColor = System.Drawing.Color.Black - Me.Label4.Location = New System.Drawing.Point(363, 44) + Me.Label4.Location = New System.Drawing.Point(363, 38) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(48, 17) Me.Label4.TabIndex = 15 @@ -493,7 +547,7 @@ Partial Class frmMDM_USTVAntrag Me.Label2.Cursor = System.Windows.Forms.Cursors.Hand Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label2.ForeColor = System.Drawing.Color.Black - Me.Label2.Location = New System.Drawing.Point(524, 13) + Me.Label2.Location = New System.Drawing.Point(524, 9) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(111, 17) Me.Label2.TabIndex = 13 @@ -515,7 +569,7 @@ Partial Class frmMDM_USTVAntrag Me.txtBezugsNr._WaehrungZeichen = False Me.txtBezugsNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) Me.txtBezugsNr.ForeColor = System.Drawing.Color.Black - Me.txtBezugsNr.Location = New System.Drawing.Point(654, 9) + Me.txtBezugsNr.Location = New System.Drawing.Point(654, 5) Me.txtBezugsNr.MaxLength = 10 Me.txtBezugsNr.MaxLineLength = -1 Me.txtBezugsNr.MaxLines_Warning = "" @@ -531,7 +585,7 @@ Partial Class frmMDM_USTVAntrag Me.cbxWahrung._value = "" Me.cbxWahrung.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cbxWahrung.FormattingEnabled = True - Me.cbxWahrung.Location = New System.Drawing.Point(447, 9) + Me.cbxWahrung.Location = New System.Drawing.Point(447, 5) Me.cbxWahrung.Name = "cbxWahrung" Me.cbxWahrung.Size = New System.Drawing.Size(71, 24) Me.cbxWahrung.TabIndex = 12 @@ -543,7 +597,7 @@ Partial Class frmMDM_USTVAntrag Me.lblWahrung.Cursor = System.Windows.Forms.Cursors.Hand Me.lblWahrung.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblWahrung.ForeColor = System.Drawing.Color.Black - Me.lblWahrung.Location = New System.Drawing.Point(363, 13) + Me.lblWahrung.Location = New System.Drawing.Point(363, 9) Me.lblWahrung.Name = "lblWahrung" Me.lblWahrung.Size = New System.Drawing.Size(70, 17) Me.lblWahrung.TabIndex = 11 @@ -556,7 +610,7 @@ Partial Class frmMDM_USTVAntrag Me.Label1.Cursor = System.Windows.Forms.Cursors.Hand Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label1.ForeColor = System.Drawing.Color.Black - Me.Label1.Location = New System.Drawing.Point(815, 13) + Me.Label1.Location = New System.Drawing.Point(815, 9) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(44, 17) Me.Label1.TabIndex = 10 @@ -578,7 +632,7 @@ Partial Class frmMDM_USTVAntrag Me.txt3470._WaehrungZeichen = True Me.txt3470.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) Me.txt3470.ForeColor = System.Drawing.Color.Black - Me.txt3470.Location = New System.Drawing.Point(865, 7) + Me.txt3470.Location = New System.Drawing.Point(865, 3) Me.txt3470.MaxLength = 10 Me.txt3470.MaxLineLength = -1 Me.txt3470.MaxLines_Warning = "" @@ -676,7 +730,7 @@ Partial Class frmMDM_USTVAntrag 'lblGesamtUSteuer ' Me.lblGesamtUSteuer.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblGesamtUSteuer.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lblGesamtUSteuer.BackColor = System.Drawing.Color.Transparent Me.lblGesamtUSteuer.Cursor = System.Windows.Forms.Cursors.Default Me.lblGesamtUSteuer.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold) Me.lblGesamtUSteuer.ForeColor = System.Drawing.Color.White @@ -691,7 +745,7 @@ Partial Class frmMDM_USTVAntrag ' Me.Label12.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label12.AutoSize = True - Me.Label12.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.Label12.BackColor = System.Drawing.Color.Transparent Me.Label12.Cursor = System.Windows.Forms.Cursors.Default Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!) Me.Label12.ForeColor = System.Drawing.Color.White @@ -704,7 +758,7 @@ Partial Class frmMDM_USTVAntrag 'lblDiffernezbetrag ' Me.lblDiffernezbetrag.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblDiffernezbetrag.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lblDiffernezbetrag.BackColor = System.Drawing.Color.Transparent Me.lblDiffernezbetrag.Cursor = System.Windows.Forms.Cursors.Default Me.lblDiffernezbetrag.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold) Me.lblDiffernezbetrag.ForeColor = System.Drawing.Color.White @@ -719,7 +773,7 @@ Partial Class frmMDM_USTVAntrag ' Me.Label10.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label10.AutoSize = True - Me.Label10.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.Label10.BackColor = System.Drawing.Color.Transparent Me.Label10.Cursor = System.Windows.Forms.Cursors.Default Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!) Me.Label10.ForeColor = System.Drawing.Color.White @@ -732,7 +786,7 @@ Partial Class frmMDM_USTVAntrag 'lblGesamtErstattung ' Me.lblGesamtErstattung.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblGesamtErstattung.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lblGesamtErstattung.BackColor = System.Drawing.Color.Transparent Me.lblGesamtErstattung.Cursor = System.Windows.Forms.Cursors.Default Me.lblGesamtErstattung.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold) Me.lblGesamtErstattung.ForeColor = System.Drawing.Color.White @@ -747,7 +801,7 @@ Partial Class frmMDM_USTVAntrag ' Me.Label7.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label7.AutoSize = True - Me.Label7.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.Label7.BackColor = System.Drawing.Color.Transparent Me.Label7.Cursor = System.Windows.Forms.Cursors.Default Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!) Me.Label7.ForeColor = System.Drawing.Color.White @@ -975,7 +1029,7 @@ Partial Class frmMDM_USTVAntrag ' Me.lblFirma.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblFirma.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lblFirma.BackColor = System.Drawing.Color.Transparent Me.lblFirma.Cursor = System.Windows.Forms.Cursors.Default Me.lblFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) Me.lblFirma.ForeColor = System.Drawing.Color.White @@ -1094,15 +1148,17 @@ Partial Class frmMDM_USTVAntrag Me.ContextMenuStrip2.Name = "ContextMenuStrip1" Me.ContextMenuStrip2.Size = New System.Drawing.Size(61, 4) ' - 'picPDF + 'lblMWSTAbrechnung ' - Me.picPDF.Image = Global.SDL.My.Resources.Resources.pdf - Me.picPDF.Location = New System.Drawing.Point(972, 29) - Me.picPDF.Name = "picPDF" - Me.picPDF.Size = New System.Drawing.Size(50, 50) - Me.picPDF.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize - Me.picPDF.TabIndex = 27 - Me.picPDF.TabStop = False + Me.lblMWSTAbrechnung.AutoSize = True + Me.lblMWSTAbrechnung.BackColor = System.Drawing.Color.Transparent + Me.lblMWSTAbrechnung.Cursor = System.Windows.Forms.Cursors.Hand + Me.lblMWSTAbrechnung.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblMWSTAbrechnung.ForeColor = System.Drawing.Color.Black + Me.lblMWSTAbrechnung.Location = New System.Drawing.Point(224, 41) + Me.lblMWSTAbrechnung.Name = "lblMWSTAbrechnung" + Me.lblMWSTAbrechnung.Size = New System.Drawing.Size(0, 17) + Me.lblMWSTAbrechnung.TabIndex = 25 ' 'frmMDM_USTVAntrag ' @@ -1120,6 +1176,7 @@ Partial Class frmMDM_USTVAntrag Me.Text = "USTV Antrag" Me.Panel3.ResumeLayout(False) Me.Panel3.PerformLayout() + CType(Me.picPDF, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel1.ResumeLayout(False) Me.Panel1.PerformLayout() Me.Panel9.ResumeLayout(False) @@ -1136,7 +1193,6 @@ Partial Class frmMDM_USTVAntrag Me.pnl.ResumeLayout(False) Me.Panel2.ResumeLayout(False) Me.Panel4.ResumeLayout(False) - CType(Me.picPDF, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub @@ -1209,4 +1265,7 @@ Partial Class frmMDM_USTVAntrag Friend WithEvents Label2 As Label Friend WithEvents txtBezugsNr As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents picPDF As PictureBox + Friend WithEvents txtGueltig As VERAG_PROG_ALLGEMEIN.MyTextBox + Friend WithEvents Label13 As Label + Friend WithEvents lblMWSTAbrechnung As Label End Class diff --git a/SDL/USTV/frmMDM_USTVAntrag.vb b/SDL/USTV/frmMDM_USTVAntrag.vb index 7090037f..6c5a2469 100644 --- a/SDL/USTV/frmMDM_USTVAntrag.vb +++ b/SDL/USTV/frmMDM_USTVAntrag.vb @@ -218,13 +218,30 @@ Public Class frmMDM_USTVAntrag USTV_ANTRAG = New VERAG_PROG_ALLGEMEIN.cUSTVAntrag(UStVAn_ID) Antrag_LandKz = SQL.DLookup("LandKz", "[Länderverzeichnis für die Außenhandelsstatistik]", "Landnr='" & USTV_ANTRAG.UStVAn_LandNr & "'", "FMZOLL") setValue(USTV_ANTRAG) + + Dim KUNDE As New cKunde(USTV_ANTRAG.UStVAn_KuNr) + Dim KUNDE_ERW As New cKundenErweitert(USTV_ANTRAG.UStVAn_KuNr) + If KUNDE IsNot Nothing Then + Panel1.BackColor = Color.FromArgb(0, 54, 128) + If KUNDE.Abfertigungsverbot Then Panel1.BackColor = Color.IndianRed + Else + Panel1.BackColor = Color.FromArgb(0, 54, 128) + End If + + + If KUNDE_ERW IsNot Nothing Then + + If KUNDE_ERW.kde_MWStAbrechnung IsNot Nothing Then + lblMWSTAbrechnung.Text = KUNDE_ERW.kde_MWStAbrechnung + Else + lblMWSTAbrechnung.Text = "" + End If + End If + End If - - - End Sub Sub setValue(USTV_ANTRAG As VERAG_PROG_ALLGEMEIN.cUSTVAntrag) @@ -335,7 +352,7 @@ Public Class frmMDM_USTVAntrag dgvUSTVPositionen.VALUE_CHANGED = True End Sub - Private Sub usrCntlVERAGCard_Load(sender As Object, e As EventArgs) Handles MyBase.Load + Private Sub usrCntlUSTVA_Antrag_Load(sender As Object, e As EventArgs) Handles MyBase.Load EnableDoubleBuffered(dgvUSTVPositionen) @@ -450,6 +467,8 @@ Public Class frmMDM_USTVAntrag init() + setinfofields() + End Sub Private Sub Button14_Click(sender As Object, e As EventArgs) Handles btnAntrageeinarbeiten.Click @@ -1006,7 +1025,7 @@ Public Class frmMDM_USTVAntrag USTV_POS.UStVPo_Schnittstelle = True USTV_POS.UStVPo_Leistungsbezeichnung = "Diesel" - USTV_POS.UStVPo_Leistender = "IDS EUROPE BV" + USTV_POS.UStVPo_Leistender = "IDS EUROPE B.V." USTV_POS.UStVPo_Sachbearbeiter = VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME USTV_POS.UStVPo_Zeitstempel = Now() @@ -1640,6 +1659,9 @@ Public Class frmMDM_USTVAntrag Private Sub cbxLand_SelectedValueChanged(sender As Object, e As EventArgs) Handles cbxLand.SelectedValueChanged lblLand.Text = IIf(cbxLand.SelectedItem IsNot Nothing, cbxLand.SelectedItem.Text, "") + + setinfofields() + End Sub Private Sub picPDF_Click(sender As Object, e As EventArgs) Handles picPDF.Click @@ -1823,5 +1845,63 @@ Public Class frmMDM_USTVAntrag Next + End Sub + + Private Sub setinfofields() + + + If Not IsDBNull(USTV_ANTRAG.UStVAn_LandNr) Then + + Dim dtSteuerNr As DataTable = SQL.loadDgvBySql("SELECT * FROM tblSteuernummern WHERE AdressenNr = " & USTV_ANTRAG.UStVAn_KuNr & " and tblSteuernummern.LandNr =" & USTV_ANTRAG.UStVAn_LandNr, "FMZOLL") + + If dtSteuerNr.Rows.Count > 0 Then + txtStNr.Text = dtSteuerNr.Rows(0).Item("StNrFürRückerstattungUSt") + txtGueltig.Text = dtSteuerNr.Rows(0).Item("StNrGültigkeitsdatum") + End If + + + + End If + + + ' If Not IsNull(Me!UStVAn_LandNr) Then + ' strSQL = "SELECT tblSteuernummern.*" & + ' " FROM tblSteuernummern" & + ' " WHERE (((tblSteuernummern.AdressenNr)=" & Me!lngKundenNr & ") AND ((tblSteuernummern.LandNr)=" & Me!UStVAn_LandNr & "));" + ' Set rst = dbs.OpenRecordset(strSQL, dbOpenSnapshot) + ' If Not rst.EOF Then + ' Me!StNrFürRückerstattungUSt = rst!StNrFürRückerstattungUSt + ' Me!StNrGültigkeitsdatum = rst!StNrGültigkeitsdatum + ' Me!bezVertretungsvollmachtAusgestelltAm.ForeColor = -2147483630 + ' Me!bezVertretungsvollmachtAusgestelltAm.Caption = "Vertretungsvollmacht ausgestellt am" + ' Me!VertretungsvollmachtAusgestelltAm = rst!VertretungsvollmachtAusgestelltAm + ' Me!bezVertretungsvollmachtErhaltenAm.ForeColor = -2147483630 + ' Me!bezVertretungsvollmachtErhaltenAm.Caption = "Vertretungsvollmacht erhalten am" + ' Me!VertretungsvollmachtErhaltenAm = rst!VertretungsvollmachtErhaltenAm + ' Me!AuszahlungsvollmachtAusgestelltAm = rst!AuszahlungsvollmachtAusgestelltAm + ' Me!AuszahlungsvollmachtErhaltenAm = rst!AuszahlungsvollmachtErhaltenAm + ' Me!Bemerkung = rst!Bemerkung + ' End If + ' rst.Close + ' ' ab 25.03.2010 Generalvollmacht Eintrag in Tabelle Adressen + ' strSQL = "SELECT Adressen.UStV_GVAnfDat, Adressen.UStV_GVAusDat" & + ' " FROM Adressen" & + ' " WHERE (((Adressen.AdressenNr)=" & Me!lngKundenNr & ") AND" & + ' " (((Adressen.UStV_GVAnfDat) Is Not Null) OR ((Adressen.UStV_GVAusDat) Is Not Null)));" + ' Set rst = dbs.OpenRecordset(strSQL, dbOpenSnapshot) + ' If Not rst.EOF Then + ' Me!bezVertretungsvollmachtAusgestelltAm.ForeColor = 16711808 + ' Me!bezVertretungsvollmachtAusgestelltAm.Caption = "Generalvollmacht angefordert am" + ' Me!VertretungsvollmachtAusgestelltAm = rst!UStV_GVAnfDat + ' Me!bezVertretungsvollmachtErhaltenAm.ForeColor = 16711808 + ' Me!bezVertretungsvollmachtErhaltenAm.Caption = "Generalvollmacht ausgestellt am" + ' Me!VertretungsvollmachtErhaltenAm = rst!UStV_GVAusDat + ' End If + ' rst.Close + ' Set rst = Nothing + 'End If + + + End Sub End Class \ No newline at end of file diff --git a/SDL/USTV/frmUSTVoffeneAntraege.Designer.vb b/SDL/USTV/frmUSTVoffeneAntraege.Designer.vb index bc3f718d..2c74b4c3 100644 --- a/SDL/USTV/frmUSTVoffeneAntraege.Designer.vb +++ b/SDL/USTV/frmUSTVoffeneAntraege.Designer.vb @@ -480,6 +480,7 @@ Partial Class frmUSTVoffeneAntraege ' 'Button4 ' + Me.Button4.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.Button4.Location = New System.Drawing.Point(15, 639) Me.Button4.Name = "Button4" Me.Button4.Size = New System.Drawing.Size(75, 23) diff --git a/SDL/USTV/usrCntlUSTV.Designer.vb b/SDL/USTV/usrCntlUSTV.Designer.vb index ae3df5b7..1afc541b 100644 --- a/SDL/USTV/usrCntlUSTV.Designer.vb +++ b/SDL/USTV/usrCntlUSTV.Designer.vb @@ -28,6 +28,8 @@ Partial Class usrCntlUSTV Me.dgvUSTV = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.Label1 = New System.Windows.Forms.Label() Me.Panel1 = New System.Windows.Forms.Panel() + Me.lblVZhint = New System.Windows.Forms.Label() + Me.lblVZKunde = New System.Windows.Forms.Label() Me.txtRisiko = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label10 = New System.Windows.Forms.Label() Me.txtOPSaldo = New VERAG_PROG_ALLGEMEIN.MyTextBox() @@ -60,13 +62,14 @@ Partial Class usrCntlUSTV Me.btnUSTVAloeschen = New System.Windows.Forms.Button() Me.Panel2 = New System.Windows.Forms.Panel() Me.Panel3 = New System.Windows.Forms.Panel() + Me.Button2 = New System.Windows.Forms.Button() + Me.btnVorschau = New System.Windows.Forms.Button() Me.btnMail = New System.Windows.Forms.Button() Me.btnPLOSEAlle = New System.Windows.Forms.Button() Me.Button5 = New System.Windows.Forms.Button() Me.Button8 = New System.Windows.Forms.Button() Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components) - Me.btnVorschau = New System.Windows.Forms.Button() CType(Me.dgvUSTV, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel1.SuspendLayout() Me.Panel2.SuspendLayout() @@ -114,6 +117,8 @@ Partial Class usrCntlUSTV 'Panel1 ' Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer)) + Me.Panel1.Controls.Add(Me.lblVZhint) + Me.Panel1.Controls.Add(Me.lblVZKunde) Me.Panel1.Controls.Add(Me.txtRisiko) Me.Panel1.Controls.Add(Me.Label10) Me.Panel1.Controls.Add(Me.txtOPSaldo) @@ -149,6 +154,26 @@ Partial Class usrCntlUSTV Me.Panel1.Size = New System.Drawing.Size(1627, 108) Me.Panel1.TabIndex = 0 ' + 'lblVZhint + ' + Me.lblVZhint.AutoSize = True + Me.lblVZhint.Location = New System.Drawing.Point(4, 60) + Me.lblVZhint.Name = "lblVZhint" + Me.lblVZhint.Size = New System.Drawing.Size(0, 13) + Me.lblVZhint.TabIndex = 58 + ' + 'lblVZKunde + ' + Me.lblVZKunde.AutoSize = True + Me.lblVZKunde.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblVZKunde.ForeColor = System.Drawing.Color.Red + Me.lblVZKunde.Location = New System.Drawing.Point(4, 39) + Me.lblVZKunde.Name = "lblVZKunde" + Me.lblVZKunde.Size = New System.Drawing.Size(83, 16) + Me.lblVZKunde.TabIndex = 57 + Me.lblVZKunde.Text = "VZ-KUNDE" + Me.lblVZKunde.Visible = False + ' 'txtRisiko ' Me.txtRisiko._DateTimeOnly = False @@ -644,6 +669,7 @@ Partial Class usrCntlUSTV 'Panel3 ' Me.Panel3.AutoSize = True + Me.Panel3.Controls.Add(Me.Button2) Me.Panel3.Controls.Add(Me.btnVorschau) Me.Panel3.Controls.Add(Me.btnMail) Me.Panel3.Controls.Add(Me.btnPLOSEAlle) @@ -658,6 +684,32 @@ Partial Class usrCntlUSTV Me.Panel3.Size = New System.Drawing.Size(1627, 77) Me.Panel3.TabIndex = 0 ' + 'Button2 + ' + Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button2.ForeColor = System.Drawing.Color.Black + Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button2.Location = New System.Drawing.Point(1092, 6) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(92, 39) + Me.Button2.TabIndex = 27 + Me.Button2.Text = "St.-Nr. prüfen" + Me.Button2.UseVisualStyleBackColor = True + ' + 'btnVorschau + ' + Me.btnVorschau.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnVorschau.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnVorschau.ForeColor = System.Drawing.Color.Black + Me.btnVorschau.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnVorschau.Location = New System.Drawing.Point(1190, 6) + Me.btnVorschau.Name = "btnVorschau" + Me.btnVorschau.Size = New System.Drawing.Size(92, 39) + Me.btnVorschau.TabIndex = 26 + Me.btnVorschau.Text = "Vorschau" + Me.btnVorschau.UseVisualStyleBackColor = True + ' 'btnMail ' Me.btnMail.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) @@ -724,19 +776,6 @@ Partial Class usrCntlUSTV Me.ContextMenuStrip2.Name = "ContextMenuStrip1" Me.ContextMenuStrip2.Size = New System.Drawing.Size(61, 4) ' - 'btnVorschau - ' - Me.btnVorschau.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.btnVorschau.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnVorschau.ForeColor = System.Drawing.Color.Black - Me.btnVorschau.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnVorschau.Location = New System.Drawing.Point(1190, 6) - Me.btnVorschau.Name = "btnVorschau" - Me.btnVorschau.Size = New System.Drawing.Size(92, 39) - Me.btnVorschau.TabIndex = 26 - Me.btnVorschau.Text = "Vorschau" - Me.btnVorschau.UseVisualStyleBackColor = True - ' 'usrCntlUSTV ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -798,4 +837,7 @@ Partial Class usrCntlUSTV Friend WithEvents txtOPSaldo As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents Label11 As Label Friend WithEvents btnVorschau As Button + Friend WithEvents Button2 As Button + Friend WithEvents lblVZhint As Label + Friend WithEvents lblVZKunde As Label End Class diff --git a/SDL/USTV/usrCntlUSTV.vb b/SDL/USTV/usrCntlUSTV.vb index d87462d2..f8528eaf 100644 --- a/SDL/USTV/usrCntlUSTV.vb +++ b/SDL/USTV/usrCntlUSTV.vb @@ -23,6 +23,9 @@ Public Class usrCntlUSTV Me.kdNr = kdNr KdSearchBox1.KdNr = kdNr KdSearchBox1.Enabled = False + setInfo(kdNr) + Else + setInfo(KdSearchBox1.KdNr) End If btnPLOSEAlle.Enabled = KdSearchBox1.KdNr > 0 @@ -254,7 +257,7 @@ Public Class usrCntlUSTV Return whereStr End Function - Private Sub usrCntlVERAGCard_Load(sender As Object, e As EventArgs) Handles MyBase.Load + Private Sub usrCntlUSTV_Load(sender As Object, e As EventArgs) Handles MyBase.Load ' btnFilter.Left = Panel4.Width - btnFilter.Width KdSearchBox1.initKdBox(Me.FindForm) If kdNr > 0 Then @@ -924,5 +927,74 @@ Public Class usrCntlUSTV + End Sub + + Private Sub setInfo(kdnr As Integer) + + If kdnr > 0 Then + Panel1.BackColor = Color.FromArgb(240, 245, 255) + Dim KUNDE As New cKunde(kdnr) + Dim KUNDE_ERW As New cKundenErweitert(kdnr) + If KUNDE.Abfertigungsverbot Then Panel1.BackColor = Color.IndianRed + If KUNDE_ERW.kde_AnmerkungVZ IsNot Nothing Then + lblVZhint.Text = KUNDE_ERW.kde_AnmerkungVZ + Else + + End If + lblVZKunde.Visible = KUNDE_ERW.kde_VZ + + Else + + lblVZKunde.Visible = False + lblVZhint.Text = "" + Panel1.BackColor = Color.FromArgb(240, 245, 255) + End If + + End Sub + + Private Sub Button2_Click_1(sender As Object, e As EventArgs) Handles Button2.Click + + Dim f As New frmDatumsabfrage("Bitte Prüfdatum eingeben", False) + f.ShowDialog() + If f.DialogResult = DialogResult.OK Then + + Dim pruefdatum As Date = CDate(f.Datum) + + Dim sqlKunde = "" + If KdSearchBox1.KdNr > 0 Then + sqlKunde = " AND A.AdressenNr = " & KdSearchBox1.KdNr + End If + + + Dim sqlQery = "SELECT + A.LandKz, + A.AdressenNr, + A.Ordnungsbegriff, + L.LandKz, + S.StNrFürRückerstattungUSt, + S.StNrGültigkeitsdatum, + CAST('" & pruefdatum & "' AS DATE) AS Prüfdatum, + CASE + WHEN S.StNrGültigkeitsdatum > CAST('" & pruefdatum & "' AS DATE) THEN 1 + ELSE 0 + END AS Gültig + FROM + [Länderverzeichnis für die Außenhandelsstatistik] L + INNER JOIN + (Adressen A + INNER JOIN Währungstabelle W ON A.LandKz = W.LandKz + INNER JOIN tblSteuernummern S ON A.AdressenNr = S.AdressenNr) + ON L.LandNr = S.LandNr + WHERE + S.StNrGültigkeitsdatum IS NOT NULL + AND W.MitgliedslandEU = 0 " & sqlKunde + + + Dim dtVorschau As DataTable = SQL.loadDgvBySql(sqlQery, "FMZOLL") + + cProgramFunctions.genExcelFromDT_NEW(dtVorschau,,,,,, True) + + End If + End Sub End Class diff --git a/SDL/USTV/ustCntlUSTV_AntragPosition.Designer.vb b/SDL/USTV/ustCntlUSTV_AntragPosition.Designer.vb index 24cf697b..2db6cd7a 100644 --- a/SDL/USTV/ustCntlUSTV_AntragPosition.Designer.vb +++ b/SDL/USTV/ustCntlUSTV_AntragPosition.Designer.vb @@ -23,7 +23,6 @@ Partial Class ustCntlUSTV_AntragPosition _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() - Me.scanLieferschein = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() Me.tabDok = New System.Windows.Forms.TabPage() Me.scanSonstiges = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() Me.tbcntr = New System.Windows.Forms.TabControl() @@ -31,35 +30,27 @@ Partial Class ustCntlUSTV_AntragPosition Me.scanUSTVVollmachten = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() Me.tabFABest = New System.Windows.Forms.TabPage() Me.scanUSTVFABest = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() - Me.cbxAPI = New VERAG_PROG_ALLGEMEIN.MyCheckBoxValue(Me.components) Me.Label8 = New System.Windows.Forms.Label() - Me.txtRgDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label7 = New System.Windows.Forms.Label() Me.Panel2 = New System.Windows.Forms.Panel() - Me.txtRgNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label9 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label() Me.btnBildAuf = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button() - Me.txtLeistungsbezeichnung = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label2 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.Label6 = New System.Windows.Forms.Label() Me.Label10 = New System.Windows.Forms.Label() - Me.txtUSTBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label11 = New System.Windows.Forms.Label() - Me.txtUmrechnungskurs = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label12 = New System.Windows.Forms.Label() - Me.txtUSTBetragEUR = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label13 = New System.Windows.Forms.Label() - Me.cboLeistungsgeber = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Label4 = New System.Windows.Forms.Label() Me.Label5 = New System.Windows.Forms.Label() Me.lblAenderungsdatum = New System.Windows.Forms.Label() Me.lblSachbearbeiter = New System.Windows.Forms.Label() - Me.cboSchnittstellennr = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.pnl = New System.Windows.Forms.Panel() - Me.picSave = New System.Windows.Forms.PictureBox() + Me.btnLeistenderSave = New System.Windows.Forms.Button() + Me.sbLeistender = New VERAG_PROG_ALLGEMEIN.MySearchBox() Me.pnlAdresse = New System.Windows.Forms.Panel() Me.txtStrasse = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txtUIDNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() @@ -71,19 +62,28 @@ Partial Class ustCntlUSTV_AntragPosition Me.txtStrassenNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label16 = New System.Windows.Forms.Label() Me.txtOrt = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboSchnittstellennr = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtRgNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtRgDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cbxAPI = New VERAG_PROG_ALLGEMEIN.MyCheckBoxValue(Me.components) + Me.cboLeistungsgeber = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtLeistungsbezeichnung = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtUSTBetragEUR = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtUmrechnungskurs = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtUSTBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Panel1 = New System.Windows.Forms.Panel() Me.Panel3 = New System.Windows.Forms.Panel() Me.Panel4 = New System.Windows.Forms.Panel() Me.TabControl1 = New System.Windows.Forms.TabControl() Me.TabPage1 = New System.Windows.Forms.TabPage() Me.UsrcntlPDFScanList1 = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() + Me.scanLieferschein = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() Me.tabDok.SuspendLayout() Me.tbcntr.SuspendLayout() Me.tabVollmachten.SuspendLayout() Me.tabFABest.SuspendLayout() Me.Panel2.SuspendLayout() Me.pnl.SuspendLayout() - CType(Me.picSave, System.ComponentModel.ISupportInitialize).BeginInit() Me.pnlAdresse.SuspendLayout() Me.Panel1.SuspendLayout() Me.Panel3.SuspendLayout() @@ -92,26 +92,6 @@ Partial Class ustCntlUSTV_AntragPosition Me.TabPage1.SuspendLayout() Me.SuspendLayout() ' - 'scanLieferschein - ' - Me.scanLieferschein._ARCHIV = True - Me.scanLieferschein._DATENSERVER_KATEGORIE = "DOKUMENTE" - Me.scanLieferschein._DATENSERVER_ORDNER = "MDM" - Me.scanLieferschein._DATENSERVER_UOrdner1 = Nothing - Me.scanLieferschein._DATENSERVER_UOrdner2 = Nothing - Me.scanLieferschein._DATENSERVER_UOrdner3 = Nothing - Me.scanLieferschein._MULTI_FILES = True - Me.scanLieferschein._TEXT_PDF = "XX Vollmacht" - Me.scanLieferschein.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink - Me.scanLieferschein.BackColor = System.Drawing.Color.White - Me.scanLieferschein.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.scanLieferschein.Cursor = System.Windows.Forms.Cursors.Default - Me.scanLieferschein.Location = New System.Drawing.Point(146, 3) - Me.scanLieferschein.Name = "scanLieferschein" - Me.scanLieferschein.Size = New System.Drawing.Size(111, 34) - Me.scanLieferschein.TabIndex = 2 - Me.scanLieferschein.Visible = False - ' 'tabDok ' Me.tabDok.Controls.Add(Me.scanSonstiges) @@ -217,21 +197,6 @@ Partial Class ustCntlUSTV_AntragPosition Me.scanUSTVFABest.Size = New System.Drawing.Size(256, 197) Me.scanUSTVFABest.TabIndex = 1 ' - 'cbxAPI - ' - Me.cbxAPI._date = Nothing - Me.cbxAPI._showdate = True - Me.cbxAPI._value = "" - Me.cbxAPI.AutoSize = True - Me.cbxAPI.Enabled = False - Me.cbxAPI.Location = New System.Drawing.Point(634, 193) - Me.cbxAPI.Name = "cbxAPI" - Me.cbxAPI.Size = New System.Drawing.Size(83, 17) - Me.cbxAPI.TabIndex = 17 - Me.cbxAPI.Text = "Schnittstelle" - Me.cbxAPI.TextAlign = System.Drawing.ContentAlignment.MiddleCenter - Me.cbxAPI.UseVisualStyleBackColor = True - ' 'Label8 ' Me.Label8.AutoSize = True @@ -243,30 +208,6 @@ Partial Class ustCntlUSTV_AntragPosition Me.Label8.TabIndex = 0 Me.Label8.Text = "Details" ' - 'txtRgDatum - ' - Me.txtRgDatum._DateTimeOnly = False - Me.txtRgDatum._numbersOnly = False - Me.txtRgDatum._numbersOnlyKommastellen = "" - Me.txtRgDatum._numbersOnlyTrennzeichen = True - Me.txtRgDatum._Prozent = False - Me.txtRgDatum._ShortDateNew = False - Me.txtRgDatum._ShortDateOnly = False - Me.txtRgDatum._TimeOnly = False - Me.txtRgDatum._TimeOnly_Seconds = False - Me.txtRgDatum._value = "" - Me.txtRgDatum._Waehrung = False - Me.txtRgDatum._WaehrungZeichen = True - Me.txtRgDatum.ForeColor = System.Drawing.Color.Red - Me.txtRgDatum.Location = New System.Drawing.Point(17, 49) - Me.txtRgDatum.MaxLength = 10 - Me.txtRgDatum.MaxLineLength = -1 - Me.txtRgDatum.MaxLines_Warning = "" - Me.txtRgDatum.MaxLines_Warning_Label = Nothing - Me.txtRgDatum.Name = "txtRgDatum" - Me.txtRgDatum.Size = New System.Drawing.Size(154, 20) - Me.txtRgDatum.TabIndex = 6 - ' 'Label7 ' Me.Label7.AutoSize = True @@ -287,29 +228,6 @@ Partial Class ustCntlUSTV_AntragPosition Me.Panel2.Size = New System.Drawing.Size(1300, 30) Me.Panel2.TabIndex = 0 ' - 'txtRgNr - ' - Me.txtRgNr._DateTimeOnly = False - Me.txtRgNr._numbersOnly = False - Me.txtRgNr._numbersOnlyKommastellen = "" - Me.txtRgNr._numbersOnlyTrennzeichen = True - Me.txtRgNr._Prozent = False - Me.txtRgNr._ShortDateNew = False - Me.txtRgNr._ShortDateOnly = False - Me.txtRgNr._TimeOnly = False - Me.txtRgNr._TimeOnly_Seconds = False - Me.txtRgNr._value = Nothing - Me.txtRgNr._Waehrung = False - Me.txtRgNr._WaehrungZeichen = True - Me.txtRgNr.Location = New System.Drawing.Point(177, 49) - Me.txtRgNr.MaxLength = 250 - Me.txtRgNr.MaxLineLength = -1 - Me.txtRgNr.MaxLines_Warning = "" - Me.txtRgNr.MaxLines_Warning_Label = Nothing - Me.txtRgNr.Name = "txtRgNr" - Me.txtRgNr.Size = New System.Drawing.Size(183, 20) - Me.txtRgNr.TabIndex = 7 - ' 'Label9 ' Me.Label9.AutoSize = True @@ -356,29 +274,6 @@ Partial Class ustCntlUSTV_AntragPosition Me.Button1.TextAlign = System.Drawing.ContentAlignment.TopCenter Me.Button1.UseVisualStyleBackColor = True ' - 'txtLeistungsbezeichnung - ' - Me.txtLeistungsbezeichnung._DateTimeOnly = False - Me.txtLeistungsbezeichnung._numbersOnly = False - Me.txtLeistungsbezeichnung._numbersOnlyKommastellen = "" - Me.txtLeistungsbezeichnung._numbersOnlyTrennzeichen = True - Me.txtLeistungsbezeichnung._Prozent = False - Me.txtLeistungsbezeichnung._ShortDateNew = False - Me.txtLeistungsbezeichnung._ShortDateOnly = False - Me.txtLeistungsbezeichnung._TimeOnly = False - Me.txtLeistungsbezeichnung._TimeOnly_Seconds = False - Me.txtLeistungsbezeichnung._value = Nothing - Me.txtLeistungsbezeichnung._Waehrung = False - Me.txtLeistungsbezeichnung._WaehrungZeichen = True - Me.txtLeistungsbezeichnung.Location = New System.Drawing.Point(445, 49) - Me.txtLeistungsbezeichnung.MaxLength = 22 - Me.txtLeistungsbezeichnung.MaxLineLength = -1 - Me.txtLeistungsbezeichnung.MaxLines_Warning = "" - Me.txtLeistungsbezeichnung.MaxLines_Warning_Label = Nothing - Me.txtLeistungsbezeichnung.Name = "txtLeistungsbezeichnung" - Me.txtLeistungsbezeichnung.Size = New System.Drawing.Size(182, 20) - Me.txtLeistungsbezeichnung.TabIndex = 8 - ' 'Label2 ' Me.Label2.AutoSize = True @@ -419,30 +314,6 @@ Partial Class ustCntlUSTV_AntragPosition Me.Label10.TabIndex = 10 Me.Label10.Text = "Rechnung" ' - 'txtUSTBetrag - ' - Me.txtUSTBetrag._DateTimeOnly = False - Me.txtUSTBetrag._numbersOnly = False - Me.txtUSTBetrag._numbersOnlyKommastellen = "" - Me.txtUSTBetrag._numbersOnlyTrennzeichen = False - Me.txtUSTBetrag._Prozent = False - Me.txtUSTBetrag._ShortDateNew = False - Me.txtUSTBetrag._ShortDateOnly = False - Me.txtUSTBetrag._TimeOnly = False - Me.txtUSTBetrag._TimeOnly_Seconds = False - Me.txtUSTBetrag._value = "" - Me.txtUSTBetrag._Waehrung = False - Me.txtUSTBetrag._WaehrungZeichen = True - Me.txtUSTBetrag.ForeColor = System.Drawing.Color.Red - Me.txtUSTBetrag.Location = New System.Drawing.Point(17, 130) - Me.txtUSTBetrag.MaxLength = 10 - Me.txtUSTBetrag.MaxLineLength = -1 - Me.txtUSTBetrag.MaxLines_Warning = "" - Me.txtUSTBetrag.MaxLines_Warning_Label = Nothing - Me.txtUSTBetrag.Name = "txtUSTBetrag" - Me.txtUSTBetrag.Size = New System.Drawing.Size(154, 20) - Me.txtUSTBetrag.TabIndex = 16 - ' 'Label11 ' Me.Label11.AutoSize = True @@ -453,30 +324,6 @@ Partial Class ustCntlUSTV_AntragPosition Me.Label11.TabIndex = 11 Me.Label11.Text = "USt-Betrag:" ' - 'txtUmrechnungskurs - ' - Me.txtUmrechnungskurs._DateTimeOnly = False - Me.txtUmrechnungskurs._numbersOnly = True - Me.txtUmrechnungskurs._numbersOnlyKommastellen = "" - Me.txtUmrechnungskurs._numbersOnlyTrennzeichen = True - Me.txtUmrechnungskurs._Prozent = False - Me.txtUmrechnungskurs._ShortDateNew = False - Me.txtUmrechnungskurs._ShortDateOnly = False - Me.txtUmrechnungskurs._TimeOnly = False - Me.txtUmrechnungskurs._TimeOnly_Seconds = False - Me.txtUmrechnungskurs._value = "" - Me.txtUmrechnungskurs._Waehrung = False - Me.txtUmrechnungskurs._WaehrungZeichen = True - Me.txtUmrechnungskurs.ForeColor = System.Drawing.Color.Red - Me.txtUmrechnungskurs.Location = New System.Drawing.Point(177, 130) - Me.txtUmrechnungskurs.MaxLength = 10 - Me.txtUmrechnungskurs.MaxLineLength = -1 - Me.txtUmrechnungskurs.MaxLines_Warning = "" - Me.txtUmrechnungskurs.MaxLines_Warning_Label = Nothing - Me.txtUmrechnungskurs.Name = "txtUmrechnungskurs" - Me.txtUmrechnungskurs.Size = New System.Drawing.Size(108, 20) - Me.txtUmrechnungskurs.TabIndex = 17 - ' 'Label12 ' Me.Label12.AutoSize = True @@ -487,30 +334,6 @@ Partial Class ustCntlUSTV_AntragPosition Me.Label12.TabIndex = 12 Me.Label12.Text = "Umrechnungskurs:" ' - 'txtUSTBetragEUR - ' - Me.txtUSTBetragEUR._DateTimeOnly = False - Me.txtUSTBetragEUR._numbersOnly = False - Me.txtUSTBetragEUR._numbersOnlyKommastellen = "" - Me.txtUSTBetragEUR._numbersOnlyTrennzeichen = False - Me.txtUSTBetragEUR._Prozent = False - Me.txtUSTBetragEUR._ShortDateNew = False - Me.txtUSTBetragEUR._ShortDateOnly = False - Me.txtUSTBetragEUR._TimeOnly = False - Me.txtUSTBetragEUR._TimeOnly_Seconds = False - Me.txtUSTBetragEUR._value = "" - Me.txtUSTBetragEUR._Waehrung = False - Me.txtUSTBetragEUR._WaehrungZeichen = True - Me.txtUSTBetragEUR.ForeColor = System.Drawing.Color.Red - Me.txtUSTBetragEUR.Location = New System.Drawing.Point(294, 130) - Me.txtUSTBetragEUR.MaxLength = 10 - Me.txtUSTBetragEUR.MaxLineLength = -1 - Me.txtUSTBetragEUR.MaxLines_Warning = "" - Me.txtUSTBetragEUR.MaxLines_Warning_Label = Nothing - Me.txtUSTBetragEUR.Name = "txtUSTBetragEUR" - Me.txtUSTBetragEUR.Size = New System.Drawing.Size(154, 20) - Me.txtUSTBetragEUR.TabIndex = 18 - ' 'Label13 ' Me.Label13.AutoSize = True @@ -521,20 +344,6 @@ Partial Class ustCntlUSTV_AntragPosition Me.Label13.TabIndex = 13 Me.Label13.Text = "USt-Betrag EUR" ' - 'cboLeistungsgeber - ' - Me.cboLeistungsgeber._allowedValuesFreiText = Nothing - Me.cboLeistungsgeber._allowFreiText = True - Me.cboLeistungsgeber._value = "" - Me.cboLeistungsgeber.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Append - Me.cboLeistungsgeber.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems - Me.cboLeistungsgeber.DropDownWidth = 350 - Me.cboLeistungsgeber.FormattingEnabled = True - Me.cboLeistungsgeber.Location = New System.Drawing.Point(633, 49) - Me.cboLeistungsgeber.Name = "cboLeistungsgeber" - Me.cboLeistungsgeber.Size = New System.Drawing.Size(280, 21) - Me.cboLeistungsgeber.TabIndex = 9 - ' 'Label4 ' Me.Label4.AutoSize = True @@ -575,22 +384,11 @@ Partial Class ustCntlUSTV_AntragPosition Me.lblSachbearbeiter.TabIndex = 20 Me.lblSachbearbeiter.Text = "-" ' - 'cboSchnittstellennr - ' - Me.cboSchnittstellennr._allowedValuesFreiText = Nothing - Me.cboSchnittstellennr._allowFreiText = False - Me.cboSchnittstellennr._value = "" - Me.cboSchnittstellennr.Enabled = False - Me.cboSchnittstellennr.FormattingEnabled = True - Me.cboSchnittstellennr.Location = New System.Drawing.Point(723, 191) - Me.cboSchnittstellennr.Name = "cboSchnittstellennr" - Me.cboSchnittstellennr.Size = New System.Drawing.Size(190, 21) - Me.cboSchnittstellennr.TabIndex = 18 - ' 'pnl ' Me.pnl.BackColor = System.Drawing.Color.White - Me.pnl.Controls.Add(Me.picSave) + Me.pnl.Controls.Add(Me.btnLeistenderSave) + Me.pnl.Controls.Add(Me.sbLeistender) Me.pnl.Controls.Add(Me.pnlAdresse) Me.pnl.Controls.Add(Me.Label6) Me.pnl.Controls.Add(Me.cboSchnittstellennr) @@ -621,16 +419,43 @@ Partial Class ustCntlUSTV_AntragPosition Me.pnl.Size = New System.Drawing.Size(1300, 239) Me.pnl.TabIndex = 1 ' - 'picSave + 'btnLeistenderSave ' - Me.picSave.BackgroundImage = Global.SDL.My.Resources.Resources.save - Me.picSave.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.picSave.Location = New System.Drawing.Point(886, 164) - Me.picSave.Name = "picSave" - Me.picSave.Size = New System.Drawing.Size(26, 22) - Me.picSave.TabIndex = 34 - Me.picSave.TabStop = False - Me.picSave.Visible = False + Me.btnLeistenderSave.BackgroundImage = Global.SDL.My.Resources.Resources.save + Me.btnLeistenderSave.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnLeistenderSave.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnLeistenderSave.Location = New System.Drawing.Point(876, 162) + Me.btnLeistenderSave.Name = "btnLeistenderSave" + Me.btnLeistenderSave.Size = New System.Drawing.Size(36, 24) + Me.btnLeistenderSave.TabIndex = 21 + Me.btnLeistenderSave.TextAlign = System.Drawing.ContentAlignment.TopCenter + Me.btnLeistenderSave.UseVisualStyleBackColor = True + Me.btnLeistenderSave.Visible = False + ' + 'sbLeistender + ' + Me.sbLeistender._allowFreitext = True + Me.sbLeistender._AllowSetValue = False + Me.sbLeistender._allowSpaceAsSplitter = False + Me.sbLeistender._autoSizeGross = False + Me.sbLeistender._hideIfListEmpty = True + Me.sbLeistender._value = Nothing + Me.sbLeistender.conn_art = "FMZOLL" + Me.sbLeistender.dgvpos = "LEFT" + Me.sbLeistender.DISPLAY_PARAM = Nothing + Me.sbLeistender.INVISIBLE_COLUMNS = Nothing + Me.sbLeistender.key_visible = False + Me.sbLeistender.KEYPARAM = Nothing + Me.sbLeistender.Location = New System.Drawing.Point(630, 49) + Me.sbLeistender.Name = "sbLeistender" + Me.sbLeistender.searchActive = True + Me.sbLeistender.Size = New System.Drawing.Size(283, 20) + Me.sbLeistender.SQL_ORDER_BY = Nothing + Me.sbLeistender.SQL_SELECT = Nothing + Me.sbLeistender.SQL_WHERE = Nothing + Me.sbLeistender.SQL_WhereParamList = Nothing + Me.sbLeistender.TabIndex = 13 + Me.sbLeistender.usrcntl = Nothing ' 'pnlAdresse ' @@ -648,7 +473,7 @@ Partial Class ustCntlUSTV_AntragPosition Me.pnlAdresse.Location = New System.Drawing.Point(626, 76) Me.pnlAdresse.Name = "pnlAdresse" Me.pnlAdresse.Size = New System.Drawing.Size(287, 82) - Me.pnlAdresse.TabIndex = 33 + Me.pnlAdresse.TabIndex = 14 ' 'txtStrasse ' @@ -672,7 +497,7 @@ Partial Class ustCntlUSTV_AntragPosition Me.txtStrasse.MaxLines_Warning_Label = Nothing Me.txtStrasse.Name = "txtStrasse" Me.txtStrasse.Size = New System.Drawing.Size(169, 20) - Me.txtStrasse.TabIndex = 10 + Me.txtStrasse.TabIndex = 15 ' 'txtUIDNr ' @@ -696,7 +521,7 @@ Partial Class ustCntlUSTV_AntragPosition Me.txtUIDNr.MaxLines_Warning_Label = Nothing Me.txtUIDNr.Name = "txtUIDNr" Me.txtUIDNr.Size = New System.Drawing.Size(106, 20) - Me.txtUIDNr.TabIndex = 15 + Me.txtUIDNr.TabIndex = 20 ' 'Label14 ' @@ -750,7 +575,7 @@ Partial Class ustCntlUSTV_AntragPosition Me.txtLand.MaxLines_Warning_Label = Nothing Me.txtLand.Name = "txtLand" Me.txtLand.Size = New System.Drawing.Size(38, 20) - Me.txtLand.TabIndex = 14 + Me.txtLand.TabIndex = 19 ' 'txtPLZ ' @@ -774,7 +599,7 @@ Partial Class ustCntlUSTV_AntragPosition Me.txtPLZ.MaxLines_Warning_Label = Nothing Me.txtPLZ.Name = "txtPLZ" Me.txtPLZ.Size = New System.Drawing.Size(59, 20) - Me.txtPLZ.TabIndex = 12 + Me.txtPLZ.TabIndex = 17 ' 'txtStrassenNr ' @@ -798,7 +623,7 @@ Partial Class ustCntlUSTV_AntragPosition Me.txtStrassenNr.MaxLines_Warning_Label = Nothing Me.txtStrassenNr.Name = "txtStrassenNr" Me.txtStrassenNr.Size = New System.Drawing.Size(45, 20) - Me.txtStrassenNr.TabIndex = 11 + Me.txtStrassenNr.TabIndex = 16 ' 'Label16 ' @@ -832,7 +657,192 @@ Partial Class ustCntlUSTV_AntragPosition Me.txtOrt.MaxLines_Warning_Label = Nothing Me.txtOrt.Name = "txtOrt" Me.txtOrt.Size = New System.Drawing.Size(154, 20) - Me.txtOrt.TabIndex = 13 + Me.txtOrt.TabIndex = 18 + ' + 'cboSchnittstellennr + ' + Me.cboSchnittstellennr._allowedValuesFreiText = Nothing + Me.cboSchnittstellennr._allowFreiText = False + Me.cboSchnittstellennr._value = "" + Me.cboSchnittstellennr.Enabled = False + Me.cboSchnittstellennr.FormattingEnabled = True + Me.cboSchnittstellennr.Location = New System.Drawing.Point(723, 191) + Me.cboSchnittstellennr.Name = "cboSchnittstellennr" + Me.cboSchnittstellennr.Size = New System.Drawing.Size(190, 21) + Me.cboSchnittstellennr.TabIndex = 18 + ' + 'txtRgNr + ' + Me.txtRgNr._DateTimeOnly = False + Me.txtRgNr._numbersOnly = False + Me.txtRgNr._numbersOnlyKommastellen = "" + Me.txtRgNr._numbersOnlyTrennzeichen = True + Me.txtRgNr._Prozent = False + Me.txtRgNr._ShortDateNew = False + Me.txtRgNr._ShortDateOnly = False + Me.txtRgNr._TimeOnly = False + Me.txtRgNr._TimeOnly_Seconds = False + Me.txtRgNr._value = Nothing + Me.txtRgNr._Waehrung = False + Me.txtRgNr._WaehrungZeichen = True + Me.txtRgNr.Location = New System.Drawing.Point(177, 49) + Me.txtRgNr.MaxLength = 250 + Me.txtRgNr.MaxLineLength = -1 + Me.txtRgNr.MaxLines_Warning = "" + Me.txtRgNr.MaxLines_Warning_Label = Nothing + Me.txtRgNr.Name = "txtRgNr" + Me.txtRgNr.Size = New System.Drawing.Size(183, 20) + Me.txtRgNr.TabIndex = 7 + ' + 'txtRgDatum + ' + Me.txtRgDatum._DateTimeOnly = False + Me.txtRgDatum._numbersOnly = False + Me.txtRgDatum._numbersOnlyKommastellen = "" + Me.txtRgDatum._numbersOnlyTrennzeichen = True + Me.txtRgDatum._Prozent = False + Me.txtRgDatum._ShortDateNew = False + Me.txtRgDatum._ShortDateOnly = False + Me.txtRgDatum._TimeOnly = False + Me.txtRgDatum._TimeOnly_Seconds = False + Me.txtRgDatum._value = "" + Me.txtRgDatum._Waehrung = False + Me.txtRgDatum._WaehrungZeichen = True + Me.txtRgDatum.ForeColor = System.Drawing.Color.Red + Me.txtRgDatum.Location = New System.Drawing.Point(17, 49) + Me.txtRgDatum.MaxLength = 10 + Me.txtRgDatum.MaxLineLength = -1 + Me.txtRgDatum.MaxLines_Warning = "" + Me.txtRgDatum.MaxLines_Warning_Label = Nothing + Me.txtRgDatum.Name = "txtRgDatum" + Me.txtRgDatum.Size = New System.Drawing.Size(154, 20) + Me.txtRgDatum.TabIndex = 6 + ' + 'cbxAPI + ' + Me.cbxAPI._date = Nothing + Me.cbxAPI._showdate = True + Me.cbxAPI._value = "" + Me.cbxAPI.AutoSize = True + Me.cbxAPI.Enabled = False + Me.cbxAPI.Location = New System.Drawing.Point(634, 193) + Me.cbxAPI.Name = "cbxAPI" + Me.cbxAPI.Size = New System.Drawing.Size(83, 17) + Me.cbxAPI.TabIndex = 17 + Me.cbxAPI.Text = "Schnittstelle" + Me.cbxAPI.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + Me.cbxAPI.UseVisualStyleBackColor = True + ' + 'cboLeistungsgeber + ' + Me.cboLeistungsgeber._allowedValuesFreiText = Nothing + Me.cboLeistungsgeber._allowFreiText = True + Me.cboLeistungsgeber._value = "" + Me.cboLeistungsgeber.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Append + Me.cboLeistungsgeber.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.cboLeistungsgeber.DropDownWidth = 350 + Me.cboLeistungsgeber.Enabled = False + Me.cboLeistungsgeber.FormattingEnabled = True + Me.cboLeistungsgeber.Location = New System.Drawing.Point(633, 7) + Me.cboLeistungsgeber.Name = "cboLeistungsgeber" + Me.cboLeistungsgeber.Size = New System.Drawing.Size(280, 21) + Me.cboLeistungsgeber.TabIndex = 9 + Me.cboLeistungsgeber.Visible = False + ' + 'txtLeistungsbezeichnung + ' + Me.txtLeistungsbezeichnung._DateTimeOnly = False + Me.txtLeistungsbezeichnung._numbersOnly = False + Me.txtLeistungsbezeichnung._numbersOnlyKommastellen = "" + Me.txtLeistungsbezeichnung._numbersOnlyTrennzeichen = True + Me.txtLeistungsbezeichnung._Prozent = False + Me.txtLeistungsbezeichnung._ShortDateNew = False + Me.txtLeistungsbezeichnung._ShortDateOnly = False + Me.txtLeistungsbezeichnung._TimeOnly = False + Me.txtLeistungsbezeichnung._TimeOnly_Seconds = False + Me.txtLeistungsbezeichnung._value = Nothing + Me.txtLeistungsbezeichnung._Waehrung = False + Me.txtLeistungsbezeichnung._WaehrungZeichen = True + Me.txtLeistungsbezeichnung.Location = New System.Drawing.Point(445, 49) + Me.txtLeistungsbezeichnung.MaxLength = 22 + Me.txtLeistungsbezeichnung.MaxLineLength = -1 + Me.txtLeistungsbezeichnung.MaxLines_Warning = "" + Me.txtLeistungsbezeichnung.MaxLines_Warning_Label = Nothing + Me.txtLeistungsbezeichnung.Name = "txtLeistungsbezeichnung" + Me.txtLeistungsbezeichnung.Size = New System.Drawing.Size(182, 20) + Me.txtLeistungsbezeichnung.TabIndex = 8 + ' + 'txtUSTBetragEUR + ' + Me.txtUSTBetragEUR._DateTimeOnly = False + Me.txtUSTBetragEUR._numbersOnly = False + Me.txtUSTBetragEUR._numbersOnlyKommastellen = "" + Me.txtUSTBetragEUR._numbersOnlyTrennzeichen = False + Me.txtUSTBetragEUR._Prozent = False + Me.txtUSTBetragEUR._ShortDateNew = False + Me.txtUSTBetragEUR._ShortDateOnly = False + Me.txtUSTBetragEUR._TimeOnly = False + Me.txtUSTBetragEUR._TimeOnly_Seconds = False + Me.txtUSTBetragEUR._value = "" + Me.txtUSTBetragEUR._Waehrung = False + Me.txtUSTBetragEUR._WaehrungZeichen = True + Me.txtUSTBetragEUR.ForeColor = System.Drawing.Color.Red + Me.txtUSTBetragEUR.Location = New System.Drawing.Point(294, 130) + Me.txtUSTBetragEUR.MaxLength = 10 + Me.txtUSTBetragEUR.MaxLineLength = -1 + Me.txtUSTBetragEUR.MaxLines_Warning = "" + Me.txtUSTBetragEUR.MaxLines_Warning_Label = Nothing + Me.txtUSTBetragEUR.Name = "txtUSTBetragEUR" + Me.txtUSTBetragEUR.Size = New System.Drawing.Size(154, 20) + Me.txtUSTBetragEUR.TabIndex = 11 + ' + 'txtUmrechnungskurs + ' + Me.txtUmrechnungskurs._DateTimeOnly = False + Me.txtUmrechnungskurs._numbersOnly = True + Me.txtUmrechnungskurs._numbersOnlyKommastellen = "" + Me.txtUmrechnungskurs._numbersOnlyTrennzeichen = True + Me.txtUmrechnungskurs._Prozent = False + Me.txtUmrechnungskurs._ShortDateNew = False + Me.txtUmrechnungskurs._ShortDateOnly = False + Me.txtUmrechnungskurs._TimeOnly = False + Me.txtUmrechnungskurs._TimeOnly_Seconds = False + Me.txtUmrechnungskurs._value = "" + Me.txtUmrechnungskurs._Waehrung = False + Me.txtUmrechnungskurs._WaehrungZeichen = True + Me.txtUmrechnungskurs.ForeColor = System.Drawing.Color.Red + Me.txtUmrechnungskurs.Location = New System.Drawing.Point(177, 130) + Me.txtUmrechnungskurs.MaxLength = 10 + Me.txtUmrechnungskurs.MaxLineLength = -1 + Me.txtUmrechnungskurs.MaxLines_Warning = "" + Me.txtUmrechnungskurs.MaxLines_Warning_Label = Nothing + Me.txtUmrechnungskurs.Name = "txtUmrechnungskurs" + Me.txtUmrechnungskurs.Size = New System.Drawing.Size(108, 20) + Me.txtUmrechnungskurs.TabIndex = 10 + ' + 'txtUSTBetrag + ' + Me.txtUSTBetrag._DateTimeOnly = False + Me.txtUSTBetrag._numbersOnly = False + Me.txtUSTBetrag._numbersOnlyKommastellen = "" + Me.txtUSTBetrag._numbersOnlyTrennzeichen = False + Me.txtUSTBetrag._Prozent = False + Me.txtUSTBetrag._ShortDateNew = False + Me.txtUSTBetrag._ShortDateOnly = False + Me.txtUSTBetrag._TimeOnly = False + Me.txtUSTBetrag._TimeOnly_Seconds = False + Me.txtUSTBetrag._value = "" + Me.txtUSTBetrag._Waehrung = False + Me.txtUSTBetrag._WaehrungZeichen = True + Me.txtUSTBetrag.ForeColor = System.Drawing.Color.Red + Me.txtUSTBetrag.Location = New System.Drawing.Point(17, 130) + Me.txtUSTBetrag.MaxLength = 10 + Me.txtUSTBetrag.MaxLineLength = -1 + Me.txtUSTBetrag.MaxLines_Warning = "" + Me.txtUSTBetrag.MaxLines_Warning_Label = Nothing + Me.txtUSTBetrag.Name = "txtUSTBetrag" + Me.txtUSTBetrag.Size = New System.Drawing.Size(154, 20) + Me.txtUSTBetrag.TabIndex = 9 ' 'Panel1 ' @@ -904,6 +914,26 @@ Partial Class ustCntlUSTV_AntragPosition Me.UsrcntlPDFScanList1.Size = New System.Drawing.Size(264, 207) Me.UsrcntlPDFScanList1.TabIndex = 0 ' + 'scanLieferschein + ' + Me.scanLieferschein._ARCHIV = True + Me.scanLieferschein._DATENSERVER_KATEGORIE = "DOKUMENTE" + Me.scanLieferschein._DATENSERVER_ORDNER = "MDM" + Me.scanLieferschein._DATENSERVER_UOrdner1 = Nothing + Me.scanLieferschein._DATENSERVER_UOrdner2 = Nothing + Me.scanLieferschein._DATENSERVER_UOrdner3 = Nothing + Me.scanLieferschein._MULTI_FILES = True + Me.scanLieferschein._TEXT_PDF = "XX Vollmacht" + Me.scanLieferschein.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink + Me.scanLieferschein.BackColor = System.Drawing.Color.White + Me.scanLieferschein.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.scanLieferschein.Cursor = System.Windows.Forms.Cursors.Default + Me.scanLieferschein.Location = New System.Drawing.Point(146, 3) + Me.scanLieferschein.Name = "scanLieferschein" + Me.scanLieferschein.Size = New System.Drawing.Size(111, 34) + Me.scanLieferschein.TabIndex = 2 + Me.scanLieferschein.Visible = False + ' 'ustCntlUSTV_AntragPosition ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -922,7 +952,6 @@ Partial Class ustCntlUSTV_AntragPosition Me.Panel2.PerformLayout() Me.pnl.ResumeLayout(False) Me.pnl.PerformLayout() - CType(Me.picSave, System.ComponentModel.ISupportInitialize).EndInit() Me.pnlAdresse.ResumeLayout(False) Me.pnlAdresse.PerformLayout() Me.Panel1.ResumeLayout(False) @@ -986,5 +1015,6 @@ Partial Class ustCntlUSTV_AntragPosition Friend WithEvents Label17 As Label Friend WithEvents txtLand As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents pnlAdresse As Panel - Friend WithEvents picSave As PictureBox + Friend WithEvents sbLeistender As VERAG_PROG_ALLGEMEIN.MySearchBox + Friend WithEvents btnLeistenderSave As Button End Class diff --git a/SDL/USTV/ustCntlUSTV_AntragPosition.vb b/SDL/USTV/ustCntlUSTV_AntragPosition.vb index 1774f4f9..0fa83779 100644 --- a/SDL/USTV/ustCntlUSTV_AntragPosition.vb +++ b/SDL/USTV/ustCntlUSTV_AntragPosition.vb @@ -1,4 +1,5 @@ -Imports VERAG_PROG_ALLGEMEIN +Imports GrapeCity.ActiveReports.ReportsCore.Tools +Imports VERAG_PROG_ALLGEMEIN Public Class ustCntlUSTV_AntragPosition Public UStV_POS As VERAG_PROG_ALLGEMEIN.cUStVPositionen = Nothing @@ -23,7 +24,7 @@ Public Class ustCntlUSTV_AntragPosition Sub reset() txtRgDatum._value = "" txtRgNr._value = "" - picSave.Visible = False + btnLeistenderSave.Visible = False txtUmrechnungskurs._value = 1 txtLeistungsbezeichnung._value = "" txtUmrechnungskurs._value = 1 @@ -37,10 +38,10 @@ Public Class ustCntlUSTV_AntragPosition Sub setValues(kdnr As Integer, UStV_POS As VERAG_PROG_ALLGEMEIN.cUStVPositionen, Antrag_LandKz As String, UStV_Leitender As VERAG_PROG_ALLGEMEIN.cUStVLeistender) - initSchnittstellenNR() + initSchnittstellenNr() gridAktiv = False - picSave.Visible = False + btnLeistenderSave.Visible = False Me.Antrag_LandKz = Antrag_LandKz Me.UStV_POS = UStV_POS Me.kdnr = kdnr @@ -56,11 +57,8 @@ Public Class ustCntlUSTV_AntragPosition txtUmrechnungskurs.Text = If(UStV_POS.UStVPo_Umrechnungskurs, "") txtUSTBetragEUR.Text = If(UStV_POS.UStVPo_USteuerbetragEUR, "") - - If UStV_Leitender IsNot Nothing Then - UStV_Leist = UStV_Leitender - loadChangedDSToPanel(Not UStV_Leitender.UstV_Leistender_Adresse, UStV_Leitender) - End If + sbLeistender.Text = UStV_Leitender.UStV_Leistender + loadChangedDSToPanel(UStV_Leitender, True) Dim da_id = -1 Select Case If(UStV_POS.UStVPo_SchnittstellenNr, -1) @@ -75,7 +73,7 @@ Public Class ustCntlUSTV_AntragPosition scanUSTVFABest.INIT(kdnr, "KUNDENDATEN", "FA_Bestaetigungen") scanUSTVVollmachten.INIT(kdnr, "KUNDENDATEN", "USTV_Vollmachten") - + sbLeistender.initSearchBox(Me.FindForm, "[UStV_Leistender], ([UStV_Leistender] + ' ' + isnull([UstV_Leistender_UstNr],'')) as Leistender,[UstV_Leistender_PLZ] as PLZ, ([UstV_Leistender_Strasse] + ' ' +[UstV_Leistender_StrasseNr]) as Strasse, [UstV_Leistender_Stadt] as Stadt FROM [tblUStVLeistender]", {"UStV_Leistender", "UstV_Leistender_UstNr"}, "UstV_aktiv = 1", "UStV_Leistender", "UStV_Leistender", "Leistender", "FMZOLL",, 400, 200, {"UStV_Leistender"}) gridAktiv = True End Sub @@ -114,8 +112,12 @@ Public Class ustCntlUSTV_AntragPosition Else save = False End If - If txtUmrechnungskurs._value <> "" Then - UStV_POS.UStVPo_Umrechnungskurs = txtUmrechnungskurs._value.Replace(",", ".") + If txtUmrechnungskurs.Text <> "" And txtUmrechnungskurs._value <> "" Then + If txtUmrechnungskurs.Text <> "" Then + UStV_POS.UStVPo_Umrechnungskurs = txtUmrechnungskurs.Text.Replace(",", ".") + ElseIf txtUmrechnungskurs._value <> "" Then + UStV_POS.UStVPo_Umrechnungskurs = txtUmrechnungskurs._value.Replace(",", ".") + End If Else save = False End If @@ -125,6 +127,8 @@ Public Class ustCntlUSTV_AntragPosition UStV_POS.UStVPo_SchnittstellenNr = IIf(cboSchnittstellennr.SelectedItem IsNot Nothing, cboSchnittstellennr._value, -1) + + End Sub Private Sub ustCntlUSTV_AntragPosition_KeyDown(sender As Object, e As PreviewKeyDownEventArgs) Handles Me.PreviewKeyDown @@ -165,8 +169,8 @@ Public Class ustCntlUSTV_AntragPosition 'End If If sender Is cboLeistungsgeber AndAlso cboLeistungsgeber.SelectedItem <> "" Then - UStV_POS.UStVPo_Leistender = cboLeistungsgeber.SelectedItem - values_changed() + 'UStV_POS.UStVPo_Leistender = cboLeistungsgeber.SelectedItem + 'values_changed() Else txtChanged = True @@ -178,7 +182,7 @@ Public Class ustCntlUSTV_AntragPosition End Sub - Private Sub txtRgDatum_KeyUp(sender As Object, e As KeyEventArgs) Handles txtRgDatum.KeyUp, txtRgNr.KeyUp, txtUSTBetrag.KeyUp, txtUmrechnungskurs.KeyUp, txtUSTBetragEUR.KeyUp + Private Sub txtRgDatum_KeyUp(sender As Object, e As KeyEventArgs) Handles txtRgDatum.KeyUp, txtRgNr.KeyUp, txtUSTBetrag.KeyUp, txtUmrechnungskurs.KeyUp, txtUSTBetragEUR.KeyUp, sbLeistender.KeyUp If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("MDM_USTVA_bearbeiten", Me.FindForm) Then Exit Sub @@ -199,22 +203,33 @@ Public Class ustCntlUSTV_AntragPosition ' 'values_changed() 'End If - End If - - - - If e.KeyValue = 9 Then - + ElseIf sender Is sbLeistender Then + If e.KeyValue = 9 Then e.SuppressKeyPress = True - If txtChanged Then + If UStV_Leist.hasEntry Then + UStV_POS.UStVPo_Leistender = UStV_Leist.UStV_Leistender values_changed() - txtChanged = False + 'UStV_POS.SAVE() + 'RaiseEvent CHANGED(UStV_POS.UStVPo_ID) End If - End If + End If + If e.KeyValue = 9 Then 'SHIFT + e.SuppressKeyPress = True + If txtChanged Then + values_changed() + txtChanged = False + End If + + + End If + + End If + + End Sub @@ -227,58 +242,115 @@ Public Class ustCntlUSTV_AntragPosition End Sub - Private Sub loadChangedDSToPanel(enablePanel As Boolean, UStV_Leitender As VERAG_PROG_ALLGEMEIN.cUStVLeistender) - pnlAdresse.Enabled = True 'enablePanel 'immer änderbar! - 'cboLeistungsgeber._value = If(UStV_Leitender.UStV_Leistender, "") - txtStrasse.Text = If(UStV_Leitender.UstV_Leistender_Strasse, "") - txtStrassenNr.Text = If(UStV_Leitender.UstV_Leistender_StrasseNr, "") - txtPLZ.Text = If(UStV_Leitender.UstV_Leistender_PLZ, "") - txtOrt.Text = If(UStV_Leitender.UstV_Leistender_Stadt, "") - txtLand.Text = If(UStV_Leitender.UstV_Leistender_Land, "") - txtUIDNr.Text = If(UStV_Leitender.UstV_Leistender_UstNr, "") + Private Sub loadChangedDSToPanel(UStV_Leitender As VERAG_PROG_ALLGEMEIN.cUStVLeistender, Optional initial As Boolean = False) + + UStV_Leist = UStV_Leitender + + 'If newLeistender <> "" Then UStV_Leist = New VERAG_PROG_ALLGEMEIN.cUStVLeistender(newLeistender) + + pnlAdresse.Enabled = True 'enablePanel 'immer änderbar! + txtStrasse.Text = If(UStV_Leist.UstV_Leistender_Strasse, "") + txtStrassenNr.Text = If(UStV_Leist.UstV_Leistender_StrasseNr, "") + txtPLZ.Text = If(UStV_Leist.UstV_Leistender_PLZ, "") + txtOrt.Text = If(UStV_Leist.UstV_Leistender_Stadt, "") + txtLand.Text = If(UStV_Leist.UstV_Leistender_Land, "") + txtUIDNr.Text = If(UStV_Leist.UstV_Leistender_UstNr, "") + + btnLeistenderSave.Visible = True + + If Not initial Then + 'Listener für Änderungen im Detail-Panel + For Each c As Control In pnlAdresse.Controls + If TypeOf (c) Is TextBox Then + AddHandler CType(c, TextBox).TextChanged, AddressOf SomethingChanged + End If + If TypeOf (c) Is MyComboBox Then + AddHandler CType(c, MyComboBox).TextChanged, AddressOf SomethingChanged + End If + Next + Else + + btnLeistenderSave.Visible = False + End If - 'Listener für Änderungen im Detail-Panel - For Each c As Control In pnlAdresse.Controls - If TypeOf (c) Is TextBox Then - AddHandler CType(c, TextBox).TextChanged, AddressOf SomethingChanged - End If - If TypeOf (c) Is MyComboBox Then - AddHandler CType(c, MyComboBox).TextChanged, AddressOf SomethingChanged - End If - Next End Sub Private Sub SomethingChanged(sender As Object, e As EventArgs) - - picSave.Visible = True + btnLeistenderSave.Visible = True End Sub - Private Sub picSave_Click(sender As Object, e As EventArgs) Handles picSave.Click - If UStV_Leist Is Nothing Then Exit Sub + Private Sub picSave_Click(sender As Object, e As EventArgs) Handles btnLeistenderSave.Click If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("MDM_USTVA_bearbeiten", Me.FindForm) Then MsgBox("keine Berechtigung!") Exit Sub End If - If UStV_Leist.UstV_Leistender_Adresse Then - If Not vbYes = MsgBox("Bei diesem Leistenden ist bereits eine Adresse hinterlegt, soll diese Adresse wirklich geändert werden?", vbYesNo) Then - Exit Sub + Dim leistNew = sbLeistender.Text + + UStV_Leist = New VERAG_PROG_ALLGEMEIN.cUStVLeistender(leistNew) + + If Not UStV_Leist.hasEntry Then + If vbYes = MsgBox("Dieser Leistende wurde noch nicht angelegt!" & vbNewLine & UStV_Leist.UStV_Leistender & " anlegen? ", vbYesNo) Then + + UStV_Leist.UstV_Leistender_Strasse = If(txtStrasse.Text, "") + UStV_Leist.UstV_Leistender_StrasseNr = If(txtStrassenNr.Text, "") + UStV_Leist.UstV_Leistender_PLZ = If(txtPLZ.Text, "") + UStV_Leist.UstV_Leistender_Stadt = If(txtOrt.Text, "") + UStV_Leist.UstV_Leistender_Land = If(txtLand.Text, "") + UStV_Leist.UstV_Leistender_UstNr = If(txtUIDNr.Text, "") + + If UStV_Leist.SAVE() Then + + btnLeistenderSave.Visible = False + UStV_POS.UStVPo_Leistender = UStV_Leist + 'RaiseEvent CHANGED(UStV_POS.UStVPo_ID) + values_changed() + End If + End If + + Else + + Dim adresseChanged As Boolean = False + + If UStV_Leist.UstV_Leistender_Strasse <> If(txtStrasse.Text, "") Then adresseChanged = True + If UStV_Leist.UstV_Leistender_StrasseNr <> If(txtStrassenNr.Text, "") Then adresseChanged = True + If UStV_Leist.UstV_Leistender_PLZ <> If(txtPLZ.Text, "") Then adresseChanged = True + If UStV_Leist.UstV_Leistender_Stadt <> If(txtOrt.Text, "") Then adresseChanged = True + If UStV_Leist.UstV_Leistender_Land <> If(txtLand.Text, "") Then adresseChanged = True + If UStV_Leist.UstV_Leistender_UstNr <> If(txtUIDNr.Text, "") Then adresseChanged = True + + + UStV_Leist.UstV_Leistender_Strasse = If(txtStrasse.Text, "") + UStV_Leist.UstV_Leistender_StrasseNr = If(txtStrassenNr.Text, "") + UStV_Leist.UstV_Leistender_PLZ = If(txtPLZ.Text, "") + UStV_Leist.UstV_Leistender_Stadt = If(txtOrt.Text, "") + UStV_Leist.UstV_Leistender_Land = If(txtLand.Text, "") + UStV_Leist.UstV_Leistender_UstNr = If(txtUIDNr.Text, "") + UStV_Leist.UstV_Leistender_Adresse = True + + If UStV_Leist.UstV_Leistender_Adresse And adresseChanged Then + If Not vbYes = MsgBox("Bei diesem Leistenden ist bereits eine Adresse hinterlegt, soll diese Adresse wirklich geändert werden?", vbYesNo) Then + + btnLeistenderSave.Visible = False + UStV_POS.UStVPo_Leistender = UStV_Leist + 'RaiseEvent CHANGED(UStV_POS.UStVPo_ID) + values_changed() + Exit Sub + End If + End If + + If UStV_Leist.SAVE() Then + + btnLeistenderSave.Visible = False + UStV_POS.UStVPo_Leistender = UStV_Leist.UStV_Leistender + 'RaiseEvent CHANGED(UStV_POS.UStVPo_ID) + values_changed() + End If End If - UStV_Leist.UstV_Leistender_Strasse = If(txtStrasse.Text, "") - UStV_Leist.UstV_Leistender_StrasseNr = If(txtStrassenNr.Text, "") - UStV_Leist.UstV_Leistender_PLZ = If(txtPLZ.Text, "") - UStV_Leist.UstV_Leistender_Stadt = If(txtOrt.Text, "") - UStV_Leist.UstV_Leistender_Land = If(txtLand.Text, "") - UStV_Leist.UstV_Leistender_UstNr = If(txtUIDNr.Text, "") - UStV_Leist.UstV_Leistender_Adresse = True - If UStV_Leist.SAVE() Then - picSave.Visible = False - RaiseEvent CHANGED(UStV_POS.UStVPo_ID) - End If End Sub @@ -293,7 +365,7 @@ Public Class ustCntlUSTV_AntragPosition End Sub - Private Sub initSchnittstellenNR() + Private Sub initSchnittstellenNr() If cboSchnittstellennr.Items.Count = 0 Then @@ -312,5 +384,15 @@ Public Class ustCntlUSTV_AntragPosition End Sub + Private Sub sbLeistender_VALUE_CHANGED() Handles sbLeistender.VALUE_CHANGED + + If sbLeistender._value IsNot Nothing AndAlso sbLeistender._value <> "" Then + UStV_Leist = New VERAG_PROG_ALLGEMEIN.cUStVLeistender(sbLeistender._value) + loadChangedDSToPanel(UStV_Leist) + End If + + + + End Sub End Class diff --git a/SDL/kunden/frmKundenblatt.Designer.vb b/SDL/kunden/frmKundenblatt.Designer.vb index b151a2cb..a4b0e1f0 100644 --- a/SDL/kunden/frmKundenblatt.Designer.vb +++ b/SDL/kunden/frmKundenblatt.Designer.vb @@ -45,6 +45,7 @@ Partial Class frmKundenblatt Me.txtInfotext = New System.Windows.Forms.Label() Me.tbFirmendaten = New System.Windows.Forms.TabPage() Me.Panel4 = New System.Windows.Forms.Panel() + Me.UsrcntlKundeBearbeitenFull1 = New SDL.usrcntlKundeBearbeitenFull() Me.tbcntrMain = New System.Windows.Forms.TabControl() Me.tbAllgemein = New System.Windows.Forms.TabPage() Me.lblAdressenzusatz = New System.Windows.Forms.TextBox() @@ -128,8 +129,10 @@ Partial Class frmKundenblatt Me.lblLetzterSA_SDL = New System.Windows.Forms.Label() Me.rtbVermerke = New System.Windows.Forms.RichTextBox() Me.tbSDLKarten = New System.Windows.Forms.TabPage() + Me.usrcntlKarten = New SDL.usrCntlKartenDaten() Me.tbLKW = New System.Windows.Forms.TabPage() Me.pnlLKWRight = New System.Windows.Forms.Panel() + Me.UsrCntlLKW1 = New SDL.usrCntlLKW() Me.pnlLKW = New System.Windows.Forms.Panel() Me.dgvLKW = New System.Windows.Forms.DataGridView() Me.pnlLKWBottom = New System.Windows.Forms.Panel() @@ -159,7 +162,9 @@ Partial Class frmKundenblatt Me.scanBankGarantie = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() Me.scanVertragVeragKd = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() Me.tbBesuchsberichte = New System.Windows.Forms.TabPage() + Me.tbFremdrechnungen = New System.Windows.Forms.TabPage() Me.tbOfferte = New System.Windows.Forms.TabPage() + Me.UsrCntlOfferte1 = New SDL.usrCntlOfferte() Me.tbUSTV = New System.Windows.Forms.TabPage() Me.tbcntrUSTV = New System.Windows.Forms.TabControl() Me.tbUSTVDokumente = New System.Windows.Forms.TabPage() @@ -170,6 +175,7 @@ Partial Class frmKundenblatt Me.scanUSTVFABest = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() Me.scanUSTVVollmachten = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() Me.tbUSTVAntrage = New System.Windows.Forms.TabPage() + Me.UsrCntlUSTV = New SDL.usrCntlUSTV() Me.cntxtExcel = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem6 = New System.Windows.Forms.ToolStripMenuItem() @@ -195,12 +201,6 @@ Partial Class frmKundenblatt Me.tbiKartenverwaltung = New System.Windows.Forms.ToolStripMenuItem() Me.tbiLKW = New System.Windows.Forms.ToolStripMenuItem() Me.tbiVERAGCard = New System.Windows.Forms.ToolStripMenuItem() - Me.tbFremdrechnungen = New System.Windows.Forms.TabPage() - Me.UsrcntlKundeBearbeitenFull1 = New SDL.usrcntlKundeBearbeitenFull() - Me.usrcntlKarten = New SDL.usrCntlKartenDaten() - Me.UsrCntlLKW1 = New SDL.usrCntlLKW() - Me.UsrCntlOfferte1 = New SDL.usrCntlOfferte() - Me.UsrCntlUSTV = New SDL.usrCntlUSTV() Me.pnlInfo.SuspendLayout() Me.tbFirmendaten.SuspendLayout() Me.Panel4.SuspendLayout() @@ -277,7 +277,7 @@ Partial Class frmKundenblatt Me.tbFirmendaten.Location = New System.Drawing.Point(4, 25) Me.tbFirmendaten.Name = "tbFirmendaten" Me.tbFirmendaten.Padding = New System.Windows.Forms.Padding(3) - Me.tbFirmendaten.Size = New System.Drawing.Size(1630, 1067) + Me.tbFirmendaten.Size = New System.Drawing.Size(1644, 1067) Me.tbFirmendaten.TabIndex = 3 Me.tbFirmendaten.Text = "Firmendaten" ' @@ -287,9 +287,19 @@ Partial Class frmKundenblatt Me.Panel4.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel4.Location = New System.Drawing.Point(3, 3) Me.Panel4.Name = "Panel4" - Me.Panel4.Size = New System.Drawing.Size(1624, 1061) + Me.Panel4.Size = New System.Drawing.Size(1638, 1061) Me.Panel4.TabIndex = 0 ' + 'UsrcntlKundeBearbeitenFull1 + ' + Me.UsrcntlKundeBearbeitenFull1.BackColor = System.Drawing.Color.White + Me.UsrcntlKundeBearbeitenFull1.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrcntlKundeBearbeitenFull1.Location = New System.Drawing.Point(0, 0) + Me.UsrcntlKundeBearbeitenFull1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) + Me.UsrcntlKundeBearbeitenFull1.Name = "UsrcntlKundeBearbeitenFull1" + Me.UsrcntlKundeBearbeitenFull1.Size = New System.Drawing.Size(1638, 1061) + Me.UsrcntlKundeBearbeitenFull1.TabIndex = 0 + ' 'tbcntrMain ' Me.tbcntrMain.Appearance = System.Windows.Forms.TabAppearance.FlatButtons @@ -346,7 +356,7 @@ Partial Class frmKundenblatt Me.tbAllgemein.Margin = New System.Windows.Forms.Padding(0) Me.tbAllgemein.Name = "tbAllgemein" Me.tbAllgemein.Padding = New System.Windows.Forms.Padding(3) - Me.tbAllgemein.Size = New System.Drawing.Size(1644, 1084) + Me.tbAllgemein.Size = New System.Drawing.Size(1644, 1067) Me.tbAllgemein.TabIndex = 0 Me.tbAllgemein.Text = "Allgemein" ' @@ -456,7 +466,7 @@ Partial Class frmKundenblatt Me.dgvOffenePosten.RowHeadersDefaultCellStyle = DataGridViewCellStyle4 Me.dgvOffenePosten.RowHeadersVisible = False Me.dgvOffenePosten.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvOffenePosten.Size = New System.Drawing.Size(714, 485) + Me.dgvOffenePosten.Size = New System.Drawing.Size(714, 468) Me.dgvOffenePosten.TabIndex = 175 ' 'btnOP @@ -796,7 +806,7 @@ Partial Class frmKundenblatt Me.dgvSperrliste.Name = "dgvSperrliste" Me.dgvSperrliste.ReadOnly = True Me.dgvSperrliste.RowHeadersDefaultCellStyle = DataGridViewCellStyle7 - Me.dgvSperrliste.Size = New System.Drawing.Size(446, 1040) + Me.dgvSperrliste.Size = New System.Drawing.Size(446, 1023) Me.dgvSperrliste.TabIndex = 23 ' 'PictureBox2 @@ -850,7 +860,7 @@ Partial Class frmKundenblatt Me.tbZoll.Location = New System.Drawing.Point(4, 25) Me.tbZoll.Name = "tbZoll" Me.tbZoll.Padding = New System.Windows.Forms.Padding(3) - Me.tbZoll.Size = New System.Drawing.Size(1630, 1067) + Me.tbZoll.Size = New System.Drawing.Size(1644, 1067) Me.tbZoll.TabIndex = 9 Me.tbZoll.Text = "ZOLL" Me.tbZoll.UseVisualStyleBackColor = True @@ -862,7 +872,7 @@ Partial Class frmKundenblatt Me.tbcntrZOLL.Location = New System.Drawing.Point(3, 3) Me.tbcntrZOLL.Name = "tbcntrZOLL" Me.tbcntrZOLL.SelectedIndex = 0 - Me.tbcntrZOLL.Size = New System.Drawing.Size(1624, 1061) + Me.tbcntrZOLL.Size = New System.Drawing.Size(1638, 1061) Me.tbcntrZOLL.TabIndex = 0 ' 'tabZoll_Artikel @@ -870,7 +880,7 @@ Partial Class frmKundenblatt Me.tabZoll_Artikel.Location = New System.Drawing.Point(4, 22) Me.tabZoll_Artikel.Name = "tabZoll_Artikel" Me.tabZoll_Artikel.Padding = New System.Windows.Forms.Padding(3) - Me.tabZoll_Artikel.Size = New System.Drawing.Size(1616, 1035) + Me.tabZoll_Artikel.Size = New System.Drawing.Size(1630, 1035) Me.tabZoll_Artikel.TabIndex = 1 Me.tabZoll_Artikel.Text = "Artikel" Me.tabZoll_Artikel.UseVisualStyleBackColor = True @@ -912,7 +922,7 @@ Partial Class frmKundenblatt Me.tbSDL.Margin = New System.Windows.Forms.Padding(0) Me.tbSDL.Name = "tbSDL" Me.tbSDL.Padding = New System.Windows.Forms.Padding(3) - Me.tbSDL.Size = New System.Drawing.Size(1630, 1052) + Me.tbSDL.Size = New System.Drawing.Size(1630, 1035) Me.tbSDL.TabIndex = 5 Me.tbSDL.Text = "SDL-Leistungen" Me.tbSDL.UseVisualStyleBackColor = True @@ -954,7 +964,7 @@ Partial Class frmKundenblatt DataGridViewCellStyle13.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.dgvSDLLeistungenFull.RowHeadersDefaultCellStyle = DataGridViewCellStyle13 Me.dgvSDLLeistungenFull.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvSDLLeistungenFull.Size = New System.Drawing.Size(1624, 856) + Me.dgvSDLLeistungenFull.Size = New System.Drawing.Size(1624, 839) Me.dgvSDLLeistungenFull.TabIndex = 5 ' 'Panel6 @@ -1059,7 +1069,7 @@ Partial Class frmKundenblatt Me.Panel5.Controls.Add(Me.lblLetzterSA_SDL) Me.Panel5.Controls.Add(Me.rtbVermerke) Me.Panel5.Dock = System.Windows.Forms.DockStyle.Bottom - Me.Panel5.Location = New System.Drawing.Point(3, 906) + Me.Panel5.Location = New System.Drawing.Point(3, 889) Me.Panel5.Name = "Panel5" Me.Panel5.Size = New System.Drawing.Size(1624, 143) Me.Panel5.TabIndex = 177 @@ -1442,11 +1452,21 @@ Partial Class frmKundenblatt Me.tbSDLKarten.Location = New System.Drawing.Point(4, 22) Me.tbSDLKarten.Name = "tbSDLKarten" Me.tbSDLKarten.Padding = New System.Windows.Forms.Padding(3) - Me.tbSDLKarten.Size = New System.Drawing.Size(1630, 1052) + Me.tbSDLKarten.Size = New System.Drawing.Size(178, 39) Me.tbSDLKarten.TabIndex = 7 Me.tbSDLKarten.Text = "SDL-Kartenverwaltung" Me.tbSDLKarten.UseVisualStyleBackColor = True ' + 'usrcntlKarten + ' + Me.usrcntlKarten.Cursor = System.Windows.Forms.Cursors.Default + Me.usrcntlKarten.Dock = System.Windows.Forms.DockStyle.Fill + Me.usrcntlKarten.Location = New System.Drawing.Point(3, 3) + Me.usrcntlKarten.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) + Me.usrcntlKarten.Name = "usrcntlKarten" + Me.usrcntlKarten.Size = New System.Drawing.Size(172, 33) + Me.usrcntlKarten.TabIndex = 0 + ' 'tbLKW ' Me.tbLKW.Controls.Add(Me.pnlLKWRight) @@ -1454,7 +1474,7 @@ Partial Class frmKundenblatt Me.tbLKW.Location = New System.Drawing.Point(4, 22) Me.tbLKW.Name = "tbLKW" Me.tbLKW.Padding = New System.Windows.Forms.Padding(3) - Me.tbLKW.Size = New System.Drawing.Size(1630, 1052) + Me.tbLKW.Size = New System.Drawing.Size(178, 39) Me.tbLKW.TabIndex = 4 Me.tbLKW.Text = "LKWs" Me.tbLKW.UseVisualStyleBackColor = True @@ -1466,9 +1486,22 @@ Partial Class frmKundenblatt Me.pnlLKWRight.Location = New System.Drawing.Point(309, 3) Me.pnlLKWRight.Name = "pnlLKWRight" Me.pnlLKWRight.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) - Me.pnlLKWRight.Size = New System.Drawing.Size(1318, 1046) + Me.pnlLKWRight.Size = New System.Drawing.Size(0, 33) Me.pnlLKWRight.TabIndex = 2 ' + 'UsrCntlLKW1 + ' + Me.UsrCntlLKW1.BackColor = System.Drawing.Color.White + Me.UsrCntlLKW1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.UsrCntlLKW1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.UsrCntlLKW1.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrCntlLKW1.Location = New System.Drawing.Point(10, 0) + Me.UsrCntlLKW1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) + Me.UsrCntlLKW1.MaximumSize = New System.Drawing.Size(1200, 1000) + Me.UsrCntlLKW1.Name = "UsrCntlLKW1" + Me.UsrCntlLKW1.Size = New System.Drawing.Size(0, 33) + Me.UsrCntlLKW1.TabIndex = 0 + ' 'pnlLKW ' Me.pnlLKW.Controls.Add(Me.dgvLKW) @@ -1477,7 +1510,7 @@ Partial Class frmKundenblatt Me.pnlLKW.Dock = System.Windows.Forms.DockStyle.Left Me.pnlLKW.Location = New System.Drawing.Point(3, 3) Me.pnlLKW.Name = "pnlLKW" - Me.pnlLKW.Size = New System.Drawing.Size(306, 1046) + Me.pnlLKW.Size = New System.Drawing.Size(306, 33) Me.pnlLKW.TabIndex = 3 ' 'dgvLKW @@ -1518,7 +1551,7 @@ Partial Class frmKundenblatt Me.dgvLKW.RowHeadersDefaultCellStyle = DataGridViewCellStyle17 Me.dgvLKW.RowHeadersVisible = False Me.dgvLKW.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvLKW.Size = New System.Drawing.Size(306, 872) + Me.dgvLKW.Size = New System.Drawing.Size(306, 0) Me.dgvLKW.TabIndex = 2 ' 'pnlLKWBottom @@ -1530,7 +1563,7 @@ Partial Class frmKundenblatt Me.pnlLKWBottom.Controls.Add(Me.Button13) Me.pnlLKWBottom.Controls.Add(Me.lblErgebnisse) Me.pnlLKWBottom.Dock = System.Windows.Forms.DockStyle.Bottom - Me.pnlLKWBottom.Location = New System.Drawing.Point(0, 934) + Me.pnlLKWBottom.Location = New System.Drawing.Point(0, -79) Me.pnlLKWBottom.Name = "pnlLKWBottom" Me.pnlLKWBottom.Size = New System.Drawing.Size(306, 112) Me.pnlLKWBottom.TabIndex = 3 @@ -1671,7 +1704,7 @@ Partial Class frmKundenblatt Me.tbVERAGCard.Location = New System.Drawing.Point(4, 22) Me.tbVERAGCard.Name = "tbVERAGCard" Me.tbVERAGCard.Padding = New System.Windows.Forms.Padding(3) - Me.tbVERAGCard.Size = New System.Drawing.Size(1630, 1052) + Me.tbVERAGCard.Size = New System.Drawing.Size(178, 39) Me.tbVERAGCard.TabIndex = 6 Me.tbVERAGCard.Text = "VERAG Card" Me.tbVERAGCard.UseVisualStyleBackColor = True @@ -1683,7 +1716,7 @@ Partial Class frmKundenblatt Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel3.Location = New System.Drawing.Point(3, 3) Me.Panel3.Name = "Panel3" - Me.Panel3.Size = New System.Drawing.Size(1624, 1046) + Me.Panel3.Size = New System.Drawing.Size(172, 33) Me.Panel3.TabIndex = 0 ' 'tbDokumente @@ -1701,7 +1734,7 @@ Partial Class frmKundenblatt Me.tbDokumente.Controls.Add(Me.scanVertragVeragKd) Me.tbDokumente.Location = New System.Drawing.Point(4, 22) Me.tbDokumente.Name = "tbDokumente" - Me.tbDokumente.Size = New System.Drawing.Size(1630, 1052) + Me.tbDokumente.Size = New System.Drawing.Size(178, 39) Me.tbDokumente.TabIndex = 8 Me.tbDokumente.Text = "Dokumente" Me.tbDokumente.UseVisualStyleBackColor = True @@ -1899,28 +1932,47 @@ Partial Class frmKundenblatt Me.tbBesuchsberichte.Location = New System.Drawing.Point(4, 22) Me.tbBesuchsberichte.Name = "tbBesuchsberichte" Me.tbBesuchsberichte.Padding = New System.Windows.Forms.Padding(3) - Me.tbBesuchsberichte.Size = New System.Drawing.Size(1630, 1052) + Me.tbBesuchsberichte.Size = New System.Drawing.Size(178, 39) Me.tbBesuchsberichte.TabIndex = 9 Me.tbBesuchsberichte.Text = "Besuchsberichte" Me.tbBesuchsberichte.UseVisualStyleBackColor = True ' + 'tbFremdrechnungen + ' + Me.tbFremdrechnungen.Location = New System.Drawing.Point(4, 22) + Me.tbFremdrechnungen.Name = "tbFremdrechnungen" + Me.tbFremdrechnungen.Size = New System.Drawing.Size(178, 39) + Me.tbFremdrechnungen.TabIndex = 10 + Me.tbFremdrechnungen.Text = "Fremdrechnungen" + Me.tbFremdrechnungen.UseVisualStyleBackColor = True + ' 'tbOfferte ' Me.tbOfferte.Controls.Add(Me.UsrCntlOfferte1) Me.tbOfferte.Location = New System.Drawing.Point(4, 25) Me.tbOfferte.Margin = New System.Windows.Forms.Padding(2) Me.tbOfferte.Name = "tbOfferte" - Me.tbOfferte.Size = New System.Drawing.Size(1630, 1067) + Me.tbOfferte.Size = New System.Drawing.Size(1644, 1067) Me.tbOfferte.TabIndex = 11 Me.tbOfferte.Text = "Offerte" Me.tbOfferte.UseVisualStyleBackColor = True ' + 'UsrCntlOfferte1 + ' + Me.UsrCntlOfferte1.BackColor = System.Drawing.Color.White + Me.UsrCntlOfferte1.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrCntlOfferte1.Location = New System.Drawing.Point(0, 0) + Me.UsrCntlOfferte1.Margin = New System.Windows.Forms.Padding(1) + Me.UsrCntlOfferte1.Name = "UsrCntlOfferte1" + Me.UsrCntlOfferte1.Size = New System.Drawing.Size(1644, 1067) + Me.UsrCntlOfferte1.TabIndex = 0 + ' 'tbUSTV ' Me.tbUSTV.Controls.Add(Me.tbcntrUSTV) Me.tbUSTV.Location = New System.Drawing.Point(4, 25) Me.tbUSTV.Name = "tbUSTV" - Me.tbUSTV.Size = New System.Drawing.Size(1630, 1067) + Me.tbUSTV.Size = New System.Drawing.Size(1644, 1067) Me.tbUSTV.TabIndex = 12 Me.tbUSTV.Text = "USTV" Me.tbUSTV.UseVisualStyleBackColor = True @@ -1934,7 +1986,7 @@ Partial Class frmKundenblatt Me.tbcntrUSTV.Margin = New System.Windows.Forms.Padding(0) Me.tbcntrUSTV.Name = "tbcntrUSTV" Me.tbcntrUSTV.SelectedIndex = 0 - Me.tbcntrUSTV.Size = New System.Drawing.Size(1630, 1067) + Me.tbcntrUSTV.Size = New System.Drawing.Size(1644, 1067) Me.tbcntrUSTV.TabIndex = 1 ' 'tbUSTVDokumente @@ -1947,7 +1999,7 @@ Partial Class frmKundenblatt Me.tbUSTVDokumente.Controls.Add(Me.scanUSTVVollmachten) Me.tbUSTVDokumente.Location = New System.Drawing.Point(4, 22) Me.tbUSTVDokumente.Name = "tbUSTVDokumente" - Me.tbUSTVDokumente.Size = New System.Drawing.Size(1622, 1041) + Me.tbUSTVDokumente.Size = New System.Drawing.Size(1636, 1041) Me.tbUSTVDokumente.TabIndex = 8 Me.tbUSTVDokumente.Text = "Dokumente" Me.tbUSTVDokumente.UseVisualStyleBackColor = True @@ -2045,11 +2097,19 @@ Partial Class frmKundenblatt Me.tbUSTVAntrage.Location = New System.Drawing.Point(4, 22) Me.tbUSTVAntrage.Name = "tbUSTVAntrage" Me.tbUSTVAntrage.Padding = New System.Windows.Forms.Padding(3) - Me.tbUSTVAntrage.Size = New System.Drawing.Size(1622, 1041) + Me.tbUSTVAntrage.Size = New System.Drawing.Size(184, 45) Me.tbUSTVAntrage.TabIndex = 9 Me.tbUSTVAntrage.Text = "USTV-Anträge" Me.tbUSTVAntrage.UseVisualStyleBackColor = True ' + 'UsrCntlUSTV + ' + Me.UsrCntlUSTV.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrCntlUSTV.Location = New System.Drawing.Point(3, 3) + Me.UsrCntlUSTV.Name = "UsrCntlUSTV" + Me.UsrCntlUSTV.Size = New System.Drawing.Size(178, 39) + Me.UsrCntlUSTV.TabIndex = 0 + ' 'cntxtExcel ' Me.cntxtExcel.ImageScalingSize = New System.Drawing.Size(24, 24) @@ -2192,6 +2252,7 @@ Partial Class frmKundenblatt ' Me.cntxtCntxtMDM.ImageScalingSize = New System.Drawing.Size(24, 24) Me.cntxtCntxtMDM.Name = "cntxtCntxtMDM" + Me.cntxtCntxtMDM.OwnerItem = Me.ToolStripMenuItem8 Me.cntxtCntxtMDM.Size = New System.Drawing.Size(61, 4) Me.cntxtCntxtMDM.Text = "cntxtMDM" ' @@ -2325,66 +2386,6 @@ Partial Class frmKundenblatt Me.tbiVERAGCard.Size = New System.Drawing.Size(186, 22) Me.tbiVERAGCard.Text = "VERAG Card" ' - 'tbFremdrechnungen - ' - Me.tbFremdrechnungen.Location = New System.Drawing.Point(4, 22) - Me.tbFremdrechnungen.Name = "tbFremdrechnungen" - Me.tbFremdrechnungen.Size = New System.Drawing.Size(1630, 1035) - Me.tbFremdrechnungen.TabIndex = 10 - Me.tbFremdrechnungen.Text = "Fremdrechnungen" - Me.tbFremdrechnungen.UseVisualStyleBackColor = True - ' - 'UsrcntlKundeBearbeitenFull1 - ' - Me.UsrcntlKundeBearbeitenFull1.BackColor = System.Drawing.Color.White - Me.UsrcntlKundeBearbeitenFull1.Dock = System.Windows.Forms.DockStyle.Fill - Me.UsrcntlKundeBearbeitenFull1.Location = New System.Drawing.Point(0, 0) - Me.UsrcntlKundeBearbeitenFull1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) - Me.UsrcntlKundeBearbeitenFull1.Name = "UsrcntlKundeBearbeitenFull1" - Me.UsrcntlKundeBearbeitenFull1.Size = New System.Drawing.Size(1624, 1061) - Me.UsrcntlKundeBearbeitenFull1.TabIndex = 0 - ' - 'usrcntlKarten - ' - Me.usrcntlKarten.Cursor = System.Windows.Forms.Cursors.Default - Me.usrcntlKarten.Dock = System.Windows.Forms.DockStyle.Fill - Me.usrcntlKarten.Location = New System.Drawing.Point(3, 3) - Me.usrcntlKarten.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) - Me.usrcntlKarten.Name = "usrcntlKarten" - Me.usrcntlKarten.Size = New System.Drawing.Size(1624, 1046) - Me.usrcntlKarten.TabIndex = 0 - ' - 'UsrCntlLKW1 - ' - Me.UsrCntlLKW1.BackColor = System.Drawing.Color.White - Me.UsrCntlLKW1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.UsrCntlLKW1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.UsrCntlLKW1.Dock = System.Windows.Forms.DockStyle.Fill - Me.UsrCntlLKW1.Location = New System.Drawing.Point(10, 0) - Me.UsrCntlLKW1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) - Me.UsrCntlLKW1.MaximumSize = New System.Drawing.Size(1200, 1000) - Me.UsrCntlLKW1.Name = "UsrCntlLKW1" - Me.UsrCntlLKW1.Size = New System.Drawing.Size(1200, 1000) - Me.UsrCntlLKW1.TabIndex = 0 - ' - 'UsrCntlOfferte1 - ' - Me.UsrCntlOfferte1.BackColor = System.Drawing.Color.White - Me.UsrCntlOfferte1.Dock = System.Windows.Forms.DockStyle.Fill - Me.UsrCntlOfferte1.Location = New System.Drawing.Point(0, 0) - Me.UsrCntlOfferte1.Margin = New System.Windows.Forms.Padding(1) - Me.UsrCntlOfferte1.Name = "UsrCntlOfferte1" - Me.UsrCntlOfferte1.Size = New System.Drawing.Size(1630, 1067) - Me.UsrCntlOfferte1.TabIndex = 0 - ' - 'UsrCntlUSTV - ' - Me.UsrCntlUSTV.Dock = System.Windows.Forms.DockStyle.Fill - Me.UsrCntlUSTV.Location = New System.Drawing.Point(3, 3) - Me.UsrCntlUSTV.Name = "UsrCntlUSTV" - Me.UsrCntlUSTV.Size = New System.Drawing.Size(1616, 1035) - Me.UsrCntlUSTV.TabIndex = 0 - ' 'frmKundenblatt ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) diff --git a/SDL/kunden/frmKundenblatt.vb b/SDL/kunden/frmKundenblatt.vb index b1cad625..f8de46a8 100644 --- a/SDL/kunden/frmKundenblatt.vb +++ b/SDL/kunden/frmKundenblatt.vb @@ -2017,5 +2017,7 @@ Public Class frmKundenblatt Dim f As New frmGoMautBoxen_Bestellung(KUNDE, ADRESSE, KUNDE_ERW) f.ShowDialog() End Sub + + End Class diff --git a/SDL/kunden/usrcntlKundeBearbeitenFull.Designer.vb b/SDL/kunden/usrcntlKundeBearbeitenFull.Designer.vb index d159d28d..daab3510 100644 --- a/SDL/kunden/usrcntlKundeBearbeitenFull.Designer.vb +++ b/SDL/kunden/usrcntlKundeBearbeitenFull.Designer.vb @@ -45,18 +45,22 @@ Partial Class usrcntlKundeBearbeitenFull Me.tbcntrDetails = New System.Windows.Forms.TabControl() Me.tbAbfertigung = New System.Windows.Forms.TabPage() Me.cbxVerzolltBeiExport = New System.Windows.Forms.CheckBox() + Me.txtAbf_Planzahl = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label42 = New System.Windows.Forms.Label() Me.cboFremdspeditionExport = New System.Windows.Forms.ComboBox() Me.lblHinweisKdNr = New System.Windows.Forms.Label() 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() + Me.txtAbfVerb_RechtsanwaltSeit = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.cboAbfVerb_Kreditlimit = New System.Windows.Forms.CheckBox() Me.rtbAbfVerb_Grund = New System.Windows.Forms.RichTextBox() Me.Label62 = New System.Windows.Forms.Label() @@ -64,12 +68,17 @@ Partial Class usrcntlKundeBearbeitenFull Me.Label63 = New System.Windows.Forms.Label() Me.Label64 = New System.Windows.Forms.Label() 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() Me.Label38 = New System.Windows.Forms.Label() + Me.txtAbf_ZollVmVom = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.cbxAbf_Ausfuhr = New System.Windows.Forms.CheckBox() + Me.txtAbf_Euroeinführung = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbf_ErsteAbfertigung = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.cbxAbf_Fiskal = New System.Windows.Forms.CheckBox() Me.GroupBox7 = New System.Windows.Forms.GroupBox() Me.RadioButton7 = New System.Windows.Forms.RadioButton() @@ -86,7 +95,16 @@ 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.pnlverag360 = New System.Windows.Forms.Panel() + Me.gbMWSTAntraege = New System.Windows.Forms.GroupBox() + Me.rbJ = New System.Windows.Forms.RadioButton() + Me.rbHJ = New System.Windows.Forms.RadioButton() + Me.rbQ = New System.Windows.Forms.RadioButton() + Me.txtVorauszahlung = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cbxVorauszahlung = New System.Windows.Forms.CheckBox() + Me.cbxKapitalWaehrung = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Label103 = New System.Windows.Forms.Label() Me.Label101 = New System.Windows.Forms.Label() Me.cbxSndDatenAusSTB = New System.Windows.Forms.CheckBox() @@ -116,6 +134,25 @@ Partial Class usrcntlKundeBearbeitenFull Me.Label49 = New System.Windows.Forms.Label() Me.Label48 = New System.Windows.Forms.Label() Me.Label39 = New System.Windows.Forms.Label() + Me.txtKapital = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbwZZVL = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboRechnungSprache = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtDebKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbf_Zahlungsziel3 = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbf_Zahlungsziel2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbf_LastschriftBis = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbf_LastschriftVon = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtProvAuftraggeber = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboProvisionStaffel = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboProvisionStaffelArt = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboAbf_Waehrung = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboAbf_Steuerschluessel = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboAbf_Sammelrechnung = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtAbf_BankspesenMindestbetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbf_Bankspesen = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbf_Kreditaufwendungen = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbf_Vorlageprovision = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbf_Zahlungsziel = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.tbVersicherung = New System.Windows.Forms.TabPage() Me.cbxBlanko = New System.Windows.Forms.CheckBox() Me.Label105 = New System.Windows.Forms.Label() @@ -149,15 +186,42 @@ Partial Class usrcntlKundeBearbeitenFull Me.Label54 = New System.Windows.Forms.Label() Me.Label52 = New System.Windows.Forms.Label() Me.Label51 = New System.Windows.Forms.Label() + Me.txtWechselErhaltenAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtWechselGueltigBis = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtWechsel = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtBankgarantieErhaltenAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtInkasso_GemeldeterBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtInkassoUebergebenAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVers_EHNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAnerkVersFallAb = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVersicherung_GemeldeterBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVersUebergebenOPSaldo = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVersicherungDeckungsquote = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAnerkVersFallAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVersicherungUebergebenAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtDeckungsstoppDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVers_BankgarantiebetragGueltigBis = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVers_KreditlimitVon = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVers_Saldo = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVers_VersicherungssummeVon = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVers_Bankgarantiebetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVers_Kreditlimit = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVers_AntragssummeVon = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVers_Versicherungssumme = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVers_Antragssumme = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVers_HermesRefNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.tbUmsatz = New System.Windows.Forms.TabPage() Me.Label65 = New System.Windows.Forms.Label() Me.dgvUmsatzbericht = New System.Windows.Forms.DataGridView() Me.tbOP = New System.Windows.Forms.TabPage() + Me.txtHoechstkredit = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label69 = New System.Windows.Forms.Label() Me.lblbon = New System.Windows.Forms.Label() Me.Label67 = New System.Windows.Forms.Label() Me.Label66 = New System.Windows.Forms.Label() Me.dgvOffenePosten = New System.Windows.Forms.DataGridView() + Me.txtBonitaetsDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtBonitaet = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.tbBank = New System.Windows.Forms.TabPage() Me.Label21 = New System.Windows.Forms.Label() Me.GroupBox4 = New System.Windows.Forms.GroupBox() @@ -170,6 +234,7 @@ Partial Class usrcntlKundeBearbeitenFull Me.Label22 = New System.Windows.Forms.Label() Me.txtBank_Blz = New System.Windows.Forms.TextBox() Me.tbUmsatzsteuer = New System.Windows.Forms.TabPage() + Me.txtUStIDGeprueftAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txtUStID = New System.Windows.Forms.TextBox() Me.Button3 = New System.Windows.Forms.Button() Me.Label85 = New System.Windows.Forms.Label() @@ -182,7 +247,11 @@ Partial Class usrcntlKundeBearbeitenFull Me.Label89 = New System.Windows.Forms.Label() Me.Label87 = New System.Windows.Forms.Label() Me.Label86 = New System.Windows.Forms.Label() + Me.btnUStVAendSpeichern = New VERAG_PROG_ALLGEMEIN.FlatButton() + Me.txtUSt_GVAusgestelltAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtUSt_GVAngefordertAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.tbSonstiges = New System.Windows.Forms.TabPage() + Me.txtSumVerag = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txtSonst_KdNrVerag = New System.Windows.Forms.TextBox() Me.Label110 = New System.Windows.Forms.Label() Me.Label109 = New System.Windows.Forms.Label() @@ -209,6 +278,12 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtSonst_KdNrIDS = New System.Windows.Forms.TextBox() Me.Label70 = New System.Windows.Forms.Label() Me.Label71 = New System.Windows.Forms.Label() + Me.txtSumPLOSE = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtSumUTA = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtSumMSE = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtSumIDS = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.btnSonstAendSpeichern = New VERAG_PROG_ALLGEMEIN.FlatButton() + Me.cboSonst_Rechnungsdruck = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.tbSchnittstellen = New System.Windows.Forms.TabPage() Me.txtVERAG_Schnittstellen_ID = New System.Windows.Forms.TextBox() Me.Label91 = New System.Windows.Forms.Label() @@ -221,26 +296,37 @@ Partial Class usrcntlKundeBearbeitenFull Me.dgvBankverbindungen = New System.Windows.Forms.DataGridView() Me.cbxAlleBVanzeigen = New System.Windows.Forms.CheckBox() Me.Label108 = New System.Windows.Forms.Label() + Me.btnBankspeichern = New VERAG_PROG_ALLGEMEIN.FlatButton() Me.lblEORI = New System.Windows.Forms.Label() Me.Label84 = New System.Windows.Forms.Label() Me.GroupBox3 = New System.Windows.Forms.GroupBox() + Me.cbxkeineMWSt = New System.Windows.Forms.CheckBox() + Me.txtGruendungsDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label33 = New System.Windows.Forms.Label() + Me.txtHandelsregisterNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.PictureBox5 = New System.Windows.Forms.PictureBox() Me.cbxUIDMehrfachverwendung = New System.Windows.Forms.CheckBox() Me.btnCreditsafe = New System.Windows.Forms.Button() Me.Button13 = New System.Windows.Forms.Button() Me.btnUIDPruef = New System.Windows.Forms.Button() + Me.txtEORINL = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label5 = New System.Windows.Forms.Label() + Me.txtEORI = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txtFirmenname1 = New System.Windows.Forms.TextBox() + Me.cboUSt_UstIdNrLand = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Label15 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() + Me.txtUSt_UstIdNrGeprueftAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txtKurzname = New System.Windows.Forms.TextBox() + Me.txtUSt_UstIdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txtFirmenname2 = New System.Windows.Forms.TextBox() Me.Label16 = New System.Windows.Forms.Label() + Me.txtUSt_Steuernummer = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.lblHandelregisterNr = New System.Windows.Forms.Label() Me.Label100 = New System.Windows.Forms.Label() Me.txtAdresseZusatz = New System.Windows.Forms.TextBox() Me.GroupBox1 = New System.Windows.Forms.GroupBox() + Me.cbxLandKz = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Label14 = New System.Windows.Forms.Label() Me.txtPostfachOrt = New System.Windows.Forms.TextBox() Me.txtOrt = New System.Windows.Forms.TextBox() @@ -275,10 +361,13 @@ 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() Me.Button2 = New System.Windows.Forms.Button() + Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboKundenkreis = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Label77 = New System.Windows.Forms.Label() Me.lblKundennr = New System.Windows.Forms.Label() Me.Label79 = New System.Windows.Forms.Label() @@ -295,91 +384,9 @@ Partial Class usrcntlKundeBearbeitenFull Me.ArchivierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.DokumentHinzufügenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.DokumentLöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.cbxkeineMWSt = New System.Windows.Forms.CheckBox() - Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.cboKundenkreis = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.cboFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.cboAuswahl = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtAbf_Planzahl = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbfVerb_RechtsanwaltSeit = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbfVerb_AbfertigungsverbotSeit = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbf_ZollVmVom = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbf_Euroeinführung = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbf_ErsteAbfertigung = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cbxKapitalWaehrung = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtKapital = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbwZZVL = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cboRechnungSprache = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtDebKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbf_Zahlungsziel3 = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbf_Zahlungsziel2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbf_LastschriftBis = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbf_LastschriftVon = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtProvAuftraggeber = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cboProvisionStaffel = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.cboProvisionStaffelArt = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.cboAbf_Waehrung = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.cboAbf_Steuerschluessel = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.cboAbf_Sammelrechnung = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtAbf_BankspesenMindestbetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbf_Bankspesen = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbf_Kreditaufwendungen = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbf_Vorlageprovision = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbf_Zahlungsziel = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtWechselErhaltenAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtWechselGueltigBis = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtWechsel = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtBankgarantieErhaltenAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtInkasso_GemeldeterBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtInkassoUebergebenAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVers_EHNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAnerkVersFallAb = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVersicherung_GemeldeterBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVersUebergebenOPSaldo = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVersicherungDeckungsquote = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAnerkVersFallAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVersicherungUebergebenAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtDeckungsstoppDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVers_BankgarantiebetragGueltigBis = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVers_KreditlimitVon = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVers_Saldo = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVers_VersicherungssummeVon = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVers_Bankgarantiebetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVers_Kreditlimit = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVers_AntragssummeVon = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVers_Versicherungssumme = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVers_Antragssumme = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVers_HermesRefNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtHoechstkredit = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtBonitaetsDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtBonitaet = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtUStIDGeprueftAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.btnUStVAendSpeichern = New VERAG_PROG_ALLGEMEIN.FlatButton() - Me.txtUSt_GVAusgestelltAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtUSt_GVAngefordertAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtSumVerag = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtSumPLOSE = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtSumUTA = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtSumMSE = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtSumIDS = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.btnSonstAendSpeichern = New VERAG_PROG_ALLGEMEIN.FlatButton() - Me.cboSonst_Rechnungsdruck = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.btnBankspeichern = New VERAG_PROG_ALLGEMEIN.FlatButton() - Me.txtGruendungsDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtHandelsregisterNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtEORINL = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtEORI = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cboUSt_UstIdNrLand = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtUSt_UstIdNrGeprueftAm = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtUSt_UstIdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtUSt_Steuernummer = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cbxLandKz = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn() - 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.tbcntrDetails.SuspendLayout() Me.tbAbfertigung.SuspendLayout() Me.tbcntrAbf.SuspendLayout() @@ -391,6 +398,8 @@ Partial Class usrcntlKundeBearbeitenFull Me.GroupBox6.SuspendLayout() Me.tbFiskal.SuspendLayout() Me.tbVerrechnung.SuspendLayout() + Me.pnlverag360.SuspendLayout() + Me.gbMWSTAntraege.SuspendLayout() Me.tbVersicherung.SuspendLayout() Me.tbUmsatz.SuspendLayout() CType(Me.dgvUmsatzbericht, System.ComponentModel.ISupportInitialize).BeginInit() @@ -479,6 +488,29 @@ Partial Class usrcntlKundeBearbeitenFull Me.cbxVerzolltBeiExport.Text = "Export:" Me.cbxVerzolltBeiExport.UseVisualStyleBackColor = True ' + 'txtAbf_Planzahl + ' + Me.txtAbf_Planzahl._DateTimeOnly = False + Me.txtAbf_Planzahl._numbersOnly = False + Me.txtAbf_Planzahl._numbersOnlyKommastellen = "" + Me.txtAbf_Planzahl._numbersOnlyTrennzeichen = True + Me.txtAbf_Planzahl._Prozent = False + Me.txtAbf_Planzahl._ShortDateNew = False + Me.txtAbf_Planzahl._ShortDateOnly = False + Me.txtAbf_Planzahl._TimeOnly = False + Me.txtAbf_Planzahl._TimeOnly_Seconds = False + Me.txtAbf_Planzahl._value = Nothing + Me.txtAbf_Planzahl._Waehrung = False + Me.txtAbf_Planzahl._WaehrungZeichen = True + Me.txtAbf_Planzahl.ForeColor = System.Drawing.Color.Black + Me.txtAbf_Planzahl.Location = New System.Drawing.Point(526, 248) + Me.txtAbf_Planzahl.MaxLineLength = -1 + Me.txtAbf_Planzahl.MaxLines_Warning = "" + Me.txtAbf_Planzahl.MaxLines_Warning_Label = Nothing + Me.txtAbf_Planzahl.Name = "txtAbf_Planzahl" + Me.txtAbf_Planzahl.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_Planzahl.TabIndex = 15 + ' 'Label42 ' Me.Label42.AutoSize = True @@ -538,6 +570,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) @@ -572,6 +614,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) @@ -608,6 +659,32 @@ Partial Class usrcntlKundeBearbeitenFull Me.TabPage3.Text = "Abfertigungsverbot" Me.TabPage3.UseVisualStyleBackColor = True ' + 'txtAbfVerb_RechtsanwaltSeit + ' + Me.txtAbfVerb_RechtsanwaltSeit._DateTimeOnly = False + Me.txtAbfVerb_RechtsanwaltSeit._numbersOnly = False + Me.txtAbfVerb_RechtsanwaltSeit._numbersOnlyKommastellen = "" + Me.txtAbfVerb_RechtsanwaltSeit._numbersOnlyTrennzeichen = True + Me.txtAbfVerb_RechtsanwaltSeit._Prozent = False + Me.txtAbfVerb_RechtsanwaltSeit._ShortDateNew = True + Me.txtAbfVerb_RechtsanwaltSeit._ShortDateOnly = False + Me.txtAbfVerb_RechtsanwaltSeit._TimeOnly = False + Me.txtAbfVerb_RechtsanwaltSeit._TimeOnly_Seconds = False + Me.txtAbfVerb_RechtsanwaltSeit._value = "" + Me.txtAbfVerb_RechtsanwaltSeit._Waehrung = False + Me.txtAbfVerb_RechtsanwaltSeit._WaehrungZeichen = True + Me.txtAbfVerb_RechtsanwaltSeit.Enabled = False + Me.txtAbfVerb_RechtsanwaltSeit.ForeColor = System.Drawing.Color.Red + Me.txtAbfVerb_RechtsanwaltSeit.Location = New System.Drawing.Point(173, 33) + Me.txtAbfVerb_RechtsanwaltSeit.MaxLength = 10 + Me.txtAbfVerb_RechtsanwaltSeit.MaxLineLength = -1 + Me.txtAbfVerb_RechtsanwaltSeit.MaxLines_Warning = "" + Me.txtAbfVerb_RechtsanwaltSeit.MaxLines_Warning_Label = Nothing + Me.txtAbfVerb_RechtsanwaltSeit.Name = "txtAbfVerb_RechtsanwaltSeit" + Me.txtAbfVerb_RechtsanwaltSeit.Size = New System.Drawing.Size(60, 20) + Me.txtAbfVerb_RechtsanwaltSeit.TabIndex = 6 + Me.txtAbfVerb_RechtsanwaltSeit.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' 'cboAbfVerb_Kreditlimit ' Me.cboAbfVerb_Kreditlimit.AutoSize = True @@ -677,6 +754,32 @@ Partial Class usrcntlKundeBearbeitenFull Me.cboAbfVerb_Abfertigungsverbot.Text = "Abfertigungsverbot" Me.cboAbfVerb_Abfertigungsverbot.UseVisualStyleBackColor = True ' + 'txtAbfVerb_AbfertigungsverbotSeit + ' + Me.txtAbfVerb_AbfertigungsverbotSeit._DateTimeOnly = False + Me.txtAbfVerb_AbfertigungsverbotSeit._numbersOnly = False + Me.txtAbfVerb_AbfertigungsverbotSeit._numbersOnlyKommastellen = "" + Me.txtAbfVerb_AbfertigungsverbotSeit._numbersOnlyTrennzeichen = True + Me.txtAbfVerb_AbfertigungsverbotSeit._Prozent = False + Me.txtAbfVerb_AbfertigungsverbotSeit._ShortDateNew = True + Me.txtAbfVerb_AbfertigungsverbotSeit._ShortDateOnly = True + Me.txtAbfVerb_AbfertigungsverbotSeit._TimeOnly = False + Me.txtAbfVerb_AbfertigungsverbotSeit._TimeOnly_Seconds = False + Me.txtAbfVerb_AbfertigungsverbotSeit._value = "" + Me.txtAbfVerb_AbfertigungsverbotSeit._Waehrung = False + Me.txtAbfVerb_AbfertigungsverbotSeit._WaehrungZeichen = True + Me.txtAbfVerb_AbfertigungsverbotSeit.Enabled = False + Me.txtAbfVerb_AbfertigungsverbotSeit.ForeColor = System.Drawing.Color.Red + Me.txtAbfVerb_AbfertigungsverbotSeit.Location = New System.Drawing.Point(173, 7) + Me.txtAbfVerb_AbfertigungsverbotSeit.MaxLength = 10 + Me.txtAbfVerb_AbfertigungsverbotSeit.MaxLineLength = -1 + Me.txtAbfVerb_AbfertigungsverbotSeit.MaxLines_Warning = "" + Me.txtAbfVerb_AbfertigungsverbotSeit.MaxLines_Warning_Label = Nothing + Me.txtAbfVerb_AbfertigungsverbotSeit.Name = "txtAbfVerb_AbfertigungsverbotSeit" + Me.txtAbfVerb_AbfertigungsverbotSeit.Size = New System.Drawing.Size(60, 20) + Me.txtAbfVerb_AbfertigungsverbotSeit.TabIndex = 2 + Me.txtAbfVerb_AbfertigungsverbotSeit.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' 'tbAufschub ' Me.tbAufschub.Controls.Add(Me.usrCntlAufschubkonten) @@ -688,6 +791,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) @@ -732,6 +843,31 @@ Partial Class usrcntlKundeBearbeitenFull Me.Label38.TabIndex = 2 Me.Label38.Text = "vom:" ' + 'txtAbf_ZollVmVom + ' + Me.txtAbf_ZollVmVom._DateTimeOnly = False + Me.txtAbf_ZollVmVom._numbersOnly = False + Me.txtAbf_ZollVmVom._numbersOnlyKommastellen = "" + Me.txtAbf_ZollVmVom._numbersOnlyTrennzeichen = True + Me.txtAbf_ZollVmVom._Prozent = False + Me.txtAbf_ZollVmVom._ShortDateNew = True + Me.txtAbf_ZollVmVom._ShortDateOnly = False + Me.txtAbf_ZollVmVom._TimeOnly = False + Me.txtAbf_ZollVmVom._TimeOnly_Seconds = False + Me.txtAbf_ZollVmVom._value = "" + Me.txtAbf_ZollVmVom._Waehrung = False + Me.txtAbf_ZollVmVom._WaehrungZeichen = True + Me.txtAbf_ZollVmVom.Enabled = False + Me.txtAbf_ZollVmVom.ForeColor = System.Drawing.Color.Red + Me.txtAbf_ZollVmVom.Location = New System.Drawing.Point(152, 44) + Me.txtAbf_ZollVmVom.MaxLength = 10 + Me.txtAbf_ZollVmVom.MaxLineLength = -1 + Me.txtAbf_ZollVmVom.MaxLines_Warning = "" + Me.txtAbf_ZollVmVom.MaxLines_Warning_Label = Nothing + Me.txtAbf_ZollVmVom.Name = "txtAbf_ZollVmVom" + Me.txtAbf_ZollVmVom.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_ZollVmVom.TabIndex = 3 + ' 'cbxAbf_Ausfuhr ' Me.cbxAbf_Ausfuhr.AutoSize = True @@ -743,6 +879,56 @@ Partial Class usrcntlKundeBearbeitenFull Me.cbxAbf_Ausfuhr.Text = "Ausfuhr" Me.cbxAbf_Ausfuhr.UseVisualStyleBackColor = True ' + 'txtAbf_Euroeinführung + ' + Me.txtAbf_Euroeinführung._DateTimeOnly = False + Me.txtAbf_Euroeinführung._numbersOnly = False + Me.txtAbf_Euroeinführung._numbersOnlyKommastellen = "" + Me.txtAbf_Euroeinführung._numbersOnlyTrennzeichen = True + Me.txtAbf_Euroeinführung._Prozent = False + Me.txtAbf_Euroeinführung._ShortDateNew = True + Me.txtAbf_Euroeinführung._ShortDateOnly = False + Me.txtAbf_Euroeinführung._TimeOnly = False + Me.txtAbf_Euroeinführung._TimeOnly_Seconds = False + Me.txtAbf_Euroeinführung._value = "" + Me.txtAbf_Euroeinführung._Waehrung = False + Me.txtAbf_Euroeinführung._WaehrungZeichen = True + Me.txtAbf_Euroeinführung.ForeColor = System.Drawing.Color.Red + Me.txtAbf_Euroeinführung.Location = New System.Drawing.Point(375, 165) + Me.txtAbf_Euroeinführung.MaxLength = 10 + Me.txtAbf_Euroeinführung.MaxLineLength = -1 + Me.txtAbf_Euroeinführung.MaxLines_Warning = "" + Me.txtAbf_Euroeinführung.MaxLines_Warning_Label = Nothing + Me.txtAbf_Euroeinführung.Name = "txtAbf_Euroeinführung" + Me.txtAbf_Euroeinführung.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_Euroeinführung.TabIndex = 4 + Me.txtAbf_Euroeinführung.Visible = False + ' + 'txtAbf_ErsteAbfertigung + ' + Me.txtAbf_ErsteAbfertigung._DateTimeOnly = False + Me.txtAbf_ErsteAbfertigung._numbersOnly = False + Me.txtAbf_ErsteAbfertigung._numbersOnlyKommastellen = "" + Me.txtAbf_ErsteAbfertigung._numbersOnlyTrennzeichen = True + Me.txtAbf_ErsteAbfertigung._Prozent = False + Me.txtAbf_ErsteAbfertigung._ShortDateNew = True + Me.txtAbf_ErsteAbfertigung._ShortDateOnly = False + Me.txtAbf_ErsteAbfertigung._TimeOnly = False + Me.txtAbf_ErsteAbfertigung._TimeOnly_Seconds = False + Me.txtAbf_ErsteAbfertigung._value = "" + Me.txtAbf_ErsteAbfertigung._Waehrung = False + Me.txtAbf_ErsteAbfertigung._WaehrungZeichen = True + Me.txtAbf_ErsteAbfertigung.ForeColor = System.Drawing.Color.Red + Me.txtAbf_ErsteAbfertigung.Location = New System.Drawing.Point(216, 162) + Me.txtAbf_ErsteAbfertigung.MaxLength = 10 + Me.txtAbf_ErsteAbfertigung.MaxLineLength = -1 + Me.txtAbf_ErsteAbfertigung.MaxLines_Warning = "" + Me.txtAbf_ErsteAbfertigung.MaxLines_Warning_Label = Nothing + Me.txtAbf_ErsteAbfertigung.Name = "txtAbf_ErsteAbfertigung" + Me.txtAbf_ErsteAbfertigung.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_ErsteAbfertigung.TabIndex = 13 + Me.txtAbf_ErsteAbfertigung.Visible = False + ' 'cbxAbf_Fiskal ' Me.cbxAbf_Fiskal.AutoSize = True @@ -918,8 +1104,18 @@ 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.pnlverag360) Me.tbVerrechnung.Controls.Add(Me.cbxKapitalWaehrung) Me.tbVerrechnung.Controls.Add(Me.Label103) Me.tbVerrechnung.Controls.Add(Me.Label101) @@ -976,10 +1172,120 @@ Partial Class usrcntlKundeBearbeitenFull Me.tbVerrechnung.Text = "Verrechnung" Me.tbVerrechnung.UseVisualStyleBackColor = True ' + 'pnlverag360 + ' + Me.pnlverag360.Controls.Add(Me.gbMWSTAntraege) + Me.pnlverag360.Controls.Add(Me.txtVorauszahlung) + Me.pnlverag360.Controls.Add(Me.cbxVorauszahlung) + Me.pnlverag360.Location = New System.Drawing.Point(417, 247) + Me.pnlverag360.Name = "pnlverag360" + Me.pnlverag360.Size = New System.Drawing.Size(252, 117) + Me.pnlverag360.TabIndex = 49 + ' + 'gbMWSTAntraege + ' + Me.gbMWSTAntraege.Controls.Add(Me.rbJ) + Me.gbMWSTAntraege.Controls.Add(Me.rbHJ) + Me.gbMWSTAntraege.Controls.Add(Me.rbQ) + Me.gbMWSTAntraege.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.gbMWSTAntraege.Location = New System.Drawing.Point(4, 6) + Me.gbMWSTAntraege.Name = "gbMWSTAntraege" + Me.gbMWSTAntraege.Size = New System.Drawing.Size(199, 82) + Me.gbMWSTAntraege.TabIndex = 46 + Me.gbMWSTAntraege.TabStop = False + Me.gbMWSTAntraege.Text = "MWST-Anträge" + ' + 'rbJ + ' + Me.rbJ.AutoSize = True + Me.rbJ.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.rbJ.Location = New System.Drawing.Point(6, 62) + Me.rbJ.Name = "rbJ" + Me.rbJ.Size = New System.Drawing.Size(63, 17) + Me.rbJ.TabIndex = 2 + Me.rbJ.Text = "pro Jahr" + Me.rbJ.UseVisualStyleBackColor = True + ' + 'rbHJ + ' + Me.rbHJ.AutoSize = True + Me.rbHJ.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.rbHJ.Location = New System.Drawing.Point(6, 39) + Me.rbHJ.Name = "rbHJ" + Me.rbHJ.Size = New System.Drawing.Size(82, 17) + Me.rbHJ.TabIndex = 1 + Me.rbHJ.Text = "pro Halbjahr" + Me.rbHJ.UseVisualStyleBackColor = True + ' + 'rbQ + ' + Me.rbQ.AutoSize = True + Me.rbQ.Checked = True + Me.rbQ.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.rbQ.Location = New System.Drawing.Point(6, 17) + Me.rbQ.Name = "rbQ" + Me.rbQ.Size = New System.Drawing.Size(77, 17) + Me.rbQ.TabIndex = 0 + Me.rbQ.TabStop = True + Me.rbQ.Text = "pro Quartal" + Me.rbQ.UseVisualStyleBackColor = True + ' + 'txtVorauszahlung + ' + Me.txtVorauszahlung._DateTimeOnly = False + Me.txtVorauszahlung._numbersOnly = False + Me.txtVorauszahlung._numbersOnlyKommastellen = "" + Me.txtVorauszahlung._numbersOnlyTrennzeichen = False + Me.txtVorauszahlung._Prozent = False + Me.txtVorauszahlung._ShortDateNew = False + Me.txtVorauszahlung._ShortDateOnly = False + Me.txtVorauszahlung._TimeOnly = False + Me.txtVorauszahlung._TimeOnly_Seconds = False + Me.txtVorauszahlung._value = "" + Me.txtVorauszahlung._Waehrung = False + Me.txtVorauszahlung._WaehrungZeichen = False + Me.txtVorauszahlung.ForeColor = System.Drawing.Color.Red + Me.txtVorauszahlung.Location = New System.Drawing.Point(106, 92) + Me.txtVorauszahlung.MaxLength = 10 + Me.txtVorauszahlung.MaxLineLength = -1 + Me.txtVorauszahlung.MaxLines_Warning = "" + Me.txtVorauszahlung.MaxLines_Warning_Label = Nothing + Me.txtVorauszahlung.Name = "txtVorauszahlung" + Me.txtVorauszahlung.Size = New System.Drawing.Size(123, 20) + Me.txtVorauszahlung.TabIndex = 48 + Me.txtVorauszahlung.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'cbxVorauszahlung + ' + Me.cbxVorauszahlung.AutoSize = True + Me.cbxVorauszahlung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxVorauszahlung.Location = New System.Drawing.Point(4, 92) + Me.cbxVorauszahlung.Name = "cbxVorauszahlung" + Me.cbxVorauszahlung.Size = New System.Drawing.Size(96, 17) + Me.cbxVorauszahlung.TabIndex = 47 + Me.cbxVorauszahlung.Text = "Vorauszahlung" + Me.cbxVorauszahlung.UseVisualStyleBackColor = True + ' + 'cbxKapitalWaehrung + ' + Me.cbxKapitalWaehrung._allowedValuesFreiText = Nothing + Me.cbxKapitalWaehrung._allowFreiText = False + Me.cbxKapitalWaehrung._value = "" + Me.cbxKapitalWaehrung.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.cbxKapitalWaehrung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cbxKapitalWaehrung.DropDownWidth = 200 + Me.cbxKapitalWaehrung.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cbxKapitalWaehrung.ForeColor = System.Drawing.Color.Black + Me.cbxKapitalWaehrung.FormattingEnabled = True + Me.cbxKapitalWaehrung.Location = New System.Drawing.Point(191, 212) + Me.cbxKapitalWaehrung.Name = "cbxKapitalWaehrung" + Me.cbxKapitalWaehrung.Size = New System.Drawing.Size(47, 21) + Me.cbxKapitalWaehrung.TabIndex = 45 + ' 'Label103 ' Me.Label103.AutoSize = True - Me.Label103.Location = New System.Drawing.Point(12, 296) + Me.Label103.Location = New System.Drawing.Point(12, 215) Me.Label103.Name = "Label103" Me.Label103.Size = New System.Drawing.Size(42, 13) Me.Label103.TabIndex = 43 @@ -1029,7 +1335,7 @@ Partial Class usrcntlKundeBearbeitenFull ' Me.cbxAPITradeshift.AutoSize = True Me.cbxAPITradeshift.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxAPITradeshift.Location = New System.Drawing.Point(417, 382) + Me.cbxAPITradeshift.Location = New System.Drawing.Point(15, 411) Me.cbxAPITradeshift.Name = "cbxAPITradeshift" Me.cbxAPITradeshift.Size = New System.Drawing.Size(157, 17) Me.cbxAPITradeshift.TabIndex = 36 @@ -1040,7 +1346,7 @@ Partial Class usrcntlKundeBearbeitenFull ' Me.Label94.AutoSize = True Me.Label94.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label94.Location = New System.Drawing.Point(414, 358) + Me.Label94.Location = New System.Drawing.Point(12, 387) Me.Label94.Name = "Label94" Me.Label94.Size = New System.Drawing.Size(168, 13) Me.Label94.TabIndex = 35 @@ -1081,29 +1387,29 @@ Partial Class usrcntlKundeBearbeitenFull ' Me.Label36.AutoSize = True Me.Label36.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label36.Location = New System.Drawing.Point(122, 329) + Me.Label36.Location = New System.Drawing.Point(12, 265) Me.Label36.Name = "Label36" - Me.Label36.Size = New System.Drawing.Size(384, 13) + Me.Label36.Size = New System.Drawing.Size(388, 13) Me.Label36.TabIndex = 21 - Me.Label36.Text = "Zum Senden der Depot-Info muss eine E-Mail mit der Art ""Depot"" hinterlegt sein." + Me.Label36.Text = "*Zum Senden der Depot-Info muss eine E-Mail mit der Art ""Depot"" hinterlegt sein." Me.Label36.Visible = False ' 'cbxDepot ' Me.cbxDepot.AutoSize = True Me.cbxDepot.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxDepot.Location = New System.Drawing.Point(15, 329) + Me.cbxDepot.Location = New System.Drawing.Point(15, 246) Me.cbxDepot.Name = "cbxDepot" - Me.cbxDepot.Size = New System.Drawing.Size(100, 17) + Me.cbxDepot.Size = New System.Drawing.Size(105, 17) Me.cbxDepot.TabIndex = 20 - Me.cbxDepot.Text = "Depot-Kunde" + Me.cbxDepot.Text = "Depot-Kunde*" Me.cbxDepot.UseVisualStyleBackColor = True ' 'Label34 ' Me.Label34.AutoSize = True Me.Label34.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label34.Location = New System.Drawing.Point(12, 358) + Me.Label34.Location = New System.Drawing.Point(12, 289) Me.Label34.Name = "Label34" Me.Label34.Size = New System.Drawing.Size(224, 13) Me.Label34.TabIndex = 22 @@ -1113,7 +1419,7 @@ Partial Class usrcntlKundeBearbeitenFull ' Me.Label32.AutoSize = True Me.Label32.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label32.Location = New System.Drawing.Point(12, 430) + Me.Label32.Location = New System.Drawing.Point(12, 361) Me.Label32.Name = "Label32" Me.Label32.Size = New System.Drawing.Size(97, 13) Me.Label32.TabIndex = 27 @@ -1123,7 +1429,7 @@ Partial Class usrcntlKundeBearbeitenFull ' Me.Label30.AutoSize = True Me.Label30.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label30.Location = New System.Drawing.Point(12, 405) + Me.Label30.Location = New System.Drawing.Point(12, 336) Me.Label30.Name = "Label30" Me.Label30.Size = New System.Drawing.Size(53, 13) Me.Label30.TabIndex = 25 @@ -1133,7 +1439,7 @@ Partial Class usrcntlKundeBearbeitenFull ' Me.Label31.AutoSize = True Me.Label31.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label31.Location = New System.Drawing.Point(12, 383) + Me.Label31.Location = New System.Drawing.Point(12, 314) Me.Label31.Name = "Label31" Me.Label31.Size = New System.Drawing.Size(81, 13) Me.Label31.TabIndex = 23 @@ -1170,7 +1476,7 @@ Partial Class usrcntlKundeBearbeitenFull ' Me.cbxAbf_Lastschrift.AutoSize = True Me.cbxAbf_Lastschrift.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxAbf_Lastschrift.Location = New System.Drawing.Point(15, 198) + Me.cbxAbf_Lastschrift.Location = New System.Drawing.Point(15, 186) Me.cbxAbf_Lastschrift.Name = "cbxAbf_Lastschrift" Me.cbxAbf_Lastschrift.Size = New System.Drawing.Size(85, 17) Me.cbxAbf_Lastschrift.TabIndex = 6 @@ -1180,7 +1486,7 @@ Partial Class usrcntlKundeBearbeitenFull 'Label40 ' Me.Label40.AutoSize = True - Me.Label40.Location = New System.Drawing.Point(122, 199) + Me.Label40.Location = New System.Drawing.Point(122, 187) Me.Label40.Name = "Label40" Me.Label40.Size = New System.Drawing.Size(46, 13) Me.Label40.TabIndex = 7 @@ -1267,6 +1573,430 @@ Partial Class usrcntlKundeBearbeitenFull Me.Label39.TabIndex = 3 Me.Label39.Text = "Sammelrechnung:" ' + 'txtKapital + ' + Me.txtKapital._DateTimeOnly = False + Me.txtKapital._numbersOnly = True + Me.txtKapital._numbersOnlyKommastellen = "" + Me.txtKapital._numbersOnlyTrennzeichen = False + Me.txtKapital._Prozent = False + Me.txtKapital._ShortDateNew = False + Me.txtKapital._ShortDateOnly = False + Me.txtKapital._TimeOnly = False + Me.txtKapital._TimeOnly_Seconds = False + Me.txtKapital._value = "" + Me.txtKapital._Waehrung = True + Me.txtKapital._WaehrungZeichen = False + Me.txtKapital.ForeColor = System.Drawing.Color.Red + Me.txtKapital.Location = New System.Drawing.Point(76, 212) + Me.txtKapital.MaxLength = 10 + Me.txtKapital.MaxLineLength = -1 + Me.txtKapital.MaxLines_Warning = "" + Me.txtKapital.MaxLines_Warning_Label = Nothing + Me.txtKapital.Name = "txtKapital" + Me.txtKapital.Size = New System.Drawing.Size(109, 20) + Me.txtKapital.TabIndex = 44 + Me.txtKapital.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'txtAbwZZVL + ' + Me.txtAbwZZVL._DateTimeOnly = False + Me.txtAbwZZVL._numbersOnly = True + Me.txtAbwZZVL._numbersOnlyKommastellen = "" + Me.txtAbwZZVL._numbersOnlyTrennzeichen = True + Me.txtAbwZZVL._Prozent = False + Me.txtAbwZZVL._ShortDateNew = False + Me.txtAbwZZVL._ShortDateOnly = False + Me.txtAbwZZVL._TimeOnly = False + Me.txtAbwZZVL._TimeOnly_Seconds = False + Me.txtAbwZZVL._value = "" + Me.txtAbwZZVL._Waehrung = False + Me.txtAbwZZVL._WaehrungZeichen = True + Me.txtAbwZZVL.ForeColor = System.Drawing.Color.Red + Me.txtAbwZZVL.Location = New System.Drawing.Point(191, 66) + Me.txtAbwZZVL.MaxLength = 10 + Me.txtAbwZZVL.MaxLineLength = -1 + Me.txtAbwZZVL.MaxLines_Warning = "" + Me.txtAbwZZVL.MaxLines_Warning_Label = Nothing + Me.txtAbwZZVL.Name = "txtAbwZZVL" + Me.txtAbwZZVL.Size = New System.Drawing.Size(60, 20) + Me.txtAbwZZVL.TabIndex = 41 + Me.txtAbwZZVL.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'cboRechnungSprache + ' + Me.cboRechnungSprache._allowedValuesFreiText = Nothing + Me.cboRechnungSprache._allowFreiText = False + Me.cboRechnungSprache._value = "" + Me.cboRechnungSprache.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.cboRechnungSprache.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboRechnungSprache.DropDownWidth = 200 + Me.cboRechnungSprache.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboRechnungSprache.ForeColor = System.Drawing.Color.Black + Me.cboRechnungSprache.FormattingEnabled = True + Me.cboRechnungSprache.Location = New System.Drawing.Point(527, 132) + Me.cboRechnungSprache.Name = "cboRechnungSprache" + Me.cboRechnungSprache.Size = New System.Drawing.Size(73, 21) + Me.cboRechnungSprache.TabIndex = 39 + ' + 'txtDebKdNr + ' + Me.txtDebKdNr._DateTimeOnly = False + Me.txtDebKdNr._numbersOnly = True + Me.txtDebKdNr._numbersOnlyKommastellen = "" + Me.txtDebKdNr._numbersOnlyTrennzeichen = True + Me.txtDebKdNr._Prozent = False + Me.txtDebKdNr._ShortDateNew = False + Me.txtDebKdNr._ShortDateOnly = False + Me.txtDebKdNr._TimeOnly = False + Me.txtDebKdNr._TimeOnly_Seconds = False + Me.txtDebKdNr._value = "" + Me.txtDebKdNr._Waehrung = False + Me.txtDebKdNr._WaehrungZeichen = False + Me.txtDebKdNr.ForeColor = System.Drawing.Color.Red + Me.txtDebKdNr.Location = New System.Drawing.Point(125, 20) + Me.txtDebKdNr.MaxLength = 10 + Me.txtDebKdNr.MaxLineLength = -1 + Me.txtDebKdNr.MaxLines_Warning = "" + Me.txtDebKdNr.MaxLines_Warning_Label = Nothing + Me.txtDebKdNr.Name = "txtDebKdNr" + Me.txtDebKdNr.Size = New System.Drawing.Size(86, 20) + Me.txtDebKdNr.TabIndex = 33 + Me.txtDebKdNr.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'txtAbf_Zahlungsziel3 + ' + Me.txtAbf_Zahlungsziel3._DateTimeOnly = False + Me.txtAbf_Zahlungsziel3._numbersOnly = True + Me.txtAbf_Zahlungsziel3._numbersOnlyKommastellen = "" + Me.txtAbf_Zahlungsziel3._numbersOnlyTrennzeichen = True + Me.txtAbf_Zahlungsziel3._Prozent = False + Me.txtAbf_Zahlungsziel3._ShortDateNew = False + Me.txtAbf_Zahlungsziel3._ShortDateOnly = False + Me.txtAbf_Zahlungsziel3._TimeOnly = False + Me.txtAbf_Zahlungsziel3._TimeOnly_Seconds = False + Me.txtAbf_Zahlungsziel3._value = "" + Me.txtAbf_Zahlungsziel3._Waehrung = False + Me.txtAbf_Zahlungsziel3._WaehrungZeichen = True + Me.txtAbf_Zahlungsziel3.ForeColor = System.Drawing.Color.Red + Me.txtAbf_Zahlungsziel3.Location = New System.Drawing.Point(257, 159) + Me.txtAbf_Zahlungsziel3.MaxLength = 10 + Me.txtAbf_Zahlungsziel3.MaxLineLength = -1 + Me.txtAbf_Zahlungsziel3.MaxLines_Warning = "" + Me.txtAbf_Zahlungsziel3.MaxLines_Warning_Label = Nothing + Me.txtAbf_Zahlungsziel3.Name = "txtAbf_Zahlungsziel3" + Me.txtAbf_Zahlungsziel3.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_Zahlungsziel3.TabIndex = 30 + Me.txtAbf_Zahlungsziel3.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'txtAbf_Zahlungsziel2 + ' + Me.txtAbf_Zahlungsziel2._DateTimeOnly = False + Me.txtAbf_Zahlungsziel2._numbersOnly = True + Me.txtAbf_Zahlungsziel2._numbersOnlyKommastellen = "" + Me.txtAbf_Zahlungsziel2._numbersOnlyTrennzeichen = True + Me.txtAbf_Zahlungsziel2._Prozent = False + Me.txtAbf_Zahlungsziel2._ShortDateNew = False + Me.txtAbf_Zahlungsziel2._ShortDateOnly = False + Me.txtAbf_Zahlungsziel2._TimeOnly = False + Me.txtAbf_Zahlungsziel2._TimeOnly_Seconds = False + Me.txtAbf_Zahlungsziel2._value = "" + Me.txtAbf_Zahlungsziel2._Waehrung = False + Me.txtAbf_Zahlungsziel2._WaehrungZeichen = True + Me.txtAbf_Zahlungsziel2.ForeColor = System.Drawing.Color.Red + Me.txtAbf_Zahlungsziel2.Location = New System.Drawing.Point(191, 159) + Me.txtAbf_Zahlungsziel2.MaxLength = 10 + Me.txtAbf_Zahlungsziel2.MaxLineLength = -1 + Me.txtAbf_Zahlungsziel2.MaxLines_Warning = "" + Me.txtAbf_Zahlungsziel2.MaxLines_Warning_Label = Nothing + Me.txtAbf_Zahlungsziel2.Name = "txtAbf_Zahlungsziel2" + Me.txtAbf_Zahlungsziel2.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_Zahlungsziel2.TabIndex = 29 + Me.txtAbf_Zahlungsziel2.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'txtAbf_LastschriftBis + ' + Me.txtAbf_LastschriftBis._DateTimeOnly = False + Me.txtAbf_LastschriftBis._numbersOnly = False + Me.txtAbf_LastschriftBis._numbersOnlyKommastellen = "" + Me.txtAbf_LastschriftBis._numbersOnlyTrennzeichen = True + Me.txtAbf_LastschriftBis._Prozent = False + Me.txtAbf_LastschriftBis._ShortDateNew = True + Me.txtAbf_LastschriftBis._ShortDateOnly = False + Me.txtAbf_LastschriftBis._TimeOnly = False + Me.txtAbf_LastschriftBis._TimeOnly_Seconds = False + Me.txtAbf_LastschriftBis._value = "" + Me.txtAbf_LastschriftBis._Waehrung = False + Me.txtAbf_LastschriftBis._WaehrungZeichen = True + Me.txtAbf_LastschriftBis.Enabled = False + Me.txtAbf_LastschriftBis.ForeColor = System.Drawing.Color.Red + Me.txtAbf_LastschriftBis.Location = New System.Drawing.Point(257, 184) + Me.txtAbf_LastschriftBis.MaxLength = 10 + Me.txtAbf_LastschriftBis.MaxLineLength = -1 + Me.txtAbf_LastschriftBis.MaxLines_Warning = "" + Me.txtAbf_LastschriftBis.MaxLines_Warning_Label = Nothing + Me.txtAbf_LastschriftBis.Name = "txtAbf_LastschriftBis" + Me.txtAbf_LastschriftBis.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_LastschriftBis.TabIndex = 9 + ' + 'txtAbf_LastschriftVon + ' + Me.txtAbf_LastschriftVon._DateTimeOnly = False + Me.txtAbf_LastschriftVon._numbersOnly = False + Me.txtAbf_LastschriftVon._numbersOnlyKommastellen = "" + Me.txtAbf_LastschriftVon._numbersOnlyTrennzeichen = True + Me.txtAbf_LastschriftVon._Prozent = False + Me.txtAbf_LastschriftVon._ShortDateNew = True + Me.txtAbf_LastschriftVon._ShortDateOnly = False + Me.txtAbf_LastschriftVon._TimeOnly = False + Me.txtAbf_LastschriftVon._TimeOnly_Seconds = False + Me.txtAbf_LastschriftVon._value = "" + Me.txtAbf_LastschriftVon._Waehrung = False + Me.txtAbf_LastschriftVon._WaehrungZeichen = True + Me.txtAbf_LastschriftVon.Enabled = False + Me.txtAbf_LastschriftVon.ForeColor = System.Drawing.Color.Red + Me.txtAbf_LastschriftVon.Location = New System.Drawing.Point(191, 184) + Me.txtAbf_LastschriftVon.MaxLength = 10 + Me.txtAbf_LastschriftVon.MaxLineLength = -1 + Me.txtAbf_LastschriftVon.MaxLines_Warning = "" + Me.txtAbf_LastschriftVon.MaxLines_Warning_Label = Nothing + Me.txtAbf_LastschriftVon.Name = "txtAbf_LastschriftVon" + Me.txtAbf_LastschriftVon.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_LastschriftVon.TabIndex = 8 + ' + 'txtProvAuftraggeber + ' + Me.txtProvAuftraggeber._DateTimeOnly = False + Me.txtProvAuftraggeber._numbersOnly = False + Me.txtProvAuftraggeber._numbersOnlyKommastellen = "" + Me.txtProvAuftraggeber._numbersOnlyTrennzeichen = True + Me.txtProvAuftraggeber._Prozent = True + Me.txtProvAuftraggeber._ShortDateNew = False + Me.txtProvAuftraggeber._ShortDateOnly = False + Me.txtProvAuftraggeber._TimeOnly = False + Me.txtProvAuftraggeber._TimeOnly_Seconds = False + Me.txtProvAuftraggeber._value = "0" + Me.txtProvAuftraggeber._Waehrung = False + Me.txtProvAuftraggeber._WaehrungZeichen = True + Me.txtProvAuftraggeber.ForeColor = System.Drawing.Color.Black + Me.txtProvAuftraggeber.Location = New System.Drawing.Point(125, 358) + Me.txtProvAuftraggeber.MaxLineLength = -1 + Me.txtProvAuftraggeber.MaxLines_Warning = "" + Me.txtProvAuftraggeber.MaxLines_Warning_Label = Nothing + Me.txtProvAuftraggeber.Name = "txtProvAuftraggeber" + Me.txtProvAuftraggeber.Size = New System.Drawing.Size(60, 20) + Me.txtProvAuftraggeber.TabIndex = 28 + Me.txtProvAuftraggeber.Text = "0,00 %" + Me.txtProvAuftraggeber.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'cboProvisionStaffel + ' + Me.cboProvisionStaffel._allowedValuesFreiText = Nothing + Me.cboProvisionStaffel._allowFreiText = False + Me.cboProvisionStaffel._value = "" + Me.cboProvisionStaffel.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.cboProvisionStaffel.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboProvisionStaffel.DropDownWidth = 200 + Me.cboProvisionStaffel.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboProvisionStaffel.ForeColor = System.Drawing.Color.Black + Me.cboProvisionStaffel.FormattingEnabled = True + Me.cboProvisionStaffel.Location = New System.Drawing.Point(125, 333) + Me.cboProvisionStaffel.Name = "cboProvisionStaffel" + Me.cboProvisionStaffel.Size = New System.Drawing.Size(145, 21) + Me.cboProvisionStaffel.TabIndex = 26 + ' + 'cboProvisionStaffelArt + ' + Me.cboProvisionStaffelArt._allowedValuesFreiText = Nothing + Me.cboProvisionStaffelArt._allowFreiText = False + Me.cboProvisionStaffelArt._value = "" + Me.cboProvisionStaffelArt.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.cboProvisionStaffelArt.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboProvisionStaffelArt.DropDownWidth = 400 + Me.cboProvisionStaffelArt.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboProvisionStaffelArt.ForeColor = System.Drawing.Color.Black + Me.cboProvisionStaffelArt.FormattingEnabled = True + Me.cboProvisionStaffelArt.Location = New System.Drawing.Point(125, 311) + Me.cboProvisionStaffelArt.Name = "cboProvisionStaffelArt" + Me.cboProvisionStaffelArt.Size = New System.Drawing.Size(146, 21) + Me.cboProvisionStaffelArt.TabIndex = 24 + ' + 'cboAbf_Waehrung + ' + Me.cboAbf_Waehrung._allowedValuesFreiText = Nothing + Me.cboAbf_Waehrung._allowFreiText = False + Me.cboAbf_Waehrung._value = "" + Me.cboAbf_Waehrung.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.cboAbf_Waehrung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboAbf_Waehrung.DropDownWidth = 200 + Me.cboAbf_Waehrung.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboAbf_Waehrung.ForeColor = System.Drawing.Color.Black + Me.cboAbf_Waehrung.FormattingEnabled = True + Me.cboAbf_Waehrung.Location = New System.Drawing.Point(527, 110) + Me.cboAbf_Waehrung.Name = "cboAbf_Waehrung" + Me.cboAbf_Waehrung.Size = New System.Drawing.Size(47, 21) + Me.cboAbf_Waehrung.TabIndex = 14 + ' + 'cboAbf_Steuerschluessel + ' + Me.cboAbf_Steuerschluessel._allowedValuesFreiText = Nothing + Me.cboAbf_Steuerschluessel._allowFreiText = False + Me.cboAbf_Steuerschluessel._value = "" + Me.cboAbf_Steuerschluessel.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.cboAbf_Steuerschluessel.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboAbf_Steuerschluessel.DropDownWidth = 400 + Me.cboAbf_Steuerschluessel.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboAbf_Steuerschluessel.ForeColor = System.Drawing.Color.Black + Me.cboAbf_Steuerschluessel.FormattingEnabled = True + Me.cboAbf_Steuerschluessel.Location = New System.Drawing.Point(527, 88) + Me.cboAbf_Steuerschluessel.Name = "cboAbf_Steuerschluessel" + Me.cboAbf_Steuerschluessel.Size = New System.Drawing.Size(105, 21) + Me.cboAbf_Steuerschluessel.TabIndex = 9 + ' + 'cboAbf_Sammelrechnung + ' + Me.cboAbf_Sammelrechnung._allowedValuesFreiText = Nothing + Me.cboAbf_Sammelrechnung._allowFreiText = False + Me.cboAbf_Sammelrechnung._value = "" + Me.cboAbf_Sammelrechnung.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.cboAbf_Sammelrechnung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboAbf_Sammelrechnung.DropDownWidth = 200 + Me.cboAbf_Sammelrechnung.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboAbf_Sammelrechnung.ForeColor = System.Drawing.Color.Black + Me.cboAbf_Sammelrechnung.FormattingEnabled = True + Me.cboAbf_Sammelrechnung.Location = New System.Drawing.Point(527, 66) + Me.cboAbf_Sammelrechnung.Name = "cboAbf_Sammelrechnung" + Me.cboAbf_Sammelrechnung.Size = New System.Drawing.Size(105, 21) + Me.cboAbf_Sammelrechnung.TabIndex = 4 + ' + 'txtAbf_BankspesenMindestbetrag + ' + Me.txtAbf_BankspesenMindestbetrag._DateTimeOnly = False + Me.txtAbf_BankspesenMindestbetrag._numbersOnly = False + Me.txtAbf_BankspesenMindestbetrag._numbersOnlyKommastellen = "" + Me.txtAbf_BankspesenMindestbetrag._numbersOnlyTrennzeichen = True + Me.txtAbf_BankspesenMindestbetrag._Prozent = False + Me.txtAbf_BankspesenMindestbetrag._ShortDateNew = False + Me.txtAbf_BankspesenMindestbetrag._ShortDateOnly = False + Me.txtAbf_BankspesenMindestbetrag._TimeOnly = False + Me.txtAbf_BankspesenMindestbetrag._TimeOnly_Seconds = False + Me.txtAbf_BankspesenMindestbetrag._value = "" + Me.txtAbf_BankspesenMindestbetrag._Waehrung = True + Me.txtAbf_BankspesenMindestbetrag._WaehrungZeichen = True + Me.txtAbf_BankspesenMindestbetrag.ForeColor = System.Drawing.Color.Red + Me.txtAbf_BankspesenMindestbetrag.Location = New System.Drawing.Point(125, 132) + Me.txtAbf_BankspesenMindestbetrag.MaxLength = 50 + Me.txtAbf_BankspesenMindestbetrag.MaxLineLength = -1 + Me.txtAbf_BankspesenMindestbetrag.MaxLines_Warning = "" + Me.txtAbf_BankspesenMindestbetrag.MaxLines_Warning_Label = Nothing + Me.txtAbf_BankspesenMindestbetrag.Name = "txtAbf_BankspesenMindestbetrag" + Me.txtAbf_BankspesenMindestbetrag.Size = New System.Drawing.Size(86, 20) + Me.txtAbf_BankspesenMindestbetrag.TabIndex = 16 + Me.txtAbf_BankspesenMindestbetrag.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'txtAbf_Bankspesen + ' + Me.txtAbf_Bankspesen._DateTimeOnly = False + Me.txtAbf_Bankspesen._numbersOnly = False + Me.txtAbf_Bankspesen._numbersOnlyKommastellen = "" + Me.txtAbf_Bankspesen._numbersOnlyTrennzeichen = True + Me.txtAbf_Bankspesen._Prozent = True + Me.txtAbf_Bankspesen._ShortDateNew = False + Me.txtAbf_Bankspesen._ShortDateOnly = False + Me.txtAbf_Bankspesen._TimeOnly = False + Me.txtAbf_Bankspesen._TimeOnly_Seconds = False + Me.txtAbf_Bankspesen._value = Nothing + Me.txtAbf_Bankspesen._Waehrung = False + Me.txtAbf_Bankspesen._WaehrungZeichen = True + Me.txtAbf_Bankspesen.ForeColor = System.Drawing.Color.Black + Me.txtAbf_Bankspesen.Location = New System.Drawing.Point(125, 110) + Me.txtAbf_Bankspesen.MaxLength = 10 + Me.txtAbf_Bankspesen.MaxLineLength = -1 + Me.txtAbf_Bankspesen.MaxLines_Warning = "" + Me.txtAbf_Bankspesen.MaxLines_Warning_Label = Nothing + Me.txtAbf_Bankspesen.Name = "txtAbf_Bankspesen" + Me.txtAbf_Bankspesen.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_Bankspesen.TabIndex = 11 + Me.txtAbf_Bankspesen.Text = "0,00 %" + Me.txtAbf_Bankspesen.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'txtAbf_Kreditaufwendungen + ' + Me.txtAbf_Kreditaufwendungen._DateTimeOnly = False + Me.txtAbf_Kreditaufwendungen._numbersOnly = False + Me.txtAbf_Kreditaufwendungen._numbersOnlyKommastellen = "" + Me.txtAbf_Kreditaufwendungen._numbersOnlyTrennzeichen = True + Me.txtAbf_Kreditaufwendungen._Prozent = True + Me.txtAbf_Kreditaufwendungen._ShortDateNew = False + Me.txtAbf_Kreditaufwendungen._ShortDateOnly = False + Me.txtAbf_Kreditaufwendungen._TimeOnly = False + Me.txtAbf_Kreditaufwendungen._TimeOnly_Seconds = False + Me.txtAbf_Kreditaufwendungen._value = Nothing + Me.txtAbf_Kreditaufwendungen._Waehrung = False + Me.txtAbf_Kreditaufwendungen._WaehrungZeichen = True + Me.txtAbf_Kreditaufwendungen.ForeColor = System.Drawing.Color.Black + Me.txtAbf_Kreditaufwendungen.Location = New System.Drawing.Point(125, 88) + Me.txtAbf_Kreditaufwendungen.MaxLength = 10 + Me.txtAbf_Kreditaufwendungen.MaxLineLength = -1 + Me.txtAbf_Kreditaufwendungen.MaxLines_Warning = "" + Me.txtAbf_Kreditaufwendungen.MaxLines_Warning_Label = Nothing + Me.txtAbf_Kreditaufwendungen.Name = "txtAbf_Kreditaufwendungen" + Me.txtAbf_Kreditaufwendungen.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_Kreditaufwendungen.TabIndex = 6 + Me.txtAbf_Kreditaufwendungen.Text = "0,00 %" + Me.txtAbf_Kreditaufwendungen.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'txtAbf_Vorlageprovision + ' + Me.txtAbf_Vorlageprovision._DateTimeOnly = False + Me.txtAbf_Vorlageprovision._numbersOnly = False + Me.txtAbf_Vorlageprovision._numbersOnlyKommastellen = "" + Me.txtAbf_Vorlageprovision._numbersOnlyTrennzeichen = True + Me.txtAbf_Vorlageprovision._Prozent = True + Me.txtAbf_Vorlageprovision._ShortDateNew = False + Me.txtAbf_Vorlageprovision._ShortDateOnly = False + Me.txtAbf_Vorlageprovision._TimeOnly = False + Me.txtAbf_Vorlageprovision._TimeOnly_Seconds = False + Me.txtAbf_Vorlageprovision._value = "0" + Me.txtAbf_Vorlageprovision._Waehrung = False + Me.txtAbf_Vorlageprovision._WaehrungZeichen = True + Me.txtAbf_Vorlageprovision.ForeColor = System.Drawing.Color.Black + Me.txtAbf_Vorlageprovision.Location = New System.Drawing.Point(125, 66) + Me.txtAbf_Vorlageprovision.MaxLength = 10 + Me.txtAbf_Vorlageprovision.MaxLineLength = -1 + Me.txtAbf_Vorlageprovision.MaxLines_Warning = "" + Me.txtAbf_Vorlageprovision.MaxLines_Warning_Label = Nothing + Me.txtAbf_Vorlageprovision.Name = "txtAbf_Vorlageprovision" + Me.txtAbf_Vorlageprovision.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_Vorlageprovision.TabIndex = 1 + Me.txtAbf_Vorlageprovision.Text = "0,00 %" + Me.txtAbf_Vorlageprovision.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'txtAbf_Zahlungsziel + ' + Me.txtAbf_Zahlungsziel._DateTimeOnly = False + Me.txtAbf_Zahlungsziel._numbersOnly = True + Me.txtAbf_Zahlungsziel._numbersOnlyKommastellen = "" + Me.txtAbf_Zahlungsziel._numbersOnlyTrennzeichen = True + Me.txtAbf_Zahlungsziel._Prozent = False + Me.txtAbf_Zahlungsziel._ShortDateNew = False + Me.txtAbf_Zahlungsziel._ShortDateOnly = False + Me.txtAbf_Zahlungsziel._TimeOnly = False + Me.txtAbf_Zahlungsziel._TimeOnly_Seconds = False + Me.txtAbf_Zahlungsziel._value = "" + Me.txtAbf_Zahlungsziel._Waehrung = False + Me.txtAbf_Zahlungsziel._WaehrungZeichen = True + Me.txtAbf_Zahlungsziel.ForeColor = System.Drawing.Color.Red + Me.txtAbf_Zahlungsziel.Location = New System.Drawing.Point(125, 159) + Me.txtAbf_Zahlungsziel.MaxLength = 10 + Me.txtAbf_Zahlungsziel.MaxLineLength = -1 + Me.txtAbf_Zahlungsziel.MaxLines_Warning = "" + Me.txtAbf_Zahlungsziel.MaxLines_Warning_Label = Nothing + Me.txtAbf_Zahlungsziel.Name = "txtAbf_Zahlungsziel" + Me.txtAbf_Zahlungsziel.Size = New System.Drawing.Size(60, 20) + Me.txtAbf_Zahlungsziel.TabIndex = 18 + Me.txtAbf_Zahlungsziel.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' 'tbVersicherung ' Me.tbVersicherung.Controls.Add(Me.cbxBlanko) @@ -1635,2383 +2365,6 @@ Partial Class usrcntlKundeBearbeitenFull Me.Label51.TabIndex = 0 Me.Label51.Text = "Polizzennummer ACREDIA" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & ":" ' - 'tbUmsatz - ' - Me.tbUmsatz.Controls.Add(Me.Label65) - Me.tbUmsatz.Controls.Add(Me.dgvUmsatzbericht) - Me.tbUmsatz.Location = New System.Drawing.Point(4, 22) - Me.tbUmsatz.Name = "tbUmsatz" - Me.tbUmsatz.Padding = New System.Windows.Forms.Padding(3) - Me.tbUmsatz.Size = New System.Drawing.Size(672, 495) - Me.tbUmsatz.TabIndex = 3 - Me.tbUmsatz.Text = "Umsatz" - Me.tbUmsatz.UseVisualStyleBackColor = True - ' - 'Label65 - ' - Me.Label65.AutoSize = True - Me.Label65.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label65.Location = New System.Drawing.Point(6, 9) - Me.Label65.Name = "Label65" - Me.Label65.Size = New System.Drawing.Size(77, 13) - Me.Label65.TabIndex = 0 - Me.Label65.Text = "Umsatzbericht:" - ' - 'dgvUmsatzbericht - ' - Me.dgvUmsatzbericht.AllowUserToAddRows = False - 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 - Me.dgvUmsatzbericht.BackgroundColor = System.Drawing.Color.White - Me.dgvUmsatzbericht.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize - Me.dgvUmsatzbericht.Location = New System.Drawing.Point(6, 25) - Me.dgvUmsatzbericht.Name = "dgvUmsatzbericht" - Me.dgvUmsatzbericht.ReadOnly = True - Me.dgvUmsatzbericht.RowHeadersVisible = False - Me.dgvUmsatzbericht.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvUmsatzbericht.Size = New System.Drawing.Size(660, 427) - Me.dgvUmsatzbericht.TabIndex = 1 - ' - 'tbOP - ' - Me.tbOP.Controls.Add(Me.txtHoechstkredit) - Me.tbOP.Controls.Add(Me.Label69) - Me.tbOP.Controls.Add(Me.lblbon) - Me.tbOP.Controls.Add(Me.Label67) - Me.tbOP.Controls.Add(Me.Label66) - Me.tbOP.Controls.Add(Me.dgvOffenePosten) - Me.tbOP.Controls.Add(Me.txtBonitaetsDatum) - Me.tbOP.Controls.Add(Me.txtBonitaet) - Me.tbOP.Location = New System.Drawing.Point(4, 22) - Me.tbOP.Name = "tbOP" - Me.tbOP.Padding = New System.Windows.Forms.Padding(3) - Me.tbOP.Size = New System.Drawing.Size(672, 495) - Me.tbOP.TabIndex = 4 - Me.tbOP.Text = "Offene Posten" - Me.tbOP.UseVisualStyleBackColor = True - ' - 'Label69 - ' - Me.Label69.AutoSize = True - Me.Label69.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label69.Location = New System.Drawing.Point(514, 9) - Me.Label69.Name = "Label69" - Me.Label69.Size = New System.Drawing.Size(70, 13) - Me.Label69.TabIndex = 4 - Me.Label69.Text = "Höchstkredit:" - ' - 'lblbon - ' - Me.lblbon.AutoSize = True - Me.lblbon.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblbon.Location = New System.Drawing.Point(339, 9) - Me.lblbon.Name = "lblbon" - Me.lblbon.Size = New System.Drawing.Size(77, 13) - Me.lblbon.TabIndex = 2 - Me.lblbon.Text = "Bonitätsdatum:" - ' - 'Label67 - ' - Me.Label67.AutoSize = True - Me.Label67.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label67.Location = New System.Drawing.Point(225, 9) - Me.Label67.Name = "Label67" - Me.Label67.Size = New System.Drawing.Size(43, 13) - Me.Label67.TabIndex = 0 - Me.Label67.Text = "Bonität:" - ' - 'Label66 - ' - Me.Label66.AutoSize = True - Me.Label66.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label66.Location = New System.Drawing.Point(3, 19) - Me.Label66.Name = "Label66" - Me.Label66.Size = New System.Drawing.Size(160, 13) - Me.Label66.TabIndex = 6 - Me.Label66.Text = "Debitorenkonto - Offene Posten:" - ' - 'dgvOffenePosten - ' - Me.dgvOffenePosten.AllowUserToAddRows = False - 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 - Me.dgvOffenePosten.BackgroundColor = System.Drawing.Color.White - Me.dgvOffenePosten.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize - Me.dgvOffenePosten.Location = New System.Drawing.Point(6, 38) - Me.dgvOffenePosten.Name = "dgvOffenePosten" - Me.dgvOffenePosten.ReadOnly = True - Me.dgvOffenePosten.RowHeadersVisible = False - Me.dgvOffenePosten.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvOffenePosten.Size = New System.Drawing.Size(660, 414) - Me.dgvOffenePosten.TabIndex = 7 - ' - 'tbBank - ' - Me.tbBank.Controls.Add(Me.Label21) - Me.tbBank.Controls.Add(Me.GroupBox4) - Me.tbBank.Controls.Add(Me.txtBank_Kto) - Me.tbBank.Controls.Add(Me.Label22) - Me.tbBank.Controls.Add(Me.txtBank_Blz) - Me.tbBank.Location = New System.Drawing.Point(4, 22) - Me.tbBank.Name = "tbBank" - Me.tbBank.Padding = New System.Windows.Forms.Padding(3) - Me.tbBank.Size = New System.Drawing.Size(672, 495) - Me.tbBank.TabIndex = 5 - Me.tbBank.Text = "Bankverb./Kreditkarten" - Me.tbBank.UseVisualStyleBackColor = True - ' - 'Label21 - ' - Me.Label21.AutoSize = True - Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label21.Location = New System.Drawing.Point(6, 34) - Me.Label21.Name = "Label21" - Me.Label21.Size = New System.Drawing.Size(24, 13) - Me.Label21.TabIndex = 2 - Me.Label21.Text = "BIC" - ' - 'GroupBox4 - ' - Me.GroupBox4.Controls.Add(Me.Button10) - Me.GroupBox4.Controls.Add(Me.Button9) - Me.GroupBox4.Controls.Add(Me.bntGOBOXUmstellung) - Me.GroupBox4.Controls.Add(Me.btnKKhinzufuegen) - Me.GroupBox4.Controls.Add(Me.dgvKreditkarten) - Me.GroupBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.GroupBox4.Location = New System.Drawing.Point(9, 69) - Me.GroupBox4.Name = "GroupBox4" - Me.GroupBox4.Size = New System.Drawing.Size(657, 383) - Me.GroupBox4.TabIndex = 4 - Me.GroupBox4.TabStop = False - Me.GroupBox4.Text = "Kreditkarten" - ' - 'Button10 - ' - Me.Button10.Enabled = False - Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Button10.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button10.Location = New System.Drawing.Point(488, 338) - Me.Button10.Name = "Button10" - Me.Button10.Size = New System.Drawing.Size(163, 38) - Me.Button10.TabIndex = 4 - Me.Button10.Text = "Lohnrechner starten" - Me.Button10.UseVisualStyleBackColor = True - ' - 'Button9 - ' - Me.Button9.Enabled = False - Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button9.Location = New System.Drawing.Point(351, 338) - Me.Button9.Name = "Button9" - Me.Button9.Size = New System.Drawing.Size(131, 38) - Me.Button9.TabIndex = 3 - Me.Button9.Text = "Contract List" - Me.Button9.UseVisualStyleBackColor = True - ' - 'bntGOBOXUmstellung - ' - Me.bntGOBOXUmstellung.Enabled = False - Me.bntGOBOXUmstellung.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.bntGOBOXUmstellung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.bntGOBOXUmstellung.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.bntGOBOXUmstellung.Location = New System.Drawing.Point(193, 338) - Me.bntGOBOXUmstellung.Name = "bntGOBOXUmstellung" - Me.bntGOBOXUmstellung.Size = New System.Drawing.Size(152, 38) - Me.bntGOBOXUmstellung.TabIndex = 2 - Me.bntGOBOXUmstellung.Text = "GO-BOX-Umstellung" - Me.bntGOBOXUmstellung.UseVisualStyleBackColor = True - ' - 'btnKKhinzufuegen - ' - Me.btnKKhinzufuegen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.btnKKhinzufuegen.Enabled = False - Me.btnKKhinzufuegen.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnKKhinzufuegen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.btnKKhinzufuegen.Image = Global.SDL.My.Resources.Resources.plus - Me.btnKKhinzufuegen.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnKKhinzufuegen.Location = New System.Drawing.Point(9, 338) - Me.btnKKhinzufuegen.Name = "btnKKhinzufuegen" - Me.btnKKhinzufuegen.Size = New System.Drawing.Size(178, 38) - Me.btnKKhinzufuegen.TabIndex = 1 - Me.btnKKhinzufuegen.Text = "Kreditkarte hinzufügen" - Me.btnKKhinzufuegen.TextAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnKKhinzufuegen.UseVisualStyleBackColor = True - ' - 'dgvKreditkarten - ' - Me.dgvKreditkarten.AllowUserToAddRows = False - 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 - 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 - 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 - 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 - 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 - 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) - Me.dgvKreditkarten.TabIndex = 0 - ' - 'txtBank_Kto - ' - Me.txtBank_Kto.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtBank_Kto.Location = New System.Drawing.Point(100, 6) - Me.txtBank_Kto.MaxLength = 8 - Me.txtBank_Kto.Name = "txtBank_Kto" - Me.txtBank_Kto.Size = New System.Drawing.Size(270, 20) - Me.txtBank_Kto.TabIndex = 3 - ' - 'Label22 - ' - Me.Label22.AutoSize = True - Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label22.Location = New System.Drawing.Point(6, 9) - Me.Label22.Name = "Label22" - Me.Label22.Size = New System.Drawing.Size(32, 13) - Me.Label22.TabIndex = 0 - Me.Label22.Text = "IBAN" - ' - 'txtBank_Blz - ' - Me.txtBank_Blz.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtBank_Blz.Location = New System.Drawing.Point(100, 31) - Me.txtBank_Blz.MaxLength = 12 - Me.txtBank_Blz.Name = "txtBank_Blz" - Me.txtBank_Blz.Size = New System.Drawing.Size(270, 20) - Me.txtBank_Blz.TabIndex = 1 - ' - 'tbUmsatzsteuer - ' - Me.tbUmsatzsteuer.Controls.Add(Me.txtUStIDGeprueftAm) - Me.tbUmsatzsteuer.Controls.Add(Me.txtUStID) - Me.tbUmsatzsteuer.Controls.Add(Me.Button3) - Me.tbUmsatzsteuer.Controls.Add(Me.Label85) - Me.tbUmsatzsteuer.Controls.Add(Me.Button11) - Me.tbUmsatzsteuer.Controls.Add(Me.txtSteuernummer) - Me.tbUmsatzsteuer.Controls.Add(Me.dgvUstv_LaenderUndSteuernummern) - Me.tbUmsatzsteuer.Controls.Add(Me.Label90) - Me.tbUmsatzsteuer.Controls.Add(Me.Label19) - Me.tbUmsatzsteuer.Controls.Add(Me.Label88) - Me.tbUmsatzsteuer.Controls.Add(Me.Label89) - Me.tbUmsatzsteuer.Controls.Add(Me.Label87) - Me.tbUmsatzsteuer.Controls.Add(Me.Label86) - Me.tbUmsatzsteuer.Controls.Add(Me.btnUStVAendSpeichern) - Me.tbUmsatzsteuer.Controls.Add(Me.txtUSt_GVAusgestelltAm) - Me.tbUmsatzsteuer.Controls.Add(Me.txtUSt_GVAngefordertAm) - Me.tbUmsatzsteuer.Location = New System.Drawing.Point(4, 22) - Me.tbUmsatzsteuer.Name = "tbUmsatzsteuer" - Me.tbUmsatzsteuer.Padding = New System.Windows.Forms.Padding(3) - Me.tbUmsatzsteuer.Size = New System.Drawing.Size(672, 495) - Me.tbUmsatzsteuer.TabIndex = 6 - Me.tbUmsatzsteuer.Text = "Umsatzsteuer" - Me.tbUmsatzsteuer.UseVisualStyleBackColor = True - ' - 'txtUStID - ' - Me.txtUStID.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtUStID.Location = New System.Drawing.Point(115, 6) - Me.txtUStID.Name = "txtUStID" - Me.txtUStID.ReadOnly = True - Me.txtUStID.Size = New System.Drawing.Size(159, 20) - Me.txtUStID.TabIndex = 1 - ' - 'Button3 - ' - Me.Button3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.Button3.FlatAppearance.BorderSize = 0 - Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button3.Location = New System.Drawing.Point(167, 421) - Me.Button3.Name = "Button3" - Me.Button3.Size = New System.Drawing.Size(51, 31) - Me.Button3.TabIndex = 15 - Me.Button3.UseVisualStyleBackColor = True - ' - 'Label85 - ' - Me.Label85.AutoSize = True - Me.Label85.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label85.Location = New System.Drawing.Point(6, 9) - Me.Label85.Name = "Label85" - Me.Label85.Size = New System.Drawing.Size(54, 13) - Me.Label85.TabIndex = 0 - Me.Label85.Text = "USt-Id-Nr:" - ' - 'Button11 - ' - Me.Button11.Enabled = False - Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button11.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button11.Location = New System.Drawing.Point(9, 421) - Me.Button11.Name = "Button11" - Me.Button11.Size = New System.Drawing.Size(152, 31) - Me.Button11.TabIndex = 14 - Me.Button11.Text = "UStV-Unterlagen" - Me.Button11.UseVisualStyleBackColor = True - ' - 'txtSteuernummer - ' - Me.txtSteuernummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtSteuernummer.Location = New System.Drawing.Point(543, 6) - Me.txtSteuernummer.Name = "txtSteuernummer" - Me.txtSteuernummer.ReadOnly = True - Me.txtSteuernummer.Size = New System.Drawing.Size(123, 20) - Me.txtSteuernummer.TabIndex = 5 - ' - '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 - 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 - 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 - 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) - Me.dgvUstv_LaenderUndSteuernummern.TabIndex = 13 - ' - 'Label90 - ' - Me.Label90.AutoSize = True - Me.Label90.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label90.Location = New System.Drawing.Point(6, 44) - Me.Label90.Name = "Label90" - Me.Label90.Size = New System.Drawing.Size(99, 13) - Me.Label90.TabIndex = 6 - Me.Label90.Text = "GV angefordert am:" - ' - 'Label19 - ' - Me.Label19.AutoSize = True - Me.Label19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label19.Location = New System.Drawing.Point(280, 9) - Me.Label19.Name = "Label19" - Me.Label19.Size = New System.Drawing.Size(66, 13) - Me.Label19.TabIndex = 2 - Me.Label19.Text = ", geprüft am:" - ' - 'Label88 - ' - Me.Label88.AutoSize = True - Me.Label88.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label88.Location = New System.Drawing.Point(245, 44) - Me.Label88.Name = "Label88" - Me.Label88.Size = New System.Drawing.Size(83, 13) - Me.Label88.TabIndex = 8 - Me.Label88.Text = ", ausgestellt am:" - ' - 'Label89 - ' - Me.Label89.AutoSize = True - Me.Label89.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label89.Location = New System.Drawing.Point(6, 78) - Me.Label89.Name = "Label89" - Me.Label89.Size = New System.Drawing.Size(366, 13) - Me.Label89.TabIndex = 12 - Me.Label89.Text = "Länder und Steuernummern für den Antrag auf Vergütung der Umsatzsteuer:" - ' - 'Label87 - ' - Me.Label87.AutoSize = True - Me.Label87.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label87.Location = New System.Drawing.Point(6, 52) - Me.Label87.Name = "Label87" - Me.Label87.Size = New System.Drawing.Size(10, 13) - Me.Label87.TabIndex = 10 - Me.Label87.Text = " " - ' - 'Label86 - ' - Me.Label86.AutoSize = True - Me.Label86.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label86.Location = New System.Drawing.Point(459, 9) - Me.Label86.Name = "Label86" - Me.Label86.Size = New System.Drawing.Size(78, 13) - Me.Label86.TabIndex = 4 - Me.Label86.Text = "Steuernummer:" - ' - 'tbSonstiges - ' - Me.tbSonstiges.Controls.Add(Me.txtSumVerag) - Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrVerag) - Me.tbSonstiges.Controls.Add(Me.Label110) - Me.tbSonstiges.Controls.Add(Me.Label109) - Me.tbSonstiges.Controls.Add(Me.Label99) - Me.tbSonstiges.Controls.Add(Me.txtCreditsafe) - Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrTOBB) - Me.tbSonstiges.Controls.Add(Me.Label96) - Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrPLOSE) - Me.tbSonstiges.Controls.Add(Me.Label83) - Me.tbSonstiges.Controls.Add(Me.Label76) - Me.tbSonstiges.Controls.Add(Me.dgvSonst_IDSKunden) - Me.tbSonstiges.Controls.Add(Me.cbxSonst_CsvAsfinag) - Me.tbSonstiges.Controls.Add(Me.cbxSonst_CsvUTA) - Me.tbSonstiges.Controls.Add(Me.cbxSonst_CsvMSE) - Me.tbSonstiges.Controls.Add(Me.cbxSonst_CsvMautbericht) - Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrUTA) - Me.tbSonstiges.Controls.Add(Me.Label75) - Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrTelepass) - Me.tbSonstiges.Controls.Add(Me.Label74) - Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrMSE) - Me.tbSonstiges.Controls.Add(Me.Label73) - Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrWOELFL) - Me.tbSonstiges.Controls.Add(Me.Label72) - Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrIDS) - Me.tbSonstiges.Controls.Add(Me.Label70) - Me.tbSonstiges.Controls.Add(Me.Label71) - Me.tbSonstiges.Controls.Add(Me.txtSumPLOSE) - Me.tbSonstiges.Controls.Add(Me.txtSumUTA) - Me.tbSonstiges.Controls.Add(Me.txtSumMSE) - Me.tbSonstiges.Controls.Add(Me.txtSumIDS) - Me.tbSonstiges.Controls.Add(Me.btnSonstAendSpeichern) - Me.tbSonstiges.Controls.Add(Me.cboSonst_Rechnungsdruck) - Me.tbSonstiges.Location = New System.Drawing.Point(4, 22) - Me.tbSonstiges.Name = "tbSonstiges" - Me.tbSonstiges.Padding = New System.Windows.Forms.Padding(3) - Me.tbSonstiges.Size = New System.Drawing.Size(672, 495) - Me.tbSonstiges.TabIndex = 7 - Me.tbSonstiges.Text = "Sonstiges" - Me.tbSonstiges.UseVisualStyleBackColor = True - ' - 'txtSonst_KdNrVerag - ' - Me.txtSonst_KdNrVerag.Location = New System.Drawing.Point(119, 231) - Me.txtSonst_KdNrVerag.MaxLength = 20 - Me.txtSonst_KdNrVerag.Name = "txtSonst_KdNrVerag" - Me.txtSonst_KdNrVerag.Size = New System.Drawing.Size(122, 20) - Me.txtSonst_KdNrVerag.TabIndex = 31 - ' - 'Label110 - ' - Me.Label110.AutoSize = True - Me.Label110.Enabled = False - Me.Label110.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label110.Location = New System.Drawing.Point(6, 233) - Me.Label110.Name = "Label110" - Me.Label110.Size = New System.Drawing.Size(82, 13) - Me.Label110.TabIndex = 30 - Me.Label110.Text = "KdNr bei Verag:" - ' - 'Label109 - ' - Me.Label109.AutoSize = True - Me.Label109.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label109.Location = New System.Drawing.Point(262, 9) - Me.Label109.Name = "Label109" - Me.Label109.Size = New System.Drawing.Size(94, 13) - Me.Label109.TabIndex = 25 - Me.Label109.Text = "Vorschausummen:" - ' - 'Label99 - ' - Me.Label99.AutoSize = True - Me.Label99.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label99.Location = New System.Drawing.Point(6, 34) - Me.Label99.Name = "Label99" - Me.Label99.Size = New System.Drawing.Size(71, 13) - Me.Label99.TabIndex = 24 - Me.Label99.Text = "ID Creditsafe:" - ' - 'txtCreditsafe - ' - Me.txtCreditsafe.Location = New System.Drawing.Point(119, 31) - Me.txtCreditsafe.Name = "txtCreditsafe" - Me.txtCreditsafe.Size = New System.Drawing.Size(122, 20) - Me.txtCreditsafe.TabIndex = 23 - ' - 'txtSonst_KdNrTOBB - ' - Me.txtSonst_KdNrTOBB.Location = New System.Drawing.Point(119, 208) - Me.txtSonst_KdNrTOBB.MaxLength = 20 - Me.txtSonst_KdNrTOBB.Name = "txtSonst_KdNrTOBB" - Me.txtSonst_KdNrTOBB.Size = New System.Drawing.Size(122, 20) - Me.txtSonst_KdNrTOBB.TabIndex = 22 - ' - 'Label96 - ' - Me.Label96.AutoSize = True - Me.Label96.Enabled = False - Me.Label96.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label96.Location = New System.Drawing.Point(6, 211) - Me.Label96.Name = "Label96" - Me.Label96.Size = New System.Drawing.Size(83, 13) - Me.Label96.TabIndex = 21 - Me.Label96.Text = "KdNr bei TOBB:" - ' - 'txtSonst_KdNrPLOSE - ' - Me.txtSonst_KdNrPLOSE.Enabled = False - Me.txtSonst_KdNrPLOSE.Location = New System.Drawing.Point(119, 182) - Me.txtSonst_KdNrPLOSE.Name = "txtSonst_KdNrPLOSE" - Me.txtSonst_KdNrPLOSE.Size = New System.Drawing.Size(122, 20) - Me.txtSonst_KdNrPLOSE.TabIndex = 20 - ' - 'Label83 - ' - Me.Label83.AutoSize = True - Me.Label83.Enabled = False - Me.Label83.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label83.Location = New System.Drawing.Point(6, 185) - Me.Label83.Name = "Label83" - Me.Label83.Size = New System.Drawing.Size(89, 13) - Me.Label83.TabIndex = 19 - Me.Label83.Text = "KdNr bei PLOSE:" - ' - 'Label76 - ' - Me.Label76.AutoSize = True - Me.Label76.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label76.Location = New System.Drawing.Point(4, 262) - Me.Label76.Name = "Label76" - Me.Label76.Size = New System.Drawing.Size(65, 13) - Me.Label76.TabIndex = 17 - Me.Label76.Text = "IDS-Kunden" - ' - '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 - 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 - 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 - Me.dgvSonst_IDSKunden.Location = New System.Drawing.Point(9, 308) - Me.dgvSonst_IDSKunden.MultiSelect = False - Me.dgvSonst_IDSKunden.Name = "dgvSonst_IDSKunden" - Me.dgvSonst_IDSKunden.Size = New System.Drawing.Size(657, 144) - Me.dgvSonst_IDSKunden.TabIndex = 18 - ' - 'cbxSonst_CsvAsfinag - ' - Me.cbxSonst_CsvAsfinag.AutoSize = True - Me.cbxSonst_CsvAsfinag.Location = New System.Drawing.Point(114, 261) - Me.cbxSonst_CsvAsfinag.Name = "cbxSonst_CsvAsfinag" - Me.cbxSonst_CsvAsfinag.Size = New System.Drawing.Size(264, 17) - Me.cbxSonst_CsvAsfinag.TabIndex = 15 - Me.cbxSonst_CsvAsfinag.Text = "ASFINAG-Abrechnungsdaten als CSV bereitstellen" - Me.cbxSonst_CsvAsfinag.UseVisualStyleBackColor = True - ' - 'cbxSonst_CsvUTA - ' - Me.cbxSonst_CsvUTA.AutoSize = True - Me.cbxSonst_CsvUTA.Location = New System.Drawing.Point(429, 155) - Me.cbxSonst_CsvUTA.Name = "cbxSonst_CsvUTA" - Me.cbxSonst_CsvUTA.Size = New System.Drawing.Size(240, 17) - Me.cbxSonst_CsvUTA.TabIndex = 14 - Me.cbxSonst_CsvUTA.Text = "UTA-Abrechnungsdaten als CSV bereitstellen" - Me.cbxSonst_CsvUTA.UseVisualStyleBackColor = True - ' - 'cbxSonst_CsvMSE - ' - Me.cbxSonst_CsvMSE.AutoSize = True - Me.cbxSonst_CsvMSE.Location = New System.Drawing.Point(429, 103) - Me.cbxSonst_CsvMSE.Name = "cbxSonst_CsvMSE" - Me.cbxSonst_CsvMSE.Size = New System.Drawing.Size(241, 17) - Me.cbxSonst_CsvMSE.TabIndex = 9 - Me.cbxSonst_CsvMSE.Text = "MSE-Abrechnungsdaten als CSV bereitstellen" - Me.cbxSonst_CsvMSE.UseVisualStyleBackColor = True - ' - 'cbxSonst_CsvMautbericht - ' - Me.cbxSonst_CsvMautbericht.AutoSize = True - Me.cbxSonst_CsvMautbericht.Location = New System.Drawing.Point(429, 7) - Me.cbxSonst_CsvMautbericht.Name = "cbxSonst_CsvMautbericht" - Me.cbxSonst_CsvMautbericht.Size = New System.Drawing.Size(181, 17) - Me.cbxSonst_CsvMautbericht.TabIndex = 2 - Me.cbxSonst_CsvMautbericht.Text = "Mautbericht als CSV bereitstellen" - Me.cbxSonst_CsvMautbericht.UseVisualStyleBackColor = True - ' - 'txtSonst_KdNrUTA - ' - Me.txtSonst_KdNrUTA.Location = New System.Drawing.Point(119, 156) - Me.txtSonst_KdNrUTA.Name = "txtSonst_KdNrUTA" - Me.txtSonst_KdNrUTA.Size = New System.Drawing.Size(122, 20) - Me.txtSonst_KdNrUTA.TabIndex = 13 - ' - 'Label75 - ' - Me.Label75.AutoSize = True - Me.Label75.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label75.Location = New System.Drawing.Point(6, 159) - Me.Label75.Name = "Label75" - Me.Label75.Size = New System.Drawing.Size(76, 13) - Me.Label75.TabIndex = 12 - Me.Label75.Text = "KdNr bei UTA:" - ' - 'txtSonst_KdNrTelepass - ' - Me.txtSonst_KdNrTelepass.Location = New System.Drawing.Point(119, 130) - Me.txtSonst_KdNrTelepass.Name = "txtSonst_KdNrTelepass" - Me.txtSonst_KdNrTelepass.Size = New System.Drawing.Size(122, 20) - Me.txtSonst_KdNrTelepass.TabIndex = 11 - ' - 'Label74 - ' - Me.Label74.AutoSize = True - Me.Label74.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label74.Location = New System.Drawing.Point(6, 133) - Me.Label74.Name = "Label74" - Me.Label74.Size = New System.Drawing.Size(109, 13) - Me.Label74.TabIndex = 10 - Me.Label74.Text = "KdNr bei TELEPASS:" - ' - 'txtSonst_KdNrMSE - ' - Me.txtSonst_KdNrMSE.Location = New System.Drawing.Point(119, 104) - Me.txtSonst_KdNrMSE.Name = "txtSonst_KdNrMSE" - Me.txtSonst_KdNrMSE.Size = New System.Drawing.Size(122, 20) - Me.txtSonst_KdNrMSE.TabIndex = 8 - ' - 'Label73 - ' - Me.Label73.AutoSize = True - Me.Label73.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label73.Location = New System.Drawing.Point(6, 107) - Me.Label73.Name = "Label73" - Me.Label73.Size = New System.Drawing.Size(77, 13) - Me.Label73.TabIndex = 7 - Me.Label73.Text = "KdNr bei MSE:" - ' - 'txtSonst_KdNrWOELFL - ' - Me.txtSonst_KdNrWOELFL.Location = New System.Drawing.Point(119, 78) - Me.txtSonst_KdNrWOELFL.Name = "txtSonst_KdNrWOELFL" - Me.txtSonst_KdNrWOELFL.Size = New System.Drawing.Size(122, 20) - Me.txtSonst_KdNrWOELFL.TabIndex = 6 - ' - 'Label72 - ' - Me.Label72.AutoSize = True - Me.Label72.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label72.Location = New System.Drawing.Point(6, 81) - Me.Label72.Name = "Label72" - Me.Label72.Size = New System.Drawing.Size(78, 13) - Me.Label72.TabIndex = 5 - Me.Label72.Text = "KdNr bei Wölfl:" - ' - 'txtSonst_KdNrIDS - ' - Me.txtSonst_KdNrIDS.Enabled = False - Me.txtSonst_KdNrIDS.Location = New System.Drawing.Point(119, 52) - Me.txtSonst_KdNrIDS.Name = "txtSonst_KdNrIDS" - Me.txtSonst_KdNrIDS.Size = New System.Drawing.Size(122, 20) - Me.txtSonst_KdNrIDS.TabIndex = 4 - ' - 'Label70 - ' - Me.Label70.AutoSize = True - Me.Label70.Enabled = False - Me.Label70.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label70.Location = New System.Drawing.Point(6, 55) - Me.Label70.Name = "Label70" - Me.Label70.Size = New System.Drawing.Size(72, 13) - Me.Label70.TabIndex = 3 - Me.Label70.Text = "KdNr bei IDS:" - ' - 'Label71 - ' - Me.Label71.AutoSize = True - Me.Label71.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label71.Location = New System.Drawing.Point(6, 9) - Me.Label71.Name = "Label71" - Me.Label71.Size = New System.Drawing.Size(92, 13) - Me.Label71.TabIndex = 0 - Me.Label71.Text = "Rechnungsdruck:" - ' - 'tbSchnittstellen - ' - Me.tbSchnittstellen.Controls.Add(Me.txtVERAG_Schnittstellen_ID) - Me.tbSchnittstellen.Controls.Add(Me.Label91) - Me.tbSchnittstellen.Controls.Add(Me.Label92) - Me.tbSchnittstellen.Controls.Add(Me.DataGridView1) - Me.tbSchnittstellen.Location = New System.Drawing.Point(4, 22) - Me.tbSchnittstellen.Name = "tbSchnittstellen" - Me.tbSchnittstellen.Padding = New System.Windows.Forms.Padding(3) - Me.tbSchnittstellen.Size = New System.Drawing.Size(672, 495) - Me.tbSchnittstellen.TabIndex = 10 - Me.tbSchnittstellen.Text = "Schnittstellen" - Me.tbSchnittstellen.UseVisualStyleBackColor = True - ' - 'txtVERAG_Schnittstellen_ID - ' - Me.txtVERAG_Schnittstellen_ID.Enabled = False - Me.txtVERAG_Schnittstellen_ID.Location = New System.Drawing.Point(131, 17) - Me.txtVERAG_Schnittstellen_ID.Name = "txtVERAG_Schnittstellen_ID" - Me.txtVERAG_Schnittstellen_ID.Size = New System.Drawing.Size(122, 20) - Me.txtVERAG_Schnittstellen_ID.TabIndex = 24 - ' - 'Label91 - ' - Me.Label91.AutoSize = True - Me.Label91.Enabled = False - Me.Label91.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label91.Location = New System.Drawing.Point(6, 20) - Me.Label91.Name = "Label91" - Me.Label91.Size = New System.Drawing.Size(119, 13) - Me.Label91.TabIndex = 23 - Me.Label91.Text = "VERAG Schnittellen-ID:" - ' - 'Label92 - ' - Me.Label92.AutoSize = True - Me.Label92.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label92.Location = New System.Drawing.Point(6, 77) - Me.Label92.Name = "Label92" - Me.Label92.Size = New System.Drawing.Size(110, 13) - Me.Label92.TabIndex = 21 - Me.Label92.Text = "VERAG-Schnittstellen" - ' - '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 - 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 - 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 - Me.DataGridView1.Enabled = False - Me.DataGridView1.Location = New System.Drawing.Point(6, 111) - Me.DataGridView1.MultiSelect = False - Me.DataGridView1.Name = "DataGridView1" - Me.DataGridView1.Size = New System.Drawing.Size(657, 358) - Me.DataGridView1.TabIndex = 22 - ' - 'tbZahlungsinfo - ' - Me.tbZahlungsinfo.Controls.Add(Me.Label102) - Me.tbZahlungsinfo.Controls.Add(Me.rtb_Zahlungsinfo) - Me.tbZahlungsinfo.Location = New System.Drawing.Point(4, 22) - Me.tbZahlungsinfo.Name = "tbZahlungsinfo" - Me.tbZahlungsinfo.Size = New System.Drawing.Size(672, 495) - Me.tbZahlungsinfo.TabIndex = 11 - Me.tbZahlungsinfo.Text = "Zahlungsinfo" - Me.tbZahlungsinfo.UseVisualStyleBackColor = True - ' - 'Label102 - ' - Me.Label102.AutoSize = True - Me.Label102.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label102.Location = New System.Drawing.Point(3, 18) - Me.Label102.Name = "Label102" - Me.Label102.Size = New System.Drawing.Size(66, 13) - Me.Label102.TabIndex = 132 - Me.Label102.Text = "Zahlunginfo:" - ' - 'rtb_Zahlungsinfo - ' - Me.rtb_Zahlungsinfo.Location = New System.Drawing.Point(6, 35) - Me.rtb_Zahlungsinfo.Name = "rtb_Zahlungsinfo" - Me.rtb_Zahlungsinfo.Size = New System.Drawing.Size(660, 412) - Me.rtb_Zahlungsinfo.TabIndex = 40 - Me.rtb_Zahlungsinfo.Text = "" - ' - 'tbBankverbindungen - ' - Me.tbBankverbindungen.Controls.Add(Me.dgvBankverbindungen) - Me.tbBankverbindungen.Controls.Add(Me.cbxAlleBVanzeigen) - Me.tbBankverbindungen.Controls.Add(Me.Label108) - Me.tbBankverbindungen.Controls.Add(Me.btnBankspeichern) - 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 - 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(669, 243) - Me.dgvBankverbindungen.TabIndex = 137 - ' - '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 - Me.lblEORI.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblEORI.Location = New System.Drawing.Point(8, 136) - Me.lblEORI.Name = "lblEORI" - Me.lblEORI.Size = New System.Drawing.Size(78, 13) - Me.lblEORI.TabIndex = 12 - Me.lblEORI.Text = "EORI / NL-Nr.:" - ' - 'Label84 - ' - Me.Label84.AutoSize = True - Me.Label84.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label84.Location = New System.Drawing.Point(259, 87) - Me.Label84.Name = "Label84" - Me.Label84.Size = New System.Drawing.Size(66, 13) - Me.Label84.TabIndex = 8 - Me.Label84.Text = ", geprüft am:" - ' - 'GroupBox3 - ' - Me.GroupBox3.Controls.Add(Me.cbxkeineMWSt) - Me.GroupBox3.Controls.Add(Me.txtGruendungsDatum) - Me.GroupBox3.Controls.Add(Me.Label33) - Me.GroupBox3.Controls.Add(Me.txtHandelsregisterNr) - Me.GroupBox3.Controls.Add(Me.PictureBox5) - Me.GroupBox3.Controls.Add(Me.cbxUIDMehrfachverwendung) - Me.GroupBox3.Controls.Add(Me.btnCreditsafe) - Me.GroupBox3.Controls.Add(Me.Button13) - Me.GroupBox3.Controls.Add(Me.btnUIDPruef) - Me.GroupBox3.Controls.Add(Me.txtEORINL) - Me.GroupBox3.Controls.Add(Me.Label5) - Me.GroupBox3.Controls.Add(Me.txtEORI) - Me.GroupBox3.Controls.Add(Me.lblEORI) - Me.GroupBox3.Controls.Add(Me.txtFirmenname1) - Me.GroupBox3.Controls.Add(Me.cboUSt_UstIdNrLand) - Me.GroupBox3.Controls.Add(Me.Label15) - Me.GroupBox3.Controls.Add(Me.Label3) - Me.GroupBox3.Controls.Add(Me.txtUSt_UstIdNrGeprueftAm) - Me.GroupBox3.Controls.Add(Me.txtKurzname) - Me.GroupBox3.Controls.Add(Me.txtUSt_UstIdNr) - Me.GroupBox3.Controls.Add(Me.txtFirmenname2) - Me.GroupBox3.Controls.Add(Me.Label16) - Me.GroupBox3.Controls.Add(Me.txtUSt_Steuernummer) - Me.GroupBox3.Controls.Add(Me.Label84) - Me.GroupBox3.Controls.Add(Me.lblHandelregisterNr) - Me.GroupBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.GroupBox3.Location = New System.Drawing.Point(3, 3) - Me.GroupBox3.Name = "GroupBox3" - Me.GroupBox3.Size = New System.Drawing.Size(453, 207) - Me.GroupBox3.TabIndex = 0 - Me.GroupBox3.TabStop = False - Me.GroupBox3.Text = "Firma" - ' - 'Label33 - ' - Me.Label33.AutoSize = True - Me.Label33.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label33.Location = New System.Drawing.Point(10, 161) - Me.Label33.Name = "Label33" - Me.Label33.Size = New System.Drawing.Size(75, 13) - Me.Label33.TabIndex = 134 - Me.Label33.Text = "gegründet am:" - ' - 'PictureBox5 - ' - Me.PictureBox5.BackgroundImage = Global.SDL.My.Resources.Resources.fragezeichen - Me.PictureBox5.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.PictureBox5.Location = New System.Drawing.Point(88, 62) - Me.PictureBox5.Name = "PictureBox5" - Me.PictureBox5.Size = New System.Drawing.Size(18, 19) - Me.PictureBox5.TabIndex = 131 - Me.PictureBox5.TabStop = False - Me.PictureBox5.Visible = False - ' - 'cbxUIDMehrfachverwendung - ' - Me.cbxUIDMehrfachverwendung.AutoSize = True - Me.cbxUIDMehrfachverwendung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxUIDMehrfachverwendung.Location = New System.Drawing.Point(292, 159) - Me.cbxUIDMehrfachverwendung.Name = "cbxUIDMehrfachverwendung" - Me.cbxUIDMehrfachverwendung.Size = New System.Drawing.Size(152, 17) - Me.cbxUIDMehrfachverwendung.TabIndex = 25 - Me.cbxUIDMehrfachverwendung.Text = "UID-Mehrfachverwendung" - Me.cbxUIDMehrfachverwendung.UseVisualStyleBackColor = True - ' - 'btnCreditsafe - ' - Me.btnCreditsafe.BackgroundImage = Global.SDL.My.Resources.Resources.creditsafe_add1 - Me.btnCreditsafe.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.btnCreditsafe.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnCreditsafe.Location = New System.Drawing.Point(9, 57) - Me.btnCreditsafe.Name = "btnCreditsafe" - Me.btnCreditsafe.Size = New System.Drawing.Size(77, 27) - Me.btnCreditsafe.TabIndex = 25 - Me.btnCreditsafe.UseVisualStyleBackColor = True - Me.btnCreditsafe.Visible = False - ' - 'Button13 - ' - Me.Button13.BackgroundImage = Global.SDL.My.Resources.Resources.list - Me.Button13.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.Button13.FlatAppearance.BorderSize = 0 - Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button13.Location = New System.Drawing.Point(419, 84) - Me.Button13.Name = "Button13" - Me.Button13.Size = New System.Drawing.Size(25, 20) - Me.Button13.TabIndex = 16 - Me.Button13.UseVisualStyleBackColor = True - ' - 'btnUIDPruef - ' - Me.btnUIDPruef.BackgroundImage = Global.SDL.My.Resources.Resources.fragezeichen - Me.btnUIDPruef.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.btnUIDPruef.FlatAppearance.BorderSize = 0 - Me.btnUIDPruef.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnUIDPruef.Location = New System.Drawing.Point(397, 84) - Me.btnUIDPruef.Name = "btnUIDPruef" - Me.btnUIDPruef.Size = New System.Drawing.Size(25, 20) - Me.btnUIDPruef.TabIndex = 15 - Me.btnUIDPruef.UseVisualStyleBackColor = True - Me.btnUIDPruef.Visible = False - ' - 'Label5 - ' - Me.Label5.AutoSize = True - Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label5.Location = New System.Drawing.Point(6, 19) - Me.Label5.Name = "Label5" - Me.Label5.Size = New System.Drawing.Size(57, 13) - Me.Label5.TabIndex = 0 - Me.Label5.Text = "Kurzname:" - ' - 'txtFirmenname1 - ' - Me.txtFirmenname1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtFirmenname1.Location = New System.Drawing.Point(110, 40) - Me.txtFirmenname1.MaxLength = 40 - Me.txtFirmenname1.Name = "txtFirmenname1" - Me.txtFirmenname1.Size = New System.Drawing.Size(334, 20) - Me.txtFirmenname1.TabIndex = 3 - ' - 'Label15 - ' - Me.Label15.AutoSize = True - Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label15.Location = New System.Drawing.Point(8, 87) - Me.Label15.Name = "Label15" - Me.Label15.Size = New System.Drawing.Size(39, 13) - Me.Label15.TabIndex = 5 - Me.Label15.Text = "UStID:" - ' - 'Label3 - ' - Me.Label3.AutoSize = True - Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label3.Location = New System.Drawing.Point(6, 43) - Me.Label3.Name = "Label3" - Me.Label3.Size = New System.Drawing.Size(67, 13) - Me.Label3.TabIndex = 2 - Me.Label3.Text = "Firmenname:" - ' - 'txtKurzname - ' - Me.txtKurzname.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtKurzname.Location = New System.Drawing.Point(110, 16) - Me.txtKurzname.MaxLength = 50 - Me.txtKurzname.Name = "txtKurzname" - Me.txtKurzname.Size = New System.Drawing.Size(334, 20) - Me.txtKurzname.TabIndex = 1 - ' - 'txtFirmenname2 - ' - Me.txtFirmenname2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtFirmenname2.Location = New System.Drawing.Point(110, 59) - Me.txtFirmenname2.MaxLength = 40 - Me.txtFirmenname2.Name = "txtFirmenname2" - Me.txtFirmenname2.Size = New System.Drawing.Size(334, 20) - Me.txtFirmenname2.TabIndex = 4 - ' - 'Label16 - ' - Me.Label16.AutoSize = True - Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label16.Location = New System.Drawing.Point(240, 112) - Me.Label16.Name = "Label16" - Me.Label16.Size = New System.Drawing.Size(78, 13) - Me.Label16.TabIndex = 10 - Me.Label16.Text = "Steuernummer:" - ' - 'lblHandelregisterNr - ' - Me.lblHandelregisterNr.AutoSize = True - Me.lblHandelregisterNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblHandelregisterNr.Location = New System.Drawing.Point(8, 112) - Me.lblHandelregisterNr.Name = "lblHandelregisterNr" - Me.lblHandelregisterNr.Size = New System.Drawing.Size(100, 13) - Me.lblHandelregisterNr.TabIndex = 132 - Me.lblHandelregisterNr.Text = "Handelsregister-Nr.:" - ' - 'Label100 - ' - Me.Label100.AutoSize = True - Me.Label100.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label100.Location = New System.Drawing.Point(6, 47) - Me.Label100.Name = "Label100" - Me.Label100.Size = New System.Drawing.Size(77, 13) - Me.Label100.TabIndex = 27 - Me.Label100.Text = "Adress-Zusatz:" - ' - 'txtAdresseZusatz - ' - Me.txtAdresseZusatz.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtAdresseZusatz.Location = New System.Drawing.Point(110, 44) - Me.txtAdresseZusatz.MaxLength = 50 - Me.txtAdresseZusatz.Name = "txtAdresseZusatz" - Me.txtAdresseZusatz.Size = New System.Drawing.Size(334, 20) - Me.txtAdresseZusatz.TabIndex = 26 - ' - 'GroupBox1 - ' - Me.GroupBox1.Controls.Add(Me.cbxLandKz) - Me.GroupBox1.Controls.Add(Me.Label14) - Me.GroupBox1.Controls.Add(Me.txtPostfachOrt) - Me.GroupBox1.Controls.Add(Me.txtOrt) - Me.GroupBox1.Controls.Add(Me.Label100) - Me.GroupBox1.Controls.Add(Me.Label12) - Me.GroupBox1.Controls.Add(Me.txtPostfachPlz) - Me.GroupBox1.Controls.Add(Me.txtAdresseZusatz) - Me.GroupBox1.Controls.Add(Me.txtPlz) - Me.GroupBox1.Controls.Add(Me.Label4) - Me.GroupBox1.Controls.Add(Me.txtStrasse) - Me.GroupBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.GroupBox1.Location = New System.Drawing.Point(3, 217) - Me.GroupBox1.Name = "GroupBox1" - Me.GroupBox1.Size = New System.Drawing.Size(453, 139) - Me.GroupBox1.TabIndex = 1 - Me.GroupBox1.TabStop = False - Me.GroupBox1.Text = "Adresse" - ' - 'Label14 - ' - Me.Label14.AutoSize = True - Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label14.Location = New System.Drawing.Point(6, 99) - Me.Label14.Name = "Label14" - Me.Label14.Size = New System.Drawing.Size(100, 13) - Me.Label14.TabIndex = 6 - Me.Label14.Text = "Postfach PLZ / Ort:" - ' - 'txtPostfachOrt - ' - Me.txtPostfachOrt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtPostfachOrt.Location = New System.Drawing.Point(243, 96) - Me.txtPostfachOrt.MaxLength = 40 - Me.txtPostfachOrt.Name = "txtPostfachOrt" - Me.txtPostfachOrt.Size = New System.Drawing.Size(201, 20) - Me.txtPostfachOrt.TabIndex = 8 - ' - 'txtOrt - ' - Me.txtOrt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtOrt.Location = New System.Drawing.Point(243, 70) - Me.txtOrt.MaxLength = 40 - Me.txtOrt.Name = "txtOrt" - Me.txtOrt.Size = New System.Drawing.Size(201, 20) - Me.txtOrt.TabIndex = 5 - ' - 'Label12 - ' - Me.Label12.AutoSize = True - Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label12.Location = New System.Drawing.Point(6, 73) - Me.Label12.Name = "Label12" - Me.Label12.Size = New System.Drawing.Size(90, 13) - Me.Label12.TabIndex = 2 - Me.Label12.Text = "Land / PLZ / Ort:" - ' - 'txtPostfachPlz - ' - Me.txtPostfachPlz.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtPostfachPlz.Location = New System.Drawing.Point(110, 96) - Me.txtPostfachPlz.MaxLength = 7 - Me.txtPostfachPlz.Name = "txtPostfachPlz" - Me.txtPostfachPlz.Size = New System.Drawing.Size(127, 20) - Me.txtPostfachPlz.TabIndex = 7 - ' - 'txtPlz - ' - Me.txtPlz.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtPlz.Location = New System.Drawing.Point(166, 70) - Me.txtPlz.MaxLength = 7 - Me.txtPlz.Name = "txtPlz" - Me.txtPlz.Size = New System.Drawing.Size(71, 20) - Me.txtPlz.TabIndex = 4 - ' - 'Label4 - ' - Me.Label4.AutoSize = True - Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label4.Location = New System.Drawing.Point(6, 25) - Me.Label4.Name = "Label4" - Me.Label4.Size = New System.Drawing.Size(41, 13) - Me.Label4.TabIndex = 0 - Me.Label4.Text = "Straße:" - ' - 'txtStrasse - ' - Me.txtStrasse.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtStrasse.Location = New System.Drawing.Point(110, 22) - Me.txtStrasse.MaxLength = 40 - Me.txtStrasse.Name = "txtStrasse" - Me.txtStrasse.Size = New System.Drawing.Size(334, 20) - Me.txtStrasse.TabIndex = 1 - ' - 'txtAnsprechpartnerAnrede - ' - Me.txtAnsprechpartnerAnrede.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtAnsprechpartnerAnrede.Location = New System.Drawing.Point(107, 148) - Me.txtAnsprechpartnerAnrede.MaxLength = 4 - Me.txtAnsprechpartnerAnrede.Name = "txtAnsprechpartnerAnrede" - Me.txtAnsprechpartnerAnrede.Size = New System.Drawing.Size(55, 20) - Me.txtAnsprechpartnerAnrede.TabIndex = 11 - ' - 'Label20 - ' - Me.Label20.AutoSize = True - Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label20.Location = New System.Drawing.Point(3, 66) - Me.Label20.Name = "Label20" - Me.Label20.Size = New System.Drawing.Size(67, 13) - Me.Label20.TabIndex = 4 - Me.Label20.Text = "Mobiltelefon:" - ' - 'txtMobil - ' - Me.txtMobil.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtMobil.Location = New System.Drawing.Point(107, 63) - Me.txtMobil.MaxLength = 50 - Me.txtMobil.Name = "txtMobil" - Me.txtMobil.Size = New System.Drawing.Size(333, 20) - Me.txtMobil.TabIndex = 5 - ' - 'Label10 - ' - Me.Label10.AutoSize = True - Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label10.Location = New System.Drawing.Point(3, 151) - Me.Label10.Name = "Label10" - Me.Label10.Size = New System.Drawing.Size(88, 13) - Me.Label10.TabIndex = 10 - Me.Label10.Text = "Ansprechpartner:" - ' - 'txtAnsprechpartner - ' - Me.txtAnsprechpartner.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtAnsprechpartner.Location = New System.Drawing.Point(168, 148) - Me.txtAnsprechpartner.MaxLength = 40 - Me.txtAnsprechpartner.Name = "txtAnsprechpartner" - Me.txtAnsprechpartner.Size = New System.Drawing.Size(272, 20) - Me.txtAnsprechpartner.TabIndex = 12 - ' - 'Label13 - ' - Me.Label13.AutoSize = True - Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label13.Location = New System.Drawing.Point(3, 123) - Me.Label13.Name = "Label13" - Me.Label13.Size = New System.Drawing.Size(48, 13) - Me.Label13.TabIndex = 8 - Me.Label13.Text = "E-Mail 2:" - ' - 'Label11 - ' - Me.Label11.AutoSize = True - Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label11.Location = New System.Drawing.Point(3, 97) - Me.Label11.Name = "Label11" - Me.Label11.Size = New System.Drawing.Size(39, 13) - Me.Label11.TabIndex = 6 - Me.Label11.Text = "E-Mail:" - ' - 'txtEmail2 - ' - Me.txtEmail2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtEmail2.Location = New System.Drawing.Point(107, 120) - Me.txtEmail2.MaxLength = 40 - Me.txtEmail2.Name = "txtEmail2" - Me.txtEmail2.Size = New System.Drawing.Size(333, 20) - Me.txtEmail2.TabIndex = 9 - ' - 'txtEmail - ' - Me.txtEmail.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtEmail.Location = New System.Drawing.Point(107, 94) - Me.txtEmail.MaxLength = 40 - Me.txtEmail.Name = "txtEmail" - Me.txtEmail.Size = New System.Drawing.Size(333, 20) - Me.txtEmail.TabIndex = 7 - ' - 'Label7 - ' - Me.Label7.AutoSize = True - Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label7.Location = New System.Drawing.Point(3, 40) - Me.Label7.Name = "Label7" - Me.Label7.Size = New System.Drawing.Size(27, 13) - Me.Label7.TabIndex = 2 - Me.Label7.Text = "Fax:" - ' - 'txtFax - ' - Me.txtFax.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtFax.Location = New System.Drawing.Point(107, 37) - Me.txtFax.MaxLength = 20 - Me.txtFax.Name = "txtFax" - Me.txtFax.Size = New System.Drawing.Size(333, 20) - Me.txtFax.TabIndex = 3 - ' - 'Label9 - ' - Me.Label9.AutoSize = True - Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label9.Location = New System.Drawing.Point(3, 14) - Me.Label9.Name = "Label9" - Me.Label9.Size = New System.Drawing.Size(46, 13) - Me.Label9.TabIndex = 0 - Me.Label9.Text = "Telefon:" - ' - 'txtTel - ' - Me.txtTel.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtTel.Location = New System.Drawing.Point(107, 11) - Me.txtTel.MaxLength = 20 - Me.txtTel.Name = "txtTel" - Me.txtTel.Size = New System.Drawing.Size(333, 20) - Me.txtTel.TabIndex = 1 - ' - 'btnFirmendatenFormularSpeichern - ' - Me.btnFirmendatenFormularSpeichern.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnFirmendatenFormularSpeichern.Location = New System.Drawing.Point(1081, 540) - Me.btnFirmendatenFormularSpeichern.Name = "btnFirmendatenFormularSpeichern" - Me.btnFirmendatenFormularSpeichern.Size = New System.Drawing.Size(71, 52) - Me.btnFirmendatenFormularSpeichern.TabIndex = 16 - Me.btnFirmendatenFormularSpeichern.Text = "Speichern" - Me.btnFirmendatenFormularSpeichern.UseVisualStyleBackColor = True - ' - 'lblSachbearbeiter - ' - Me.lblSachbearbeiter.AutoSize = True - Me.lblSachbearbeiter.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblSachbearbeiter.Location = New System.Drawing.Point(131, 581) - Me.lblSachbearbeiter.Name = "lblSachbearbeiter" - Me.lblSachbearbeiter.Size = New System.Drawing.Size(10, 13) - Me.lblSachbearbeiter.TabIndex = 13 - Me.lblSachbearbeiter.Text = "-" - ' - 'lblErfassung - ' - Me.lblErfassung.AutoSize = True - Me.lblErfassung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblErfassung.Location = New System.Drawing.Point(130, 555) - Me.lblErfassung.Name = "lblErfassung" - Me.lblErfassung.Size = New System.Drawing.Size(10, 13) - Me.lblErfassung.TabIndex = 5 - Me.lblErfassung.Text = "-" - ' - 'lblAenderung - ' - Me.lblAenderung.AutoSize = True - Me.lblAenderung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblAenderung.Location = New System.Drawing.Point(131, 568) - Me.lblAenderung.Name = "lblAenderung" - Me.lblAenderung.Size = New System.Drawing.Size(10, 13) - Me.lblAenderung.TabIndex = 11 - Me.lblAenderung.Text = "-" - ' - 'Label26 - ' - Me.Label26.AutoSize = True - Me.Label26.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label26.Location = New System.Drawing.Point(10, 581) - Me.Label26.Name = "Label26" - Me.Label26.Size = New System.Drawing.Size(117, 13) - Me.Label26.TabIndex = 12 - Me.Label26.Text = "Letzter Sachbearbeiter:" - ' - 'Label25 - ' - Me.Label25.AutoSize = True - Me.Label25.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label25.Location = New System.Drawing.Point(9, 555) - Me.Label25.Name = "Label25" - Me.Label25.Size = New System.Drawing.Size(91, 13) - Me.Label25.TabIndex = 4 - Me.Label25.Text = "Erfassungsdatum:" - ' - 'Label23 - ' - Me.Label23.AutoSize = True - Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label23.Location = New System.Drawing.Point(10, 568) - Me.Label23.Name = "Label23" - Me.Label23.Size = New System.Drawing.Size(90, 13) - Me.Label23.TabIndex = 10 - Me.Label23.Text = "Änderungsdatum:" - ' - 'Button1 - ' - Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button1.Location = New System.Drawing.Point(573, 546) - Me.Button1.Name = "Button1" - Me.Button1.Size = New System.Drawing.Size(98, 38) - Me.Button1.TabIndex = 14 - Me.Button1.Text = "Kundenstamm jetzt übertragen" - Me.Button1.UseVisualStyleBackColor = True - Me.Button1.Visible = False - ' - 'Label28 - ' - Me.Label28.AutoSize = True - Me.Label28.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label28.Location = New System.Drawing.Point(585, 587) - Me.Label28.Name = "Label28" - Me.Label28.Size = New System.Drawing.Size(10, 13) - Me.Label28.TabIndex = 9 - Me.Label28.Text = "-" - Me.Label28.Visible = False - ' - 'Label29 - ' - Me.Label29.AutoSize = True - Me.Label29.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label29.Location = New System.Drawing.Point(567, 530) - Me.Label29.Name = "Label29" - Me.Label29.Size = New System.Drawing.Size(109, 13) - Me.Label29.TabIndex = 8 - Me.Label29.Text = "Übertrag in DAKOSY:" - Me.Label29.Visible = False - ' - 'tbKontakt - ' - Me.tbKontakt.Controls.Add(Me.TabPage10) - Me.tbKontakt.Controls.Add(Me.TabPage11) - Me.tbKontakt.Location = New System.Drawing.Point(3, 340) - Me.tbKontakt.Name = "tbKontakt" - Me.tbKontakt.SelectedIndex = 0 - Me.tbKontakt.Size = New System.Drawing.Size(453, 201) - Me.tbKontakt.TabIndex = 2 - ' - 'TabPage10 - ' - Me.TabPage10.Controls.Add(Me.txtAnsprechpartnerAnrede) - Me.TabPage10.Controls.Add(Me.Label9) - Me.TabPage10.Controls.Add(Me.Label20) - Me.TabPage10.Controls.Add(Me.txtTel) - Me.TabPage10.Controls.Add(Me.txtMobil) - Me.TabPage10.Controls.Add(Me.txtFax) - Me.TabPage10.Controls.Add(Me.Label10) - Me.TabPage10.Controls.Add(Me.Label7) - Me.TabPage10.Controls.Add(Me.txtAnsprechpartner) - Me.TabPage10.Controls.Add(Me.txtEmail) - Me.TabPage10.Controls.Add(Me.Label13) - Me.TabPage10.Controls.Add(Me.txtEmail2) - Me.TabPage10.Controls.Add(Me.Label11) - Me.TabPage10.Location = New System.Drawing.Point(4, 22) - Me.TabPage10.Name = "TabPage10" - Me.TabPage10.Size = New System.Drawing.Size(445, 175) - Me.TabPage10.TabIndex = 2 - Me.TabPage10.Text = "Kontakt" - Me.TabPage10.UseVisualStyleBackColor = True - ' - 'TabPage11 - ' - Me.TabPage11.Controls.Add(Me.ucKundenKontakte) - Me.TabPage11.Location = New System.Drawing.Point(4, 22) - Me.TabPage11.Name = "TabPage11" - Me.TabPage11.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage11.Size = New System.Drawing.Size(445, 175) - Me.TabPage11.TabIndex = 3 - Me.TabPage11.Text = "Spezifisch" - Me.TabPage11.UseVisualStyleBackColor = True - ' - 'Label50 - ' - Me.Label50.AutoSize = True - Me.Label50.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label50.Location = New System.Drawing.Point(6, 16) - Me.Label50.Name = "Label50" - Me.Label50.Size = New System.Drawing.Size(92, 13) - Me.Label50.TabIndex = 0 - Me.Label50.Text = "Zuständige Filiale:" - ' - 'Label68 - ' - Me.Label68.AutoSize = True - Me.Label68.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label68.Location = New System.Drawing.Point(6, 46) - Me.Label68.Name = "Label68" - Me.Label68.Size = New System.Drawing.Size(69, 13) - Me.Label68.TabIndex = 2 - Me.Label68.Text = "Kundenkreis:" - ' - 'pnlNeukunde - ' - Me.pnlNeukunde.Controls.Add(Me.Button2) - Me.pnlNeukunde.Controls.Add(Me.Label50) - Me.pnlNeukunde.Controls.Add(Me.cboFiliale) - Me.pnlNeukunde.Controls.Add(Me.cboKundenkreis) - Me.pnlNeukunde.Controls.Add(Me.Label68) - Me.pnlNeukunde.Location = New System.Drawing.Point(776, 530) - Me.pnlNeukunde.Name = "pnlNeukunde" - Me.pnlNeukunde.Size = New System.Drawing.Size(303, 74) - Me.pnlNeukunde.TabIndex = 15 - Me.pnlNeukunde.Visible = False - ' - 'Button2 - ' - Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button2.Location = New System.Drawing.Point(194, 7) - Me.Button2.Name = "Button2" - Me.Button2.Size = New System.Drawing.Size(105, 30) - Me.Button2.TabIndex = 19 - Me.Button2.Text = "Wunsch-KdNr" - Me.Button2.UseVisualStyleBackColor = True - ' - 'Label77 - ' - Me.Label77.AutoSize = True - Me.Label77.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label77.Location = New System.Drawing.Point(780, 571) - Me.Label77.Name = "Label77" - Me.Label77.Size = New System.Drawing.Size(64, 13) - Me.Label77.TabIndex = 6 - Me.Label77.Text = "Kunden-Nr.:" - ' - 'lblKundennr - ' - Me.lblKundennr.AutoSize = True - Me.lblKundennr.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblKundennr.Location = New System.Drawing.Point(850, 569) - Me.lblKundennr.Name = "lblKundennr" - Me.lblKundennr.Size = New System.Drawing.Size(14, 17) - Me.lblKundennr.TabIndex = 7 - Me.lblKundennr.Text = "-" - ' - 'Label79 - ' - Me.Label79.AutoSize = True - Me.Label79.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label79.Location = New System.Drawing.Point(780, 541) - Me.Label79.Name = "Label79" - Me.Label79.Size = New System.Drawing.Size(40, 13) - Me.Label79.TabIndex = 4 - Me.Label79.Text = "Status:" - ' - 'Label80 - ' - Me.Label80.AutoSize = True - Me.Label80.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label80.Location = New System.Drawing.Point(278, 560) - Me.Label80.Name = "Label80" - Me.Label80.Size = New System.Drawing.Size(59, 13) - Me.Label80.TabIndex = 4 - Me.Label80.Text = "Firma FiBu:" - ' - 'cbxFiBu - ' - Me.cbxFiBu.AutoSize = True - Me.cbxFiBu.Enabled = False - Me.cbxFiBu.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxFiBu.Location = New System.Drawing.Point(400, 559) - Me.cbxFiBu.Name = "cbxFiBu" - Me.cbxFiBu.Size = New System.Drawing.Size(47, 17) - Me.cbxFiBu.TabIndex = 17 - Me.cbxFiBu.Text = "FiBu" - Me.cbxFiBu.UseVisualStyleBackColor = True - ' - 'cbxFiBuLG - ' - Me.cbxFiBuLG.AutoSize = True - Me.cbxFiBuLG.Enabled = False - Me.cbxFiBuLG.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxFiBuLG.Location = New System.Drawing.Point(400, 580) - Me.cbxFiBuLG.Name = "cbxFiBuLG" - Me.cbxFiBuLG.Size = New System.Drawing.Size(64, 17) - Me.cbxFiBuLG.TabIndex = 18 - Me.cbxFiBuLG.Text = "FiBu LG" - Me.cbxFiBuLG.UseVisualStyleBackColor = True - Me.cbxFiBuLG.Visible = False - ' - 'Label97 - ' - Me.Label97.AutoSize = True - Me.Label97.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label97.Location = New System.Drawing.Point(463, 530) - Me.Label97.Name = "Label97" - Me.Label97.Size = New System.Drawing.Size(100, 13) - Me.Label97.TabIndex = 19 - Me.Label97.Text = "Übertrag in SYSKA:" - Me.Label97.Visible = False - ' - 'Button4 - ' - Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button4.Location = New System.Drawing.Point(466, 546) - Me.Button4.Name = "Button4" - Me.Button4.Size = New System.Drawing.Size(101, 38) - Me.Button4.TabIndex = 21 - Me.Button4.Text = "Kundenstamm jetzt übertragen" - Me.Button4.UseVisualStyleBackColor = True - Me.Button4.Visible = False - ' - 'CheckBox1 - ' - Me.CheckBox1.AutoSize = True - Me.CheckBox1.Checked = True - Me.CheckBox1.CheckState = System.Windows.Forms.CheckState.Checked - Me.CheckBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.CheckBox1.Location = New System.Drawing.Point(466, 586) - Me.CheckBox1.Name = "CheckBox1" - Me.CheckBox1.Size = New System.Drawing.Size(101, 17) - Me.CheckBox1.TabIndex = 22 - Me.CheckBox1.Text = "zuvor speichern" - Me.CheckBox1.UseVisualStyleBackColor = True - Me.CheckBox1.Visible = False - ' - 'txtERROR - ' - Me.txtERROR.BackColor = System.Drawing.SystemColors.Window - Me.txtERROR.BorderStyle = System.Windows.Forms.BorderStyle.None - Me.txtERROR.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtERROR.ForeColor = System.Drawing.Color.Red - Me.txtERROR.Location = New System.Drawing.Point(13, 596) - Me.txtERROR.MaxLength = 9999 - Me.txtERROR.Multiline = True - Me.txtERROR.Name = "txtERROR" - Me.txtERROR.Size = New System.Drawing.Size(443, 30) - Me.txtERROR.TabIndex = 17 - ' - 'btnDatevExport - ' - Me.btnDatevExport.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnDatevExport.Location = New System.Drawing.Point(678, 546) - Me.btnDatevExport.Name = "btnDatevExport" - Me.btnDatevExport.Size = New System.Drawing.Size(93, 38) - Me.btnDatevExport.TabIndex = 23 - Me.btnDatevExport.Text = "Kundenstamm jetzt übertragen" - Me.btnDatevExport.UseVisualStyleBackColor = True - Me.btnDatevExport.Visible = False - ' - 'Label98 - ' - Me.Label98.AutoSize = True - Me.Label98.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label98.Location = New System.Drawing.Point(675, 530) - Me.Label98.Name = "Label98" - Me.Label98.Size = New System.Drawing.Size(101, 13) - Me.Label98.TabIndex = 24 - Me.Label98.Text = "Übertrag in DATEV:" - Me.Label98.Visible = False - ' - 'cnsBankverbindungen - ' - 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, 70) - ' - 'ArchivierenToolStripMenuItem - ' - 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 = "Bank schließen" - Me.ArchivierenToolStripMenuItem.Visible = False - ' - 'DokumentHinzufügenToolStripMenuItem - ' - 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" - ' - 'DokumentLöschenToolStripMenuItem - ' - 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" - ' - 'cbxkeineMWSt - ' - Me.cbxkeineMWSt.AutoSize = True - Me.cbxkeineMWSt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxkeineMWSt.Location = New System.Drawing.Point(292, 182) - Me.cbxkeineMWSt.Name = "cbxkeineMWSt" - Me.cbxkeineMWSt.Size = New System.Drawing.Size(117, 17) - Me.cbxkeineMWSt.TabIndex = 136 - Me.cbxkeineMWSt.Text = "kein MWST-Kunde" - Me.cbxkeineMWSt.UseVisualStyleBackColor = True - ' - 'cboFiliale - ' - Me.cboFiliale._allowedValuesFreiText = Nothing - Me.cboFiliale._allowFreiText = False - Me.cboFiliale._value = "" - Me.cboFiliale.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) - Me.cboFiliale.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboFiliale.DropDownWidth = 400 - Me.cboFiliale.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cboFiliale.FormattingEnabled = True - Me.cboFiliale.Location = New System.Drawing.Point(104, 8) - Me.cboFiliale.Name = "cboFiliale" - Me.cboFiliale.Size = New System.Drawing.Size(84, 28) - Me.cboFiliale.TabIndex = 1 - ' - 'cboKundenkreis - ' - Me.cboKundenkreis._allowedValuesFreiText = Nothing - Me.cboKundenkreis._allowFreiText = False - Me.cboKundenkreis._value = "" - Me.cboKundenkreis.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) - Me.cboKundenkreis.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboKundenkreis.DropDownWidth = 400 - Me.cboKundenkreis.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboKundenkreis.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cboKundenkreis.FormattingEnabled = True - Me.cboKundenkreis.Items.AddRange(New Object() {"", "100000-199999: XXXXXX", "200000-299999: XXXXXX", "300000-399999: XXXXXX", "400000-499999: XXXXXX", "500000-599999: XXXXXX", "600000-699999: XXXXXX", "700000-799999: XXXXXX", "800000-899999: XXXXXX", "900000-999999: XXXXXX"}) - Me.cboKundenkreis.Location = New System.Drawing.Point(104, 38) - Me.cboKundenkreis.Name = "cboKundenkreis" - Me.cboKundenkreis.Size = New System.Drawing.Size(195, 28) - Me.cboKundenkreis.TabIndex = 3 - ' - 'cboFirma - ' - Me.cboFirma._allowedValuesFreiText = Nothing - Me.cboFirma._allowFreiText = False - Me.cboFirma._value = "" - Me.cboFirma.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) - Me.cboFirma.DropDownHeight = 350 - Me.cboFirma.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboFirma.DropDownWidth = 400 - Me.cboFirma.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cboFirma.FormattingEnabled = True - Me.cboFirma.IntegralHeight = False - Me.cboFirma.Location = New System.Drawing.Point(342, 552) - Me.cboFirma.Name = "cboFirma" - Me.cboFirma.Size = New System.Drawing.Size(49, 28) - Me.cboFirma.TabIndex = 5 - ' - 'cboAuswahl - ' - Me.cboAuswahl._allowedValuesFreiText = Nothing - Me.cboAuswahl._allowFreiText = False - Me.cboAuswahl._value = "" - Me.cboAuswahl.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) - Me.cboAuswahl.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboAuswahl.DropDownWidth = 400 - Me.cboAuswahl.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboAuswahl.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cboAuswahl.FormattingEnabled = True - Me.cboAuswahl.Location = New System.Drawing.Point(826, 533) - Me.cboAuswahl.Name = "cboAuswahl" - Me.cboAuswahl.Size = New System.Drawing.Size(124, 28) - Me.cboAuswahl.TabIndex = 5 - ' - 'txtAbf_Planzahl - ' - Me.txtAbf_Planzahl._DateTimeOnly = False - Me.txtAbf_Planzahl._numbersOnly = False - Me.txtAbf_Planzahl._numbersOnlyKommastellen = "" - Me.txtAbf_Planzahl._numbersOnlyTrennzeichen = True - Me.txtAbf_Planzahl._Prozent = False - Me.txtAbf_Planzahl._ShortDateNew = False - Me.txtAbf_Planzahl._ShortDateOnly = False - Me.txtAbf_Planzahl._TimeOnly = False - Me.txtAbf_Planzahl._TimeOnly_Seconds = False - Me.txtAbf_Planzahl._value = Nothing - Me.txtAbf_Planzahl._Waehrung = False - Me.txtAbf_Planzahl._WaehrungZeichen = True - Me.txtAbf_Planzahl.ForeColor = System.Drawing.Color.Black - Me.txtAbf_Planzahl.Location = New System.Drawing.Point(526, 248) - Me.txtAbf_Planzahl.MaxLineLength = -1 - Me.txtAbf_Planzahl.MaxLines_Warning = "" - Me.txtAbf_Planzahl.MaxLines_Warning_Label = Nothing - Me.txtAbf_Planzahl.Name = "txtAbf_Planzahl" - Me.txtAbf_Planzahl.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_Planzahl.TabIndex = 15 - ' - 'txtAbfVerb_RechtsanwaltSeit - ' - Me.txtAbfVerb_RechtsanwaltSeit._DateTimeOnly = False - Me.txtAbfVerb_RechtsanwaltSeit._numbersOnly = False - Me.txtAbfVerb_RechtsanwaltSeit._numbersOnlyKommastellen = "" - Me.txtAbfVerb_RechtsanwaltSeit._numbersOnlyTrennzeichen = True - Me.txtAbfVerb_RechtsanwaltSeit._Prozent = False - Me.txtAbfVerb_RechtsanwaltSeit._ShortDateNew = True - Me.txtAbfVerb_RechtsanwaltSeit._ShortDateOnly = False - Me.txtAbfVerb_RechtsanwaltSeit._TimeOnly = False - Me.txtAbfVerb_RechtsanwaltSeit._TimeOnly_Seconds = False - Me.txtAbfVerb_RechtsanwaltSeit._value = "" - Me.txtAbfVerb_RechtsanwaltSeit._Waehrung = False - Me.txtAbfVerb_RechtsanwaltSeit._WaehrungZeichen = True - Me.txtAbfVerb_RechtsanwaltSeit.Enabled = False - Me.txtAbfVerb_RechtsanwaltSeit.ForeColor = System.Drawing.Color.Red - Me.txtAbfVerb_RechtsanwaltSeit.Location = New System.Drawing.Point(173, 33) - Me.txtAbfVerb_RechtsanwaltSeit.MaxLength = 10 - Me.txtAbfVerb_RechtsanwaltSeit.MaxLineLength = -1 - Me.txtAbfVerb_RechtsanwaltSeit.MaxLines_Warning = "" - Me.txtAbfVerb_RechtsanwaltSeit.MaxLines_Warning_Label = Nothing - Me.txtAbfVerb_RechtsanwaltSeit.Name = "txtAbfVerb_RechtsanwaltSeit" - Me.txtAbfVerb_RechtsanwaltSeit.Size = New System.Drawing.Size(60, 20) - Me.txtAbfVerb_RechtsanwaltSeit.TabIndex = 6 - Me.txtAbfVerb_RechtsanwaltSeit.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'txtAbfVerb_AbfertigungsverbotSeit - ' - Me.txtAbfVerb_AbfertigungsverbotSeit._DateTimeOnly = False - Me.txtAbfVerb_AbfertigungsverbotSeit._numbersOnly = False - Me.txtAbfVerb_AbfertigungsverbotSeit._numbersOnlyKommastellen = "" - Me.txtAbfVerb_AbfertigungsverbotSeit._numbersOnlyTrennzeichen = True - Me.txtAbfVerb_AbfertigungsverbotSeit._Prozent = False - Me.txtAbfVerb_AbfertigungsverbotSeit._ShortDateNew = True - Me.txtAbfVerb_AbfertigungsverbotSeit._ShortDateOnly = True - Me.txtAbfVerb_AbfertigungsverbotSeit._TimeOnly = False - Me.txtAbfVerb_AbfertigungsverbotSeit._TimeOnly_Seconds = False - Me.txtAbfVerb_AbfertigungsverbotSeit._value = "" - Me.txtAbfVerb_AbfertigungsverbotSeit._Waehrung = False - Me.txtAbfVerb_AbfertigungsverbotSeit._WaehrungZeichen = True - Me.txtAbfVerb_AbfertigungsverbotSeit.Enabled = False - Me.txtAbfVerb_AbfertigungsverbotSeit.ForeColor = System.Drawing.Color.Red - Me.txtAbfVerb_AbfertigungsverbotSeit.Location = New System.Drawing.Point(173, 7) - Me.txtAbfVerb_AbfertigungsverbotSeit.MaxLength = 10 - Me.txtAbfVerb_AbfertigungsverbotSeit.MaxLineLength = -1 - Me.txtAbfVerb_AbfertigungsverbotSeit.MaxLines_Warning = "" - Me.txtAbfVerb_AbfertigungsverbotSeit.MaxLines_Warning_Label = Nothing - Me.txtAbfVerb_AbfertigungsverbotSeit.Name = "txtAbfVerb_AbfertigungsverbotSeit" - Me.txtAbfVerb_AbfertigungsverbotSeit.Size = New System.Drawing.Size(60, 20) - Me.txtAbfVerb_AbfertigungsverbotSeit.TabIndex = 2 - Me.txtAbfVerb_AbfertigungsverbotSeit.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'txtAbf_ZollVmVom - ' - Me.txtAbf_ZollVmVom._DateTimeOnly = False - Me.txtAbf_ZollVmVom._numbersOnly = False - Me.txtAbf_ZollVmVom._numbersOnlyKommastellen = "" - Me.txtAbf_ZollVmVom._numbersOnlyTrennzeichen = True - Me.txtAbf_ZollVmVom._Prozent = False - Me.txtAbf_ZollVmVom._ShortDateNew = True - Me.txtAbf_ZollVmVom._ShortDateOnly = False - Me.txtAbf_ZollVmVom._TimeOnly = False - Me.txtAbf_ZollVmVom._TimeOnly_Seconds = False - Me.txtAbf_ZollVmVom._value = "" - Me.txtAbf_ZollVmVom._Waehrung = False - Me.txtAbf_ZollVmVom._WaehrungZeichen = True - Me.txtAbf_ZollVmVom.Enabled = False - Me.txtAbf_ZollVmVom.ForeColor = System.Drawing.Color.Red - Me.txtAbf_ZollVmVom.Location = New System.Drawing.Point(152, 44) - Me.txtAbf_ZollVmVom.MaxLength = 10 - Me.txtAbf_ZollVmVom.MaxLineLength = -1 - Me.txtAbf_ZollVmVom.MaxLines_Warning = "" - Me.txtAbf_ZollVmVom.MaxLines_Warning_Label = Nothing - Me.txtAbf_ZollVmVom.Name = "txtAbf_ZollVmVom" - Me.txtAbf_ZollVmVom.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_ZollVmVom.TabIndex = 3 - ' - 'txtAbf_Euroeinführung - ' - Me.txtAbf_Euroeinführung._DateTimeOnly = False - Me.txtAbf_Euroeinführung._numbersOnly = False - Me.txtAbf_Euroeinführung._numbersOnlyKommastellen = "" - Me.txtAbf_Euroeinführung._numbersOnlyTrennzeichen = True - Me.txtAbf_Euroeinführung._Prozent = False - Me.txtAbf_Euroeinführung._ShortDateNew = True - Me.txtAbf_Euroeinführung._ShortDateOnly = False - Me.txtAbf_Euroeinführung._TimeOnly = False - Me.txtAbf_Euroeinführung._TimeOnly_Seconds = False - Me.txtAbf_Euroeinführung._value = "" - Me.txtAbf_Euroeinführung._Waehrung = False - Me.txtAbf_Euroeinführung._WaehrungZeichen = True - Me.txtAbf_Euroeinführung.ForeColor = System.Drawing.Color.Red - Me.txtAbf_Euroeinführung.Location = New System.Drawing.Point(375, 165) - Me.txtAbf_Euroeinführung.MaxLength = 10 - Me.txtAbf_Euroeinführung.MaxLineLength = -1 - Me.txtAbf_Euroeinführung.MaxLines_Warning = "" - Me.txtAbf_Euroeinführung.MaxLines_Warning_Label = Nothing - Me.txtAbf_Euroeinführung.Name = "txtAbf_Euroeinführung" - Me.txtAbf_Euroeinführung.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_Euroeinführung.TabIndex = 4 - Me.txtAbf_Euroeinführung.Visible = False - ' - 'txtAbf_ErsteAbfertigung - ' - Me.txtAbf_ErsteAbfertigung._DateTimeOnly = False - Me.txtAbf_ErsteAbfertigung._numbersOnly = False - Me.txtAbf_ErsteAbfertigung._numbersOnlyKommastellen = "" - Me.txtAbf_ErsteAbfertigung._numbersOnlyTrennzeichen = True - Me.txtAbf_ErsteAbfertigung._Prozent = False - Me.txtAbf_ErsteAbfertigung._ShortDateNew = True - Me.txtAbf_ErsteAbfertigung._ShortDateOnly = False - Me.txtAbf_ErsteAbfertigung._TimeOnly = False - Me.txtAbf_ErsteAbfertigung._TimeOnly_Seconds = False - Me.txtAbf_ErsteAbfertigung._value = "" - Me.txtAbf_ErsteAbfertigung._Waehrung = False - Me.txtAbf_ErsteAbfertigung._WaehrungZeichen = True - Me.txtAbf_ErsteAbfertigung.ForeColor = System.Drawing.Color.Red - Me.txtAbf_ErsteAbfertigung.Location = New System.Drawing.Point(216, 162) - Me.txtAbf_ErsteAbfertigung.MaxLength = 10 - Me.txtAbf_ErsteAbfertigung.MaxLineLength = -1 - Me.txtAbf_ErsteAbfertigung.MaxLines_Warning = "" - Me.txtAbf_ErsteAbfertigung.MaxLines_Warning_Label = Nothing - Me.txtAbf_ErsteAbfertigung.Name = "txtAbf_ErsteAbfertigung" - Me.txtAbf_ErsteAbfertigung.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_ErsteAbfertigung.TabIndex = 13 - Me.txtAbf_ErsteAbfertigung.Visible = False - ' - 'cbxKapitalWaehrung - ' - Me.cbxKapitalWaehrung._allowedValuesFreiText = Nothing - Me.cbxKapitalWaehrung._allowFreiText = False - Me.cbxKapitalWaehrung._value = "" - Me.cbxKapitalWaehrung.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) - Me.cbxKapitalWaehrung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cbxKapitalWaehrung.DropDownWidth = 200 - Me.cbxKapitalWaehrung.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cbxKapitalWaehrung.ForeColor = System.Drawing.Color.Black - Me.cbxKapitalWaehrung.FormattingEnabled = True - Me.cbxKapitalWaehrung.Location = New System.Drawing.Point(191, 293) - Me.cbxKapitalWaehrung.Name = "cbxKapitalWaehrung" - Me.cbxKapitalWaehrung.Size = New System.Drawing.Size(47, 21) - Me.cbxKapitalWaehrung.TabIndex = 45 - ' - 'txtKapital - ' - Me.txtKapital._DateTimeOnly = False - Me.txtKapital._numbersOnly = True - Me.txtKapital._numbersOnlyKommastellen = "" - Me.txtKapital._numbersOnlyTrennzeichen = False - Me.txtKapital._Prozent = False - Me.txtKapital._ShortDateNew = False - Me.txtKapital._ShortDateOnly = False - Me.txtKapital._TimeOnly = False - Me.txtKapital._TimeOnly_Seconds = False - Me.txtKapital._value = "" - Me.txtKapital._Waehrung = True - Me.txtKapital._WaehrungZeichen = False - Me.txtKapital.ForeColor = System.Drawing.Color.Red - Me.txtKapital.Location = New System.Drawing.Point(76, 293) - Me.txtKapital.MaxLength = 10 - Me.txtKapital.MaxLineLength = -1 - Me.txtKapital.MaxLines_Warning = "" - Me.txtKapital.MaxLines_Warning_Label = Nothing - Me.txtKapital.Name = "txtKapital" - Me.txtKapital.Size = New System.Drawing.Size(109, 20) - Me.txtKapital.TabIndex = 44 - Me.txtKapital.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'txtAbwZZVL - ' - Me.txtAbwZZVL._DateTimeOnly = False - Me.txtAbwZZVL._numbersOnly = True - Me.txtAbwZZVL._numbersOnlyKommastellen = "" - Me.txtAbwZZVL._numbersOnlyTrennzeichen = True - Me.txtAbwZZVL._Prozent = False - Me.txtAbwZZVL._ShortDateNew = False - Me.txtAbwZZVL._ShortDateOnly = False - Me.txtAbwZZVL._TimeOnly = False - Me.txtAbwZZVL._TimeOnly_Seconds = False - Me.txtAbwZZVL._value = "" - Me.txtAbwZZVL._Waehrung = False - Me.txtAbwZZVL._WaehrungZeichen = True - Me.txtAbwZZVL.ForeColor = System.Drawing.Color.Red - Me.txtAbwZZVL.Location = New System.Drawing.Point(191, 66) - Me.txtAbwZZVL.MaxLength = 10 - Me.txtAbwZZVL.MaxLineLength = -1 - Me.txtAbwZZVL.MaxLines_Warning = "" - Me.txtAbwZZVL.MaxLines_Warning_Label = Nothing - Me.txtAbwZZVL.Name = "txtAbwZZVL" - Me.txtAbwZZVL.Size = New System.Drawing.Size(60, 20) - Me.txtAbwZZVL.TabIndex = 41 - Me.txtAbwZZVL.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'cboRechnungSprache - ' - Me.cboRechnungSprache._allowedValuesFreiText = Nothing - Me.cboRechnungSprache._allowFreiText = False - Me.cboRechnungSprache._value = "" - Me.cboRechnungSprache.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) - Me.cboRechnungSprache.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboRechnungSprache.DropDownWidth = 200 - Me.cboRechnungSprache.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboRechnungSprache.ForeColor = System.Drawing.Color.Black - Me.cboRechnungSprache.FormattingEnabled = True - Me.cboRechnungSprache.Location = New System.Drawing.Point(527, 132) - Me.cboRechnungSprache.Name = "cboRechnungSprache" - Me.cboRechnungSprache.Size = New System.Drawing.Size(73, 21) - Me.cboRechnungSprache.TabIndex = 39 - ' - 'txtDebKdNr - ' - Me.txtDebKdNr._DateTimeOnly = False - Me.txtDebKdNr._numbersOnly = True - Me.txtDebKdNr._numbersOnlyKommastellen = "" - Me.txtDebKdNr._numbersOnlyTrennzeichen = True - Me.txtDebKdNr._Prozent = False - Me.txtDebKdNr._ShortDateNew = False - Me.txtDebKdNr._ShortDateOnly = False - Me.txtDebKdNr._TimeOnly = False - Me.txtDebKdNr._TimeOnly_Seconds = False - Me.txtDebKdNr._value = "" - Me.txtDebKdNr._Waehrung = False - Me.txtDebKdNr._WaehrungZeichen = False - Me.txtDebKdNr.ForeColor = System.Drawing.Color.Red - Me.txtDebKdNr.Location = New System.Drawing.Point(125, 20) - Me.txtDebKdNr.MaxLength = 10 - Me.txtDebKdNr.MaxLineLength = -1 - Me.txtDebKdNr.MaxLines_Warning = "" - Me.txtDebKdNr.MaxLines_Warning_Label = Nothing - Me.txtDebKdNr.Name = "txtDebKdNr" - Me.txtDebKdNr.Size = New System.Drawing.Size(86, 20) - Me.txtDebKdNr.TabIndex = 33 - Me.txtDebKdNr.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'txtAbf_Zahlungsziel3 - ' - Me.txtAbf_Zahlungsziel3._DateTimeOnly = False - Me.txtAbf_Zahlungsziel3._numbersOnly = True - Me.txtAbf_Zahlungsziel3._numbersOnlyKommastellen = "" - Me.txtAbf_Zahlungsziel3._numbersOnlyTrennzeichen = True - Me.txtAbf_Zahlungsziel3._Prozent = False - Me.txtAbf_Zahlungsziel3._ShortDateNew = False - Me.txtAbf_Zahlungsziel3._ShortDateOnly = False - Me.txtAbf_Zahlungsziel3._TimeOnly = False - Me.txtAbf_Zahlungsziel3._TimeOnly_Seconds = False - Me.txtAbf_Zahlungsziel3._value = "" - Me.txtAbf_Zahlungsziel3._Waehrung = False - Me.txtAbf_Zahlungsziel3._WaehrungZeichen = True - Me.txtAbf_Zahlungsziel3.ForeColor = System.Drawing.Color.Red - Me.txtAbf_Zahlungsziel3.Location = New System.Drawing.Point(257, 159) - Me.txtAbf_Zahlungsziel3.MaxLength = 10 - Me.txtAbf_Zahlungsziel3.MaxLineLength = -1 - Me.txtAbf_Zahlungsziel3.MaxLines_Warning = "" - Me.txtAbf_Zahlungsziel3.MaxLines_Warning_Label = Nothing - Me.txtAbf_Zahlungsziel3.Name = "txtAbf_Zahlungsziel3" - Me.txtAbf_Zahlungsziel3.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_Zahlungsziel3.TabIndex = 30 - Me.txtAbf_Zahlungsziel3.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'txtAbf_Zahlungsziel2 - ' - Me.txtAbf_Zahlungsziel2._DateTimeOnly = False - Me.txtAbf_Zahlungsziel2._numbersOnly = True - Me.txtAbf_Zahlungsziel2._numbersOnlyKommastellen = "" - Me.txtAbf_Zahlungsziel2._numbersOnlyTrennzeichen = True - Me.txtAbf_Zahlungsziel2._Prozent = False - Me.txtAbf_Zahlungsziel2._ShortDateNew = False - Me.txtAbf_Zahlungsziel2._ShortDateOnly = False - Me.txtAbf_Zahlungsziel2._TimeOnly = False - Me.txtAbf_Zahlungsziel2._TimeOnly_Seconds = False - Me.txtAbf_Zahlungsziel2._value = "" - Me.txtAbf_Zahlungsziel2._Waehrung = False - Me.txtAbf_Zahlungsziel2._WaehrungZeichen = True - Me.txtAbf_Zahlungsziel2.ForeColor = System.Drawing.Color.Red - Me.txtAbf_Zahlungsziel2.Location = New System.Drawing.Point(191, 159) - Me.txtAbf_Zahlungsziel2.MaxLength = 10 - Me.txtAbf_Zahlungsziel2.MaxLineLength = -1 - Me.txtAbf_Zahlungsziel2.MaxLines_Warning = "" - Me.txtAbf_Zahlungsziel2.MaxLines_Warning_Label = Nothing - Me.txtAbf_Zahlungsziel2.Name = "txtAbf_Zahlungsziel2" - Me.txtAbf_Zahlungsziel2.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_Zahlungsziel2.TabIndex = 29 - Me.txtAbf_Zahlungsziel2.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'txtAbf_LastschriftBis - ' - Me.txtAbf_LastschriftBis._DateTimeOnly = False - Me.txtAbf_LastschriftBis._numbersOnly = False - Me.txtAbf_LastschriftBis._numbersOnlyKommastellen = "" - Me.txtAbf_LastschriftBis._numbersOnlyTrennzeichen = True - Me.txtAbf_LastschriftBis._Prozent = False - Me.txtAbf_LastschriftBis._ShortDateNew = True - Me.txtAbf_LastschriftBis._ShortDateOnly = False - Me.txtAbf_LastschriftBis._TimeOnly = False - Me.txtAbf_LastschriftBis._TimeOnly_Seconds = False - Me.txtAbf_LastschriftBis._value = "" - Me.txtAbf_LastschriftBis._Waehrung = False - Me.txtAbf_LastschriftBis._WaehrungZeichen = True - Me.txtAbf_LastschriftBis.Enabled = False - Me.txtAbf_LastschriftBis.ForeColor = System.Drawing.Color.Red - Me.txtAbf_LastschriftBis.Location = New System.Drawing.Point(257, 196) - Me.txtAbf_LastschriftBis.MaxLength = 10 - Me.txtAbf_LastschriftBis.MaxLineLength = -1 - Me.txtAbf_LastschriftBis.MaxLines_Warning = "" - Me.txtAbf_LastschriftBis.MaxLines_Warning_Label = Nothing - Me.txtAbf_LastschriftBis.Name = "txtAbf_LastschriftBis" - Me.txtAbf_LastschriftBis.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_LastschriftBis.TabIndex = 9 - ' - 'txtAbf_LastschriftVon - ' - Me.txtAbf_LastschriftVon._DateTimeOnly = False - Me.txtAbf_LastschriftVon._numbersOnly = False - Me.txtAbf_LastschriftVon._numbersOnlyKommastellen = "" - Me.txtAbf_LastschriftVon._numbersOnlyTrennzeichen = True - Me.txtAbf_LastschriftVon._Prozent = False - Me.txtAbf_LastschriftVon._ShortDateNew = True - Me.txtAbf_LastschriftVon._ShortDateOnly = False - Me.txtAbf_LastschriftVon._TimeOnly = False - Me.txtAbf_LastschriftVon._TimeOnly_Seconds = False - Me.txtAbf_LastschriftVon._value = "" - Me.txtAbf_LastschriftVon._Waehrung = False - Me.txtAbf_LastschriftVon._WaehrungZeichen = True - Me.txtAbf_LastschriftVon.Enabled = False - Me.txtAbf_LastschriftVon.ForeColor = System.Drawing.Color.Red - Me.txtAbf_LastschriftVon.Location = New System.Drawing.Point(191, 196) - Me.txtAbf_LastschriftVon.MaxLength = 10 - Me.txtAbf_LastschriftVon.MaxLineLength = -1 - Me.txtAbf_LastschriftVon.MaxLines_Warning = "" - Me.txtAbf_LastschriftVon.MaxLines_Warning_Label = Nothing - Me.txtAbf_LastschriftVon.Name = "txtAbf_LastschriftVon" - Me.txtAbf_LastschriftVon.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_LastschriftVon.TabIndex = 8 - ' - 'txtProvAuftraggeber - ' - Me.txtProvAuftraggeber._DateTimeOnly = False - Me.txtProvAuftraggeber._numbersOnly = False - Me.txtProvAuftraggeber._numbersOnlyKommastellen = "" - Me.txtProvAuftraggeber._numbersOnlyTrennzeichen = True - Me.txtProvAuftraggeber._Prozent = True - Me.txtProvAuftraggeber._ShortDateNew = False - Me.txtProvAuftraggeber._ShortDateOnly = False - Me.txtProvAuftraggeber._TimeOnly = False - Me.txtProvAuftraggeber._TimeOnly_Seconds = False - Me.txtProvAuftraggeber._value = "0" - Me.txtProvAuftraggeber._Waehrung = False - Me.txtProvAuftraggeber._WaehrungZeichen = True - Me.txtProvAuftraggeber.ForeColor = System.Drawing.Color.Black - Me.txtProvAuftraggeber.Location = New System.Drawing.Point(125, 427) - Me.txtProvAuftraggeber.MaxLineLength = -1 - Me.txtProvAuftraggeber.MaxLines_Warning = "" - Me.txtProvAuftraggeber.MaxLines_Warning_Label = Nothing - Me.txtProvAuftraggeber.Name = "txtProvAuftraggeber" - Me.txtProvAuftraggeber.Size = New System.Drawing.Size(60, 20) - Me.txtProvAuftraggeber.TabIndex = 28 - Me.txtProvAuftraggeber.Text = "0,00 %" - Me.txtProvAuftraggeber.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'cboProvisionStaffel - ' - Me.cboProvisionStaffel._allowedValuesFreiText = Nothing - Me.cboProvisionStaffel._allowFreiText = False - Me.cboProvisionStaffel._value = "" - Me.cboProvisionStaffel.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) - Me.cboProvisionStaffel.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboProvisionStaffel.DropDownWidth = 200 - Me.cboProvisionStaffel.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboProvisionStaffel.ForeColor = System.Drawing.Color.Black - Me.cboProvisionStaffel.FormattingEnabled = True - Me.cboProvisionStaffel.Location = New System.Drawing.Point(125, 402) - Me.cboProvisionStaffel.Name = "cboProvisionStaffel" - Me.cboProvisionStaffel.Size = New System.Drawing.Size(145, 21) - Me.cboProvisionStaffel.TabIndex = 26 - ' - 'cboProvisionStaffelArt - ' - Me.cboProvisionStaffelArt._allowedValuesFreiText = Nothing - Me.cboProvisionStaffelArt._allowFreiText = False - Me.cboProvisionStaffelArt._value = "" - Me.cboProvisionStaffelArt.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) - Me.cboProvisionStaffelArt.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboProvisionStaffelArt.DropDownWidth = 400 - Me.cboProvisionStaffelArt.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboProvisionStaffelArt.ForeColor = System.Drawing.Color.Black - Me.cboProvisionStaffelArt.FormattingEnabled = True - Me.cboProvisionStaffelArt.Location = New System.Drawing.Point(125, 380) - Me.cboProvisionStaffelArt.Name = "cboProvisionStaffelArt" - Me.cboProvisionStaffelArt.Size = New System.Drawing.Size(146, 21) - Me.cboProvisionStaffelArt.TabIndex = 24 - ' - 'cboAbf_Waehrung - ' - Me.cboAbf_Waehrung._allowedValuesFreiText = Nothing - Me.cboAbf_Waehrung._allowFreiText = False - Me.cboAbf_Waehrung._value = "" - Me.cboAbf_Waehrung.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) - Me.cboAbf_Waehrung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboAbf_Waehrung.DropDownWidth = 200 - Me.cboAbf_Waehrung.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboAbf_Waehrung.ForeColor = System.Drawing.Color.Black - Me.cboAbf_Waehrung.FormattingEnabled = True - Me.cboAbf_Waehrung.Location = New System.Drawing.Point(527, 110) - Me.cboAbf_Waehrung.Name = "cboAbf_Waehrung" - Me.cboAbf_Waehrung.Size = New System.Drawing.Size(47, 21) - Me.cboAbf_Waehrung.TabIndex = 14 - ' - 'cboAbf_Steuerschluessel - ' - Me.cboAbf_Steuerschluessel._allowedValuesFreiText = Nothing - Me.cboAbf_Steuerschluessel._allowFreiText = False - Me.cboAbf_Steuerschluessel._value = "" - Me.cboAbf_Steuerschluessel.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) - Me.cboAbf_Steuerschluessel.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboAbf_Steuerschluessel.DropDownWidth = 400 - Me.cboAbf_Steuerschluessel.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboAbf_Steuerschluessel.ForeColor = System.Drawing.Color.Black - Me.cboAbf_Steuerschluessel.FormattingEnabled = True - Me.cboAbf_Steuerschluessel.Location = New System.Drawing.Point(527, 88) - Me.cboAbf_Steuerschluessel.Name = "cboAbf_Steuerschluessel" - Me.cboAbf_Steuerschluessel.Size = New System.Drawing.Size(105, 21) - Me.cboAbf_Steuerschluessel.TabIndex = 9 - ' - 'cboAbf_Sammelrechnung - ' - Me.cboAbf_Sammelrechnung._allowedValuesFreiText = Nothing - Me.cboAbf_Sammelrechnung._allowFreiText = False - Me.cboAbf_Sammelrechnung._value = "" - Me.cboAbf_Sammelrechnung.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) - Me.cboAbf_Sammelrechnung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboAbf_Sammelrechnung.DropDownWidth = 200 - Me.cboAbf_Sammelrechnung.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboAbf_Sammelrechnung.ForeColor = System.Drawing.Color.Black - Me.cboAbf_Sammelrechnung.FormattingEnabled = True - Me.cboAbf_Sammelrechnung.Location = New System.Drawing.Point(527, 66) - Me.cboAbf_Sammelrechnung.Name = "cboAbf_Sammelrechnung" - Me.cboAbf_Sammelrechnung.Size = New System.Drawing.Size(105, 21) - Me.cboAbf_Sammelrechnung.TabIndex = 4 - ' - 'txtAbf_BankspesenMindestbetrag - ' - Me.txtAbf_BankspesenMindestbetrag._DateTimeOnly = False - Me.txtAbf_BankspesenMindestbetrag._numbersOnly = False - Me.txtAbf_BankspesenMindestbetrag._numbersOnlyKommastellen = "" - Me.txtAbf_BankspesenMindestbetrag._numbersOnlyTrennzeichen = True - Me.txtAbf_BankspesenMindestbetrag._Prozent = False - Me.txtAbf_BankspesenMindestbetrag._ShortDateNew = False - Me.txtAbf_BankspesenMindestbetrag._ShortDateOnly = False - Me.txtAbf_BankspesenMindestbetrag._TimeOnly = False - Me.txtAbf_BankspesenMindestbetrag._TimeOnly_Seconds = False - Me.txtAbf_BankspesenMindestbetrag._value = "" - Me.txtAbf_BankspesenMindestbetrag._Waehrung = True - Me.txtAbf_BankspesenMindestbetrag._WaehrungZeichen = True - Me.txtAbf_BankspesenMindestbetrag.ForeColor = System.Drawing.Color.Red - Me.txtAbf_BankspesenMindestbetrag.Location = New System.Drawing.Point(125, 132) - Me.txtAbf_BankspesenMindestbetrag.MaxLength = 50 - Me.txtAbf_BankspesenMindestbetrag.MaxLineLength = -1 - Me.txtAbf_BankspesenMindestbetrag.MaxLines_Warning = "" - Me.txtAbf_BankspesenMindestbetrag.MaxLines_Warning_Label = Nothing - Me.txtAbf_BankspesenMindestbetrag.Name = "txtAbf_BankspesenMindestbetrag" - Me.txtAbf_BankspesenMindestbetrag.Size = New System.Drawing.Size(86, 20) - Me.txtAbf_BankspesenMindestbetrag.TabIndex = 16 - Me.txtAbf_BankspesenMindestbetrag.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'txtAbf_Bankspesen - ' - Me.txtAbf_Bankspesen._DateTimeOnly = False - Me.txtAbf_Bankspesen._numbersOnly = False - Me.txtAbf_Bankspesen._numbersOnlyKommastellen = "" - Me.txtAbf_Bankspesen._numbersOnlyTrennzeichen = True - Me.txtAbf_Bankspesen._Prozent = True - Me.txtAbf_Bankspesen._ShortDateNew = False - Me.txtAbf_Bankspesen._ShortDateOnly = False - Me.txtAbf_Bankspesen._TimeOnly = False - Me.txtAbf_Bankspesen._TimeOnly_Seconds = False - Me.txtAbf_Bankspesen._value = Nothing - Me.txtAbf_Bankspesen._Waehrung = False - Me.txtAbf_Bankspesen._WaehrungZeichen = True - Me.txtAbf_Bankspesen.ForeColor = System.Drawing.Color.Black - Me.txtAbf_Bankspesen.Location = New System.Drawing.Point(125, 110) - Me.txtAbf_Bankspesen.MaxLength = 10 - Me.txtAbf_Bankspesen.MaxLineLength = -1 - Me.txtAbf_Bankspesen.MaxLines_Warning = "" - Me.txtAbf_Bankspesen.MaxLines_Warning_Label = Nothing - Me.txtAbf_Bankspesen.Name = "txtAbf_Bankspesen" - Me.txtAbf_Bankspesen.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_Bankspesen.TabIndex = 11 - Me.txtAbf_Bankspesen.Text = "0,00 %" - Me.txtAbf_Bankspesen.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'txtAbf_Kreditaufwendungen - ' - Me.txtAbf_Kreditaufwendungen._DateTimeOnly = False - Me.txtAbf_Kreditaufwendungen._numbersOnly = False - Me.txtAbf_Kreditaufwendungen._numbersOnlyKommastellen = "" - Me.txtAbf_Kreditaufwendungen._numbersOnlyTrennzeichen = True - Me.txtAbf_Kreditaufwendungen._Prozent = True - Me.txtAbf_Kreditaufwendungen._ShortDateNew = False - Me.txtAbf_Kreditaufwendungen._ShortDateOnly = False - Me.txtAbf_Kreditaufwendungen._TimeOnly = False - Me.txtAbf_Kreditaufwendungen._TimeOnly_Seconds = False - Me.txtAbf_Kreditaufwendungen._value = Nothing - Me.txtAbf_Kreditaufwendungen._Waehrung = False - Me.txtAbf_Kreditaufwendungen._WaehrungZeichen = True - Me.txtAbf_Kreditaufwendungen.ForeColor = System.Drawing.Color.Black - Me.txtAbf_Kreditaufwendungen.Location = New System.Drawing.Point(125, 88) - Me.txtAbf_Kreditaufwendungen.MaxLength = 10 - Me.txtAbf_Kreditaufwendungen.MaxLineLength = -1 - Me.txtAbf_Kreditaufwendungen.MaxLines_Warning = "" - Me.txtAbf_Kreditaufwendungen.MaxLines_Warning_Label = Nothing - Me.txtAbf_Kreditaufwendungen.Name = "txtAbf_Kreditaufwendungen" - Me.txtAbf_Kreditaufwendungen.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_Kreditaufwendungen.TabIndex = 6 - Me.txtAbf_Kreditaufwendungen.Text = "0,00 %" - Me.txtAbf_Kreditaufwendungen.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'txtAbf_Vorlageprovision - ' - Me.txtAbf_Vorlageprovision._DateTimeOnly = False - Me.txtAbf_Vorlageprovision._numbersOnly = False - Me.txtAbf_Vorlageprovision._numbersOnlyKommastellen = "" - Me.txtAbf_Vorlageprovision._numbersOnlyTrennzeichen = True - Me.txtAbf_Vorlageprovision._Prozent = True - Me.txtAbf_Vorlageprovision._ShortDateNew = False - Me.txtAbf_Vorlageprovision._ShortDateOnly = False - Me.txtAbf_Vorlageprovision._TimeOnly = False - Me.txtAbf_Vorlageprovision._TimeOnly_Seconds = False - Me.txtAbf_Vorlageprovision._value = "0" - Me.txtAbf_Vorlageprovision._Waehrung = False - Me.txtAbf_Vorlageprovision._WaehrungZeichen = True - Me.txtAbf_Vorlageprovision.ForeColor = System.Drawing.Color.Black - Me.txtAbf_Vorlageprovision.Location = New System.Drawing.Point(125, 66) - Me.txtAbf_Vorlageprovision.MaxLength = 10 - Me.txtAbf_Vorlageprovision.MaxLineLength = -1 - Me.txtAbf_Vorlageprovision.MaxLines_Warning = "" - Me.txtAbf_Vorlageprovision.MaxLines_Warning_Label = Nothing - Me.txtAbf_Vorlageprovision.Name = "txtAbf_Vorlageprovision" - Me.txtAbf_Vorlageprovision.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_Vorlageprovision.TabIndex = 1 - Me.txtAbf_Vorlageprovision.Text = "0,00 %" - Me.txtAbf_Vorlageprovision.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'txtAbf_Zahlungsziel - ' - Me.txtAbf_Zahlungsziel._DateTimeOnly = False - Me.txtAbf_Zahlungsziel._numbersOnly = True - Me.txtAbf_Zahlungsziel._numbersOnlyKommastellen = "" - Me.txtAbf_Zahlungsziel._numbersOnlyTrennzeichen = True - Me.txtAbf_Zahlungsziel._Prozent = False - Me.txtAbf_Zahlungsziel._ShortDateNew = False - Me.txtAbf_Zahlungsziel._ShortDateOnly = False - Me.txtAbf_Zahlungsziel._TimeOnly = False - Me.txtAbf_Zahlungsziel._TimeOnly_Seconds = False - Me.txtAbf_Zahlungsziel._value = "" - Me.txtAbf_Zahlungsziel._Waehrung = False - Me.txtAbf_Zahlungsziel._WaehrungZeichen = True - Me.txtAbf_Zahlungsziel.ForeColor = System.Drawing.Color.Red - Me.txtAbf_Zahlungsziel.Location = New System.Drawing.Point(125, 159) - Me.txtAbf_Zahlungsziel.MaxLength = 10 - Me.txtAbf_Zahlungsziel.MaxLineLength = -1 - Me.txtAbf_Zahlungsziel.MaxLines_Warning = "" - Me.txtAbf_Zahlungsziel.MaxLines_Warning_Label = Nothing - Me.txtAbf_Zahlungsziel.Name = "txtAbf_Zahlungsziel" - Me.txtAbf_Zahlungsziel.Size = New System.Drawing.Size(60, 20) - Me.txtAbf_Zahlungsziel.TabIndex = 18 - Me.txtAbf_Zahlungsziel.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' 'txtWechselErhaltenAm ' Me.txtWechselErhaltenAm._DateTimeOnly = False @@ -4607,6 +2960,64 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtVers_HermesRefNr.Size = New System.Drawing.Size(189, 20) Me.txtVers_HermesRefNr.TabIndex = 1 ' + 'tbUmsatz + ' + Me.tbUmsatz.Controls.Add(Me.Label65) + Me.tbUmsatz.Controls.Add(Me.dgvUmsatzbericht) + Me.tbUmsatz.Location = New System.Drawing.Point(4, 22) + Me.tbUmsatz.Name = "tbUmsatz" + Me.tbUmsatz.Padding = New System.Windows.Forms.Padding(3) + Me.tbUmsatz.Size = New System.Drawing.Size(672, 495) + Me.tbUmsatz.TabIndex = 3 + Me.tbUmsatz.Text = "Umsatz" + Me.tbUmsatz.UseVisualStyleBackColor = True + ' + 'Label65 + ' + Me.Label65.AutoSize = True + Me.Label65.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label65.Location = New System.Drawing.Point(6, 9) + Me.Label65.Name = "Label65" + Me.Label65.Size = New System.Drawing.Size(77, 13) + Me.Label65.TabIndex = 0 + Me.Label65.Text = "Umsatzbericht:" + ' + 'dgvUmsatzbericht + ' + Me.dgvUmsatzbericht.AllowUserToAddRows = False + 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 + Me.dgvUmsatzbericht.BackgroundColor = System.Drawing.Color.White + Me.dgvUmsatzbericht.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize + Me.dgvUmsatzbericht.Location = New System.Drawing.Point(6, 25) + Me.dgvUmsatzbericht.Name = "dgvUmsatzbericht" + Me.dgvUmsatzbericht.ReadOnly = True + Me.dgvUmsatzbericht.RowHeadersVisible = False + Me.dgvUmsatzbericht.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect + Me.dgvUmsatzbericht.Size = New System.Drawing.Size(660, 427) + Me.dgvUmsatzbericht.TabIndex = 1 + ' + 'tbOP + ' + Me.tbOP.Controls.Add(Me.txtHoechstkredit) + Me.tbOP.Controls.Add(Me.Label69) + Me.tbOP.Controls.Add(Me.lblbon) + Me.tbOP.Controls.Add(Me.Label67) + Me.tbOP.Controls.Add(Me.Label66) + Me.tbOP.Controls.Add(Me.dgvOffenePosten) + Me.tbOP.Controls.Add(Me.txtBonitaetsDatum) + Me.tbOP.Controls.Add(Me.txtBonitaet) + Me.tbOP.Location = New System.Drawing.Point(4, 22) + Me.tbOP.Name = "tbOP" + Me.tbOP.Padding = New System.Windows.Forms.Padding(3) + Me.tbOP.Size = New System.Drawing.Size(672, 495) + Me.tbOP.TabIndex = 4 + Me.tbOP.Text = "Offene Posten" + Me.tbOP.UseVisualStyleBackColor = True + ' 'txtHoechstkredit ' Me.txtHoechstkredit._DateTimeOnly = False @@ -4631,6 +3042,64 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtHoechstkredit.TabIndex = 5 Me.txtHoechstkredit.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' + 'Label69 + ' + Me.Label69.AutoSize = True + Me.Label69.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label69.Location = New System.Drawing.Point(514, 9) + Me.Label69.Name = "Label69" + Me.Label69.Size = New System.Drawing.Size(70, 13) + Me.Label69.TabIndex = 4 + Me.Label69.Text = "Höchstkredit:" + ' + 'lblbon + ' + Me.lblbon.AutoSize = True + Me.lblbon.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbon.Location = New System.Drawing.Point(339, 9) + Me.lblbon.Name = "lblbon" + Me.lblbon.Size = New System.Drawing.Size(77, 13) + Me.lblbon.TabIndex = 2 + Me.lblbon.Text = "Bonitätsdatum:" + ' + 'Label67 + ' + Me.Label67.AutoSize = True + Me.Label67.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label67.Location = New System.Drawing.Point(225, 9) + Me.Label67.Name = "Label67" + Me.Label67.Size = New System.Drawing.Size(43, 13) + Me.Label67.TabIndex = 0 + Me.Label67.Text = "Bonität:" + ' + 'Label66 + ' + Me.Label66.AutoSize = True + Me.Label66.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label66.Location = New System.Drawing.Point(3, 19) + Me.Label66.Name = "Label66" + Me.Label66.Size = New System.Drawing.Size(160, 13) + Me.Label66.TabIndex = 6 + Me.Label66.Text = "Debitorenkonto - Offene Posten:" + ' + 'dgvOffenePosten + ' + Me.dgvOffenePosten.AllowUserToAddRows = False + 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 + Me.dgvOffenePosten.BackgroundColor = System.Drawing.Color.White + Me.dgvOffenePosten.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize + Me.dgvOffenePosten.Location = New System.Drawing.Point(6, 38) + Me.dgvOffenePosten.Name = "dgvOffenePosten" + Me.dgvOffenePosten.ReadOnly = True + Me.dgvOffenePosten.RowHeadersVisible = False + Me.dgvOffenePosten.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect + Me.dgvOffenePosten.Size = New System.Drawing.Size(660, 414) + Me.dgvOffenePosten.TabIndex = 7 + ' 'txtBonitaetsDatum ' Me.txtBonitaetsDatum._DateTimeOnly = False @@ -4680,6 +3149,201 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtBonitaet.TabIndex = 1 Me.txtBonitaet.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' + 'tbBank + ' + Me.tbBank.Controls.Add(Me.Label21) + Me.tbBank.Controls.Add(Me.GroupBox4) + Me.tbBank.Controls.Add(Me.txtBank_Kto) + Me.tbBank.Controls.Add(Me.Label22) + Me.tbBank.Controls.Add(Me.txtBank_Blz) + Me.tbBank.Location = New System.Drawing.Point(4, 22) + Me.tbBank.Name = "tbBank" + Me.tbBank.Padding = New System.Windows.Forms.Padding(3) + Me.tbBank.Size = New System.Drawing.Size(672, 495) + Me.tbBank.TabIndex = 5 + Me.tbBank.Text = "Bankverb./Kreditkarten" + Me.tbBank.UseVisualStyleBackColor = True + ' + 'Label21 + ' + Me.Label21.AutoSize = True + Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label21.Location = New System.Drawing.Point(6, 34) + Me.Label21.Name = "Label21" + Me.Label21.Size = New System.Drawing.Size(24, 13) + Me.Label21.TabIndex = 2 + Me.Label21.Text = "BIC" + ' + 'GroupBox4 + ' + Me.GroupBox4.Controls.Add(Me.Button10) + Me.GroupBox4.Controls.Add(Me.Button9) + Me.GroupBox4.Controls.Add(Me.bntGOBOXUmstellung) + Me.GroupBox4.Controls.Add(Me.btnKKhinzufuegen) + Me.GroupBox4.Controls.Add(Me.dgvKreditkarten) + Me.GroupBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.GroupBox4.Location = New System.Drawing.Point(9, 69) + Me.GroupBox4.Name = "GroupBox4" + Me.GroupBox4.Size = New System.Drawing.Size(657, 383) + Me.GroupBox4.TabIndex = 4 + Me.GroupBox4.TabStop = False + Me.GroupBox4.Text = "Kreditkarten" + ' + 'Button10 + ' + Me.Button10.Enabled = False + Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Button10.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button10.Location = New System.Drawing.Point(488, 338) + Me.Button10.Name = "Button10" + Me.Button10.Size = New System.Drawing.Size(163, 38) + Me.Button10.TabIndex = 4 + Me.Button10.Text = "Lohnrechner starten" + Me.Button10.UseVisualStyleBackColor = True + ' + 'Button9 + ' + Me.Button9.Enabled = False + Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button9.Location = New System.Drawing.Point(351, 338) + Me.Button9.Name = "Button9" + Me.Button9.Size = New System.Drawing.Size(131, 38) + Me.Button9.TabIndex = 3 + Me.Button9.Text = "Contract List" + Me.Button9.UseVisualStyleBackColor = True + ' + 'bntGOBOXUmstellung + ' + Me.bntGOBOXUmstellung.Enabled = False + Me.bntGOBOXUmstellung.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.bntGOBOXUmstellung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.bntGOBOXUmstellung.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.bntGOBOXUmstellung.Location = New System.Drawing.Point(193, 338) + Me.bntGOBOXUmstellung.Name = "bntGOBOXUmstellung" + Me.bntGOBOXUmstellung.Size = New System.Drawing.Size(152, 38) + Me.bntGOBOXUmstellung.TabIndex = 2 + Me.bntGOBOXUmstellung.Text = "GO-BOX-Umstellung" + Me.bntGOBOXUmstellung.UseVisualStyleBackColor = True + ' + 'btnKKhinzufuegen + ' + Me.btnKKhinzufuegen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnKKhinzufuegen.Enabled = False + Me.btnKKhinzufuegen.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnKKhinzufuegen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnKKhinzufuegen.Image = Global.SDL.My.Resources.Resources.plus + Me.btnKKhinzufuegen.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnKKhinzufuegen.Location = New System.Drawing.Point(9, 338) + Me.btnKKhinzufuegen.Name = "btnKKhinzufuegen" + Me.btnKKhinzufuegen.Size = New System.Drawing.Size(178, 38) + Me.btnKKhinzufuegen.TabIndex = 1 + Me.btnKKhinzufuegen.Text = "Kreditkarte hinzufügen" + Me.btnKKhinzufuegen.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnKKhinzufuegen.UseVisualStyleBackColor = True + ' + 'dgvKreditkarten + ' + Me.dgvKreditkarten.AllowUserToAddRows = False + 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 + 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 + 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 + 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 + 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 + 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) + Me.dgvKreditkarten.TabIndex = 0 + ' + 'txtBank_Kto + ' + Me.txtBank_Kto.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtBank_Kto.Location = New System.Drawing.Point(100, 6) + Me.txtBank_Kto.MaxLength = 8 + Me.txtBank_Kto.Name = "txtBank_Kto" + Me.txtBank_Kto.Size = New System.Drawing.Size(270, 20) + Me.txtBank_Kto.TabIndex = 3 + ' + 'Label22 + ' + Me.Label22.AutoSize = True + Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label22.Location = New System.Drawing.Point(6, 9) + Me.Label22.Name = "Label22" + Me.Label22.Size = New System.Drawing.Size(32, 13) + Me.Label22.TabIndex = 0 + Me.Label22.Text = "IBAN" + ' + 'txtBank_Blz + ' + Me.txtBank_Blz.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtBank_Blz.Location = New System.Drawing.Point(100, 31) + Me.txtBank_Blz.MaxLength = 12 + Me.txtBank_Blz.Name = "txtBank_Blz" + Me.txtBank_Blz.Size = New System.Drawing.Size(270, 20) + Me.txtBank_Blz.TabIndex = 1 + ' + 'tbUmsatzsteuer + ' + Me.tbUmsatzsteuer.Controls.Add(Me.txtUStIDGeprueftAm) + Me.tbUmsatzsteuer.Controls.Add(Me.txtUStID) + Me.tbUmsatzsteuer.Controls.Add(Me.Button3) + Me.tbUmsatzsteuer.Controls.Add(Me.Label85) + Me.tbUmsatzsteuer.Controls.Add(Me.Button11) + Me.tbUmsatzsteuer.Controls.Add(Me.txtSteuernummer) + Me.tbUmsatzsteuer.Controls.Add(Me.dgvUstv_LaenderUndSteuernummern) + Me.tbUmsatzsteuer.Controls.Add(Me.Label90) + Me.tbUmsatzsteuer.Controls.Add(Me.Label19) + Me.tbUmsatzsteuer.Controls.Add(Me.Label88) + Me.tbUmsatzsteuer.Controls.Add(Me.Label89) + Me.tbUmsatzsteuer.Controls.Add(Me.Label87) + Me.tbUmsatzsteuer.Controls.Add(Me.Label86) + Me.tbUmsatzsteuer.Controls.Add(Me.btnUStVAendSpeichern) + Me.tbUmsatzsteuer.Controls.Add(Me.txtUSt_GVAusgestelltAm) + Me.tbUmsatzsteuer.Controls.Add(Me.txtUSt_GVAngefordertAm) + Me.tbUmsatzsteuer.Location = New System.Drawing.Point(4, 22) + Me.tbUmsatzsteuer.Name = "tbUmsatzsteuer" + Me.tbUmsatzsteuer.Padding = New System.Windows.Forms.Padding(3) + Me.tbUmsatzsteuer.Size = New System.Drawing.Size(672, 495) + Me.tbUmsatzsteuer.TabIndex = 6 + Me.tbUmsatzsteuer.Text = "Umsatzsteuer" + Me.tbUmsatzsteuer.UseVisualStyleBackColor = True + ' 'txtUStIDGeprueftAm ' Me.txtUStIDGeprueftAm._DateTimeOnly = False @@ -4706,6 +3370,144 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtUStIDGeprueftAm.Size = New System.Drawing.Size(96, 20) Me.txtUStIDGeprueftAm.TabIndex = 3 ' + 'txtUStID + ' + Me.txtUStID.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtUStID.Location = New System.Drawing.Point(115, 6) + Me.txtUStID.Name = "txtUStID" + Me.txtUStID.ReadOnly = True + Me.txtUStID.Size = New System.Drawing.Size(159, 20) + Me.txtUStID.TabIndex = 1 + ' + 'Button3 + ' + Me.Button3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.Button3.FlatAppearance.BorderSize = 0 + Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button3.Location = New System.Drawing.Point(167, 421) + Me.Button3.Name = "Button3" + Me.Button3.Size = New System.Drawing.Size(51, 31) + Me.Button3.TabIndex = 15 + Me.Button3.UseVisualStyleBackColor = True + ' + 'Label85 + ' + Me.Label85.AutoSize = True + Me.Label85.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label85.Location = New System.Drawing.Point(6, 9) + Me.Label85.Name = "Label85" + Me.Label85.Size = New System.Drawing.Size(54, 13) + Me.Label85.TabIndex = 0 + Me.Label85.Text = "USt-Id-Nr:" + ' + 'Button11 + ' + Me.Button11.Enabled = False + Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button11.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button11.Location = New System.Drawing.Point(9, 421) + Me.Button11.Name = "Button11" + Me.Button11.Size = New System.Drawing.Size(152, 31) + Me.Button11.TabIndex = 14 + Me.Button11.Text = "UStV-Unterlagen" + Me.Button11.UseVisualStyleBackColor = True + ' + 'txtSteuernummer + ' + Me.txtSteuernummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtSteuernummer.Location = New System.Drawing.Point(543, 6) + Me.txtSteuernummer.Name = "txtSteuernummer" + Me.txtSteuernummer.ReadOnly = True + Me.txtSteuernummer.Size = New System.Drawing.Size(123, 20) + Me.txtSteuernummer.TabIndex = 5 + ' + '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 + 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 + 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 + 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) + Me.dgvUstv_LaenderUndSteuernummern.TabIndex = 13 + ' + 'Label90 + ' + Me.Label90.AutoSize = True + Me.Label90.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label90.Location = New System.Drawing.Point(6, 44) + Me.Label90.Name = "Label90" + Me.Label90.Size = New System.Drawing.Size(99, 13) + Me.Label90.TabIndex = 6 + Me.Label90.Text = "GV angefordert am:" + ' + 'Label19 + ' + Me.Label19.AutoSize = True + Me.Label19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label19.Location = New System.Drawing.Point(280, 9) + Me.Label19.Name = "Label19" + Me.Label19.Size = New System.Drawing.Size(66, 13) + Me.Label19.TabIndex = 2 + Me.Label19.Text = ", geprüft am:" + ' + 'Label88 + ' + Me.Label88.AutoSize = True + Me.Label88.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label88.Location = New System.Drawing.Point(245, 44) + Me.Label88.Name = "Label88" + Me.Label88.Size = New System.Drawing.Size(83, 13) + Me.Label88.TabIndex = 8 + Me.Label88.Text = ", ausgestellt am:" + ' + 'Label89 + ' + Me.Label89.AutoSize = True + Me.Label89.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label89.Location = New System.Drawing.Point(6, 78) + Me.Label89.Name = "Label89" + Me.Label89.Size = New System.Drawing.Size(366, 13) + Me.Label89.TabIndex = 12 + Me.Label89.Text = "Länder und Steuernummern für den Antrag auf Vergütung der Umsatzsteuer:" + ' + 'Label87 + ' + Me.Label87.AutoSize = True + Me.Label87.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label87.Location = New System.Drawing.Point(6, 52) + Me.Label87.Name = "Label87" + Me.Label87.Size = New System.Drawing.Size(10, 13) + Me.Label87.TabIndex = 10 + Me.Label87.Text = " " + ' + 'Label86 + ' + Me.Label86.AutoSize = True + Me.Label86.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label86.Location = New System.Drawing.Point(459, 9) + Me.Label86.Name = "Label86" + Me.Label86.Size = New System.Drawing.Size(78, 13) + Me.Label86.TabIndex = 4 + Me.Label86.Text = "Steuernummer:" + ' 'btnUStVAendSpeichern ' Me.btnUStVAendSpeichern.allowBorder = False @@ -4774,6 +3576,49 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtUSt_GVAngefordertAm.TabIndex = 7 Me.txtUSt_GVAngefordertAm.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' + 'tbSonstiges + ' + Me.tbSonstiges.Controls.Add(Me.txtSumVerag) + Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrVerag) + Me.tbSonstiges.Controls.Add(Me.Label110) + Me.tbSonstiges.Controls.Add(Me.Label109) + Me.tbSonstiges.Controls.Add(Me.Label99) + Me.tbSonstiges.Controls.Add(Me.txtCreditsafe) + Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrTOBB) + Me.tbSonstiges.Controls.Add(Me.Label96) + Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrPLOSE) + Me.tbSonstiges.Controls.Add(Me.Label83) + Me.tbSonstiges.Controls.Add(Me.Label76) + Me.tbSonstiges.Controls.Add(Me.dgvSonst_IDSKunden) + Me.tbSonstiges.Controls.Add(Me.cbxSonst_CsvAsfinag) + Me.tbSonstiges.Controls.Add(Me.cbxSonst_CsvUTA) + Me.tbSonstiges.Controls.Add(Me.cbxSonst_CsvMSE) + Me.tbSonstiges.Controls.Add(Me.cbxSonst_CsvMautbericht) + Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrUTA) + Me.tbSonstiges.Controls.Add(Me.Label75) + Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrTelepass) + Me.tbSonstiges.Controls.Add(Me.Label74) + Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrMSE) + Me.tbSonstiges.Controls.Add(Me.Label73) + Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrWOELFL) + Me.tbSonstiges.Controls.Add(Me.Label72) + Me.tbSonstiges.Controls.Add(Me.txtSonst_KdNrIDS) + Me.tbSonstiges.Controls.Add(Me.Label70) + Me.tbSonstiges.Controls.Add(Me.Label71) + Me.tbSonstiges.Controls.Add(Me.txtSumPLOSE) + Me.tbSonstiges.Controls.Add(Me.txtSumUTA) + Me.tbSonstiges.Controls.Add(Me.txtSumMSE) + Me.tbSonstiges.Controls.Add(Me.txtSumIDS) + Me.tbSonstiges.Controls.Add(Me.btnSonstAendSpeichern) + Me.tbSonstiges.Controls.Add(Me.cboSonst_Rechnungsdruck) + Me.tbSonstiges.Location = New System.Drawing.Point(4, 22) + Me.tbSonstiges.Name = "tbSonstiges" + Me.tbSonstiges.Padding = New System.Windows.Forms.Padding(3) + Me.tbSonstiges.Size = New System.Drawing.Size(672, 495) + Me.tbSonstiges.TabIndex = 7 + Me.tbSonstiges.Text = "Sonstiges" + Me.tbSonstiges.UseVisualStyleBackColor = True + ' 'txtSumVerag ' Me.txtSumVerag._DateTimeOnly = False @@ -4797,6 +3642,266 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtSumVerag.Size = New System.Drawing.Size(100, 20) Me.txtSumVerag.TabIndex = 32 ' + 'txtSonst_KdNrVerag + ' + Me.txtSonst_KdNrVerag.Location = New System.Drawing.Point(119, 231) + Me.txtSonst_KdNrVerag.MaxLength = 20 + Me.txtSonst_KdNrVerag.Name = "txtSonst_KdNrVerag" + Me.txtSonst_KdNrVerag.Size = New System.Drawing.Size(122, 20) + Me.txtSonst_KdNrVerag.TabIndex = 31 + ' + 'Label110 + ' + Me.Label110.AutoSize = True + Me.Label110.Enabled = False + Me.Label110.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label110.Location = New System.Drawing.Point(6, 233) + Me.Label110.Name = "Label110" + Me.Label110.Size = New System.Drawing.Size(82, 13) + Me.Label110.TabIndex = 30 + Me.Label110.Text = "KdNr bei Verag:" + ' + 'Label109 + ' + Me.Label109.AutoSize = True + Me.Label109.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label109.Location = New System.Drawing.Point(262, 9) + Me.Label109.Name = "Label109" + Me.Label109.Size = New System.Drawing.Size(94, 13) + Me.Label109.TabIndex = 25 + Me.Label109.Text = "Vorschausummen:" + ' + 'Label99 + ' + Me.Label99.AutoSize = True + Me.Label99.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label99.Location = New System.Drawing.Point(6, 34) + Me.Label99.Name = "Label99" + Me.Label99.Size = New System.Drawing.Size(71, 13) + Me.Label99.TabIndex = 24 + Me.Label99.Text = "ID Creditsafe:" + ' + 'txtCreditsafe + ' + Me.txtCreditsafe.Location = New System.Drawing.Point(119, 31) + Me.txtCreditsafe.Name = "txtCreditsafe" + Me.txtCreditsafe.Size = New System.Drawing.Size(122, 20) + Me.txtCreditsafe.TabIndex = 23 + ' + 'txtSonst_KdNrTOBB + ' + Me.txtSonst_KdNrTOBB.Location = New System.Drawing.Point(119, 208) + Me.txtSonst_KdNrTOBB.MaxLength = 20 + Me.txtSonst_KdNrTOBB.Name = "txtSonst_KdNrTOBB" + Me.txtSonst_KdNrTOBB.Size = New System.Drawing.Size(122, 20) + Me.txtSonst_KdNrTOBB.TabIndex = 22 + ' + 'Label96 + ' + Me.Label96.AutoSize = True + Me.Label96.Enabled = False + Me.Label96.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label96.Location = New System.Drawing.Point(6, 211) + Me.Label96.Name = "Label96" + Me.Label96.Size = New System.Drawing.Size(83, 13) + Me.Label96.TabIndex = 21 + Me.Label96.Text = "KdNr bei TOBB:" + ' + 'txtSonst_KdNrPLOSE + ' + Me.txtSonst_KdNrPLOSE.Enabled = False + Me.txtSonst_KdNrPLOSE.Location = New System.Drawing.Point(119, 182) + Me.txtSonst_KdNrPLOSE.Name = "txtSonst_KdNrPLOSE" + Me.txtSonst_KdNrPLOSE.Size = New System.Drawing.Size(122, 20) + Me.txtSonst_KdNrPLOSE.TabIndex = 20 + ' + 'Label83 + ' + Me.Label83.AutoSize = True + Me.Label83.Enabled = False + Me.Label83.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label83.Location = New System.Drawing.Point(6, 185) + Me.Label83.Name = "Label83" + Me.Label83.Size = New System.Drawing.Size(89, 13) + Me.Label83.TabIndex = 19 + Me.Label83.Text = "KdNr bei PLOSE:" + ' + 'Label76 + ' + Me.Label76.AutoSize = True + Me.Label76.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label76.Location = New System.Drawing.Point(4, 262) + Me.Label76.Name = "Label76" + Me.Label76.Size = New System.Drawing.Size(65, 13) + Me.Label76.TabIndex = 17 + Me.Label76.Text = "IDS-Kunden" + ' + '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 + 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 + 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 + Me.dgvSonst_IDSKunden.Location = New System.Drawing.Point(9, 308) + Me.dgvSonst_IDSKunden.MultiSelect = False + Me.dgvSonst_IDSKunden.Name = "dgvSonst_IDSKunden" + Me.dgvSonst_IDSKunden.Size = New System.Drawing.Size(657, 144) + Me.dgvSonst_IDSKunden.TabIndex = 18 + ' + 'cbxSonst_CsvAsfinag + ' + Me.cbxSonst_CsvAsfinag.AutoSize = True + Me.cbxSonst_CsvAsfinag.Location = New System.Drawing.Point(114, 261) + Me.cbxSonst_CsvAsfinag.Name = "cbxSonst_CsvAsfinag" + Me.cbxSonst_CsvAsfinag.Size = New System.Drawing.Size(264, 17) + Me.cbxSonst_CsvAsfinag.TabIndex = 15 + Me.cbxSonst_CsvAsfinag.Text = "ASFINAG-Abrechnungsdaten als CSV bereitstellen" + Me.cbxSonst_CsvAsfinag.UseVisualStyleBackColor = True + ' + 'cbxSonst_CsvUTA + ' + Me.cbxSonst_CsvUTA.AutoSize = True + Me.cbxSonst_CsvUTA.Location = New System.Drawing.Point(429, 155) + Me.cbxSonst_CsvUTA.Name = "cbxSonst_CsvUTA" + Me.cbxSonst_CsvUTA.Size = New System.Drawing.Size(240, 17) + Me.cbxSonst_CsvUTA.TabIndex = 14 + Me.cbxSonst_CsvUTA.Text = "UTA-Abrechnungsdaten als CSV bereitstellen" + Me.cbxSonst_CsvUTA.UseVisualStyleBackColor = True + ' + 'cbxSonst_CsvMSE + ' + Me.cbxSonst_CsvMSE.AutoSize = True + Me.cbxSonst_CsvMSE.Location = New System.Drawing.Point(429, 103) + Me.cbxSonst_CsvMSE.Name = "cbxSonst_CsvMSE" + Me.cbxSonst_CsvMSE.Size = New System.Drawing.Size(241, 17) + Me.cbxSonst_CsvMSE.TabIndex = 9 + Me.cbxSonst_CsvMSE.Text = "MSE-Abrechnungsdaten als CSV bereitstellen" + Me.cbxSonst_CsvMSE.UseVisualStyleBackColor = True + ' + 'cbxSonst_CsvMautbericht + ' + Me.cbxSonst_CsvMautbericht.AutoSize = True + Me.cbxSonst_CsvMautbericht.Location = New System.Drawing.Point(429, 7) + Me.cbxSonst_CsvMautbericht.Name = "cbxSonst_CsvMautbericht" + Me.cbxSonst_CsvMautbericht.Size = New System.Drawing.Size(181, 17) + Me.cbxSonst_CsvMautbericht.TabIndex = 2 + Me.cbxSonst_CsvMautbericht.Text = "Mautbericht als CSV bereitstellen" + Me.cbxSonst_CsvMautbericht.UseVisualStyleBackColor = True + ' + 'txtSonst_KdNrUTA + ' + Me.txtSonst_KdNrUTA.Location = New System.Drawing.Point(119, 156) + Me.txtSonst_KdNrUTA.Name = "txtSonst_KdNrUTA" + Me.txtSonst_KdNrUTA.Size = New System.Drawing.Size(122, 20) + Me.txtSonst_KdNrUTA.TabIndex = 13 + ' + 'Label75 + ' + Me.Label75.AutoSize = True + Me.Label75.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label75.Location = New System.Drawing.Point(6, 159) + Me.Label75.Name = "Label75" + Me.Label75.Size = New System.Drawing.Size(76, 13) + Me.Label75.TabIndex = 12 + Me.Label75.Text = "KdNr bei UTA:" + ' + 'txtSonst_KdNrTelepass + ' + Me.txtSonst_KdNrTelepass.Location = New System.Drawing.Point(119, 130) + Me.txtSonst_KdNrTelepass.Name = "txtSonst_KdNrTelepass" + Me.txtSonst_KdNrTelepass.Size = New System.Drawing.Size(122, 20) + Me.txtSonst_KdNrTelepass.TabIndex = 11 + ' + 'Label74 + ' + Me.Label74.AutoSize = True + Me.Label74.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label74.Location = New System.Drawing.Point(6, 133) + Me.Label74.Name = "Label74" + Me.Label74.Size = New System.Drawing.Size(109, 13) + Me.Label74.TabIndex = 10 + Me.Label74.Text = "KdNr bei TELEPASS:" + ' + 'txtSonst_KdNrMSE + ' + Me.txtSonst_KdNrMSE.Location = New System.Drawing.Point(119, 104) + Me.txtSonst_KdNrMSE.Name = "txtSonst_KdNrMSE" + Me.txtSonst_KdNrMSE.Size = New System.Drawing.Size(122, 20) + Me.txtSonst_KdNrMSE.TabIndex = 8 + ' + 'Label73 + ' + Me.Label73.AutoSize = True + Me.Label73.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label73.Location = New System.Drawing.Point(6, 107) + Me.Label73.Name = "Label73" + Me.Label73.Size = New System.Drawing.Size(77, 13) + Me.Label73.TabIndex = 7 + Me.Label73.Text = "KdNr bei MSE:" + ' + 'txtSonst_KdNrWOELFL + ' + Me.txtSonst_KdNrWOELFL.Location = New System.Drawing.Point(119, 78) + Me.txtSonst_KdNrWOELFL.Name = "txtSonst_KdNrWOELFL" + Me.txtSonst_KdNrWOELFL.Size = New System.Drawing.Size(122, 20) + Me.txtSonst_KdNrWOELFL.TabIndex = 6 + ' + 'Label72 + ' + Me.Label72.AutoSize = True + Me.Label72.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label72.Location = New System.Drawing.Point(6, 81) + Me.Label72.Name = "Label72" + Me.Label72.Size = New System.Drawing.Size(78, 13) + Me.Label72.TabIndex = 5 + Me.Label72.Text = "KdNr bei Wölfl:" + ' + 'txtSonst_KdNrIDS + ' + Me.txtSonst_KdNrIDS.Enabled = False + Me.txtSonst_KdNrIDS.Location = New System.Drawing.Point(119, 52) + Me.txtSonst_KdNrIDS.Name = "txtSonst_KdNrIDS" + Me.txtSonst_KdNrIDS.Size = New System.Drawing.Size(122, 20) + Me.txtSonst_KdNrIDS.TabIndex = 4 + ' + 'Label70 + ' + Me.Label70.AutoSize = True + Me.Label70.Enabled = False + Me.Label70.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label70.Location = New System.Drawing.Point(6, 55) + Me.Label70.Name = "Label70" + Me.Label70.Size = New System.Drawing.Size(72, 13) + Me.Label70.TabIndex = 3 + Me.Label70.Text = "KdNr bei IDS:" + ' + 'Label71 + ' + Me.Label71.AutoSize = True + Me.Label71.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label71.Location = New System.Drawing.Point(6, 9) + Me.Label71.Name = "Label71" + Me.Label71.Size = New System.Drawing.Size(92, 13) + Me.Label71.TabIndex = 0 + Me.Label71.Text = "Rechnungsdruck:" + ' 'txtSumPLOSE ' Me.txtSumPLOSE._DateTimeOnly = False @@ -4916,6 +4021,171 @@ Partial Class usrcntlKundeBearbeitenFull Me.cboSonst_Rechnungsdruck.Size = New System.Drawing.Size(122, 21) Me.cboSonst_Rechnungsdruck.TabIndex = 1 ' + 'tbSchnittstellen + ' + Me.tbSchnittstellen.Controls.Add(Me.txtVERAG_Schnittstellen_ID) + Me.tbSchnittstellen.Controls.Add(Me.Label91) + Me.tbSchnittstellen.Controls.Add(Me.Label92) + Me.tbSchnittstellen.Controls.Add(Me.DataGridView1) + Me.tbSchnittstellen.Location = New System.Drawing.Point(4, 22) + Me.tbSchnittstellen.Name = "tbSchnittstellen" + Me.tbSchnittstellen.Padding = New System.Windows.Forms.Padding(3) + Me.tbSchnittstellen.Size = New System.Drawing.Size(672, 495) + Me.tbSchnittstellen.TabIndex = 10 + Me.tbSchnittstellen.Text = "Schnittstellen" + Me.tbSchnittstellen.UseVisualStyleBackColor = True + ' + 'txtVERAG_Schnittstellen_ID + ' + Me.txtVERAG_Schnittstellen_ID.Enabled = False + Me.txtVERAG_Schnittstellen_ID.Location = New System.Drawing.Point(131, 17) + Me.txtVERAG_Schnittstellen_ID.Name = "txtVERAG_Schnittstellen_ID" + Me.txtVERAG_Schnittstellen_ID.Size = New System.Drawing.Size(122, 20) + Me.txtVERAG_Schnittstellen_ID.TabIndex = 24 + ' + 'Label91 + ' + Me.Label91.AutoSize = True + Me.Label91.Enabled = False + Me.Label91.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label91.Location = New System.Drawing.Point(6, 20) + Me.Label91.Name = "Label91" + Me.Label91.Size = New System.Drawing.Size(119, 13) + Me.Label91.TabIndex = 23 + Me.Label91.Text = "VERAG Schnittellen-ID:" + ' + 'Label92 + ' + Me.Label92.AutoSize = True + Me.Label92.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label92.Location = New System.Drawing.Point(6, 77) + Me.Label92.Name = "Label92" + Me.Label92.Size = New System.Drawing.Size(110, 13) + Me.Label92.TabIndex = 21 + Me.Label92.Text = "VERAG-Schnittstellen" + ' + '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 + 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 + 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 + Me.DataGridView1.Enabled = False + Me.DataGridView1.Location = New System.Drawing.Point(6, 111) + Me.DataGridView1.MultiSelect = False + Me.DataGridView1.Name = "DataGridView1" + Me.DataGridView1.Size = New System.Drawing.Size(657, 358) + Me.DataGridView1.TabIndex = 22 + ' + 'tbZahlungsinfo + ' + Me.tbZahlungsinfo.Controls.Add(Me.Label102) + Me.tbZahlungsinfo.Controls.Add(Me.rtb_Zahlungsinfo) + Me.tbZahlungsinfo.Location = New System.Drawing.Point(4, 22) + Me.tbZahlungsinfo.Name = "tbZahlungsinfo" + Me.tbZahlungsinfo.Size = New System.Drawing.Size(672, 495) + Me.tbZahlungsinfo.TabIndex = 11 + Me.tbZahlungsinfo.Text = "Zahlungsinfo" + Me.tbZahlungsinfo.UseVisualStyleBackColor = True + ' + 'Label102 + ' + Me.Label102.AutoSize = True + Me.Label102.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label102.Location = New System.Drawing.Point(3, 18) + Me.Label102.Name = "Label102" + Me.Label102.Size = New System.Drawing.Size(66, 13) + Me.Label102.TabIndex = 132 + Me.Label102.Text = "Zahlunginfo:" + ' + 'rtb_Zahlungsinfo + ' + Me.rtb_Zahlungsinfo.Location = New System.Drawing.Point(6, 35) + Me.rtb_Zahlungsinfo.Name = "rtb_Zahlungsinfo" + Me.rtb_Zahlungsinfo.Size = New System.Drawing.Size(660, 412) + Me.rtb_Zahlungsinfo.TabIndex = 40 + Me.rtb_Zahlungsinfo.Text = "" + ' + 'tbBankverbindungen + ' + Me.tbBankverbindungen.Controls.Add(Me.dgvBankverbindungen) + Me.tbBankverbindungen.Controls.Add(Me.cbxAlleBVanzeigen) + Me.tbBankverbindungen.Controls.Add(Me.Label108) + Me.tbBankverbindungen.Controls.Add(Me.btnBankspeichern) + 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 + 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(669, 243) + Me.dgvBankverbindungen.TabIndex = 137 + ' + '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:" + ' 'btnBankspeichern ' Me.btnBankspeichern.allowBorder = False @@ -4932,6 +4202,72 @@ Partial Class usrcntlKundeBearbeitenFull Me.btnBankspeichern.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnBankspeichern.UseVisualStyleBackColor = True ' + 'lblEORI + ' + Me.lblEORI.AutoSize = True + Me.lblEORI.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblEORI.Location = New System.Drawing.Point(8, 136) + Me.lblEORI.Name = "lblEORI" + Me.lblEORI.Size = New System.Drawing.Size(78, 13) + Me.lblEORI.TabIndex = 12 + Me.lblEORI.Text = "EORI / NL-Nr.:" + ' + 'Label84 + ' + Me.Label84.AutoSize = True + Me.Label84.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label84.Location = New System.Drawing.Point(259, 87) + Me.Label84.Name = "Label84" + Me.Label84.Size = New System.Drawing.Size(66, 13) + Me.Label84.TabIndex = 8 + Me.Label84.Text = ", geprüft am:" + ' + 'GroupBox3 + ' + Me.GroupBox3.Controls.Add(Me.cbxkeineMWSt) + Me.GroupBox3.Controls.Add(Me.txtGruendungsDatum) + Me.GroupBox3.Controls.Add(Me.Label33) + Me.GroupBox3.Controls.Add(Me.txtHandelsregisterNr) + Me.GroupBox3.Controls.Add(Me.PictureBox5) + Me.GroupBox3.Controls.Add(Me.cbxUIDMehrfachverwendung) + Me.GroupBox3.Controls.Add(Me.btnCreditsafe) + Me.GroupBox3.Controls.Add(Me.Button13) + Me.GroupBox3.Controls.Add(Me.btnUIDPruef) + Me.GroupBox3.Controls.Add(Me.txtEORINL) + Me.GroupBox3.Controls.Add(Me.Label5) + Me.GroupBox3.Controls.Add(Me.txtEORI) + Me.GroupBox3.Controls.Add(Me.lblEORI) + Me.GroupBox3.Controls.Add(Me.txtFirmenname1) + Me.GroupBox3.Controls.Add(Me.cboUSt_UstIdNrLand) + Me.GroupBox3.Controls.Add(Me.Label15) + Me.GroupBox3.Controls.Add(Me.Label3) + Me.GroupBox3.Controls.Add(Me.txtUSt_UstIdNrGeprueftAm) + Me.GroupBox3.Controls.Add(Me.txtKurzname) + Me.GroupBox3.Controls.Add(Me.txtUSt_UstIdNr) + Me.GroupBox3.Controls.Add(Me.txtFirmenname2) + Me.GroupBox3.Controls.Add(Me.Label16) + Me.GroupBox3.Controls.Add(Me.txtUSt_Steuernummer) + Me.GroupBox3.Controls.Add(Me.Label84) + Me.GroupBox3.Controls.Add(Me.lblHandelregisterNr) + Me.GroupBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.GroupBox3.Location = New System.Drawing.Point(3, 3) + Me.GroupBox3.Name = "GroupBox3" + Me.GroupBox3.Size = New System.Drawing.Size(453, 207) + Me.GroupBox3.TabIndex = 0 + Me.GroupBox3.TabStop = False + Me.GroupBox3.Text = "Firma" + ' + 'cbxkeineMWSt + ' + Me.cbxkeineMWSt.AutoSize = True + Me.cbxkeineMWSt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxkeineMWSt.Location = New System.Drawing.Point(292, 182) + Me.cbxkeineMWSt.Name = "cbxkeineMWSt" + Me.cbxkeineMWSt.Size = New System.Drawing.Size(117, 17) + Me.cbxkeineMWSt.TabIndex = 136 + Me.cbxkeineMWSt.Text = "kein MWST-Kunde" + Me.cbxkeineMWSt.UseVisualStyleBackColor = True + ' 'txtGruendungsDatum ' Me.txtGruendungsDatum._DateTimeOnly = False @@ -4957,6 +4293,16 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtGruendungsDatum.TabIndex = 135 Me.txtGruendungsDatum.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' + 'Label33 + ' + Me.Label33.AutoSize = True + Me.Label33.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label33.Location = New System.Drawing.Point(10, 161) + Me.Label33.Name = "Label33" + Me.Label33.Size = New System.Drawing.Size(75, 13) + Me.Label33.TabIndex = 134 + Me.Label33.Text = "gegründet am:" + ' 'txtHandelsregisterNr ' Me.txtHandelsregisterNr._DateTimeOnly = False @@ -4981,6 +4327,65 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtHandelsregisterNr.Size = New System.Drawing.Size(126, 20) Me.txtHandelsregisterNr.TabIndex = 133 ' + 'PictureBox5 + ' + Me.PictureBox5.BackgroundImage = Global.SDL.My.Resources.Resources.fragezeichen + Me.PictureBox5.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.PictureBox5.Location = New System.Drawing.Point(88, 62) + Me.PictureBox5.Name = "PictureBox5" + Me.PictureBox5.Size = New System.Drawing.Size(18, 19) + Me.PictureBox5.TabIndex = 131 + Me.PictureBox5.TabStop = False + Me.PictureBox5.Visible = False + ' + 'cbxUIDMehrfachverwendung + ' + Me.cbxUIDMehrfachverwendung.AutoSize = True + Me.cbxUIDMehrfachverwendung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxUIDMehrfachverwendung.Location = New System.Drawing.Point(292, 159) + Me.cbxUIDMehrfachverwendung.Name = "cbxUIDMehrfachverwendung" + Me.cbxUIDMehrfachverwendung.Size = New System.Drawing.Size(152, 17) + Me.cbxUIDMehrfachverwendung.TabIndex = 25 + Me.cbxUIDMehrfachverwendung.Text = "UID-Mehrfachverwendung" + Me.cbxUIDMehrfachverwendung.UseVisualStyleBackColor = True + ' + 'btnCreditsafe + ' + Me.btnCreditsafe.BackgroundImage = Global.SDL.My.Resources.Resources.creditsafe_add1 + Me.btnCreditsafe.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnCreditsafe.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnCreditsafe.Location = New System.Drawing.Point(9, 57) + Me.btnCreditsafe.Name = "btnCreditsafe" + Me.btnCreditsafe.Size = New System.Drawing.Size(77, 27) + Me.btnCreditsafe.TabIndex = 25 + Me.btnCreditsafe.UseVisualStyleBackColor = True + Me.btnCreditsafe.Visible = False + ' + 'Button13 + ' + Me.Button13.BackgroundImage = Global.SDL.My.Resources.Resources.list + Me.Button13.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.Button13.FlatAppearance.BorderSize = 0 + Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button13.Location = New System.Drawing.Point(419, 84) + Me.Button13.Name = "Button13" + Me.Button13.Size = New System.Drawing.Size(25, 20) + Me.Button13.TabIndex = 16 + Me.Button13.UseVisualStyleBackColor = True + ' + 'btnUIDPruef + ' + Me.btnUIDPruef.BackgroundImage = Global.SDL.My.Resources.Resources.fragezeichen + Me.btnUIDPruef.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnUIDPruef.FlatAppearance.BorderSize = 0 + Me.btnUIDPruef.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnUIDPruef.Location = New System.Drawing.Point(397, 84) + Me.btnUIDPruef.Name = "btnUIDPruef" + Me.btnUIDPruef.Size = New System.Drawing.Size(25, 20) + Me.btnUIDPruef.TabIndex = 15 + Me.btnUIDPruef.UseVisualStyleBackColor = True + Me.btnUIDPruef.Visible = False + ' 'txtEORINL ' Me.txtEORINL._DateTimeOnly = False @@ -5005,6 +4410,16 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtEORINL.Size = New System.Drawing.Size(87, 20) Me.txtEORINL.TabIndex = 14 ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label5.Location = New System.Drawing.Point(6, 19) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(57, 13) + Me.Label5.TabIndex = 0 + Me.Label5.Text = "Kurzname:" + ' 'txtEORI ' Me.txtEORI._DateTimeOnly = False @@ -5029,6 +4444,15 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtEORI.Size = New System.Drawing.Size(248, 20) Me.txtEORI.TabIndex = 13 ' + 'txtFirmenname1 + ' + Me.txtFirmenname1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtFirmenname1.Location = New System.Drawing.Point(110, 40) + Me.txtFirmenname1.MaxLength = 40 + Me.txtFirmenname1.Name = "txtFirmenname1" + Me.txtFirmenname1.Size = New System.Drawing.Size(334, 20) + Me.txtFirmenname1.TabIndex = 3 + ' 'cboUSt_UstIdNrLand ' Me.cboUSt_UstIdNrLand._allowedValuesFreiText = Nothing @@ -5044,6 +4468,26 @@ Partial Class usrcntlKundeBearbeitenFull Me.cboUSt_UstIdNrLand.Size = New System.Drawing.Size(43, 21) Me.cboUSt_UstIdNrLand.TabIndex = 6 ' + 'Label15 + ' + Me.Label15.AutoSize = True + Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label15.Location = New System.Drawing.Point(8, 87) + Me.Label15.Name = "Label15" + Me.Label15.Size = New System.Drawing.Size(39, 13) + Me.Label15.TabIndex = 5 + Me.Label15.Text = "UStID:" + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(6, 43) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(67, 13) + Me.Label3.TabIndex = 2 + Me.Label3.Text = "Firmenname:" + ' 'txtUSt_UstIdNrGeprueftAm ' Me.txtUSt_UstIdNrGeprueftAm._DateTimeOnly = False @@ -5069,6 +4513,15 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtUSt_UstIdNrGeprueftAm.TabIndex = 9 Me.txtUSt_UstIdNrGeprueftAm.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' + 'txtKurzname + ' + Me.txtKurzname.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtKurzname.Location = New System.Drawing.Point(110, 16) + Me.txtKurzname.MaxLength = 50 + Me.txtKurzname.Name = "txtKurzname" + Me.txtKurzname.Size = New System.Drawing.Size(334, 20) + Me.txtKurzname.TabIndex = 1 + ' 'txtUSt_UstIdNr ' Me.txtUSt_UstIdNr._DateTimeOnly = False @@ -5094,6 +4547,25 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtUSt_UstIdNr.TabIndex = 7 Me.txtUSt_UstIdNr.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' + 'txtFirmenname2 + ' + Me.txtFirmenname2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtFirmenname2.Location = New System.Drawing.Point(110, 59) + Me.txtFirmenname2.MaxLength = 40 + Me.txtFirmenname2.Name = "txtFirmenname2" + Me.txtFirmenname2.Size = New System.Drawing.Size(334, 20) + Me.txtFirmenname2.TabIndex = 4 + ' + 'Label16 + ' + Me.Label16.AutoSize = True + Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label16.Location = New System.Drawing.Point(240, 112) + Me.Label16.Name = "Label16" + Me.Label16.Size = New System.Drawing.Size(78, 13) + Me.Label16.TabIndex = 10 + Me.Label16.Text = "Steuernummer:" + ' 'txtUSt_Steuernummer ' Me.txtUSt_Steuernummer._DateTimeOnly = False @@ -5118,6 +4590,56 @@ Partial Class usrcntlKundeBearbeitenFull Me.txtUSt_Steuernummer.TabIndex = 11 Me.txtUSt_Steuernummer.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' + 'lblHandelregisterNr + ' + Me.lblHandelregisterNr.AutoSize = True + Me.lblHandelregisterNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblHandelregisterNr.Location = New System.Drawing.Point(8, 112) + Me.lblHandelregisterNr.Name = "lblHandelregisterNr" + Me.lblHandelregisterNr.Size = New System.Drawing.Size(100, 13) + Me.lblHandelregisterNr.TabIndex = 132 + Me.lblHandelregisterNr.Text = "Handelsregister-Nr.:" + ' + 'Label100 + ' + Me.Label100.AutoSize = True + Me.Label100.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label100.Location = New System.Drawing.Point(6, 47) + Me.Label100.Name = "Label100" + Me.Label100.Size = New System.Drawing.Size(77, 13) + Me.Label100.TabIndex = 27 + Me.Label100.Text = "Adress-Zusatz:" + ' + 'txtAdresseZusatz + ' + Me.txtAdresseZusatz.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtAdresseZusatz.Location = New System.Drawing.Point(110, 44) + Me.txtAdresseZusatz.MaxLength = 50 + Me.txtAdresseZusatz.Name = "txtAdresseZusatz" + Me.txtAdresseZusatz.Size = New System.Drawing.Size(334, 20) + Me.txtAdresseZusatz.TabIndex = 26 + ' + 'GroupBox1 + ' + Me.GroupBox1.Controls.Add(Me.cbxLandKz) + Me.GroupBox1.Controls.Add(Me.Label14) + Me.GroupBox1.Controls.Add(Me.txtPostfachOrt) + Me.GroupBox1.Controls.Add(Me.txtOrt) + Me.GroupBox1.Controls.Add(Me.Label100) + Me.GroupBox1.Controls.Add(Me.Label12) + Me.GroupBox1.Controls.Add(Me.txtPostfachPlz) + Me.GroupBox1.Controls.Add(Me.txtAdresseZusatz) + Me.GroupBox1.Controls.Add(Me.txtPlz) + Me.GroupBox1.Controls.Add(Me.Label4) + Me.GroupBox1.Controls.Add(Me.txtStrasse) + Me.GroupBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.GroupBox1.Location = New System.Drawing.Point(3, 217) + Me.GroupBox1.Name = "GroupBox1" + Me.GroupBox1.Size = New System.Drawing.Size(453, 139) + Me.GroupBox1.TabIndex = 1 + Me.GroupBox1.TabStop = False + Me.GroupBox1.Text = "Adresse" + ' 'cbxLandKz ' Me.cbxLandKz._allowedValuesFreiText = Nothing @@ -5134,11 +4656,349 @@ Partial Class usrcntlKundeBearbeitenFull Me.cbxLandKz.Size = New System.Drawing.Size(50, 21) Me.cbxLandKz.TabIndex = 3 ' - 'DataGridViewTextBoxColumn2 + 'Label14 ' - Me.DataGridViewTextBoxColumn2.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill - Me.DataGridViewTextBoxColumn2.HeaderText = "E-Mail" - Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2" + Me.Label14.AutoSize = True + Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label14.Location = New System.Drawing.Point(6, 99) + Me.Label14.Name = "Label14" + Me.Label14.Size = New System.Drawing.Size(100, 13) + Me.Label14.TabIndex = 6 + Me.Label14.Text = "Postfach PLZ / Ort:" + ' + 'txtPostfachOrt + ' + Me.txtPostfachOrt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtPostfachOrt.Location = New System.Drawing.Point(243, 96) + Me.txtPostfachOrt.MaxLength = 40 + Me.txtPostfachOrt.Name = "txtPostfachOrt" + Me.txtPostfachOrt.Size = New System.Drawing.Size(201, 20) + Me.txtPostfachOrt.TabIndex = 8 + ' + 'txtOrt + ' + Me.txtOrt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtOrt.Location = New System.Drawing.Point(243, 70) + Me.txtOrt.MaxLength = 40 + Me.txtOrt.Name = "txtOrt" + Me.txtOrt.Size = New System.Drawing.Size(201, 20) + Me.txtOrt.TabIndex = 5 + ' + 'Label12 + ' + Me.Label12.AutoSize = True + Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label12.Location = New System.Drawing.Point(6, 73) + Me.Label12.Name = "Label12" + Me.Label12.Size = New System.Drawing.Size(90, 13) + Me.Label12.TabIndex = 2 + Me.Label12.Text = "Land / PLZ / Ort:" + ' + 'txtPostfachPlz + ' + Me.txtPostfachPlz.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtPostfachPlz.Location = New System.Drawing.Point(110, 96) + Me.txtPostfachPlz.MaxLength = 7 + Me.txtPostfachPlz.Name = "txtPostfachPlz" + Me.txtPostfachPlz.Size = New System.Drawing.Size(127, 20) + Me.txtPostfachPlz.TabIndex = 7 + ' + 'txtPlz + ' + Me.txtPlz.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtPlz.Location = New System.Drawing.Point(166, 70) + Me.txtPlz.MaxLength = 7 + Me.txtPlz.Name = "txtPlz" + Me.txtPlz.Size = New System.Drawing.Size(71, 20) + Me.txtPlz.TabIndex = 4 + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(6, 25) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(41, 13) + Me.Label4.TabIndex = 0 + Me.Label4.Text = "Straße:" + ' + 'txtStrasse + ' + Me.txtStrasse.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtStrasse.Location = New System.Drawing.Point(110, 22) + Me.txtStrasse.MaxLength = 40 + Me.txtStrasse.Name = "txtStrasse" + Me.txtStrasse.Size = New System.Drawing.Size(334, 20) + Me.txtStrasse.TabIndex = 1 + ' + 'txtAnsprechpartnerAnrede + ' + Me.txtAnsprechpartnerAnrede.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtAnsprechpartnerAnrede.Location = New System.Drawing.Point(107, 148) + Me.txtAnsprechpartnerAnrede.MaxLength = 4 + Me.txtAnsprechpartnerAnrede.Name = "txtAnsprechpartnerAnrede" + Me.txtAnsprechpartnerAnrede.Size = New System.Drawing.Size(55, 20) + Me.txtAnsprechpartnerAnrede.TabIndex = 11 + ' + 'Label20 + ' + Me.Label20.AutoSize = True + Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label20.Location = New System.Drawing.Point(3, 66) + Me.Label20.Name = "Label20" + Me.Label20.Size = New System.Drawing.Size(67, 13) + Me.Label20.TabIndex = 4 + Me.Label20.Text = "Mobiltelefon:" + ' + 'txtMobil + ' + Me.txtMobil.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtMobil.Location = New System.Drawing.Point(107, 63) + Me.txtMobil.MaxLength = 50 + Me.txtMobil.Name = "txtMobil" + Me.txtMobil.Size = New System.Drawing.Size(333, 20) + Me.txtMobil.TabIndex = 5 + ' + 'Label10 + ' + Me.Label10.AutoSize = True + Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label10.Location = New System.Drawing.Point(3, 151) + Me.Label10.Name = "Label10" + Me.Label10.Size = New System.Drawing.Size(88, 13) + Me.Label10.TabIndex = 10 + Me.Label10.Text = "Ansprechpartner:" + ' + 'txtAnsprechpartner + ' + Me.txtAnsprechpartner.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtAnsprechpartner.Location = New System.Drawing.Point(168, 148) + Me.txtAnsprechpartner.MaxLength = 40 + Me.txtAnsprechpartner.Name = "txtAnsprechpartner" + Me.txtAnsprechpartner.Size = New System.Drawing.Size(272, 20) + Me.txtAnsprechpartner.TabIndex = 12 + ' + 'Label13 + ' + Me.Label13.AutoSize = True + Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label13.Location = New System.Drawing.Point(3, 123) + Me.Label13.Name = "Label13" + Me.Label13.Size = New System.Drawing.Size(48, 13) + Me.Label13.TabIndex = 8 + Me.Label13.Text = "E-Mail 2:" + ' + 'Label11 + ' + Me.Label11.AutoSize = True + Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label11.Location = New System.Drawing.Point(3, 97) + Me.Label11.Name = "Label11" + Me.Label11.Size = New System.Drawing.Size(39, 13) + Me.Label11.TabIndex = 6 + Me.Label11.Text = "E-Mail:" + ' + 'txtEmail2 + ' + Me.txtEmail2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtEmail2.Location = New System.Drawing.Point(107, 120) + Me.txtEmail2.MaxLength = 40 + Me.txtEmail2.Name = "txtEmail2" + Me.txtEmail2.Size = New System.Drawing.Size(333, 20) + Me.txtEmail2.TabIndex = 9 + ' + 'txtEmail + ' + Me.txtEmail.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtEmail.Location = New System.Drawing.Point(107, 94) + Me.txtEmail.MaxLength = 40 + Me.txtEmail.Name = "txtEmail" + Me.txtEmail.Size = New System.Drawing.Size(333, 20) + Me.txtEmail.TabIndex = 7 + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label7.Location = New System.Drawing.Point(3, 40) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(27, 13) + Me.Label7.TabIndex = 2 + Me.Label7.Text = "Fax:" + ' + 'txtFax + ' + Me.txtFax.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtFax.Location = New System.Drawing.Point(107, 37) + Me.txtFax.MaxLength = 20 + Me.txtFax.Name = "txtFax" + Me.txtFax.Size = New System.Drawing.Size(333, 20) + Me.txtFax.TabIndex = 3 + ' + 'Label9 + ' + Me.Label9.AutoSize = True + Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label9.Location = New System.Drawing.Point(3, 14) + Me.Label9.Name = "Label9" + Me.Label9.Size = New System.Drawing.Size(46, 13) + Me.Label9.TabIndex = 0 + Me.Label9.Text = "Telefon:" + ' + 'txtTel + ' + Me.txtTel.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtTel.Location = New System.Drawing.Point(107, 11) + Me.txtTel.MaxLength = 20 + Me.txtTel.Name = "txtTel" + Me.txtTel.Size = New System.Drawing.Size(333, 20) + Me.txtTel.TabIndex = 1 + ' + 'btnFirmendatenFormularSpeichern + ' + Me.btnFirmendatenFormularSpeichern.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnFirmendatenFormularSpeichern.Location = New System.Drawing.Point(1081, 540) + Me.btnFirmendatenFormularSpeichern.Name = "btnFirmendatenFormularSpeichern" + Me.btnFirmendatenFormularSpeichern.Size = New System.Drawing.Size(71, 52) + Me.btnFirmendatenFormularSpeichern.TabIndex = 16 + Me.btnFirmendatenFormularSpeichern.Text = "Speichern" + Me.btnFirmendatenFormularSpeichern.UseVisualStyleBackColor = True + ' + 'lblSachbearbeiter + ' + Me.lblSachbearbeiter.AutoSize = True + Me.lblSachbearbeiter.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblSachbearbeiter.Location = New System.Drawing.Point(131, 581) + Me.lblSachbearbeiter.Name = "lblSachbearbeiter" + Me.lblSachbearbeiter.Size = New System.Drawing.Size(10, 13) + Me.lblSachbearbeiter.TabIndex = 13 + Me.lblSachbearbeiter.Text = "-" + ' + 'lblErfassung + ' + Me.lblErfassung.AutoSize = True + Me.lblErfassung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblErfassung.Location = New System.Drawing.Point(130, 555) + Me.lblErfassung.Name = "lblErfassung" + Me.lblErfassung.Size = New System.Drawing.Size(10, 13) + Me.lblErfassung.TabIndex = 5 + Me.lblErfassung.Text = "-" + ' + 'lblAenderung + ' + Me.lblAenderung.AutoSize = True + Me.lblAenderung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblAenderung.Location = New System.Drawing.Point(131, 568) + Me.lblAenderung.Name = "lblAenderung" + Me.lblAenderung.Size = New System.Drawing.Size(10, 13) + Me.lblAenderung.TabIndex = 11 + Me.lblAenderung.Text = "-" + ' + 'Label26 + ' + Me.Label26.AutoSize = True + Me.Label26.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label26.Location = New System.Drawing.Point(10, 581) + Me.Label26.Name = "Label26" + Me.Label26.Size = New System.Drawing.Size(117, 13) + Me.Label26.TabIndex = 12 + Me.Label26.Text = "Letzter Sachbearbeiter:" + ' + 'Label25 + ' + Me.Label25.AutoSize = True + Me.Label25.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label25.Location = New System.Drawing.Point(9, 555) + Me.Label25.Name = "Label25" + Me.Label25.Size = New System.Drawing.Size(91, 13) + Me.Label25.TabIndex = 4 + Me.Label25.Text = "Erfassungsdatum:" + ' + 'Label23 + ' + Me.Label23.AutoSize = True + Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label23.Location = New System.Drawing.Point(10, 568) + Me.Label23.Name = "Label23" + Me.Label23.Size = New System.Drawing.Size(90, 13) + Me.Label23.TabIndex = 10 + Me.Label23.Text = "Änderungsdatum:" + ' + 'Button1 + ' + Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button1.Location = New System.Drawing.Point(573, 546) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(98, 38) + Me.Button1.TabIndex = 14 + Me.Button1.Text = "Kundenstamm jetzt übertragen" + Me.Button1.UseVisualStyleBackColor = True + Me.Button1.Visible = False + ' + 'Label28 + ' + Me.Label28.AutoSize = True + Me.Label28.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label28.Location = New System.Drawing.Point(585, 587) + Me.Label28.Name = "Label28" + Me.Label28.Size = New System.Drawing.Size(10, 13) + Me.Label28.TabIndex = 9 + Me.Label28.Text = "-" + Me.Label28.Visible = False + ' + 'Label29 + ' + Me.Label29.AutoSize = True + Me.Label29.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label29.Location = New System.Drawing.Point(567, 530) + Me.Label29.Name = "Label29" + Me.Label29.Size = New System.Drawing.Size(109, 13) + Me.Label29.TabIndex = 8 + Me.Label29.Text = "Übertrag in DAKOSY:" + Me.Label29.Visible = False + ' + 'tbKontakt + ' + Me.tbKontakt.Controls.Add(Me.TabPage10) + Me.tbKontakt.Controls.Add(Me.TabPage11) + Me.tbKontakt.Location = New System.Drawing.Point(3, 340) + Me.tbKontakt.Name = "tbKontakt" + Me.tbKontakt.SelectedIndex = 0 + Me.tbKontakt.Size = New System.Drawing.Size(453, 201) + Me.tbKontakt.TabIndex = 2 + ' + 'TabPage10 + ' + Me.TabPage10.Controls.Add(Me.txtAnsprechpartnerAnrede) + Me.TabPage10.Controls.Add(Me.Label9) + Me.TabPage10.Controls.Add(Me.Label20) + Me.TabPage10.Controls.Add(Me.txtTel) + Me.TabPage10.Controls.Add(Me.txtMobil) + Me.TabPage10.Controls.Add(Me.txtFax) + Me.TabPage10.Controls.Add(Me.Label10) + Me.TabPage10.Controls.Add(Me.Label7) + Me.TabPage10.Controls.Add(Me.txtAnsprechpartner) + Me.TabPage10.Controls.Add(Me.txtEmail) + Me.TabPage10.Controls.Add(Me.Label13) + Me.TabPage10.Controls.Add(Me.txtEmail2) + Me.TabPage10.Controls.Add(Me.Label11) + Me.TabPage10.Location = New System.Drawing.Point(4, 22) + Me.TabPage10.Name = "TabPage10" + Me.TabPage10.Size = New System.Drawing.Size(445, 175) + Me.TabPage10.TabIndex = 2 + Me.TabPage10.Text = "Kontakt" + Me.TabPage10.UseVisualStyleBackColor = True + ' + 'TabPage11 + ' + Me.TabPage11.Controls.Add(Me.ucKundenKontakte) + Me.TabPage11.Location = New System.Drawing.Point(4, 22) + Me.TabPage11.Name = "TabPage11" + Me.TabPage11.Padding = New System.Windows.Forms.Padding(3) + Me.TabPage11.Size = New System.Drawing.Size(445, 175) + Me.TabPage11.TabIndex = 3 + Me.TabPage11.Text = "Spezifisch" + Me.TabPage11.UseVisualStyleBackColor = True ' 'ucKundenKontakte ' @@ -5148,41 +5008,285 @@ Partial Class usrcntlKundeBearbeitenFull Me.ucKundenKontakte.Size = New System.Drawing.Size(439, 169) Me.ucKundenKontakte.TabIndex = 0 ' - 'UsrCntlKundenBesonderheiten1 + 'Label50 ' - 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 + Me.Label50.AutoSize = True + Me.Label50.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label50.Location = New System.Drawing.Point(6, 16) + Me.Label50.Name = "Label50" + Me.Label50.Size = New System.Drawing.Size(92, 13) + Me.Label50.TabIndex = 0 + Me.Label50.Text = "Zuständige Filiale:" ' - 'UsrCntlKundenAvisoMailBenachrichtigung1 + 'Label68 ' - 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 + Me.Label68.AutoSize = True + Me.Label68.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label68.Location = New System.Drawing.Point(6, 46) + Me.Label68.Name = "Label68" + Me.Label68.Size = New System.Drawing.Size(69, 13) + Me.Label68.TabIndex = 2 + Me.Label68.Text = "Kundenkreis:" ' - 'usrCntlAufschubkonten + 'pnlNeukunde ' - 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 + Me.pnlNeukunde.Controls.Add(Me.Button2) + Me.pnlNeukunde.Controls.Add(Me.Label50) + Me.pnlNeukunde.Controls.Add(Me.cboFiliale) + Me.pnlNeukunde.Controls.Add(Me.cboKundenkreis) + Me.pnlNeukunde.Controls.Add(Me.Label68) + Me.pnlNeukunde.Location = New System.Drawing.Point(776, 530) + Me.pnlNeukunde.Name = "pnlNeukunde" + Me.pnlNeukunde.Size = New System.Drawing.Size(303, 74) + Me.pnlNeukunde.TabIndex = 15 + Me.pnlNeukunde.Visible = False ' - 'UsrCntlKundeFiskaldaten1 + 'Button2 ' - 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 + Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button2.Location = New System.Drawing.Point(194, 7) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(105, 30) + Me.Button2.TabIndex = 19 + Me.Button2.Text = "Wunsch-KdNr" + Me.Button2.UseVisualStyleBackColor = True + ' + 'cboFiliale + ' + Me.cboFiliale._allowedValuesFreiText = Nothing + Me.cboFiliale._allowFreiText = False + Me.cboFiliale._value = "" + Me.cboFiliale.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.cboFiliale.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboFiliale.DropDownWidth = 400 + Me.cboFiliale.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboFiliale.FormattingEnabled = True + Me.cboFiliale.Location = New System.Drawing.Point(104, 8) + Me.cboFiliale.Name = "cboFiliale" + Me.cboFiliale.Size = New System.Drawing.Size(84, 28) + Me.cboFiliale.TabIndex = 1 + ' + 'cboKundenkreis + ' + Me.cboKundenkreis._allowedValuesFreiText = Nothing + Me.cboKundenkreis._allowFreiText = False + Me.cboKundenkreis._value = "" + Me.cboKundenkreis.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.cboKundenkreis.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboKundenkreis.DropDownWidth = 400 + Me.cboKundenkreis.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboKundenkreis.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboKundenkreis.FormattingEnabled = True + Me.cboKundenkreis.Items.AddRange(New Object() {"", "100000-199999: XXXXXX", "200000-299999: XXXXXX", "300000-399999: XXXXXX", "400000-499999: XXXXXX", "500000-599999: XXXXXX", "600000-699999: XXXXXX", "700000-799999: XXXXXX", "800000-899999: XXXXXX", "900000-999999: XXXXXX"}) + Me.cboKundenkreis.Location = New System.Drawing.Point(104, 38) + Me.cboKundenkreis.Name = "cboKundenkreis" + Me.cboKundenkreis.Size = New System.Drawing.Size(195, 28) + Me.cboKundenkreis.TabIndex = 3 + ' + 'Label77 + ' + Me.Label77.AutoSize = True + Me.Label77.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label77.Location = New System.Drawing.Point(780, 571) + Me.Label77.Name = "Label77" + Me.Label77.Size = New System.Drawing.Size(64, 13) + Me.Label77.TabIndex = 6 + Me.Label77.Text = "Kunden-Nr.:" + ' + 'lblKundennr + ' + Me.lblKundennr.AutoSize = True + Me.lblKundennr.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblKundennr.Location = New System.Drawing.Point(850, 569) + Me.lblKundennr.Name = "lblKundennr" + Me.lblKundennr.Size = New System.Drawing.Size(14, 17) + Me.lblKundennr.TabIndex = 7 + Me.lblKundennr.Text = "-" + ' + 'Label79 + ' + Me.Label79.AutoSize = True + Me.Label79.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label79.Location = New System.Drawing.Point(780, 541) + Me.Label79.Name = "Label79" + Me.Label79.Size = New System.Drawing.Size(40, 13) + Me.Label79.TabIndex = 4 + Me.Label79.Text = "Status:" + ' + 'Label80 + ' + Me.Label80.AutoSize = True + Me.Label80.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label80.Location = New System.Drawing.Point(278, 560) + Me.Label80.Name = "Label80" + Me.Label80.Size = New System.Drawing.Size(59, 13) + Me.Label80.TabIndex = 4 + Me.Label80.Text = "Firma FiBu:" + ' + 'cbxFiBu + ' + Me.cbxFiBu.AutoSize = True + Me.cbxFiBu.Enabled = False + Me.cbxFiBu.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxFiBu.Location = New System.Drawing.Point(400, 559) + Me.cbxFiBu.Name = "cbxFiBu" + Me.cbxFiBu.Size = New System.Drawing.Size(47, 17) + Me.cbxFiBu.TabIndex = 17 + Me.cbxFiBu.Text = "FiBu" + Me.cbxFiBu.UseVisualStyleBackColor = True + ' + 'cbxFiBuLG + ' + Me.cbxFiBuLG.AutoSize = True + Me.cbxFiBuLG.Enabled = False + Me.cbxFiBuLG.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxFiBuLG.Location = New System.Drawing.Point(400, 580) + Me.cbxFiBuLG.Name = "cbxFiBuLG" + Me.cbxFiBuLG.Size = New System.Drawing.Size(64, 17) + Me.cbxFiBuLG.TabIndex = 18 + Me.cbxFiBuLG.Text = "FiBu LG" + Me.cbxFiBuLG.UseVisualStyleBackColor = True + Me.cbxFiBuLG.Visible = False + ' + 'Label97 + ' + Me.Label97.AutoSize = True + Me.Label97.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label97.Location = New System.Drawing.Point(463, 530) + Me.Label97.Name = "Label97" + Me.Label97.Size = New System.Drawing.Size(100, 13) + Me.Label97.TabIndex = 19 + Me.Label97.Text = "Übertrag in SYSKA:" + Me.Label97.Visible = False + ' + 'Button4 + ' + Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button4.Location = New System.Drawing.Point(466, 546) + Me.Button4.Name = "Button4" + Me.Button4.Size = New System.Drawing.Size(101, 38) + Me.Button4.TabIndex = 21 + Me.Button4.Text = "Kundenstamm jetzt übertragen" + Me.Button4.UseVisualStyleBackColor = True + Me.Button4.Visible = False + ' + 'CheckBox1 + ' + Me.CheckBox1.AutoSize = True + Me.CheckBox1.Checked = True + Me.CheckBox1.CheckState = System.Windows.Forms.CheckState.Checked + Me.CheckBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.CheckBox1.Location = New System.Drawing.Point(466, 586) + Me.CheckBox1.Name = "CheckBox1" + Me.CheckBox1.Size = New System.Drawing.Size(101, 17) + Me.CheckBox1.TabIndex = 22 + Me.CheckBox1.Text = "zuvor speichern" + Me.CheckBox1.UseVisualStyleBackColor = True + Me.CheckBox1.Visible = False + ' + 'txtERROR + ' + Me.txtERROR.BackColor = System.Drawing.SystemColors.Window + Me.txtERROR.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.txtERROR.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtERROR.ForeColor = System.Drawing.Color.Red + Me.txtERROR.Location = New System.Drawing.Point(13, 596) + Me.txtERROR.MaxLength = 9999 + Me.txtERROR.Multiline = True + Me.txtERROR.Name = "txtERROR" + Me.txtERROR.Size = New System.Drawing.Size(443, 30) + Me.txtERROR.TabIndex = 17 + ' + 'btnDatevExport + ' + Me.btnDatevExport.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnDatevExport.Location = New System.Drawing.Point(678, 546) + Me.btnDatevExport.Name = "btnDatevExport" + Me.btnDatevExport.Size = New System.Drawing.Size(93, 38) + Me.btnDatevExport.TabIndex = 23 + Me.btnDatevExport.Text = "Kundenstamm jetzt übertragen" + Me.btnDatevExport.UseVisualStyleBackColor = True + Me.btnDatevExport.Visible = False + ' + 'Label98 + ' + Me.Label98.AutoSize = True + Me.Label98.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label98.Location = New System.Drawing.Point(675, 530) + Me.Label98.Name = "Label98" + Me.Label98.Size = New System.Drawing.Size(101, 13) + Me.Label98.TabIndex = 24 + Me.Label98.Text = "Übertrag in DATEV:" + Me.Label98.Visible = False + ' + 'cnsBankverbindungen + ' + 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, 70) + ' + 'ArchivierenToolStripMenuItem + ' + 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 = "Bank schließen" + Me.ArchivierenToolStripMenuItem.Visible = False + ' + 'DokumentHinzufügenToolStripMenuItem + ' + 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" + ' + 'DokumentLöschenToolStripMenuItem + ' + 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" + ' + 'cboFirma + ' + Me.cboFirma._allowedValuesFreiText = Nothing + Me.cboFirma._allowFreiText = False + Me.cboFirma._value = "" + Me.cboFirma.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.cboFirma.DropDownHeight = 350 + Me.cboFirma.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboFirma.DropDownWidth = 400 + Me.cboFirma.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboFirma.FormattingEnabled = True + Me.cboFirma.IntegralHeight = False + Me.cboFirma.Location = New System.Drawing.Point(342, 552) + Me.cboFirma.Name = "cboFirma" + Me.cboFirma.Size = New System.Drawing.Size(49, 28) + Me.cboFirma.TabIndex = 5 + ' + 'cboAuswahl + ' + Me.cboAuswahl._allowedValuesFreiText = Nothing + Me.cboAuswahl._allowFreiText = False + Me.cboAuswahl._value = "" + Me.cboAuswahl.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.cboAuswahl.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboAuswahl.DropDownWidth = 400 + Me.cboAuswahl.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboAuswahl.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboAuswahl.FormattingEnabled = True + Me.cboAuswahl.Location = New System.Drawing.Point(826, 533) + Me.cboAuswahl.Name = "cboAuswahl" + Me.cboAuswahl.Size = New System.Drawing.Size(124, 28) + Me.cboAuswahl.TabIndex = 5 + ' + 'DataGridViewTextBoxColumn2 + ' + Me.DataGridViewTextBoxColumn2.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill + Me.DataGridViewTextBoxColumn2.HeaderText = "E-Mail" + Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2" ' 'usrcntlKundeBearbeitenFull ' @@ -5237,6 +5341,10 @@ Partial Class usrcntlKundeBearbeitenFull Me.tbFiskal.ResumeLayout(False) Me.tbVerrechnung.ResumeLayout(False) Me.tbVerrechnung.PerformLayout() + Me.pnlverag360.ResumeLayout(False) + Me.pnlverag360.PerformLayout() + Me.gbMWSTAntraege.ResumeLayout(False) + Me.gbMWSTAntraege.PerformLayout() Me.tbVersicherung.ResumeLayout(False) Me.tbVersicherung.PerformLayout() Me.tbUmsatz.ResumeLayout(False) @@ -5617,4 +5725,11 @@ Partial Class usrcntlKundeBearbeitenFull Friend WithEvents txtSonst_KdNrVerag As TextBox Friend WithEvents Label110 As Label Friend WithEvents cbxkeineMWSt As CheckBox + Friend WithEvents gbMWSTAntraege As GroupBox + Friend WithEvents rbJ As RadioButton + Friend WithEvents rbHJ As RadioButton + Friend WithEvents rbQ As RadioButton + Friend WithEvents pnlverag360 As Panel + Friend WithEvents txtVorauszahlung As VERAG_PROG_ALLGEMEIN.MyTextBox + Friend WithEvents cbxVorauszahlung As CheckBox End Class diff --git a/SDL/kunden/usrcntlKundeBearbeitenFull.vb b/SDL/kunden/usrcntlKundeBearbeitenFull.vb index 605c2f9e..a9f2bff5 100644 --- a/SDL/kunden/usrcntlKundeBearbeitenFull.vb +++ b/SDL/kunden/usrcntlKundeBearbeitenFull.vb @@ -1,13 +1,4 @@ -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 -Imports java.rmi.server -Imports org.apache.commons.lang3.exception -Imports VERAG_PROG_ALLGEMEIN - -Public Class usrcntlKundeBearbeitenFull +Public Class usrcntlKundeBearbeitenFull Dim KUNDE As VERAG_PROG_ALLGEMEIN.cKunde = Nothing Dim KUNDE_ERW As VERAG_PROG_ALLGEMEIN.cKundenErweitert = Nothing @@ -65,7 +56,9 @@ Public Class usrcntlKundeBearbeitenFull FISKAL = New cFiskal_Daten(kdnr) KUNDE_ERW = New VERAG_PROG_ALLGEMEIN.cKundenErweitert(kdnr) - isVerag360 = _isVerag360 + If Not isVerag360 Then isVerag360 = _isVerag360 + + pnlverag360.Visible = isVerag360 bankverbindungBearbeiten = VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("Bankverbindung_bearbeiten", "SDL") @@ -76,15 +69,6 @@ Public Class usrcntlKundeBearbeitenFull cbxFiBuLG.Visible = True End Select - - - 'txtEORI.Visible = Not isVerag360 - 'txtEORINL.Visible = Not isVerag360 - 'lblEORI.Visible = Not isVerag360 - 'txtHandelsregisterNr.Visible = isVerag360 - 'lblHandelregisterNr.Visible = isVerag360 - - If ADRESSE.AdressenNr <= 0 Then KUNDE_ERW.kde_BesonderheitenNeu = 1 @@ -111,6 +95,9 @@ Public Class usrcntlKundeBearbeitenFull btnKKhinzufuegen.Enabled = isVerag360 Button9.Enabled = isVerag360 cbxkeineMWSt.Visible = isVerag360 + cbxVorauszahlung.Visible = isVerag360 + cbxAbf_Vorkasse.Visible = Not isVerag360 + usrCntlAufschubkonten.initMe(kdnr) @@ -214,7 +201,8 @@ Public Class usrcntlKundeBearbeitenFull cboAbf_Sammelrechnung._value = loadValue(KUNDE.Sammelrechnung, "") txtGruendungsDatum.Text = loadValue(KUNDE_ERW.kde_GruendungsDatum, "") txtHandelsregisterNr.Text = loadValue(KUNDE_ERW.kde_HRNr, "") - + cbxVorauszahlung.Checked = loadValue(KUNDE_ERW.kde_VZ, False) + txtVorauszahlung.Text = loadValue(KUNDE_ERW.kde_AnmerkungVZ, "") txtEORI.Text = If(KUNDE.EORITIN, "") txtEORINL.Text = If(KUNDE.EORITIN_NL, "") @@ -251,6 +239,18 @@ Public Class usrcntlKundeBearbeitenFull End Select + + ' ----- MWST-Abrechnnung ----- + rbJ.Checked = False + rbHJ.Checked = False + rbQ.Checked = False + Select Case KUNDE_ERW.kde_MWStAbrechnung + Case "Q" : rbQ.Checked = True + Case "H" : rbHJ.Checked = True + Case "J" : rbJ.Checked = True + End Select + + ' ----- Versicherung ----- txtVers_HermesRefNr.Text = loadValue(KUNDE.Referenznummer, "") txtVers_Versicherungssumme._value = loadValue(KUNDE.Versicherungssumme, "") @@ -617,6 +617,8 @@ Public Class usrcntlKundeBearbeitenFull KUNDE_ERW.kde_Kapital = isLeerNothing(txtKapital._value) KUNDE_ERW.kde_KapitalWaehrung = isLeerNothing(cbxKapitalWaehrung._value) KUNDE_ERW.kde_HRNr = isLeerNothing(txtHandelsregisterNr.Text) + KUNDE_ERW.kde_VZ = cbxVorauszahlung.Checked + KUNDE_ERW.kde_AnmerkungVZ = txtVorauszahlung.Text If isLeerNothing(txtGruendungsDatum.Text) IsNot Nothing AndAlso IsDate(txtGruendungsDatum.Text) Then KUNDE_ERW.kde_GruendungsDatum = CDate(txtGruendungsDatum.Text) @@ -650,6 +652,14 @@ Public Class usrcntlKundeBearbeitenFull If RadioButton7.Checked = True Then KUNDE.Avis = 3 + + ' ----- MWST-Abrechnung ----- + KUNDE_ERW.kde_MWStAbrechnung = "Q" + If rbJ.Checked = True Then KUNDE_ERW.kde_MWStAbrechnung = "J" + If rbHJ.Checked = True Then KUNDE_ERW.kde_MWStAbrechnung = "H" + If rbQ.Checked = True Then KUNDE_ERW.kde_MWStAbrechnung = "Q" + + ' ----- Versicherung ----- KUNDE.Referenznummer = isLeerNothing(txtVers_HermesRefNr.Text) 'MsgBox(txtVers_Versicherungssumme._value) @@ -840,6 +850,9 @@ Public Class usrcntlKundeBearbeitenFull End If End If initBesonderheitenNEU() + + pnlverag360.Visible = isVerag360 + Catch ex As Exception VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try diff --git a/SDL/mdm/frmDatumsabfrage.vb b/SDL/mdm/frmDatumsabfrage.vb index 42a97d00..f0eb1d5f 100644 --- a/SDL/mdm/frmDatumsabfrage.vb +++ b/SDL/mdm/frmDatumsabfrage.vb @@ -2,6 +2,7 @@ Imports VERAG_PROG_ALLGEMEIN Public Class frmDatumsabfrage + Dim onlypastDate As Boolean = True Sub New() @@ -9,11 +10,21 @@ Public Class frmDatumsabfrage InitializeComponent() End Sub + Sub New(title As String, _onlypastDate As Boolean) + + ' Dieser Aufruf ist für den Designer erforderlich. + InitializeComponent() + + ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu. + onlypastDate = _onlypastDate + lbl.Text = title + End Sub + Public Datum As Date = CDate(Now.ToShortDateString) Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click Label1.Text = "" - If CDate(dtp_date.Value) > CDate(Now.ToShortDateString) Then + If onlypastDate And CDate(dtp_date.Value) > CDate(Now.ToShortDateString) Then Label1.Text = "Muss heute oder früher sein!" Me.DialogResult = DialogResult.None Exit Sub diff --git a/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUStVLeistender.vb b/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUStVLeistender.vb index a4249727..a819894a 100644 --- a/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUStVLeistender.vb +++ b/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUStVLeistender.vb @@ -21,9 +21,11 @@ Public Class cUStVLeistender Me.UStV_Leistender = UStV_Leistender LOAD() End Sub + + Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) - Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) - list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UStV_Leistender", UStV_Leistender,, True)) + Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) + list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UStV_Leistender", UStV_Leistender)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UstV_Leistender_PLZ", UstV_Leistender_PLZ)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UstV_Leistender_Strasse", UstV_Leistender_Strasse)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UstV_Leistender_Stadt", UstV_Leistender_Stadt)) @@ -36,19 +38,28 @@ Public Class cUStVLeistender - Public Function SAVE() As Boolean - Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList() + Public Function SAVE() As Boolean + Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList() Dim sqlstr = " BEGIN TRAN IF EXISTS(SELECT * FROM tblUStVLeistender WHERE UStV_Leistender=@UStV_Leistender) " & - " BEGIN " & getUpdateCmd() & " END " & " commit tran " - '" Else " & - '" BEGIN " & getInsertCmd() & " END " & - '" commit tran " + " BEGIN " & getUpdateCmd() & " END " & + " Else " & + " BEGIN " & getInsertCmd() & " END " & + " commit tran " Return SQL.doSQLVarList(sqlstr, "FMZOLL", , list) - End Function + End Function - Public Sub LOAD() + + Public Function INSERT() As Boolean + Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList() + + Dim sqlstr = getInsertCmd() + + Return SQL.doSQLVarList(sqlstr, "FMZOLL", , list) + End Function + + Public Sub LOAD() Try hasEntry = False Using conn As SqlConnection = SQL.GetNewOpenConnectionFMZOLL() diff --git a/VERAG_PROG_ALLGEMEIN/Classes/cKundenErweitert.vb b/VERAG_PROG_ALLGEMEIN/Classes/cKundenErweitert.vb index 097a9453..7165fd79 100644 --- a/VERAG_PROG_ALLGEMEIN/Classes/cKundenErweitert.vb +++ b/VERAG_PROG_ALLGEMEIN/Classes/cKundenErweitert.vb @@ -88,6 +88,9 @@ Public Class cKundenErweitert Property kde_WechselBlanko As Boolean = False Property kde_UStV_SummeVorschaubetragEUR_PLOSE As Object = Nothing Property kde_keineMWSt As Boolean = False + Property kde_MWStAbrechnung As Object = Nothing + Property kde_AnmerkungVZ As Object = Nothing + Property kde_VZ As Boolean = False Dim SQL As New SQL @@ -178,6 +181,9 @@ Public Class cKundenErweitert list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_WechselBlanko", kde_WechselBlanko)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_UStV_SummeVorschaubetragEUR_PLOSE", kde_UStV_SummeVorschaubetragEUR_PLOSE)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_keineMWSt", kde_keineMWSt)) + list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_MWStAbrechnung", kde_MWStAbrechnung)) + list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_AnmerkungVZ", kde_AnmerkungVZ)) + list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_VZ", kde_VZ)) Return list End Function diff --git a/VERAG_PROG_ALLGEMEIN/VERAG_PROG_ALLGEMEIN.vbproj b/VERAG_PROG_ALLGEMEIN/VERAG_PROG_ALLGEMEIN.vbproj index 1020f880..7e2b64b3 100644 --- a/VERAG_PROG_ALLGEMEIN/VERAG_PROG_ALLGEMEIN.vbproj +++ b/VERAG_PROG_ALLGEMEIN/VERAG_PROG_ALLGEMEIN.vbproj @@ -718,6 +718,9 @@ HTMLTextBox.vb + + MySearchBox.vb + RichTextBoxEx.vb