diff --git a/SDL/Fakturierung/cFakturierung.vb b/SDL/Fakturierung/cFakturierung.vb index 67cc6c85..ed71ef2d 100644 --- a/SDL/Fakturierung/cFakturierung.vb +++ b/SDL/Fakturierung/cFakturierung.vb @@ -281,7 +281,7 @@ Public Class cFakturierung Else Dim VK = VERAG_PROG_ALLGEMEIN.cVorauskasse.LOADByFilialeAbfNr(RECHNUNG.FilialenNr, RECHNUNG.AbfertigungsNr) If VK IsNot Nothing AndAlso CDbl(VK.vk_Betrag) > 0 Then - If VK.vk_GeldEingetroffen Then ' Wenn 0 dann Fehler + If VK.vk_GeldEingetroffen Then ' Wenn 0 dann Fehler If CDbl(VK.vk_Betrag) = CDbl(RECHNUNG.SteuerfreierGesamtbetrag + RECHNUNG.SteuerpflichtigerGesamtbetrag) Then strText = strText & "Der Rechnungsbetrag wurde bereits per Vorauszahlung beglichen." & vbCrLf Else @@ -628,7 +628,8 @@ Public Class cFakturierung Dim gsBetrTmp As Double = 0 For Each r In RECHNUNG.POSITIONEN - dtDataSource.Rows.Add(r.LeistungsNr, r.LeistungsBez, r.Anzahl, r.SteuerpflichtigerBetrag, r.SteuerfreierBetrag, (If(r.Belegdaten, "") & " " & If(r.Aufschubfälligkeit, "")).ToString.Trim) + ' dtDataSource.Rows.Add(r.LeistungsNr, r.LeistungsBez, r.Anzahl, r.SteuerpflichtigerBetrag, r.SteuerfreierBetrag, (If(r.Belegdaten, "") & " " & If(r.Aufschubfälligkeit, "")).ToString.Trim) + dtDataSource.Rows.Add(r.LeistungsNr, r.LeistungsBez, r.Anzahl, r.SteuerpflichtigerBetrag, r.SteuerfreierBetrag, If(r.Belegdaten, "").ToString.Trim) gsBetrTmp += CDbl(r.SteuerpflichtigerBetrag + r.SteuerfreierBetrag) Next @@ -710,9 +711,11 @@ Public Class cFakturierung If rpt.txtSendungsdaten.Text.Length > 200 Then rpt.txtSendungsdaten.Text = rpt.txtSendungsdaten.Text.Substring(0, 200) rpt.txtBeförderungsmittel.Text = If(RECHNUNG.LKW_Kennzeichen, "") - rpt.txtGrenze.Text = SQL.getValueTxtBySql("SELECT TOP 1 isnull([Grenzstelle],'') FROM [Filialen] where FilialenNr='" & RECHNUNG.FilialenNr & "'", "FMZOLL") + rpt.txtGrenze.Text = If(RECHNUNG.Grenze, "") + If rpt.txtGrenze.Text = String.Empty Then rpt.txtGrenze.Text = SQL.getValueTxtBySql("SELECT TOP 1 isnull([Grenzstelle],'') FROM [Filialen] where FilialenNr='" & RECHNUNG.FilialenNr & "'", "FMZOLL") If rpt.txtGrenze.Text = String.Empty Then rpt.txtGrenzeUeberschrift.Visible = False + If If(RECHNUNG.RechnungsName_2, "") = "" Then rpt.lblRechnung_Name1.Text = "" rpt.lblRechnung_Name2.Text = If(RECHNUNG.RechnungsName_1, "") @@ -1228,7 +1231,7 @@ Public Class cFakturierung Public Shared Function GET_SR_SQLDT(Firma_ID As Integer, SammelrechungArt As Integer, DatumBis As Date, Optional whereKdNr As String = "", Optional SB As String = "", Optional AvisoIds As List(Of Integer) = Nothing) As DataTable If whereKdNr <> "" Then whereKdNr = " AND RechnungsKundenNr IN(" & whereKdNr & ") " - Dim sqlStr = " SELECT Rechnungsausgang.RK_ID, Rechnungsausgang.Firma_ID, Rechnungsausgang.FilialenNr, Rechnungsausgang.RechnungsKundenNr, Rechnungsausgang.BelegartenNr, Rechnungsausgang.[Steuersatz %], Rechnungsausgang.Lastschrift, Rechnungsausgang.Währungscode, Rechnungsausgang.AvisoID, Rechnungsausgang.RechnungsNr, Rechnungsausgang.RechnungsDatum, Rechnungsausgang.DruckDatumZeit, Rechnungsausgang.Status, Rechnungsausgang.Sammelrechnung, Rechnungsausgang.Abfertigungsdatum, Rechnungsausgang.Buchungsjahr,Rechnungsausgang.AbfertigungsNr,Rechnungsausgang.SpeditionsbuchUnterNr + Dim sqlStr = " SELECT Rechnungsausgang.RK_ID, Rechnungsausgang.Firma_ID, Rechnungsausgang.FilialenNr, Rechnungsausgang.RechnungsKundenNr, Rechnungsausgang.BelegartenNr, Rechnungsausgang.[Steuersatz %], Rechnungsausgang.Lastschrift, Rechnungsausgang.Währungscode, Rechnungsausgang.AvisoID, Rechnungsausgang.RechnungsNr, Rechnungsausgang.RechnungsDatum, Rechnungsausgang.DruckDatumZeit, Rechnungsausgang.Status, Rechnungsausgang.Sammelrechnung, Rechnungsausgang.Abfertigungsdatum, Rechnungsausgang.Buchungsjahr,Rechnungsausgang.AbfertigungsNr,Rechnungsausgang.SpeditionsbuchUnterNr,[SteuerpflichtigerGesamtbetrag],[SteuerfreierGesamtbetrag] From Rechnungsausgang WHERE Rechnungsausgang.Status IN(0, 2) And Rechnungsausgang.Firma_ID = " & Firma_ID & " And Rechnungsausgang.Sammelrechnung = '" & SammelrechungArt & "' And CONVERT(DATE,Rechnungsausgang.Abfertigungsdatum,104) <= '" & DatumBis.ToShortDateString & "' " & whereKdNr & " " & If(SammelrechungArt = 7 And SB <> "", " AND Sachbearbeiter='" & SB & "' ", "") & "" & getWhereAvisoId(AvisoIds) @@ -1243,6 +1246,16 @@ Public Class cFakturierung Return dt End Function + + Public Shared Function CHECK_SR_SQLDT(dt As DataTable) As Boolean + For Each r In dt.Rows + If (CDbl(r("SteuerpflichtigerGesamtbetrag")) + CDbl(r("SteuerfreierGesamtbetrag"))) = 0 Then + Return False + End If + Next + Return True + End Function + Public Shared Function getWhereAvisoId(ids As List(Of Integer)) As String If ids Is Nothing Then Return "" If ids.Count = 0 Then Return "" @@ -1279,6 +1292,7 @@ Public Class cFakturierung Dim dt = GET_SR_SQLDT(Firma_ID, SammelrechungArt, DatumBis, whereKdNr, SB, AvisoIds) 'SQL.loadDgvBySql(sqlStr, "FMZOLL") If dt Is Nothing Then MsgBox("ERR01: Keine Daten") : Return True If dt.Rows.Count = 0 Then MsgBox("ERR02: Keine Daten") : Return True + If Not CHECK_SR_SQLDT(dt) Then MsgBox("ERR03: Es wurden Rechnungen mit einem 0-Betrag gefunden. Bitte prüfen Sie die Eingaben und starten Sie die Sammelabrechnung erneut.") : Return True Dim Buchungsjahr = cRKSV.getGJ(Rechnungsdatum) 'IIf(Rechnungsdatum.Month = 1, Rechnungsdatum.Year - 1, Rechnungsdatum.Year) diff --git a/SDL/Fakturierung/frmAbrechnungsMaske.vb b/SDL/Fakturierung/frmAbrechnungsMaske.vb index 108b4157..3d300447 100644 --- a/SDL/Fakturierung/frmAbrechnungsMaske.vb +++ b/SDL/Fakturierung/frmAbrechnungsMaske.vb @@ -569,16 +569,16 @@ Public Class frmAbrechnungsMaske End Sub - Private Sub txtAbfertDat_TextChanged(sender As Object, e As EventArgs) Handles txtAbfertDat.Leave, txtAbfertDatBis.Leave + Private Sub txtAbfertDat_Leave(sender As Object, e As EventArgs) Handles txtAbfertDat.Leave, txtAbfertDatBis.Leave initBtns("") End Sub - Private Sub MyTextBox2_TextChanged(sender As Object, e As KeyEventArgs) Handles MyTextBox2.KeyDown, MyTextBox3.KeyDown, MyTextBox2.TextChanged ', MyTextBox2.TextChanged + Private Sub MyTextBox2_KeyDown(sender As Object, e As KeyEventArgs) Handles MyTextBox2.KeyDown, MyTextBox3.KeyDown If e.KeyCode = Keys.Return Then initBtns("") End If End Sub - Private Sub MyTextBox3_TextChanged(sender As Object, e As EventArgs) Handles MyTextBox2.Leave, MyTextBox3.Leave + Private Sub MyTextBox3_Leave(sender As Object, e As EventArgs) Handles MyTextBox2.Leave, MyTextBox3.Leave initBtns("") End Sub diff --git a/SDL/Fakturierung/usrCntlFaktAbrechnung.Designer.vb b/SDL/Fakturierung/usrCntlFaktAbrechnung.Designer.vb index c242b09d..fae1dcf9 100644 --- a/SDL/Fakturierung/usrCntlFaktAbrechnung.Designer.vb +++ b/SDL/Fakturierung/usrCntlFaktAbrechnung.Designer.vb @@ -23,14 +23,14 @@ Partial Class usrCntlFaktAbrechnung Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() + Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrCntlFaktAbrechnung)) Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrCntlFaktAbrechnung)) Me.Label9 = New System.Windows.Forms.Label() Me.Label4 = New System.Windows.Forms.Label() Me.pnlTop = New System.Windows.Forms.Panel() @@ -38,7 +38,6 @@ Partial Class usrCntlFaktAbrechnung Me.Button13 = New System.Windows.Forms.Button() Me.Button10 = New System.Windows.Forms.Button() Me.lblDruckaufheben = New System.Windows.Forms.LinkLabel() - Me.cboRgGS = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Panel3 = New System.Windows.Forms.Panel() Me.lblSendungen = New System.Windows.Forms.Label() Me.Label44 = New System.Windows.Forms.Label() @@ -48,18 +47,14 @@ Partial Class usrCntlFaktAbrechnung Me.Label45 = New System.Windows.Forms.Label() Me.Label42 = New System.Windows.Forms.Label() Me.btnDatenLaden = New System.Windows.Forms.Button() - Me.cboSpedBuchUnterNr = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.lblErrFiliale = New System.Windows.Forms.Label() Me.lblErrUnterNr = New System.Windows.Forms.Label() Me.lblAbfNrExists = New System.Windows.Forms.Label() Me.lblAbfNr_Err = New System.Windows.Forms.Label() Me.Label8 = New System.Windows.Forms.Label() Me.Label41 = New System.Windows.Forms.Label() - Me.txtUnterNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label11 = New System.Windows.Forms.Label() Me.Label12 = New System.Windows.Forms.Label() - Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtAbfertigungsnummer = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label39 = New System.Windows.Forms.Label() Me.Label38 = New System.Windows.Forms.Label() Me.lblSB = New System.Windows.Forms.Label() @@ -67,64 +62,33 @@ Partial Class usrCntlFaktAbrechnung Me.lblRechnungsDatum = New System.Windows.Forms.Label() Me.lblRechnungsNummer = New System.Windows.Forms.Label() Me.Panel1 = New System.Windows.Forms.Panel() - Me.rtbHandling = New VERAG_PROG_ALLGEMEIN.MyRichTextBox() Me.Label52 = New System.Windows.Forms.Label() Me.Panel2 = New System.Windows.Forms.Panel() - Me.txtPositionAnzahl = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label49 = New System.Windows.Forms.Label() - Me.txtAbfertigungsanzahl = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label48 = New System.Windows.Forms.Label() - Me.txtAbfertigungsart = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label47 = New System.Windows.Forms.Label() Me.pnlAvisierer = New System.Windows.Forms.Panel() Me.Label27 = New System.Windows.Forms.Label() Me.btnAvisiererEuro = New System.Windows.Forms.Button() Me.Label2 = New System.Windows.Forms.Label() - Me.txtkdNrAvisierer = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label21 = New System.Windows.Forms.Label() - Me.txtAvisoId = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.kdFirmaAvisierer = New VERAG_PROG_ALLGEMEIN.KdSearchBox() - Me.FlatButton5 = New VERAG_PROG_ALLGEMEIN.FlatButton() - Me.cboAnlage5 = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.cboAnlage1 = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtWarenwertUmrechnung = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label13 = New System.Windows.Forms.Label() - Me.cboAnlage2 = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Label34 = New System.Windows.Forms.Label() - Me.cboAnlage3 = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtVermerk = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cboAnlage6 = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Label25 = New System.Windows.Forms.Label() - Me.cboAnlage4 = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtErfassungsnummer = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label24 = New System.Windows.Forms.Label() Me.Label22 = New System.Windows.Forms.Label() - Me.cboRechnungNotiz = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.pic = New System.Windows.Forms.PictureBox() - Me.cboFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.lblFirma3 = New System.Windows.Forms.Label() Me.lblFirma2 = New System.Windows.Forms.Label() Me.lblFirma1 = New System.Windows.Forms.Label() Me.Label32 = New System.Windows.Forms.Label() Me.pnlAuftraggeber = New System.Windows.Forms.Panel() Me.btnAuftraggeberEuro = New System.Windows.Forms.Button() - Me.txtkdNrAuftraggeber = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.kdFirmaAuftraggeber = New VERAG_PROG_ALLGEMEIN.KdSearchBox() - Me.txtAuftraggeberName2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label15 = New System.Windows.Forms.Label() - Me.txtAuftragggeberOrt = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAuftragggeberStrasse = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.FlatButton4 = New VERAG_PROG_ALLGEMEIN.FlatButton() - Me.txtText = New VERAG_PROG_ALLGEMEIN.MyRichTextBox() - Me.txtBefoerderungsmittel = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtGrenze = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label20 = New System.Windows.Forms.Label() Me.Label19 = New System.Windows.Forms.Label() - Me.txtSendungsdaten = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label17 = New System.Windows.Forms.Label() - Me.txtWarenwert = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label16 = New System.Windows.Forms.Label() - Me.txtZollbelegNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label10 = New System.Windows.Forms.Label() Me.pnlRechnungAn = New System.Windows.Forms.Panel() Me.picKdAuftrInfo = New System.Windows.Forms.PictureBox() @@ -133,72 +97,32 @@ Partial Class usrCntlFaktAbrechnung Me.lblUIDOK = New System.Windows.Forms.Label() Me.lblUIDErr = New System.Windows.Forms.Label() Me.Button6 = New System.Windows.Forms.Button() - Me.cboSammelrechnung = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtRechnungAnName2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.kdFirmaRechnungAn = New VERAG_PROG_ALLGEMEIN.KdSearchBox() - Me.FlatButton3 = New VERAG_PROG_ALLGEMEIN.FlatButton() - Me.txtKdAuftragsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label43 = New System.Windows.Forms.Label() - Me.txtRechnungAnUIDKz = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.lblVorauskasse = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label() - Me.cboRechnungAn = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtRechnungAnUIDNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label6 = New System.Windows.Forms.Label() - Me.txtRechnungAnBuKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label3 = New System.Windows.Forms.Label() - Me.txtkdNrRechnungAn = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtRechnungAnOrt = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtRechnungAnStrasse = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label7 = New System.Windows.Forms.Label() Me.pnlAbsender = New System.Windows.Forms.Panel() Me.btnAbsenderEuro = New System.Windows.Forms.Button() - Me.txtkdNrAbsender = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.kdFirmaAbsender = New VERAG_PROG_ALLGEMEIN.KdSearchBox() - Me.txtAbsenderName2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbsenderOrt = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtAbsenderStrasse = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.FlatButton1 = New VERAG_PROG_ALLGEMEIN.FlatButton() Me.Panel7 = New System.Windows.Forms.Panel() Me.Button1 = New System.Windows.Forms.Button() Me.Button12 = New System.Windows.Forms.Button() Me.Label14 = New System.Windows.Forms.Label() - Me.sbLeistung = New VERAG_PROG_ALLGEMEIN.MySearchBox() Me.Button7 = New System.Windows.Forms.Button() Me.btnVorauskasseAnzeigen = New System.Windows.Forms.Button() Me.Button5 = New System.Windows.Forms.Button() Me.btn = New System.Windows.Forms.Button() - Me.txtUnterNrRef = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cboFilialeRef = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtAbfertigungsnummerRef = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label26 = New System.Windows.Forms.Label() Me.Label31 = New System.Windows.Forms.Label() Me.Label29 = New System.Windows.Forms.Label() Me.Label30 = New System.Windows.Forms.Label() - Me.dgvRechnungenPositionen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) - Me.Leistung = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.Anzahl = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.Preis = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.SteuerpflichtigerBetrag = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.SteuerfreierBetrag = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.Aufschubkonto = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.dgvOffertenSperrliste = New System.Windows.Forms.DataGridView() - Me.dgvOfferteDetailsUebersicht = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) - Me.txtRohmasse = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label18 = New System.Windows.Forms.Label() - Me.cboWaehrung = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.cboWaehrungUmrechnung = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.pnlEmpfaenger = New System.Windows.Forms.Panel() Me.btnEmpfaengerEuro = New System.Windows.Forms.Button() - Me.txtkdNrEmpfaenger = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtEmpfeangerName2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label5 = New System.Windows.Forms.Label() - Me.txtEmpfaengerOrt = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtEmpfaengerStrasse = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.kdFirmaEmpfaenger = New VERAG_PROG_ALLGEMEIN.KdSearchBox() - Me.FlatButton2 = New VERAG_PROG_ALLGEMEIN.FlatButton() Me.pnl = New System.Windows.Forms.Panel() - Me.rtbAbf_Besonderheiten = New SDL.usrCntlKundenBesonderheiten() Me.cbxOriginalPrint = New System.Windows.Forms.CheckBox() Me.pnlDocs = New System.Windows.Forms.Panel() Me.PictureBox1 = New System.Windows.Forms.PictureBox() @@ -216,20 +140,96 @@ Partial Class usrCntlFaktAbrechnung Me.Button2 = New System.Windows.Forms.Button() Me.btnOK = New System.Windows.Forms.Button() Me.Label23 = New System.Windows.Forms.Label() - Me.txtSteuersatz = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cboSteuerschlüssel = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtSteuerFreierBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label37 = New System.Windows.Forms.Label() Me.Label36 = New System.Windows.Forms.Label() - Me.txtGesamtsumme = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtSteuerBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtSteuerpflichtigerBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label33 = New System.Windows.Forms.Label() Me.Label35 = New System.Windows.Forms.Label() Me.Label28 = New System.Windows.Forms.Label() - Me.txtBesonderheiten = New VERAG_PROG_ALLGEMEIN.MyRichTextBox() Me.ToolTip = New System.Windows.Forms.ToolTip(Me.components) Me.Timer = New System.Windows.Forms.Timer(Me.components) + Me.rtbHandling = New VERAG_PROG_ALLGEMEIN.MyRichTextBox() + Me.txtPositionAnzahl = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbfertigungsanzahl = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbfertigungsart = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtkdNrAvisierer = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAvisoId = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.kdFirmaAvisierer = New VERAG_PROG_ALLGEMEIN.KdSearchBox() + Me.FlatButton5 = New VERAG_PROG_ALLGEMEIN.FlatButton() + Me.cboAnlage5 = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboAnlage1 = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtWarenwertUmrechnung = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboAnlage2 = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboAnlage3 = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtVermerk = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboAnlage6 = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboAnlage4 = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtErfassungsnummer = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboRechnungNotiz = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtkdNrAuftraggeber = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.kdFirmaAuftraggeber = New VERAG_PROG_ALLGEMEIN.KdSearchBox() + Me.txtAuftraggeberName2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAuftragggeberOrt = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAuftragggeberStrasse = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.FlatButton4 = New VERAG_PROG_ALLGEMEIN.FlatButton() + Me.txtText = New VERAG_PROG_ALLGEMEIN.MyRichTextBox() + Me.txtBefoerderungsmittel = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtGrenze = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtSendungsdaten = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtWarenwert = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtZollbelegNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboSammelrechnung = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtRechnungAnName2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.kdFirmaRechnungAn = New VERAG_PROG_ALLGEMEIN.KdSearchBox() + Me.FlatButton3 = New VERAG_PROG_ALLGEMEIN.FlatButton() + Me.txtKdAuftragsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtRechnungAnUIDKz = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboRechnungAn = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtRechnungAnUIDNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtRechnungAnBuKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtkdNrRechnungAn = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtRechnungAnOrt = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtRechnungAnStrasse = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtkdNrAbsender = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.kdFirmaAbsender = New VERAG_PROG_ALLGEMEIN.KdSearchBox() + Me.txtAbsenderName2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbsenderOrt = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtAbsenderStrasse = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.FlatButton1 = New VERAG_PROG_ALLGEMEIN.FlatButton() + Me.sbLeistung = New VERAG_PROG_ALLGEMEIN.MySearchBox() + Me.txtUnterNrRef = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboFilialeRef = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtAbfertigungsnummerRef = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.dgvRechnungenPositionen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) + Me.Leistung = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.Anzahl = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.Preis = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.SteuerpflichtigerBetrag = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.SteuerfreierBetrag = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.Aufschubkonto = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.dgvOfferteDetailsUebersicht = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) + Me.txtRohmasse = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboWaehrung = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboWaehrungUmrechnung = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtkdNrEmpfaenger = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtEmpfeangerName2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtEmpfaengerOrt = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtEmpfaengerStrasse = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.kdFirmaEmpfaenger = New VERAG_PROG_ALLGEMEIN.KdSearchBox() + Me.FlatButton2 = New VERAG_PROG_ALLGEMEIN.FlatButton() + Me.txtSteuersatz = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboSteuerschlüssel = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtSteuerFreierBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtGesamtsumme = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtSteuerBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtSteuerpflichtigerBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtBesonderheiten = New VERAG_PROG_ALLGEMEIN.MyRichTextBox() + Me.cboRgGS = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboSpedBuchUnterNr = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtUnterNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtAbfertigungsnummer = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.rtbAbf_Besonderheiten = New SDL.usrCntlKundenBesonderheiten() Me.pnlTop.SuspendLayout() Me.Panel3.SuspendLayout() Me.Panel1.SuspendLayout() @@ -242,14 +242,14 @@ Partial Class usrCntlFaktAbrechnung CType(Me.picWarnRgAn, System.ComponentModel.ISupportInitialize).BeginInit() Me.pnlAbsender.SuspendLayout() Me.Panel7.SuspendLayout() - CType(Me.dgvRechnungenPositionen, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.dgvOffertenSperrliste, System.ComponentModel.ISupportInitialize).BeginInit() - CType(Me.dgvOfferteDetailsUebersicht, System.ComponentModel.ISupportInitialize).BeginInit() Me.pnlEmpfaenger.SuspendLayout() Me.pnl.SuspendLayout() Me.pnlDocs.SuspendLayout() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.dgvRechnungenPositionen, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.dgvOfferteDetailsUebersicht, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Label9 @@ -361,22 +361,6 @@ Partial Class usrCntlFaktAbrechnung Me.lblDruckaufheben.Text = "Druck aufheben" Me.lblDruckaufheben.Visible = False ' - 'cboRgGS - ' - Me.cboRgGS._allowedValuesFreiText = Nothing - Me.cboRgGS._allowFreiText = False - Me.cboRgGS._value = "" - Me.cboRgGS.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.cboRgGS.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboRgGS.Font = New System.Drawing.Font("Microsoft Sans Serif", 16.0!, System.Drawing.FontStyle.Bold) - Me.cboRgGS.ForeColor = System.Drawing.Color.White - Me.cboRgGS.FormattingEnabled = True - Me.cboRgGS.Items.AddRange(New Object() {"Rechnung", "Gutschrift"}) - Me.cboRgGS.Location = New System.Drawing.Point(3, -1) - Me.cboRgGS.Name = "cboRgGS" - Me.cboRgGS.Size = New System.Drawing.Size(211, 33) - Me.cboRgGS.TabIndex = 26 - ' 'Panel3 ' Me.Panel3.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) @@ -492,19 +476,6 @@ Partial Class usrCntlFaktAbrechnung Me.btnDatenLaden.Text = "Daten laden" Me.btnDatenLaden.UseVisualStyleBackColor = False ' - 'cboSpedBuchUnterNr - ' - Me.cboSpedBuchUnterNr._allowedValuesFreiText = Nothing - Me.cboSpedBuchUnterNr._allowFreiText = False - Me.cboSpedBuchUnterNr._value = "" - Me.cboSpedBuchUnterNr.DropDownWidth = 350 - Me.cboSpedBuchUnterNr.FormattingEnabled = True - Me.cboSpedBuchUnterNr.Location = New System.Drawing.Point(255, 48) - Me.cboSpedBuchUnterNr.Margin = New System.Windows.Forms.Padding(2) - Me.cboSpedBuchUnterNr.Name = "cboSpedBuchUnterNr" - Me.cboSpedBuchUnterNr.Size = New System.Drawing.Size(71, 21) - Me.cboSpedBuchUnterNr.TabIndex = 5 - ' 'lblErrFiliale ' Me.lblErrFiliale.AutoSize = True @@ -574,28 +545,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label41.Text = "Druck-Datum:" Me.Label41.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'txtUnterNr - ' - Me.txtUnterNr._DateTimeOnly = False - Me.txtUnterNr._numbersOnly = False - Me.txtUnterNr._numbersOnlyKommastellen = "" - Me.txtUnterNr._Prozent = False - Me.txtUnterNr._ShortDateNew = False - Me.txtUnterNr._ShortDateOnly = False - Me.txtUnterNr._TimeOnly = False - Me.txtUnterNr._value = Nothing - Me.txtUnterNr._Waehrung = False - Me.txtUnterNr._WaehrungZeichen = True - Me.txtUnterNr.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!) - Me.txtUnterNr.Location = New System.Drawing.Point(417, 48) - Me.txtUnterNr.MaxLineLength = -1 - Me.txtUnterNr.MaxLines_Warning = "" - Me.txtUnterNr.MaxLines_Warning_Label = Nothing - Me.txtUnterNr.Name = "txtUnterNr" - Me.txtUnterNr.ReadOnly = True - Me.txtUnterNr.Size = New System.Drawing.Size(55, 21) - Me.txtUnterNr.TabIndex = 7 - ' 'Label11 ' Me.Label11.AutoSize = True @@ -618,41 +567,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label12.TabIndex = 2 Me.Label12.Text = "UnterNr" ' - 'cboFiliale - ' - Me.cboFiliale._allowedValuesFreiText = Nothing - Me.cboFiliale._allowFreiText = False - Me.cboFiliale._value = "" - Me.cboFiliale.DropDownWidth = 280 - Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cboFiliale.FormattingEnabled = True - Me.cboFiliale.Location = New System.Drawing.Point(8, 48) - Me.cboFiliale.Name = "cboFiliale" - Me.cboFiliale.Size = New System.Drawing.Size(80, 21) - Me.cboFiliale.TabIndex = 3 - ' - 'txtAbfertigungsnummer - ' - Me.txtAbfertigungsnummer._DateTimeOnly = False - Me.txtAbfertigungsnummer._numbersOnly = True - Me.txtAbfertigungsnummer._numbersOnlyKommastellen = "" - Me.txtAbfertigungsnummer._Prozent = False - Me.txtAbfertigungsnummer._ShortDateNew = False - Me.txtAbfertigungsnummer._ShortDateOnly = False - Me.txtAbfertigungsnummer._TimeOnly = False - Me.txtAbfertigungsnummer._value = "" - Me.txtAbfertigungsnummer._Waehrung = False - Me.txtAbfertigungsnummer._WaehrungZeichen = True - Me.txtAbfertigungsnummer.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!) - Me.txtAbfertigungsnummer.Location = New System.Drawing.Point(87, 48) - Me.txtAbfertigungsnummer.MaxLength = 8 - Me.txtAbfertigungsnummer.MaxLineLength = -1 - Me.txtAbfertigungsnummer.MaxLines_Warning = "" - Me.txtAbfertigungsnummer.MaxLines_Warning_Label = Nothing - Me.txtAbfertigungsnummer.Name = "txtAbfertigungsnummer" - Me.txtAbfertigungsnummer.Size = New System.Drawing.Size(169, 21) - Me.txtAbfertigungsnummer.TabIndex = 4 - ' 'Label39 ' Me.Label39.ForeColor = System.Drawing.Color.White @@ -769,17 +683,6 @@ Partial Class usrCntlFaktAbrechnung Me.Panel1.Size = New System.Drawing.Size(830, 1130) Me.Panel1.TabIndex = 1 ' - 'rtbHandling - ' - Me.rtbHandling.Location = New System.Drawing.Point(552, 954) - Me.rtbHandling.MaxLineLength = -1 - Me.rtbHandling.MaxLines_Warning = "" - Me.rtbHandling.MaxLines_Warning_Label = Nothing - Me.rtbHandling.Name = "rtbHandling" - Me.rtbHandling.Size = New System.Drawing.Size(268, 61) - Me.rtbHandling.TabIndex = 44 - Me.rtbHandling.Text = "" - ' 'Label52 ' Me.Label52.AutoSize = True @@ -806,29 +709,6 @@ Partial Class usrCntlFaktAbrechnung Me.Panel2.Size = New System.Drawing.Size(411, 45) Me.Panel2.TabIndex = 41 ' - 'txtPositionAnzahl - ' - Me.txtPositionAnzahl._DateTimeOnly = False - Me.txtPositionAnzahl._numbersOnly = False - Me.txtPositionAnzahl._numbersOnlyKommastellen = "" - Me.txtPositionAnzahl._Prozent = False - Me.txtPositionAnzahl._ShortDateNew = False - Me.txtPositionAnzahl._ShortDateOnly = False - Me.txtPositionAnzahl._TimeOnly = False - Me.txtPositionAnzahl._value = Nothing - Me.txtPositionAnzahl._Waehrung = False - Me.txtPositionAnzahl._WaehrungZeichen = True - Me.txtPositionAnzahl.ForeColor = System.Drawing.Color.Black - Me.txtPositionAnzahl.Location = New System.Drawing.Point(358, 21) - Me.txtPositionAnzahl.MaxLength = 35 - Me.txtPositionAnzahl.MaxLineLength = -1 - Me.txtPositionAnzahl.MaxLines_Warning = "" - Me.txtPositionAnzahl.MaxLines_Warning_Label = Nothing - Me.txtPositionAnzahl.Name = "txtPositionAnzahl" - Me.txtPositionAnzahl.ReadOnly = True - Me.txtPositionAnzahl.Size = New System.Drawing.Size(43, 20) - Me.txtPositionAnzahl.TabIndex = 46 - ' 'Label49 ' Me.Label49.AutoSize = True @@ -839,29 +719,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label49.Text = "Pos.Anz.:" Me.Label49.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'txtAbfertigungsanzahl - ' - Me.txtAbfertigungsanzahl._DateTimeOnly = False - Me.txtAbfertigungsanzahl._numbersOnly = False - Me.txtAbfertigungsanzahl._numbersOnlyKommastellen = "" - Me.txtAbfertigungsanzahl._Prozent = False - Me.txtAbfertigungsanzahl._ShortDateNew = False - Me.txtAbfertigungsanzahl._ShortDateOnly = False - Me.txtAbfertigungsanzahl._TimeOnly = False - Me.txtAbfertigungsanzahl._value = Nothing - Me.txtAbfertigungsanzahl._Waehrung = False - Me.txtAbfertigungsanzahl._WaehrungZeichen = True - Me.txtAbfertigungsanzahl.ForeColor = System.Drawing.Color.Black - Me.txtAbfertigungsanzahl.Location = New System.Drawing.Point(358, 3) - Me.txtAbfertigungsanzahl.MaxLength = 35 - Me.txtAbfertigungsanzahl.MaxLineLength = -1 - Me.txtAbfertigungsanzahl.MaxLines_Warning = "" - Me.txtAbfertigungsanzahl.MaxLines_Warning_Label = Nothing - Me.txtAbfertigungsanzahl.Name = "txtAbfertigungsanzahl" - Me.txtAbfertigungsanzahl.ReadOnly = True - Me.txtAbfertigungsanzahl.Size = New System.Drawing.Size(43, 20) - Me.txtAbfertigungsanzahl.TabIndex = 44 - ' 'Label48 ' Me.Label48.AutoSize = True @@ -872,29 +729,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label48.Text = "Anzahl:" Me.Label48.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'txtAbfertigungsart - ' - Me.txtAbfertigungsart._DateTimeOnly = False - Me.txtAbfertigungsart._numbersOnly = False - Me.txtAbfertigungsart._numbersOnlyKommastellen = "" - Me.txtAbfertigungsart._Prozent = False - Me.txtAbfertigungsart._ShortDateNew = False - Me.txtAbfertigungsart._ShortDateOnly = False - Me.txtAbfertigungsart._TimeOnly = False - Me.txtAbfertigungsart._value = Nothing - Me.txtAbfertigungsart._Waehrung = False - Me.txtAbfertigungsart._WaehrungZeichen = True - Me.txtAbfertigungsart.ForeColor = System.Drawing.Color.Black - Me.txtAbfertigungsart.Location = New System.Drawing.Point(97, 3) - Me.txtAbfertigungsart.MaxLength = 35 - Me.txtAbfertigungsart.MaxLineLength = -1 - Me.txtAbfertigungsart.MaxLines_Warning = "" - Me.txtAbfertigungsart.MaxLines_Warning_Label = Nothing - Me.txtAbfertigungsart.Name = "txtAbfertigungsart" - Me.txtAbfertigungsart.ReadOnly = True - Me.txtAbfertigungsart.Size = New System.Drawing.Size(199, 20) - Me.txtAbfertigungsart.TabIndex = 42 - ' 'Label47 ' Me.Label47.AutoSize = True @@ -961,31 +795,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label2.TabIndex = 5 Me.Label2.Text = "LKW-ID:" ' - 'txtkdNrAvisierer - ' - Me.txtkdNrAvisierer._DateTimeOnly = False - Me.txtkdNrAvisierer._numbersOnly = False - Me.txtkdNrAvisierer._numbersOnlyKommastellen = "" - Me.txtkdNrAvisierer._Prozent = False - Me.txtkdNrAvisierer._ShortDateNew = False - Me.txtkdNrAvisierer._ShortDateOnly = False - Me.txtkdNrAvisierer._TimeOnly = False - Me.txtkdNrAvisierer._value = Nothing - Me.txtkdNrAvisierer._Waehrung = False - Me.txtkdNrAvisierer._WaehrungZeichen = True - Me.txtkdNrAvisierer.BackColor = System.Drawing.Color.White - Me.txtkdNrAvisierer.ForeColor = System.Drawing.Color.Black - Me.txtkdNrAvisierer.Location = New System.Drawing.Point(8, 22) - Me.txtkdNrAvisierer.MaxLength = 35 - Me.txtkdNrAvisierer.MaxLineLength = -1 - Me.txtkdNrAvisierer.MaxLines_Warning = "" - Me.txtkdNrAvisierer.MaxLines_Warning_Label = Nothing - Me.txtkdNrAvisierer.Name = "txtkdNrAvisierer" - Me.txtkdNrAvisierer.ReadOnly = True - Me.txtkdNrAvisierer.Size = New System.Drawing.Size(94, 20) - Me.txtkdNrAvisierer.TabIndex = 1 - Me.txtkdNrAvisierer.TabStop = False - ' 'Label21 ' Me.Label21.AutoSize = True @@ -996,127 +805,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label21.TabIndex = 0 Me.Label21.Text = "4. Avisierer:" ' - 'txtAvisoId - ' - Me.txtAvisoId._DateTimeOnly = False - Me.txtAvisoId._numbersOnly = False - Me.txtAvisoId._numbersOnlyKommastellen = "" - Me.txtAvisoId._Prozent = False - Me.txtAvisoId._ShortDateNew = False - Me.txtAvisoId._ShortDateOnly = False - Me.txtAvisoId._TimeOnly = False - Me.txtAvisoId._value = Nothing - Me.txtAvisoId._Waehrung = False - Me.txtAvisoId._WaehrungZeichen = True - Me.txtAvisoId.ForeColor = System.Drawing.Color.Black - Me.txtAvisoId.Location = New System.Drawing.Point(157, 61) - Me.txtAvisoId.MaxLength = 35 - Me.txtAvisoId.MaxLineLength = -1 - Me.txtAvisoId.MaxLines_Warning = "" - Me.txtAvisoId.MaxLines_Warning_Label = Nothing - Me.txtAvisoId.Name = "txtAvisoId" - Me.txtAvisoId.ReadOnly = True - Me.txtAvisoId.Size = New System.Drawing.Size(126, 20) - Me.txtAvisoId.TabIndex = 6 - Me.txtAvisoId.TabStop = False - Me.txtAvisoId.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'kdFirmaAvisierer - ' - Me.kdFirmaAvisierer._AlleFirmenCLUSTER = False - Me.kdFirmaAvisierer._AllowSetValue = True - Me.kdFirmaAvisierer._autoSizeGross = False - Me.kdFirmaAvisierer._display_Name1 = True - Me.kdFirmaAvisierer._displayAVISO_Email = False - Me.kdFirmaAvisierer._displayFullName = False - Me.kdFirmaAvisierer._displayWoelflKd = False - Me.kdFirmaAvisierer._hideIfListEmpty = True - Me.kdFirmaAvisierer._loadKdData = True - Me.kdFirmaAvisierer._UseFIRMA = "" - Me.kdFirmaAvisierer._ValueKdAndName = False - Me.kdFirmaAvisierer.BackColor = System.Drawing.Color.White - Me.kdFirmaAvisierer.dgvpos = "LEFT" - Me.kdFirmaAvisierer.KdName = Nothing - Me.kdFirmaAvisierer.KdNr = "-1" - Me.kdFirmaAvisierer.kdNrField = Nothing - Me.kdFirmaAvisierer.KdNrNullInt = Nothing - Me.kdFirmaAvisierer.Location = New System.Drawing.Point(101, 22) - Me.kdFirmaAvisierer.MaxLength = 35 - Me.kdFirmaAvisierer.Name = "kdFirmaAvisierer" - Me.kdFirmaAvisierer.nurAktive = True - Me.kdFirmaAvisierer.searchActive = True - Me.kdFirmaAvisierer.Size = New System.Drawing.Size(283, 20) - Me.kdFirmaAvisierer.TabIndex = 3 - Me.kdFirmaAvisierer.TabStop = False - Me.kdFirmaAvisierer.TIMER_SEARCH = True - Me.kdFirmaAvisierer.usrcntl = Nothing - ' - 'FlatButton5 - ' - Me.FlatButton5.allowBorder = False - Me.FlatButton5.FlatAppearance.BorderSize = 0 - Me.FlatButton5.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.FlatButton5.ForeColor = System.Drawing.Color.Black - Me.FlatButton5.Image = Global.SDL.My.Resources.Resources.personInaktiv - Me.FlatButton5.Location = New System.Drawing.Point(382, 17) - Me.FlatButton5.Name = "FlatButton5" - Me.FlatButton5.Size = New System.Drawing.Size(24, 25) - Me.FlatButton5.TabIndex = 2 - Me.FlatButton5.TabStop = False - Me.FlatButton5.UseVisualStyleBackColor = True - ' - 'cboAnlage5 - ' - Me.cboAnlage5._allowedValuesFreiText = Nothing - Me.cboAnlage5._allowFreiText = True - Me.cboAnlage5._value = "" - Me.cboAnlage5.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend - Me.cboAnlage5.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems - Me.cboAnlage5.FormattingEnabled = True - Me.cboAnlage5.Location = New System.Drawing.Point(280, 974) - Me.cboAnlage5.MaxLength = 35 - Me.cboAnlage5.Name = "cboAnlage5" - Me.cboAnlage5.Size = New System.Drawing.Size(266, 21) - Me.cboAnlage5.TabIndex = 32 - ' - 'cboAnlage1 - ' - Me.cboAnlage1._allowedValuesFreiText = Nothing - Me.cboAnlage1._allowFreiText = True - Me.cboAnlage1._value = "" - Me.cboAnlage1.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend - Me.cboAnlage1.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems - Me.cboAnlage1.FormattingEnabled = True - Me.cboAnlage1.Location = New System.Drawing.Point(10, 954) - Me.cboAnlage1.MaxLength = 35 - Me.cboAnlage1.Name = "cboAnlage1" - Me.cboAnlage1.Size = New System.Drawing.Size(266, 21) - Me.cboAnlage1.TabIndex = 28 - ' - 'txtWarenwertUmrechnung - ' - Me.txtWarenwertUmrechnung._DateTimeOnly = False - Me.txtWarenwertUmrechnung._numbersOnly = False - Me.txtWarenwertUmrechnung._numbersOnlyKommastellen = "" - Me.txtWarenwertUmrechnung._Prozent = False - Me.txtWarenwertUmrechnung._ShortDateNew = False - Me.txtWarenwertUmrechnung._ShortDateOnly = False - Me.txtWarenwertUmrechnung._TimeOnly = False - Me.txtWarenwertUmrechnung._value = "" - Me.txtWarenwertUmrechnung._Waehrung = True - Me.txtWarenwertUmrechnung._WaehrungZeichen = False - Me.txtWarenwertUmrechnung.Enabled = False - Me.txtWarenwertUmrechnung.ForeColor = System.Drawing.Color.Black - Me.txtWarenwertUmrechnung.Location = New System.Drawing.Point(147, 414) - Me.txtWarenwertUmrechnung.MaxLength = 35 - Me.txtWarenwertUmrechnung.MaxLineLength = -1 - Me.txtWarenwertUmrechnung.MaxLines_Warning = "" - Me.txtWarenwertUmrechnung.MaxLines_Warning_Label = Nothing - Me.txtWarenwertUmrechnung.Name = "txtWarenwertUmrechnung" - Me.txtWarenwertUmrechnung.Size = New System.Drawing.Size(129, 20) - Me.txtWarenwertUmrechnung.TabIndex = 18 - Me.txtWarenwertUmrechnung.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' 'Label13 ' Me.Label13.AutoSize = True @@ -1128,20 +816,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label13.Text = "Anlagen:" Me.Label13.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'cboAnlage2 - ' - Me.cboAnlage2._allowedValuesFreiText = Nothing - Me.cboAnlage2._allowFreiText = True - Me.cboAnlage2._value = "" - Me.cboAnlage2.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend - Me.cboAnlage2.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems - Me.cboAnlage2.FormattingEnabled = True - Me.cboAnlage2.Location = New System.Drawing.Point(10, 974) - Me.cboAnlage2.MaxLength = 35 - Me.cboAnlage2.Name = "cboAnlage2" - Me.cboAnlage2.Size = New System.Drawing.Size(266, 21) - Me.cboAnlage2.TabIndex = 29 - ' 'Label34 ' Me.Label34.AutoSize = True @@ -1152,56 +826,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label34.Text = "Umrechnung:" Me.Label34.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'cboAnlage3 - ' - Me.cboAnlage3._allowedValuesFreiText = Nothing - Me.cboAnlage3._allowFreiText = True - Me.cboAnlage3._value = "" - Me.cboAnlage3.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend - Me.cboAnlage3.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems - Me.cboAnlage3.FormattingEnabled = True - Me.cboAnlage3.Location = New System.Drawing.Point(10, 994) - Me.cboAnlage3.MaxLength = 35 - Me.cboAnlage3.Name = "cboAnlage3" - Me.cboAnlage3.Size = New System.Drawing.Size(266, 21) - Me.cboAnlage3.TabIndex = 30 - ' - 'txtVermerk - ' - Me.txtVermerk._DateTimeOnly = False - Me.txtVermerk._numbersOnly = False - Me.txtVermerk._numbersOnlyKommastellen = "" - Me.txtVermerk._Prozent = False - Me.txtVermerk._ShortDateNew = False - Me.txtVermerk._ShortDateOnly = False - Me.txtVermerk._TimeOnly = False - Me.txtVermerk._value = Nothing - Me.txtVermerk._Waehrung = False - Me.txtVermerk._WaehrungZeichen = True - Me.txtVermerk.ForeColor = System.Drawing.Color.Black - Me.txtVermerk.Location = New System.Drawing.Point(102, 456) - Me.txtVermerk.MaxLength = 35 - Me.txtVermerk.MaxLineLength = -1 - Me.txtVermerk.MaxLines_Warning = "" - Me.txtVermerk.MaxLines_Warning_Label = Nothing - Me.txtVermerk.Name = "txtVermerk" - Me.txtVermerk.Size = New System.Drawing.Size(305, 20) - Me.txtVermerk.TabIndex = 25 - ' - 'cboAnlage6 - ' - Me.cboAnlage6._allowedValuesFreiText = Nothing - Me.cboAnlage6._allowFreiText = True - Me.cboAnlage6._value = "" - Me.cboAnlage6.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend - Me.cboAnlage6.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems - Me.cboAnlage6.FormattingEnabled = True - Me.cboAnlage6.Location = New System.Drawing.Point(280, 994) - Me.cboAnlage6.MaxLength = 35 - Me.cboAnlage6.Name = "cboAnlage6" - Me.cboAnlage6.Size = New System.Drawing.Size(266, 21) - Me.cboAnlage6.TabIndex = 33 - ' 'Label25 ' Me.Label25.AutoSize = True @@ -1212,42 +836,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label25.Text = "Vermerk:" Me.Label25.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'cboAnlage4 - ' - Me.cboAnlage4._allowedValuesFreiText = Nothing - Me.cboAnlage4._allowFreiText = True - Me.cboAnlage4._value = "" - Me.cboAnlage4.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend - Me.cboAnlage4.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems - Me.cboAnlage4.FormattingEnabled = True - Me.cboAnlage4.Location = New System.Drawing.Point(280, 954) - Me.cboAnlage4.MaxLength = 35 - Me.cboAnlage4.Name = "cboAnlage4" - Me.cboAnlage4.Size = New System.Drawing.Size(266, 21) - Me.cboAnlage4.TabIndex = 31 - ' - 'txtErfassungsnummer - ' - Me.txtErfassungsnummer._DateTimeOnly = False - Me.txtErfassungsnummer._numbersOnly = False - Me.txtErfassungsnummer._numbersOnlyKommastellen = "" - Me.txtErfassungsnummer._Prozent = False - Me.txtErfassungsnummer._ShortDateNew = False - Me.txtErfassungsnummer._ShortDateOnly = False - Me.txtErfassungsnummer._TimeOnly = False - Me.txtErfassungsnummer._value = Nothing - Me.txtErfassungsnummer._Waehrung = False - Me.txtErfassungsnummer._WaehrungZeichen = True - Me.txtErfassungsnummer.ForeColor = System.Drawing.Color.Black - Me.txtErfassungsnummer.Location = New System.Drawing.Point(516, 376) - Me.txtErfassungsnummer.MaxLength = 35 - Me.txtErfassungsnummer.MaxLineLength = -1 - Me.txtErfassungsnummer.MaxLines_Warning = "" - Me.txtErfassungsnummer.MaxLines_Warning_Label = Nothing - Me.txtErfassungsnummer.Name = "txtErfassungsnummer" - Me.txtErfassungsnummer.Size = New System.Drawing.Size(305, 20) - Me.txtErfassungsnummer.TabIndex = 11 - ' 'Label24 ' Me.Label24.AutoSize = True @@ -1268,17 +856,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label22.Text = "Rg-Notiz:" Me.Label22.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'cboRechnungNotiz - ' - Me.cboRechnungNotiz._allowedValuesFreiText = Nothing - Me.cboRechnungNotiz._allowFreiText = True - Me.cboRechnungNotiz._value = "" - Me.cboRechnungNotiz.FormattingEnabled = True - Me.cboRechnungNotiz.Location = New System.Drawing.Point(102, 1029) - Me.cboRechnungNotiz.Name = "cboRechnungNotiz" - Me.cboRechnungNotiz.Size = New System.Drawing.Size(718, 21) - Me.cboRechnungNotiz.TabIndex = 36 - ' 'pic ' Me.pic.BackgroundImage = Global.SDL.My.Resources.Resources.Verag_AG_Logo_med @@ -1290,19 +867,6 @@ Partial Class usrCntlFaktAbrechnung Me.pic.TabIndex = 36 Me.pic.TabStop = False ' - 'cboFirma - ' - Me.cboFirma._allowedValuesFreiText = Nothing - Me.cboFirma._allowFreiText = False - Me.cboFirma._value = "" - Me.cboFirma.FormattingEnabled = True - Me.cboFirma.Location = New System.Drawing.Point(592, 51) - Me.cboFirma.Margin = New System.Windows.Forms.Padding(2) - Me.cboFirma.Name = "cboFirma" - Me.cboFirma.Size = New System.Drawing.Size(229, 21) - Me.cboFirma.TabIndex = 1 - Me.cboFirma.TabStop = False - ' 'lblFirma3 ' Me.lblFirma3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) @@ -1375,85 +939,6 @@ Partial Class usrCntlFaktAbrechnung Me.btnAuftraggeberEuro.Text = "€" Me.btnAuftraggeberEuro.UseVisualStyleBackColor = True ' - 'txtkdNrAuftraggeber - ' - Me.txtkdNrAuftraggeber._DateTimeOnly = False - Me.txtkdNrAuftraggeber._numbersOnly = False - Me.txtkdNrAuftraggeber._numbersOnlyKommastellen = "" - Me.txtkdNrAuftraggeber._Prozent = False - Me.txtkdNrAuftraggeber._ShortDateNew = False - Me.txtkdNrAuftraggeber._ShortDateOnly = False - Me.txtkdNrAuftraggeber._TimeOnly = False - Me.txtkdNrAuftraggeber._value = Nothing - Me.txtkdNrAuftraggeber._Waehrung = False - Me.txtkdNrAuftraggeber._WaehrungZeichen = True - Me.txtkdNrAuftraggeber.BackColor = System.Drawing.Color.White - Me.txtkdNrAuftraggeber.ForeColor = System.Drawing.Color.Black - Me.txtkdNrAuftraggeber.Location = New System.Drawing.Point(8, 23) - Me.txtkdNrAuftraggeber.MaxLength = 35 - Me.txtkdNrAuftraggeber.MaxLineLength = -1 - Me.txtkdNrAuftraggeber.MaxLines_Warning = "" - Me.txtkdNrAuftraggeber.MaxLines_Warning_Label = Nothing - Me.txtkdNrAuftraggeber.Name = "txtkdNrAuftraggeber" - Me.txtkdNrAuftraggeber.ReadOnly = True - Me.txtkdNrAuftraggeber.Size = New System.Drawing.Size(94, 20) - Me.txtkdNrAuftraggeber.TabIndex = 1 - Me.txtkdNrAuftraggeber.TabStop = False - ' - 'kdFirmaAuftraggeber - ' - Me.kdFirmaAuftraggeber._AlleFirmenCLUSTER = False - Me.kdFirmaAuftraggeber._AllowSetValue = True - Me.kdFirmaAuftraggeber._autoSizeGross = False - Me.kdFirmaAuftraggeber._display_Name1 = True - Me.kdFirmaAuftraggeber._displayAVISO_Email = False - Me.kdFirmaAuftraggeber._displayFullName = False - Me.kdFirmaAuftraggeber._displayWoelflKd = False - Me.kdFirmaAuftraggeber._hideIfListEmpty = True - Me.kdFirmaAuftraggeber._loadKdData = True - Me.kdFirmaAuftraggeber._UseFIRMA = "" - Me.kdFirmaAuftraggeber._ValueKdAndName = False - Me.kdFirmaAuftraggeber.BackColor = System.Drawing.Color.White - Me.kdFirmaAuftraggeber.dgvpos = "LEFT" - Me.kdFirmaAuftraggeber.KdName = Nothing - Me.kdFirmaAuftraggeber.KdNr = "-1" - Me.kdFirmaAuftraggeber.kdNrField = Nothing - Me.kdFirmaAuftraggeber.KdNrNullInt = Nothing - Me.kdFirmaAuftraggeber.Location = New System.Drawing.Point(101, 23) - Me.kdFirmaAuftraggeber.MaxLength = 35 - Me.kdFirmaAuftraggeber.Name = "kdFirmaAuftraggeber" - Me.kdFirmaAuftraggeber.nurAktive = True - Me.kdFirmaAuftraggeber.searchActive = True - Me.kdFirmaAuftraggeber.Size = New System.Drawing.Size(283, 20) - Me.kdFirmaAuftraggeber.TabIndex = 3 - Me.kdFirmaAuftraggeber.TabStop = False - Me.kdFirmaAuftraggeber.TIMER_SEARCH = True - Me.kdFirmaAuftraggeber.usrcntl = Nothing - ' - 'txtAuftraggeberName2 - ' - Me.txtAuftraggeberName2._DateTimeOnly = False - Me.txtAuftraggeberName2._numbersOnly = False - Me.txtAuftraggeberName2._numbersOnlyKommastellen = "" - Me.txtAuftraggeberName2._Prozent = False - Me.txtAuftraggeberName2._ShortDateNew = False - Me.txtAuftraggeberName2._ShortDateOnly = False - Me.txtAuftraggeberName2._TimeOnly = False - Me.txtAuftraggeberName2._value = Nothing - Me.txtAuftraggeberName2._Waehrung = False - Me.txtAuftraggeberName2._WaehrungZeichen = True - Me.txtAuftraggeberName2.BackColor = System.Drawing.Color.White - Me.txtAuftraggeberName2.ForeColor = System.Drawing.Color.Black - Me.txtAuftraggeberName2.Location = New System.Drawing.Point(101, 42) - Me.txtAuftraggeberName2.MaxLength = 35 - Me.txtAuftraggeberName2.MaxLineLength = -1 - Me.txtAuftraggeberName2.MaxLines_Warning = "" - Me.txtAuftraggeberName2.MaxLines_Warning_Label = Nothing - Me.txtAuftraggeberName2.Name = "txtAuftraggeberName2" - Me.txtAuftraggeberName2.Size = New System.Drawing.Size(305, 20) - Me.txtAuftraggeberName2.TabIndex = 4 - Me.txtAuftraggeberName2.TabStop = False - ' 'Label15 ' Me.Label15.AutoSize = True @@ -1464,125 +949,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label15.TabIndex = 0 Me.Label15.Text = "3. Auftraggeber:" ' - 'txtAuftragggeberOrt - ' - Me.txtAuftragggeberOrt._DateTimeOnly = False - Me.txtAuftragggeberOrt._numbersOnly = False - Me.txtAuftragggeberOrt._numbersOnlyKommastellen = "" - Me.txtAuftragggeberOrt._Prozent = False - Me.txtAuftragggeberOrt._ShortDateNew = False - Me.txtAuftragggeberOrt._ShortDateOnly = False - Me.txtAuftragggeberOrt._TimeOnly = False - Me.txtAuftragggeberOrt._value = Nothing - Me.txtAuftragggeberOrt._Waehrung = False - Me.txtAuftragggeberOrt._WaehrungZeichen = True - Me.txtAuftragggeberOrt.BackColor = System.Drawing.Color.White - Me.txtAuftragggeberOrt.ForeColor = System.Drawing.Color.Black - Me.txtAuftragggeberOrt.Location = New System.Drawing.Point(101, 80) - Me.txtAuftragggeberOrt.MaxLength = 35 - Me.txtAuftragggeberOrt.MaxLineLength = -1 - Me.txtAuftragggeberOrt.MaxLines_Warning = "" - Me.txtAuftragggeberOrt.MaxLines_Warning_Label = Nothing - Me.txtAuftragggeberOrt.Name = "txtAuftragggeberOrt" - Me.txtAuftragggeberOrt.Size = New System.Drawing.Size(305, 20) - Me.txtAuftragggeberOrt.TabIndex = 7 - Me.txtAuftragggeberOrt.TabStop = False - ' - 'txtAuftragggeberStrasse - ' - Me.txtAuftragggeberStrasse._DateTimeOnly = False - Me.txtAuftragggeberStrasse._numbersOnly = False - Me.txtAuftragggeberStrasse._numbersOnlyKommastellen = "" - Me.txtAuftragggeberStrasse._Prozent = False - Me.txtAuftragggeberStrasse._ShortDateNew = False - Me.txtAuftragggeberStrasse._ShortDateOnly = False - Me.txtAuftragggeberStrasse._TimeOnly = False - Me.txtAuftragggeberStrasse._value = Nothing - Me.txtAuftragggeberStrasse._Waehrung = False - Me.txtAuftragggeberStrasse._WaehrungZeichen = True - Me.txtAuftragggeberStrasse.BackColor = System.Drawing.Color.White - Me.txtAuftragggeberStrasse.ForeColor = System.Drawing.Color.Black - Me.txtAuftragggeberStrasse.Location = New System.Drawing.Point(101, 61) - Me.txtAuftragggeberStrasse.MaxLength = 35 - Me.txtAuftragggeberStrasse.MaxLineLength = -1 - Me.txtAuftragggeberStrasse.MaxLines_Warning = "" - Me.txtAuftragggeberStrasse.MaxLines_Warning_Label = Nothing - Me.txtAuftragggeberStrasse.Name = "txtAuftragggeberStrasse" - Me.txtAuftragggeberStrasse.Size = New System.Drawing.Size(305, 20) - Me.txtAuftragggeberStrasse.TabIndex = 6 - Me.txtAuftragggeberStrasse.TabStop = False - ' - 'FlatButton4 - ' - Me.FlatButton4.allowBorder = False - Me.FlatButton4.FlatAppearance.BorderSize = 0 - Me.FlatButton4.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.FlatButton4.ForeColor = System.Drawing.Color.Black - Me.FlatButton4.Image = Global.SDL.My.Resources.Resources.personInaktiv - Me.FlatButton4.Location = New System.Drawing.Point(382, 18) - Me.FlatButton4.Name = "FlatButton4" - Me.FlatButton4.Size = New System.Drawing.Size(24, 25) - Me.FlatButton4.TabIndex = 2 - Me.FlatButton4.TabStop = False - Me.FlatButton4.UseVisualStyleBackColor = True - ' - 'txtText - ' - Me.txtText.Location = New System.Drawing.Point(102, 1071) - Me.txtText.MaxLineLength = -1 - Me.txtText.MaxLines_Warning = "" - Me.txtText.MaxLines_Warning_Label = Nothing - Me.txtText.Name = "txtText" - Me.txtText.ReadOnly = True - Me.txtText.Size = New System.Drawing.Size(720, 53) - Me.txtText.TabIndex = 35 - Me.txtText.Text = "" - ' - 'txtBefoerderungsmittel - ' - Me.txtBefoerderungsmittel._DateTimeOnly = False - Me.txtBefoerderungsmittel._numbersOnly = False - Me.txtBefoerderungsmittel._numbersOnlyKommastellen = "" - Me.txtBefoerderungsmittel._Prozent = False - Me.txtBefoerderungsmittel._ShortDateNew = False - Me.txtBefoerderungsmittel._ShortDateOnly = False - Me.txtBefoerderungsmittel._TimeOnly = False - Me.txtBefoerderungsmittel._value = Nothing - Me.txtBefoerderungsmittel._Waehrung = False - Me.txtBefoerderungsmittel._WaehrungZeichen = True - Me.txtBefoerderungsmittel.ForeColor = System.Drawing.Color.Black - Me.txtBefoerderungsmittel.Location = New System.Drawing.Point(516, 413) - Me.txtBefoerderungsmittel.MaxLength = 35 - Me.txtBefoerderungsmittel.MaxLineLength = -1 - Me.txtBefoerderungsmittel.MaxLines_Warning = "" - Me.txtBefoerderungsmittel.MaxLines_Warning_Label = Nothing - Me.txtBefoerderungsmittel.Name = "txtBefoerderungsmittel" - Me.txtBefoerderungsmittel.Size = New System.Drawing.Size(305, 20) - Me.txtBefoerderungsmittel.TabIndex = 19 - ' - 'txtGrenze - ' - Me.txtGrenze._DateTimeOnly = False - Me.txtGrenze._numbersOnly = False - Me.txtGrenze._numbersOnlyKommastellen = "" - Me.txtGrenze._Prozent = False - Me.txtGrenze._ShortDateNew = False - Me.txtGrenze._ShortDateOnly = False - Me.txtGrenze._TimeOnly = False - Me.txtGrenze._value = Nothing - Me.txtGrenze._Waehrung = False - Me.txtGrenze._WaehrungZeichen = True - Me.txtGrenze.Enabled = False - Me.txtGrenze.ForeColor = System.Drawing.Color.Black - Me.txtGrenze.Location = New System.Drawing.Point(516, 394) - Me.txtGrenze.MaxLength = 35 - Me.txtGrenze.MaxLineLength = -1 - Me.txtGrenze.MaxLines_Warning = "" - Me.txtGrenze.MaxLines_Warning_Label = Nothing - Me.txtGrenze.Name = "txtGrenze" - Me.txtGrenze.Size = New System.Drawing.Size(305, 20) - Me.txtGrenze.TabIndex = 16 - ' 'Label20 ' Me.Label20.AutoSize = True @@ -1603,28 +969,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label19.Text = "Grenze:" Me.Label19.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'txtSendungsdaten - ' - Me.txtSendungsdaten._DateTimeOnly = False - Me.txtSendungsdaten._numbersOnly = False - Me.txtSendungsdaten._numbersOnlyKommastellen = "" - Me.txtSendungsdaten._Prozent = False - Me.txtSendungsdaten._ShortDateNew = False - Me.txtSendungsdaten._ShortDateOnly = False - Me.txtSendungsdaten._TimeOnly = False - Me.txtSendungsdaten._value = Nothing - Me.txtSendungsdaten._Waehrung = False - Me.txtSendungsdaten._WaehrungZeichen = True - Me.txtSendungsdaten.ForeColor = System.Drawing.Color.Black - Me.txtSendungsdaten.Location = New System.Drawing.Point(102, 438) - Me.txtSendungsdaten.MaxLength = 300 - Me.txtSendungsdaten.MaxLineLength = -1 - Me.txtSendungsdaten.MaxLines_Warning = "" - Me.txtSendungsdaten.MaxLines_Warning_Label = Nothing - Me.txtSendungsdaten.Name = "txtSendungsdaten" - Me.txtSendungsdaten.Size = New System.Drawing.Size(305, 20) - Me.txtSendungsdaten.TabIndex = 22 - ' 'Label17 ' Me.Label17.AutoSize = True @@ -1635,29 +979,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label17.Text = "Sendungsdaten:" Me.Label17.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'txtWarenwert - ' - Me.txtWarenwert._DateTimeOnly = False - Me.txtWarenwert._numbersOnly = False - Me.txtWarenwert._numbersOnlyKommastellen = "" - Me.txtWarenwert._Prozent = False - Me.txtWarenwert._ShortDateNew = False - Me.txtWarenwert._ShortDateOnly = False - Me.txtWarenwert._TimeOnly = False - Me.txtWarenwert._value = Nothing - Me.txtWarenwert._Waehrung = True - Me.txtWarenwert._WaehrungZeichen = False - Me.txtWarenwert.ForeColor = System.Drawing.Color.Black - Me.txtWarenwert.Location = New System.Drawing.Point(147, 395) - Me.txtWarenwert.MaxLength = 35 - Me.txtWarenwert.MaxLineLength = -1 - Me.txtWarenwert.MaxLines_Warning = "" - Me.txtWarenwert.MaxLines_Warning_Label = Nothing - Me.txtWarenwert.Name = "txtWarenwert" - Me.txtWarenwert.Size = New System.Drawing.Size(129, 20) - Me.txtWarenwert.TabIndex = 15 - Me.txtWarenwert.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' 'Label16 ' Me.Label16.AutoSize = True @@ -1668,28 +989,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label16.Text = "Warenwert:" Me.Label16.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'txtZollbelegNr - ' - Me.txtZollbelegNr._DateTimeOnly = False - Me.txtZollbelegNr._numbersOnly = False - Me.txtZollbelegNr._numbersOnlyKommastellen = "" - Me.txtZollbelegNr._Prozent = False - Me.txtZollbelegNr._ShortDateNew = False - Me.txtZollbelegNr._ShortDateOnly = False - Me.txtZollbelegNr._TimeOnly = False - Me.txtZollbelegNr._value = Nothing - Me.txtZollbelegNr._Waehrung = False - Me.txtZollbelegNr._WaehrungZeichen = True - Me.txtZollbelegNr.ForeColor = System.Drawing.Color.Black - Me.txtZollbelegNr.Location = New System.Drawing.Point(102, 376) - Me.txtZollbelegNr.MaxLength = 35 - Me.txtZollbelegNr.MaxLineLength = -1 - Me.txtZollbelegNr.MaxLines_Warning = "" - Me.txtZollbelegNr.MaxLines_Warning_Label = Nothing - Me.txtZollbelegNr.Name = "txtZollbelegNr" - Me.txtZollbelegNr.Size = New System.Drawing.Size(305, 20) - Me.txtZollbelegNr.TabIndex = 10 - ' 'Label10 ' Me.Label10.AutoSize = True @@ -1803,105 +1102,6 @@ Partial Class usrCntlFaktAbrechnung Me.Button6.Text = "UID prüfen" Me.Button6.UseVisualStyleBackColor = True ' - 'cboSammelrechnung - ' - Me.cboSammelrechnung._allowedValuesFreiText = Nothing - Me.cboSammelrechnung._allowFreiText = False - Me.cboSammelrechnung._value = "" - Me.cboSammelrechnung.FormattingEnabled = True - Me.cboSammelrechnung.Location = New System.Drawing.Point(282, 17) - Me.cboSammelrechnung.Name = "cboSammelrechnung" - Me.cboSammelrechnung.Size = New System.Drawing.Size(102, 21) - Me.cboSammelrechnung.TabIndex = 2 - ' - 'txtRechnungAnName2 - ' - Me.txtRechnungAnName2._DateTimeOnly = False - Me.txtRechnungAnName2._numbersOnly = False - Me.txtRechnungAnName2._numbersOnlyKommastellen = "" - Me.txtRechnungAnName2._Prozent = False - Me.txtRechnungAnName2._ShortDateNew = False - Me.txtRechnungAnName2._ShortDateOnly = False - Me.txtRechnungAnName2._TimeOnly = False - Me.txtRechnungAnName2._value = Nothing - Me.txtRechnungAnName2._Waehrung = False - Me.txtRechnungAnName2._WaehrungZeichen = True - Me.txtRechnungAnName2.ForeColor = System.Drawing.Color.Black - Me.txtRechnungAnName2.Location = New System.Drawing.Point(101, 56) - Me.txtRechnungAnName2.MaxLength = 40 - Me.txtRechnungAnName2.MaxLineLength = -1 - Me.txtRechnungAnName2.MaxLines_Warning = "" - Me.txtRechnungAnName2.MaxLines_Warning_Label = Nothing - Me.txtRechnungAnName2.Name = "txtRechnungAnName2" - Me.txtRechnungAnName2.Size = New System.Drawing.Size(306, 20) - Me.txtRechnungAnName2.TabIndex = 11 - Me.txtRechnungAnName2.TabStop = False - ' - 'kdFirmaRechnungAn - ' - Me.kdFirmaRechnungAn._AlleFirmenCLUSTER = False - Me.kdFirmaRechnungAn._AllowSetValue = True - Me.kdFirmaRechnungAn._autoSizeGross = False - Me.kdFirmaRechnungAn._display_Name1 = True - Me.kdFirmaRechnungAn._displayAVISO_Email = False - Me.kdFirmaRechnungAn._displayFullName = False - Me.kdFirmaRechnungAn._displayWoelflKd = False - Me.kdFirmaRechnungAn._hideIfListEmpty = True - Me.kdFirmaRechnungAn._loadKdData = True - Me.kdFirmaRechnungAn._UseFIRMA = "" - Me.kdFirmaRechnungAn._ValueKdAndName = False - Me.kdFirmaRechnungAn.dgvpos = "LEFT" - Me.kdFirmaRechnungAn.KdName = Nothing - Me.kdFirmaRechnungAn.KdNr = "-1" - Me.kdFirmaRechnungAn.kdNrField = Nothing - Me.kdFirmaRechnungAn.KdNrNullInt = Nothing - Me.kdFirmaRechnungAn.Location = New System.Drawing.Point(101, 37) - Me.kdFirmaRechnungAn.MaxLength = 35 - Me.kdFirmaRechnungAn.Name = "kdFirmaRechnungAn" - Me.kdFirmaRechnungAn.nurAktive = True - Me.kdFirmaRechnungAn.searchActive = True - Me.kdFirmaRechnungAn.Size = New System.Drawing.Size(283, 20) - Me.kdFirmaRechnungAn.TabIndex = 5 - Me.kdFirmaRechnungAn.TabStop = False - Me.kdFirmaRechnungAn.TIMER_SEARCH = True - Me.kdFirmaRechnungAn.usrcntl = Nothing - ' - 'FlatButton3 - ' - Me.FlatButton3.allowBorder = False - Me.FlatButton3.FlatAppearance.BorderSize = 0 - Me.FlatButton3.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.FlatButton3.ForeColor = System.Drawing.Color.Black - Me.FlatButton3.Image = Global.SDL.My.Resources.Resources.personInaktiv - Me.FlatButton3.Location = New System.Drawing.Point(383, 32) - Me.FlatButton3.Name = "FlatButton3" - Me.FlatButton3.Size = New System.Drawing.Size(24, 25) - Me.FlatButton3.TabIndex = 7 - Me.FlatButton3.TabStop = False - Me.FlatButton3.UseVisualStyleBackColor = True - ' - 'txtKdAuftragsNr - ' - Me.txtKdAuftragsNr._DateTimeOnly = False - Me.txtKdAuftragsNr._numbersOnly = False - Me.txtKdAuftragsNr._numbersOnlyKommastellen = "" - Me.txtKdAuftragsNr._Prozent = False - Me.txtKdAuftragsNr._ShortDateNew = False - Me.txtKdAuftragsNr._ShortDateOnly = False - Me.txtKdAuftragsNr._TimeOnly = False - Me.txtKdAuftragsNr._value = Nothing - Me.txtKdAuftragsNr._Waehrung = False - Me.txtKdAuftragsNr._WaehrungZeichen = True - Me.txtKdAuftragsNr.ForeColor = System.Drawing.Color.Black - Me.txtKdAuftragsNr.Location = New System.Drawing.Point(101, 116) - Me.txtKdAuftragsNr.MaxLength = 35 - Me.txtKdAuftragsNr.MaxLineLength = -1 - Me.txtKdAuftragsNr.MaxLines_Warning = "" - Me.txtKdAuftragsNr.MaxLines_Warning_Label = Nothing - Me.txtKdAuftragsNr.Name = "txtKdAuftragsNr" - Me.txtKdAuftragsNr.Size = New System.Drawing.Size(306, 20) - Me.txtKdAuftragsNr.TabIndex = 20 - ' 'Label43 ' Me.Label43.AutoSize = True @@ -1912,29 +1112,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label43.TabIndex = 19 Me.Label43.Text = "Kd-Auftr.Nr.:" ' - 'txtRechnungAnUIDKz - ' - Me.txtRechnungAnUIDKz._DateTimeOnly = False - Me.txtRechnungAnUIDKz._numbersOnly = False - Me.txtRechnungAnUIDKz._numbersOnlyKommastellen = "" - Me.txtRechnungAnUIDKz._Prozent = False - Me.txtRechnungAnUIDKz._ShortDateNew = False - Me.txtRechnungAnUIDKz._ShortDateOnly = False - Me.txtRechnungAnUIDKz._TimeOnly = False - Me.txtRechnungAnUIDKz._value = Nothing - Me.txtRechnungAnUIDKz._Waehrung = False - Me.txtRechnungAnUIDKz._WaehrungZeichen = True - Me.txtRechnungAnUIDKz.ForeColor = System.Drawing.Color.Black - Me.txtRechnungAnUIDKz.Location = New System.Drawing.Point(481, 56) - Me.txtRechnungAnUIDKz.MaxLength = 35 - Me.txtRechnungAnUIDKz.MaxLineLength = -1 - Me.txtRechnungAnUIDKz.MaxLines_Warning = "" - Me.txtRechnungAnUIDKz.MaxLines_Warning_Label = Nothing - Me.txtRechnungAnUIDKz.Name = "txtRechnungAnUIDKz" - Me.txtRechnungAnUIDKz.Size = New System.Drawing.Size(27, 20) - Me.txtRechnungAnUIDKz.TabIndex = 18 - Me.txtRechnungAnUIDKz.TabStop = False - ' 'lblVorauskasse ' Me.lblVorauskasse.AutoSize = True @@ -1956,40 +1133,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label1.Text = "Vorauskasse:" Me.Label1.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'cboRechnungAn - ' - Me.cboRechnungAn._allowedValuesFreiText = Nothing - Me.cboRechnungAn._allowFreiText = False - Me.cboRechnungAn._value = "" - Me.cboRechnungAn.FormattingEnabled = True - Me.cboRechnungAn.Location = New System.Drawing.Point(101, 17) - Me.cboRechnungAn.Name = "cboRechnungAn" - Me.cboRechnungAn.Size = New System.Drawing.Size(183, 21) - Me.cboRechnungAn.TabIndex = 1 - ' - 'txtRechnungAnUIDNr - ' - Me.txtRechnungAnUIDNr._DateTimeOnly = False - Me.txtRechnungAnUIDNr._numbersOnly = False - Me.txtRechnungAnUIDNr._numbersOnlyKommastellen = "" - Me.txtRechnungAnUIDNr._Prozent = False - Me.txtRechnungAnUIDNr._ShortDateNew = False - Me.txtRechnungAnUIDNr._ShortDateOnly = False - Me.txtRechnungAnUIDNr._TimeOnly = False - Me.txtRechnungAnUIDNr._value = Nothing - Me.txtRechnungAnUIDNr._Waehrung = False - Me.txtRechnungAnUIDNr._WaehrungZeichen = True - Me.txtRechnungAnUIDNr.ForeColor = System.Drawing.Color.Black - Me.txtRechnungAnUIDNr.Location = New System.Drawing.Point(506, 56) - Me.txtRechnungAnUIDNr.MaxLength = 35 - Me.txtRechnungAnUIDNr.MaxLineLength = -1 - Me.txtRechnungAnUIDNr.MaxLines_Warning = "" - Me.txtRechnungAnUIDNr.MaxLines_Warning_Label = Nothing - Me.txtRechnungAnUIDNr.Name = "txtRechnungAnUIDNr" - Me.txtRechnungAnUIDNr.Size = New System.Drawing.Size(69, 20) - Me.txtRechnungAnUIDNr.TabIndex = 13 - Me.txtRechnungAnUIDNr.TabStop = False - ' 'Label6 ' Me.Label6.AutoSize = True @@ -2000,29 +1143,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label6.TabIndex = 12 Me.Label6.Text = "UID-Nr.:" ' - 'txtRechnungAnBuKdNr - ' - Me.txtRechnungAnBuKdNr._DateTimeOnly = False - Me.txtRechnungAnBuKdNr._numbersOnly = False - Me.txtRechnungAnBuKdNr._numbersOnlyKommastellen = "" - Me.txtRechnungAnBuKdNr._Prozent = False - Me.txtRechnungAnBuKdNr._ShortDateNew = False - Me.txtRechnungAnBuKdNr._ShortDateOnly = False - Me.txtRechnungAnBuKdNr._TimeOnly = False - Me.txtRechnungAnBuKdNr._value = Nothing - Me.txtRechnungAnBuKdNr._Waehrung = False - Me.txtRechnungAnBuKdNr._WaehrungZeichen = True - Me.txtRechnungAnBuKdNr.ForeColor = System.Drawing.Color.Black - Me.txtRechnungAnBuKdNr.Location = New System.Drawing.Point(481, 37) - Me.txtRechnungAnBuKdNr.MaxLength = 35 - Me.txtRechnungAnBuKdNr.MaxLineLength = -1 - Me.txtRechnungAnBuKdNr.MaxLines_Warning = "" - Me.txtRechnungAnBuKdNr.MaxLines_Warning_Label = Nothing - Me.txtRechnungAnBuKdNr.Name = "txtRechnungAnBuKdNr" - Me.txtRechnungAnBuKdNr.Size = New System.Drawing.Size(94, 20) - Me.txtRechnungAnBuKdNr.TabIndex = 10 - Me.txtRechnungAnBuKdNr.TabStop = False - ' 'Label3 ' Me.Label3.AutoSize = True @@ -2033,75 +1153,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label3.TabIndex = 9 Me.Label3.Text = "BuKdNr:" ' - 'txtkdNrRechnungAn - ' - Me.txtkdNrRechnungAn._DateTimeOnly = False - Me.txtkdNrRechnungAn._numbersOnly = False - Me.txtkdNrRechnungAn._numbersOnlyKommastellen = "" - Me.txtkdNrRechnungAn._Prozent = False - Me.txtkdNrRechnungAn._ShortDateNew = False - Me.txtkdNrRechnungAn._ShortDateOnly = False - Me.txtkdNrRechnungAn._TimeOnly = False - Me.txtkdNrRechnungAn._value = Nothing - Me.txtkdNrRechnungAn._Waehrung = False - Me.txtkdNrRechnungAn._WaehrungZeichen = True - Me.txtkdNrRechnungAn.ForeColor = System.Drawing.Color.Black - Me.txtkdNrRechnungAn.Location = New System.Drawing.Point(8, 37) - Me.txtkdNrRechnungAn.MaxLength = 35 - Me.txtkdNrRechnungAn.MaxLineLength = -1 - Me.txtkdNrRechnungAn.MaxLines_Warning = "" - Me.txtkdNrRechnungAn.MaxLines_Warning_Label = Nothing - Me.txtkdNrRechnungAn.Name = "txtkdNrRechnungAn" - Me.txtkdNrRechnungAn.Size = New System.Drawing.Size(94, 20) - Me.txtkdNrRechnungAn.TabIndex = 3 - Me.txtkdNrRechnungAn.TabStop = False - ' - 'txtRechnungAnOrt - ' - Me.txtRechnungAnOrt._DateTimeOnly = False - Me.txtRechnungAnOrt._numbersOnly = False - Me.txtRechnungAnOrt._numbersOnlyKommastellen = "" - Me.txtRechnungAnOrt._Prozent = False - Me.txtRechnungAnOrt._ShortDateNew = False - Me.txtRechnungAnOrt._ShortDateOnly = False - Me.txtRechnungAnOrt._TimeOnly = False - Me.txtRechnungAnOrt._value = Nothing - Me.txtRechnungAnOrt._Waehrung = False - Me.txtRechnungAnOrt._WaehrungZeichen = True - Me.txtRechnungAnOrt.ForeColor = System.Drawing.Color.Black - Me.txtRechnungAnOrt.Location = New System.Drawing.Point(101, 94) - Me.txtRechnungAnOrt.MaxLength = 52 - Me.txtRechnungAnOrt.MaxLineLength = -1 - Me.txtRechnungAnOrt.MaxLines_Warning = "" - Me.txtRechnungAnOrt.MaxLines_Warning_Label = Nothing - Me.txtRechnungAnOrt.Name = "txtRechnungAnOrt" - Me.txtRechnungAnOrt.Size = New System.Drawing.Size(306, 20) - Me.txtRechnungAnOrt.TabIndex = 17 - Me.txtRechnungAnOrt.TabStop = False - ' - 'txtRechnungAnStrasse - ' - Me.txtRechnungAnStrasse._DateTimeOnly = False - Me.txtRechnungAnStrasse._numbersOnly = False - Me.txtRechnungAnStrasse._numbersOnlyKommastellen = "" - Me.txtRechnungAnStrasse._Prozent = False - Me.txtRechnungAnStrasse._ShortDateNew = False - Me.txtRechnungAnStrasse._ShortDateOnly = False - Me.txtRechnungAnStrasse._TimeOnly = False - Me.txtRechnungAnStrasse._value = Nothing - Me.txtRechnungAnStrasse._Waehrung = False - Me.txtRechnungAnStrasse._WaehrungZeichen = True - Me.txtRechnungAnStrasse.ForeColor = System.Drawing.Color.Black - Me.txtRechnungAnStrasse.Location = New System.Drawing.Point(101, 75) - Me.txtRechnungAnStrasse.MaxLength = 40 - Me.txtRechnungAnStrasse.MaxLineLength = -1 - Me.txtRechnungAnStrasse.MaxLines_Warning = "" - Me.txtRechnungAnStrasse.MaxLines_Warning_Label = Nothing - Me.txtRechnungAnStrasse.Name = "txtRechnungAnStrasse" - Me.txtRechnungAnStrasse.Size = New System.Drawing.Size(306, 20) - Me.txtRechnungAnStrasse.TabIndex = 14 - Me.txtRechnungAnStrasse.TabStop = False - ' 'Label7 ' Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) @@ -2144,147 +1195,6 @@ Partial Class usrCntlFaktAbrechnung Me.btnAbsenderEuro.Text = "€" Me.btnAbsenderEuro.UseVisualStyleBackColor = True ' - 'txtkdNrAbsender - ' - Me.txtkdNrAbsender._DateTimeOnly = False - Me.txtkdNrAbsender._numbersOnly = False - Me.txtkdNrAbsender._numbersOnlyKommastellen = "" - Me.txtkdNrAbsender._Prozent = False - Me.txtkdNrAbsender._ShortDateNew = False - Me.txtkdNrAbsender._ShortDateOnly = False - Me.txtkdNrAbsender._TimeOnly = False - Me.txtkdNrAbsender._value = Nothing - Me.txtkdNrAbsender._Waehrung = False - Me.txtkdNrAbsender._WaehrungZeichen = True - Me.txtkdNrAbsender.BackColor = System.Drawing.Color.White - Me.txtkdNrAbsender.ForeColor = System.Drawing.Color.Black - Me.txtkdNrAbsender.Location = New System.Drawing.Point(8, 23) - Me.txtkdNrAbsender.MaxLength = 35 - Me.txtkdNrAbsender.MaxLineLength = -1 - Me.txtkdNrAbsender.MaxLines_Warning = "" - Me.txtkdNrAbsender.MaxLines_Warning_Label = Nothing - Me.txtkdNrAbsender.Name = "txtkdNrAbsender" - Me.txtkdNrAbsender.ReadOnly = True - Me.txtkdNrAbsender.Size = New System.Drawing.Size(94, 20) - Me.txtkdNrAbsender.TabIndex = 1 - Me.txtkdNrAbsender.TabStop = False - ' - 'kdFirmaAbsender - ' - Me.kdFirmaAbsender._AlleFirmenCLUSTER = False - Me.kdFirmaAbsender._AllowSetValue = True - Me.kdFirmaAbsender._autoSizeGross = False - Me.kdFirmaAbsender._display_Name1 = True - Me.kdFirmaAbsender._displayAVISO_Email = False - Me.kdFirmaAbsender._displayFullName = False - Me.kdFirmaAbsender._displayWoelflKd = False - Me.kdFirmaAbsender._hideIfListEmpty = True - Me.kdFirmaAbsender._loadKdData = True - Me.kdFirmaAbsender._UseFIRMA = "" - Me.kdFirmaAbsender._ValueKdAndName = False - Me.kdFirmaAbsender.BackColor = System.Drawing.Color.White - Me.kdFirmaAbsender.dgvpos = "LEFT" - Me.kdFirmaAbsender.KdName = Nothing - Me.kdFirmaAbsender.KdNr = "-1" - Me.kdFirmaAbsender.kdNrField = Nothing - Me.kdFirmaAbsender.KdNrNullInt = Nothing - Me.kdFirmaAbsender.Location = New System.Drawing.Point(101, 23) - Me.kdFirmaAbsender.MaxLength = 35 - Me.kdFirmaAbsender.Name = "kdFirmaAbsender" - Me.kdFirmaAbsender.nurAktive = True - Me.kdFirmaAbsender.searchActive = True - Me.kdFirmaAbsender.Size = New System.Drawing.Size(283, 20) - Me.kdFirmaAbsender.TabIndex = 3 - Me.kdFirmaAbsender.TabStop = False - Me.kdFirmaAbsender.TIMER_SEARCH = True - Me.kdFirmaAbsender.usrcntl = Nothing - ' - 'txtAbsenderName2 - ' - Me.txtAbsenderName2._DateTimeOnly = False - Me.txtAbsenderName2._numbersOnly = False - Me.txtAbsenderName2._numbersOnlyKommastellen = "" - Me.txtAbsenderName2._Prozent = False - Me.txtAbsenderName2._ShortDateNew = False - Me.txtAbsenderName2._ShortDateOnly = False - Me.txtAbsenderName2._TimeOnly = False - Me.txtAbsenderName2._value = Nothing - Me.txtAbsenderName2._Waehrung = False - Me.txtAbsenderName2._WaehrungZeichen = True - Me.txtAbsenderName2.BackColor = System.Drawing.Color.White - Me.txtAbsenderName2.ForeColor = System.Drawing.Color.Black - Me.txtAbsenderName2.Location = New System.Drawing.Point(101, 42) - Me.txtAbsenderName2.MaxLength = 35 - Me.txtAbsenderName2.MaxLineLength = -1 - Me.txtAbsenderName2.MaxLines_Warning = "" - Me.txtAbsenderName2.MaxLines_Warning_Label = Nothing - Me.txtAbsenderName2.Name = "txtAbsenderName2" - Me.txtAbsenderName2.Size = New System.Drawing.Size(305, 20) - Me.txtAbsenderName2.TabIndex = 4 - Me.txtAbsenderName2.TabStop = False - ' - 'txtAbsenderOrt - ' - Me.txtAbsenderOrt._DateTimeOnly = False - Me.txtAbsenderOrt._numbersOnly = False - Me.txtAbsenderOrt._numbersOnlyKommastellen = "" - Me.txtAbsenderOrt._Prozent = False - Me.txtAbsenderOrt._ShortDateNew = False - Me.txtAbsenderOrt._ShortDateOnly = False - Me.txtAbsenderOrt._TimeOnly = False - Me.txtAbsenderOrt._value = Nothing - Me.txtAbsenderOrt._Waehrung = False - Me.txtAbsenderOrt._WaehrungZeichen = True - Me.txtAbsenderOrt.BackColor = System.Drawing.Color.White - Me.txtAbsenderOrt.ForeColor = System.Drawing.Color.Black - Me.txtAbsenderOrt.Location = New System.Drawing.Point(101, 80) - Me.txtAbsenderOrt.MaxLength = 35 - Me.txtAbsenderOrt.MaxLineLength = -1 - Me.txtAbsenderOrt.MaxLines_Warning = "" - Me.txtAbsenderOrt.MaxLines_Warning_Label = Nothing - Me.txtAbsenderOrt.Name = "txtAbsenderOrt" - Me.txtAbsenderOrt.Size = New System.Drawing.Size(305, 20) - Me.txtAbsenderOrt.TabIndex = 7 - Me.txtAbsenderOrt.TabStop = False - ' - 'txtAbsenderStrasse - ' - Me.txtAbsenderStrasse._DateTimeOnly = False - Me.txtAbsenderStrasse._numbersOnly = False - Me.txtAbsenderStrasse._numbersOnlyKommastellen = "" - Me.txtAbsenderStrasse._Prozent = False - Me.txtAbsenderStrasse._ShortDateNew = False - Me.txtAbsenderStrasse._ShortDateOnly = False - Me.txtAbsenderStrasse._TimeOnly = False - Me.txtAbsenderStrasse._value = Nothing - Me.txtAbsenderStrasse._Waehrung = False - Me.txtAbsenderStrasse._WaehrungZeichen = True - Me.txtAbsenderStrasse.BackColor = System.Drawing.Color.White - Me.txtAbsenderStrasse.ForeColor = System.Drawing.Color.Black - Me.txtAbsenderStrasse.Location = New System.Drawing.Point(101, 61) - Me.txtAbsenderStrasse.MaxLength = 35 - Me.txtAbsenderStrasse.MaxLineLength = -1 - Me.txtAbsenderStrasse.MaxLines_Warning = "" - Me.txtAbsenderStrasse.MaxLines_Warning_Label = Nothing - Me.txtAbsenderStrasse.Name = "txtAbsenderStrasse" - Me.txtAbsenderStrasse.Size = New System.Drawing.Size(305, 20) - Me.txtAbsenderStrasse.TabIndex = 6 - Me.txtAbsenderStrasse.TabStop = False - ' - 'FlatButton1 - ' - Me.FlatButton1.allowBorder = False - Me.FlatButton1.FlatAppearance.BorderSize = 0 - Me.FlatButton1.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.FlatButton1.ForeColor = System.Drawing.Color.Black - Me.FlatButton1.Image = Global.SDL.My.Resources.Resources.personInaktiv - Me.FlatButton1.Location = New System.Drawing.Point(382, 18) - Me.FlatButton1.Name = "FlatButton1" - Me.FlatButton1.Size = New System.Drawing.Size(24, 25) - Me.FlatButton1.TabIndex = 2 - Me.FlatButton1.TabStop = False - Me.FlatButton1.UseVisualStyleBackColor = True - ' 'Panel7 ' Me.Panel7.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ @@ -2350,31 +1260,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label14.Text = "Leistung hinzufügen:" Me.Label14.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'sbLeistung - ' - Me.sbLeistung._allowFreitext = False - Me.sbLeistung._AllowSetValue = False - Me.sbLeistung._allowSpaceAsSplitter = False - Me.sbLeistung._autoSizeGross = False - Me.sbLeistung._hideIfListEmpty = True - Me.sbLeistung._value = Nothing - Me.sbLeistung.conn_art = "FMZOLL" - Me.sbLeistung.dgvpos = "LEFT" - Me.sbLeistung.DISPLAY_PARAM = Nothing - Me.sbLeistung.INVISIBLE_COLUMNS = Nothing - Me.sbLeistung.key_visible = False - Me.sbLeistung.KEYPARAM = Nothing - Me.sbLeistung.Location = New System.Drawing.Point(595, 232) - Me.sbLeistung.Name = "sbLeistung" - Me.sbLeistung.searchActive = True - Me.sbLeistung.Size = New System.Drawing.Size(189, 20) - Me.sbLeistung.SQL_ORDER_BY = Nothing - Me.sbLeistung.SQL_SELECT = Nothing - Me.sbLeistung.SQL_WHERE = Nothing - Me.sbLeistung.SQL_WhereParamList = Nothing - Me.sbLeistung.TabIndex = 14 - Me.sbLeistung.usrcntl = Nothing - ' 'Button7 ' Me.Button7.Enabled = False @@ -2417,64 +1302,6 @@ Partial Class usrCntlFaktAbrechnung Me.btn.Text = "ZOLL / EUST Daten (F3)" Me.btn.UseVisualStyleBackColor = True ' - 'txtUnterNrRef - ' - Me.txtUnterNrRef._DateTimeOnly = False - Me.txtUnterNrRef._numbersOnly = False - Me.txtUnterNrRef._numbersOnlyKommastellen = "" - Me.txtUnterNrRef._Prozent = False - Me.txtUnterNrRef._ShortDateNew = False - Me.txtUnterNrRef._ShortDateOnly = False - Me.txtUnterNrRef._TimeOnly = False - Me.txtUnterNrRef._value = Nothing - Me.txtUnterNrRef._Waehrung = False - Me.txtUnterNrRef._WaehrungZeichen = True - Me.txtUnterNrRef.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!) - Me.txtUnterNrRef.Location = New System.Drawing.Point(536, 69) - Me.txtUnterNrRef.MaxLineLength = -1 - Me.txtUnterNrRef.MaxLines_Warning = "" - Me.txtUnterNrRef.MaxLines_Warning_Label = Nothing - Me.txtUnterNrRef.Name = "txtUnterNrRef" - Me.txtUnterNrRef.Size = New System.Drawing.Size(39, 21) - Me.txtUnterNrRef.TabIndex = 8 - Me.txtUnterNrRef.Visible = False - ' - 'cboFilialeRef - ' - Me.cboFilialeRef._allowedValuesFreiText = Nothing - Me.cboFilialeRef._allowFreiText = False - Me.cboFilialeRef._value = "" - Me.cboFilialeRef.DropDownWidth = 280 - Me.cboFilialeRef.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!) - Me.cboFilialeRef.FormattingEnabled = True - Me.cboFilialeRef.Location = New System.Drawing.Point(289, 68) - Me.cboFilialeRef.Name = "cboFilialeRef" - Me.cboFilialeRef.Size = New System.Drawing.Size(80, 22) - Me.cboFilialeRef.TabIndex = 6 - Me.cboFilialeRef.Visible = False - ' - 'txtAbfertigungsnummerRef - ' - Me.txtAbfertigungsnummerRef._DateTimeOnly = False - Me.txtAbfertigungsnummerRef._numbersOnly = False - Me.txtAbfertigungsnummerRef._numbersOnlyKommastellen = "" - Me.txtAbfertigungsnummerRef._Prozent = False - Me.txtAbfertigungsnummerRef._ShortDateNew = False - Me.txtAbfertigungsnummerRef._ShortDateOnly = False - Me.txtAbfertigungsnummerRef._TimeOnly = False - Me.txtAbfertigungsnummerRef._value = Nothing - Me.txtAbfertigungsnummerRef._Waehrung = False - Me.txtAbfertigungsnummerRef._WaehrungZeichen = True - Me.txtAbfertigungsnummerRef.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!) - Me.txtAbfertigungsnummerRef.Location = New System.Drawing.Point(368, 69) - Me.txtAbfertigungsnummerRef.MaxLineLength = -1 - Me.txtAbfertigungsnummerRef.MaxLines_Warning = "" - Me.txtAbfertigungsnummerRef.MaxLines_Warning_Label = Nothing - Me.txtAbfertigungsnummerRef.Name = "txtAbfertigungsnummerRef" - Me.txtAbfertigungsnummerRef.Size = New System.Drawing.Size(169, 21) - Me.txtAbfertigungsnummerRef.TabIndex = 7 - Me.txtAbfertigungsnummerRef.Visible = False - ' 'Label26 ' Me.Label26.AutoSize = True @@ -2517,81 +1344,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label30.Text = "Positionen:" Me.Label30.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'dgvRechnungenPositionen - ' - Me.dgvRechnungenPositionen.AKTUALISIERUNGS_INTERVALL = -1 - Me.dgvRechnungenPositionen.AllowUserToAddRows = False - Me.dgvRechnungenPositionen.AllowUserToDeleteRows = False - Me.dgvRechnungenPositionen.AllowUserToResizeColumns = False - Me.dgvRechnungenPositionen.AllowUserToResizeRows = False - Me.dgvRechnungenPositionen.BackgroundColor = System.Drawing.Color.White - Me.dgvRechnungenPositionen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize - Me.dgvRechnungenPositionen.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.Leistung, Me.Anzahl, Me.Preis, Me.SteuerpflichtigerBetrag, Me.SteuerfreierBetrag, Me.Aufschubkonto}) - Me.dgvRechnungenPositionen.Location = New System.Drawing.Point(10, 258) - Me.dgvRechnungenPositionen.Name = "dgvRechnungenPositionen" - Me.dgvRechnungenPositionen.ReadOnly = True - Me.dgvRechnungenPositionen.RowHeadersVisible = False - Me.dgvRechnungenPositionen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvRechnungenPositionen.Size = New System.Drawing.Size(811, 189) - Me.dgvRechnungenPositionen.TabIndex = 5 - Me.dgvRechnungenPositionen.TabStop = False - ' - 'Leistung - ' - Me.Leistung.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill - Me.Leistung.HeaderText = "Leistung" - Me.Leistung.Name = "Leistung" - Me.Leistung.ReadOnly = True - ' - 'Anzahl - ' - DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleRight - DataGridViewCellStyle1.Format = "N0" - DataGridViewCellStyle1.NullValue = Nothing - Me.Anzahl.DefaultCellStyle = DataGridViewCellStyle1 - Me.Anzahl.HeaderText = "Anzahl" - Me.Anzahl.Name = "Anzahl" - Me.Anzahl.ReadOnly = True - Me.Anzahl.Width = 50 - ' - 'Preis - ' - DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleRight - DataGridViewCellStyle2.Format = "c2" - Me.Preis.DefaultCellStyle = DataGridViewCellStyle2 - Me.Preis.HeaderText = "Preis" - Me.Preis.Name = "Preis" - Me.Preis.ReadOnly = True - Me.Preis.Width = 80 - ' - 'SteuerpflichtigerBetrag - ' - DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleRight - DataGridViewCellStyle3.Format = "c2" - Me.SteuerpflichtigerBetrag.DefaultCellStyle = DataGridViewCellStyle3 - Me.SteuerpflichtigerBetrag.HeaderText = "Steuerpfl." - Me.SteuerpflichtigerBetrag.Name = "SteuerpflichtigerBetrag" - Me.SteuerpflichtigerBetrag.ReadOnly = True - Me.SteuerpflichtigerBetrag.Width = 120 - ' - 'SteuerfreierBetrag - ' - DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleRight - DataGridViewCellStyle4.Format = "C2" - DataGridViewCellStyle4.NullValue = Nothing - Me.SteuerfreierBetrag.DefaultCellStyle = DataGridViewCellStyle4 - Me.SteuerfreierBetrag.HeaderText = "Steuerfrei" - Me.SteuerfreierBetrag.Name = "SteuerfreierBetrag" - Me.SteuerfreierBetrag.ReadOnly = True - Me.SteuerfreierBetrag.Width = 120 - ' - 'Aufschubkonto - ' - Me.Aufschubkonto.HeaderText = "Aufschubkonto" - Me.Aufschubkonto.Name = "Aufschubkonto" - Me.Aufschubkonto.ReadOnly = True - Me.Aufschubkonto.Width = 120 - ' 'dgvOffertenSperrliste ' Me.dgvOffertenSperrliste.AllowUserToAddRows = False @@ -2615,53 +1367,6 @@ Partial Class usrCntlFaktAbrechnung Me.dgvOffertenSperrliste.TabIndex = 2 Me.dgvOffertenSperrliste.TabStop = False ' - 'dgvOfferteDetailsUebersicht - ' - Me.dgvOfferteDetailsUebersicht.AKTUALISIERUNGS_INTERVALL = -1 - Me.dgvOfferteDetailsUebersicht.AllowUserToAddRows = False - Me.dgvOfferteDetailsUebersicht.AllowUserToDeleteRows = False - Me.dgvOfferteDetailsUebersicht.AllowUserToOrderColumns = True - Me.dgvOfferteDetailsUebersicht.AllowUserToResizeRows = False - DataGridViewCellStyle6.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer)) - Me.dgvOfferteDetailsUebersicht.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle6 - Me.dgvOfferteDetailsUebersicht.BackgroundColor = System.Drawing.Color.White - Me.dgvOfferteDetailsUebersicht.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D - Me.dgvOfferteDetailsUebersicht.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize - Me.dgvOfferteDetailsUebersicht.Location = New System.Drawing.Point(220, 29) - Me.dgvOfferteDetailsUebersicht.MultiSelect = False - Me.dgvOfferteDetailsUebersicht.Name = "dgvOfferteDetailsUebersicht" - Me.dgvOfferteDetailsUebersicht.RowHeadersVisible = False - DataGridViewCellStyle7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle7.SelectionBackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) - DataGridViewCellStyle7.SelectionForeColor = System.Drawing.Color.Black - Me.dgvOfferteDetailsUebersicht.RowsDefaultCellStyle = DataGridViewCellStyle7 - Me.dgvOfferteDetailsUebersicht.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvOfferteDetailsUebersicht.Size = New System.Drawing.Size(601, 201) - Me.dgvOfferteDetailsUebersicht.TabIndex = 3 - ' - 'txtRohmasse - ' - Me.txtRohmasse._DateTimeOnly = False - Me.txtRohmasse._numbersOnly = False - Me.txtRohmasse._numbersOnlyKommastellen = "" - Me.txtRohmasse._Prozent = False - Me.txtRohmasse._ShortDateNew = False - Me.txtRohmasse._ShortDateOnly = False - Me.txtRohmasse._TimeOnly = False - Me.txtRohmasse._value = Nothing - Me.txtRohmasse._Waehrung = False - Me.txtRohmasse._WaehrungZeichen = True - Me.txtRohmasse.ForeColor = System.Drawing.Color.Black - Me.txtRohmasse.Location = New System.Drawing.Point(370, 115) - Me.txtRohmasse.MaxLength = 35 - Me.txtRohmasse.MaxLineLength = -1 - Me.txtRohmasse.MaxLines_Warning = "" - Me.txtRohmasse.MaxLines_Warning_Label = Nothing - Me.txtRohmasse.Name = "txtRohmasse" - Me.txtRohmasse.Size = New System.Drawing.Size(305, 20) - Me.txtRohmasse.TabIndex = 24 - Me.txtRohmasse.Visible = False - ' 'Label18 ' Me.Label18.AutoSize = True @@ -2673,29 +1378,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label18.TextAlign = System.Drawing.ContentAlignment.TopRight Me.Label18.Visible = False ' - 'cboWaehrung - ' - Me.cboWaehrung._allowedValuesFreiText = Nothing - Me.cboWaehrung._allowFreiText = False - Me.cboWaehrung._value = "" - Me.cboWaehrung.FormattingEnabled = True - Me.cboWaehrung.Location = New System.Drawing.Point(102, 394) - Me.cboWaehrung.Name = "cboWaehrung" - Me.cboWaehrung.Size = New System.Drawing.Size(47, 21) - Me.cboWaehrung.TabIndex = 14 - ' - 'cboWaehrungUmrechnung - ' - Me.cboWaehrungUmrechnung._allowedValuesFreiText = Nothing - Me.cboWaehrungUmrechnung._allowFreiText = False - Me.cboWaehrungUmrechnung._value = "" - Me.cboWaehrungUmrechnung.Enabled = False - Me.cboWaehrungUmrechnung.FormattingEnabled = True - Me.cboWaehrungUmrechnung.Location = New System.Drawing.Point(102, 413) - Me.cboWaehrungUmrechnung.Name = "cboWaehrungUmrechnung" - Me.cboWaehrungUmrechnung.Size = New System.Drawing.Size(47, 21) - Me.cboWaehrungUmrechnung.TabIndex = 17 - ' 'pnlEmpfaenger ' Me.pnlEmpfaenger.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ @@ -2730,55 +1412,6 @@ Partial Class usrCntlFaktAbrechnung Me.btnEmpfaengerEuro.Text = "€" Me.btnEmpfaengerEuro.UseVisualStyleBackColor = True ' - 'txtkdNrEmpfaenger - ' - Me.txtkdNrEmpfaenger._DateTimeOnly = False - Me.txtkdNrEmpfaenger._numbersOnly = False - Me.txtkdNrEmpfaenger._numbersOnlyKommastellen = "" - Me.txtkdNrEmpfaenger._Prozent = False - Me.txtkdNrEmpfaenger._ShortDateNew = False - Me.txtkdNrEmpfaenger._ShortDateOnly = False - Me.txtkdNrEmpfaenger._TimeOnly = False - Me.txtkdNrEmpfaenger._value = Nothing - Me.txtkdNrEmpfaenger._Waehrung = False - Me.txtkdNrEmpfaenger._WaehrungZeichen = True - Me.txtkdNrEmpfaenger.BackColor = System.Drawing.Color.White - Me.txtkdNrEmpfaenger.ForeColor = System.Drawing.Color.Black - Me.txtkdNrEmpfaenger.Location = New System.Drawing.Point(8, 21) - Me.txtkdNrEmpfaenger.MaxLength = 35 - Me.txtkdNrEmpfaenger.MaxLineLength = -1 - Me.txtkdNrEmpfaenger.MaxLines_Warning = "" - Me.txtkdNrEmpfaenger.MaxLines_Warning_Label = Nothing - Me.txtkdNrEmpfaenger.Name = "txtkdNrEmpfaenger" - Me.txtkdNrEmpfaenger.ReadOnly = True - Me.txtkdNrEmpfaenger.Size = New System.Drawing.Size(94, 20) - Me.txtkdNrEmpfaenger.TabIndex = 1 - Me.txtkdNrEmpfaenger.TabStop = False - ' - 'txtEmpfeangerName2 - ' - Me.txtEmpfeangerName2._DateTimeOnly = False - Me.txtEmpfeangerName2._numbersOnly = False - Me.txtEmpfeangerName2._numbersOnlyKommastellen = "" - Me.txtEmpfeangerName2._Prozent = False - Me.txtEmpfeangerName2._ShortDateNew = False - Me.txtEmpfeangerName2._ShortDateOnly = False - Me.txtEmpfeangerName2._TimeOnly = False - Me.txtEmpfeangerName2._value = Nothing - Me.txtEmpfeangerName2._Waehrung = False - Me.txtEmpfeangerName2._WaehrungZeichen = True - Me.txtEmpfeangerName2.BackColor = System.Drawing.Color.White - Me.txtEmpfeangerName2.ForeColor = System.Drawing.Color.Black - Me.txtEmpfeangerName2.Location = New System.Drawing.Point(101, 40) - Me.txtEmpfeangerName2.MaxLength = 35 - Me.txtEmpfeangerName2.MaxLineLength = -1 - Me.txtEmpfeangerName2.MaxLines_Warning = "" - Me.txtEmpfeangerName2.MaxLines_Warning_Label = Nothing - Me.txtEmpfeangerName2.Name = "txtEmpfeangerName2" - Me.txtEmpfeangerName2.Size = New System.Drawing.Size(305, 20) - Me.txtEmpfeangerName2.TabIndex = 4 - Me.txtEmpfeangerName2.TabStop = False - ' 'Label5 ' Me.Label5.AutoSize = True @@ -2789,98 +1422,6 @@ Partial Class usrCntlFaktAbrechnung Me.Label5.TabIndex = 0 Me.Label5.Text = "2. Empfänger:" ' - 'txtEmpfaengerOrt - ' - Me.txtEmpfaengerOrt._DateTimeOnly = False - Me.txtEmpfaengerOrt._numbersOnly = False - Me.txtEmpfaengerOrt._numbersOnlyKommastellen = "" - Me.txtEmpfaengerOrt._Prozent = False - Me.txtEmpfaengerOrt._ShortDateNew = False - Me.txtEmpfaengerOrt._ShortDateOnly = False - Me.txtEmpfaengerOrt._TimeOnly = False - Me.txtEmpfaengerOrt._value = Nothing - Me.txtEmpfaengerOrt._Waehrung = False - Me.txtEmpfaengerOrt._WaehrungZeichen = True - Me.txtEmpfaengerOrt.BackColor = System.Drawing.Color.White - Me.txtEmpfaengerOrt.ForeColor = System.Drawing.Color.Black - Me.txtEmpfaengerOrt.Location = New System.Drawing.Point(101, 78) - Me.txtEmpfaengerOrt.MaxLength = 35 - Me.txtEmpfaengerOrt.MaxLineLength = -1 - Me.txtEmpfaengerOrt.MaxLines_Warning = "" - Me.txtEmpfaengerOrt.MaxLines_Warning_Label = Nothing - Me.txtEmpfaengerOrt.Name = "txtEmpfaengerOrt" - Me.txtEmpfaengerOrt.Size = New System.Drawing.Size(305, 20) - Me.txtEmpfaengerOrt.TabIndex = 7 - Me.txtEmpfaengerOrt.TabStop = False - ' - 'txtEmpfaengerStrasse - ' - Me.txtEmpfaengerStrasse._DateTimeOnly = False - Me.txtEmpfaengerStrasse._numbersOnly = False - Me.txtEmpfaengerStrasse._numbersOnlyKommastellen = "" - Me.txtEmpfaengerStrasse._Prozent = False - Me.txtEmpfaengerStrasse._ShortDateNew = False - Me.txtEmpfaengerStrasse._ShortDateOnly = False - Me.txtEmpfaengerStrasse._TimeOnly = False - Me.txtEmpfaengerStrasse._value = Nothing - Me.txtEmpfaengerStrasse._Waehrung = False - Me.txtEmpfaengerStrasse._WaehrungZeichen = True - Me.txtEmpfaengerStrasse.BackColor = System.Drawing.Color.White - Me.txtEmpfaengerStrasse.ForeColor = System.Drawing.Color.Black - Me.txtEmpfaengerStrasse.Location = New System.Drawing.Point(101, 59) - Me.txtEmpfaengerStrasse.MaxLength = 35 - Me.txtEmpfaengerStrasse.MaxLineLength = -1 - Me.txtEmpfaengerStrasse.MaxLines_Warning = "" - Me.txtEmpfaengerStrasse.MaxLines_Warning_Label = Nothing - Me.txtEmpfaengerStrasse.Name = "txtEmpfaengerStrasse" - Me.txtEmpfaengerStrasse.Size = New System.Drawing.Size(305, 20) - Me.txtEmpfaengerStrasse.TabIndex = 6 - Me.txtEmpfaengerStrasse.TabStop = False - ' - 'kdFirmaEmpfaenger - ' - Me.kdFirmaEmpfaenger._AlleFirmenCLUSTER = False - Me.kdFirmaEmpfaenger._AllowSetValue = True - Me.kdFirmaEmpfaenger._autoSizeGross = False - Me.kdFirmaEmpfaenger._display_Name1 = True - Me.kdFirmaEmpfaenger._displayAVISO_Email = False - Me.kdFirmaEmpfaenger._displayFullName = False - Me.kdFirmaEmpfaenger._displayWoelflKd = False - Me.kdFirmaEmpfaenger._hideIfListEmpty = True - Me.kdFirmaEmpfaenger._loadKdData = True - Me.kdFirmaEmpfaenger._UseFIRMA = "" - Me.kdFirmaEmpfaenger._ValueKdAndName = False - Me.kdFirmaEmpfaenger.BackColor = System.Drawing.Color.White - Me.kdFirmaEmpfaenger.dgvpos = "LEFT" - Me.kdFirmaEmpfaenger.KdName = Nothing - Me.kdFirmaEmpfaenger.KdNr = "-1" - Me.kdFirmaEmpfaenger.kdNrField = Nothing - Me.kdFirmaEmpfaenger.KdNrNullInt = Nothing - Me.kdFirmaEmpfaenger.Location = New System.Drawing.Point(101, 21) - Me.kdFirmaEmpfaenger.MaxLength = 35 - Me.kdFirmaEmpfaenger.Name = "kdFirmaEmpfaenger" - Me.kdFirmaEmpfaenger.nurAktive = True - Me.kdFirmaEmpfaenger.searchActive = True - Me.kdFirmaEmpfaenger.Size = New System.Drawing.Size(283, 20) - Me.kdFirmaEmpfaenger.TabIndex = 3 - Me.kdFirmaEmpfaenger.TabStop = False - Me.kdFirmaEmpfaenger.TIMER_SEARCH = True - Me.kdFirmaEmpfaenger.usrcntl = Nothing - ' - 'FlatButton2 - ' - Me.FlatButton2.allowBorder = False - Me.FlatButton2.FlatAppearance.BorderSize = 0 - Me.FlatButton2.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.FlatButton2.ForeColor = System.Drawing.Color.Black - Me.FlatButton2.Image = Global.SDL.My.Resources.Resources.personInaktiv - Me.FlatButton2.Location = New System.Drawing.Point(382, 16) - Me.FlatButton2.Name = "FlatButton2" - Me.FlatButton2.Size = New System.Drawing.Size(24, 25) - Me.FlatButton2.TabIndex = 2 - Me.FlatButton2.TabStop = False - Me.FlatButton2.UseVisualStyleBackColor = True - ' 'pnl ' Me.pnl.BackColor = System.Drawing.Color.Gainsboro @@ -2917,16 +1458,6 @@ Partial Class usrCntlFaktAbrechnung Me.pnl.Size = New System.Drawing.Size(830, 139) Me.pnl.TabIndex = 2 ' - 'rtbAbf_Besonderheiten - ' - Me.rtbAbf_Besonderheiten.BackColor = System.Drawing.Color.White - Me.rtbAbf_Besonderheiten.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.rtbAbf_Besonderheiten.Location = New System.Drawing.Point(10, 39) - Me.rtbAbf_Besonderheiten.Name = "rtbAbf_Besonderheiten" - Me.rtbAbf_Besonderheiten.Size = New System.Drawing.Size(107, 52) - Me.rtbAbf_Besonderheiten.TabIndex = 235 - Me.rtbAbf_Besonderheiten.Visible = False - ' 'cbxOriginalPrint ' Me.cbxOriginalPrint.AutoSize = True @@ -3134,6 +1665,1433 @@ Partial Class usrCntlFaktAbrechnung Me.Label23.TabIndex = 2 Me.Label23.Text = "Steuer:" ' + 'Label37 + ' + Me.Label37.AutoSize = True + Me.Label37.Location = New System.Drawing.Point(390, 94) + Me.Label37.Name = "Label37" + Me.Label37.Size = New System.Drawing.Size(98, 13) + Me.Label37.TabIndex = 9 + Me.Label37.Text = "Steuerfreier Betrag:" + Me.Label37.TextAlign = System.Drawing.ContentAlignment.TopRight + ' + 'Label36 + ' + Me.Label36.AutoSize = True + Me.Label36.Location = New System.Drawing.Point(390, 77) + Me.Label36.Name = "Label36" + Me.Label36.Size = New System.Drawing.Size(75, 13) + Me.Label36.TabIndex = 7 + Me.Label36.Text = "Steuer-Betrag:" + Me.Label36.TextAlign = System.Drawing.ContentAlignment.TopRight + ' + 'Label33 + ' + Me.Label33.AutoSize = True + Me.Label33.Location = New System.Drawing.Point(390, 59) + Me.Label33.Name = "Label33" + Me.Label33.Size = New System.Drawing.Size(120, 13) + Me.Label33.TabIndex = 5 + Me.Label33.Text = "Steuerpflichtiger Betrag:" + Me.Label33.TextAlign = System.Drawing.ContentAlignment.TopRight + ' + 'Label35 + ' + Me.Label35.AutoSize = True + Me.Label35.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label35.Location = New System.Drawing.Point(390, 117) + Me.Label35.Name = "Label35" + Me.Label35.Size = New System.Drawing.Size(91, 13) + Me.Label35.TabIndex = 11 + Me.Label35.Text = "Gesamtsumme:" + Me.Label35.TextAlign = System.Drawing.ContentAlignment.TopRight + ' + 'Label28 + ' + Me.Label28.AutoSize = True + Me.Label28.Location = New System.Drawing.Point(6, 23) + Me.Label28.Name = "Label28" + Me.Label28.Size = New System.Drawing.Size(157, 13) + Me.Label28.TabIndex = 0 + Me.Label28.Text = "Besonderheiten für Verrechung:" + Me.Label28.TextAlign = System.Drawing.ContentAlignment.TopRight + ' + 'Timer + ' + Me.Timer.Interval = 6000 + ' + 'rtbHandling + ' + Me.rtbHandling.Location = New System.Drawing.Point(552, 954) + Me.rtbHandling.MaxLineLength = -1 + Me.rtbHandling.MaxLines_Warning = "" + Me.rtbHandling.MaxLines_Warning_Label = Nothing + Me.rtbHandling.Name = "rtbHandling" + Me.rtbHandling.Size = New System.Drawing.Size(268, 61) + Me.rtbHandling.TabIndex = 44 + Me.rtbHandling.Text = "" + ' + 'txtPositionAnzahl + ' + Me.txtPositionAnzahl._DateTimeOnly = False + Me.txtPositionAnzahl._numbersOnly = False + Me.txtPositionAnzahl._numbersOnlyKommastellen = "" + Me.txtPositionAnzahl._Prozent = False + Me.txtPositionAnzahl._ShortDateNew = False + Me.txtPositionAnzahl._ShortDateOnly = False + Me.txtPositionAnzahl._TimeOnly = False + Me.txtPositionAnzahl._value = Nothing + Me.txtPositionAnzahl._Waehrung = False + Me.txtPositionAnzahl._WaehrungZeichen = True + Me.txtPositionAnzahl.ForeColor = System.Drawing.Color.Black + Me.txtPositionAnzahl.Location = New System.Drawing.Point(358, 21) + Me.txtPositionAnzahl.MaxLength = 35 + Me.txtPositionAnzahl.MaxLineLength = -1 + Me.txtPositionAnzahl.MaxLines_Warning = "" + Me.txtPositionAnzahl.MaxLines_Warning_Label = Nothing + Me.txtPositionAnzahl.Name = "txtPositionAnzahl" + Me.txtPositionAnzahl.ReadOnly = True + Me.txtPositionAnzahl.Size = New System.Drawing.Size(43, 20) + Me.txtPositionAnzahl.TabIndex = 46 + ' + 'txtAbfertigungsanzahl + ' + Me.txtAbfertigungsanzahl._DateTimeOnly = False + Me.txtAbfertigungsanzahl._numbersOnly = False + Me.txtAbfertigungsanzahl._numbersOnlyKommastellen = "" + Me.txtAbfertigungsanzahl._Prozent = False + Me.txtAbfertigungsanzahl._ShortDateNew = False + Me.txtAbfertigungsanzahl._ShortDateOnly = False + Me.txtAbfertigungsanzahl._TimeOnly = False + Me.txtAbfertigungsanzahl._value = Nothing + Me.txtAbfertigungsanzahl._Waehrung = False + Me.txtAbfertigungsanzahl._WaehrungZeichen = True + Me.txtAbfertigungsanzahl.ForeColor = System.Drawing.Color.Black + Me.txtAbfertigungsanzahl.Location = New System.Drawing.Point(358, 3) + Me.txtAbfertigungsanzahl.MaxLength = 35 + Me.txtAbfertigungsanzahl.MaxLineLength = -1 + Me.txtAbfertigungsanzahl.MaxLines_Warning = "" + Me.txtAbfertigungsanzahl.MaxLines_Warning_Label = Nothing + Me.txtAbfertigungsanzahl.Name = "txtAbfertigungsanzahl" + Me.txtAbfertigungsanzahl.ReadOnly = True + Me.txtAbfertigungsanzahl.Size = New System.Drawing.Size(43, 20) + Me.txtAbfertigungsanzahl.TabIndex = 44 + ' + 'txtAbfertigungsart + ' + Me.txtAbfertigungsart._DateTimeOnly = False + Me.txtAbfertigungsart._numbersOnly = False + Me.txtAbfertigungsart._numbersOnlyKommastellen = "" + Me.txtAbfertigungsart._Prozent = False + Me.txtAbfertigungsart._ShortDateNew = False + Me.txtAbfertigungsart._ShortDateOnly = False + Me.txtAbfertigungsart._TimeOnly = False + Me.txtAbfertigungsart._value = Nothing + Me.txtAbfertigungsart._Waehrung = False + Me.txtAbfertigungsart._WaehrungZeichen = True + Me.txtAbfertigungsart.ForeColor = System.Drawing.Color.Black + Me.txtAbfertigungsart.Location = New System.Drawing.Point(97, 3) + Me.txtAbfertigungsart.MaxLength = 35 + Me.txtAbfertigungsart.MaxLineLength = -1 + Me.txtAbfertigungsart.MaxLines_Warning = "" + Me.txtAbfertigungsart.MaxLines_Warning_Label = Nothing + Me.txtAbfertigungsart.Name = "txtAbfertigungsart" + Me.txtAbfertigungsart.ReadOnly = True + Me.txtAbfertigungsart.Size = New System.Drawing.Size(199, 20) + Me.txtAbfertigungsart.TabIndex = 42 + ' + 'txtkdNrAvisierer + ' + Me.txtkdNrAvisierer._DateTimeOnly = False + Me.txtkdNrAvisierer._numbersOnly = False + Me.txtkdNrAvisierer._numbersOnlyKommastellen = "" + Me.txtkdNrAvisierer._Prozent = False + Me.txtkdNrAvisierer._ShortDateNew = False + Me.txtkdNrAvisierer._ShortDateOnly = False + Me.txtkdNrAvisierer._TimeOnly = False + Me.txtkdNrAvisierer._value = Nothing + Me.txtkdNrAvisierer._Waehrung = False + Me.txtkdNrAvisierer._WaehrungZeichen = True + Me.txtkdNrAvisierer.BackColor = System.Drawing.Color.White + Me.txtkdNrAvisierer.ForeColor = System.Drawing.Color.Black + Me.txtkdNrAvisierer.Location = New System.Drawing.Point(8, 22) + Me.txtkdNrAvisierer.MaxLength = 35 + Me.txtkdNrAvisierer.MaxLineLength = -1 + Me.txtkdNrAvisierer.MaxLines_Warning = "" + Me.txtkdNrAvisierer.MaxLines_Warning_Label = Nothing + Me.txtkdNrAvisierer.Name = "txtkdNrAvisierer" + Me.txtkdNrAvisierer.ReadOnly = True + Me.txtkdNrAvisierer.Size = New System.Drawing.Size(94, 20) + Me.txtkdNrAvisierer.TabIndex = 1 + Me.txtkdNrAvisierer.TabStop = False + ' + 'txtAvisoId + ' + Me.txtAvisoId._DateTimeOnly = False + Me.txtAvisoId._numbersOnly = False + Me.txtAvisoId._numbersOnlyKommastellen = "" + Me.txtAvisoId._Prozent = False + Me.txtAvisoId._ShortDateNew = False + Me.txtAvisoId._ShortDateOnly = False + Me.txtAvisoId._TimeOnly = False + Me.txtAvisoId._value = Nothing + Me.txtAvisoId._Waehrung = False + Me.txtAvisoId._WaehrungZeichen = True + Me.txtAvisoId.ForeColor = System.Drawing.Color.Black + Me.txtAvisoId.Location = New System.Drawing.Point(157, 61) + Me.txtAvisoId.MaxLength = 35 + Me.txtAvisoId.MaxLineLength = -1 + Me.txtAvisoId.MaxLines_Warning = "" + Me.txtAvisoId.MaxLines_Warning_Label = Nothing + Me.txtAvisoId.Name = "txtAvisoId" + Me.txtAvisoId.ReadOnly = True + Me.txtAvisoId.Size = New System.Drawing.Size(126, 20) + Me.txtAvisoId.TabIndex = 6 + Me.txtAvisoId.TabStop = False + Me.txtAvisoId.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'kdFirmaAvisierer + ' + Me.kdFirmaAvisierer._AlleFirmenCLUSTER = False + Me.kdFirmaAvisierer._AllowSetValue = True + Me.kdFirmaAvisierer._autoSizeGross = False + Me.kdFirmaAvisierer._display_Name1 = True + Me.kdFirmaAvisierer._displayAVISO_Email = False + Me.kdFirmaAvisierer._displayFullName = False + Me.kdFirmaAvisierer._displayWoelflKd = False + Me.kdFirmaAvisierer._hideIfListEmpty = True + Me.kdFirmaAvisierer._loadKdData = True + Me.kdFirmaAvisierer._UseFIRMA = "" + Me.kdFirmaAvisierer._ValueKdAndName = False + Me.kdFirmaAvisierer.BackColor = System.Drawing.Color.White + Me.kdFirmaAvisierer.dgvpos = "LEFT" + Me.kdFirmaAvisierer.KdName = Nothing + Me.kdFirmaAvisierer.KdNr = "-1" + Me.kdFirmaAvisierer.kdNrField = Nothing + Me.kdFirmaAvisierer.KdNrNullInt = Nothing + Me.kdFirmaAvisierer.Location = New System.Drawing.Point(101, 22) + Me.kdFirmaAvisierer.MaxLength = 35 + Me.kdFirmaAvisierer.Name = "kdFirmaAvisierer" + Me.kdFirmaAvisierer.nurAktive = True + Me.kdFirmaAvisierer.searchActive = True + Me.kdFirmaAvisierer.Size = New System.Drawing.Size(283, 20) + Me.kdFirmaAvisierer.TabIndex = 3 + Me.kdFirmaAvisierer.TabStop = False + Me.kdFirmaAvisierer.TIMER_SEARCH = True + Me.kdFirmaAvisierer.usrcntl = Nothing + ' + 'FlatButton5 + ' + Me.FlatButton5.allowBorder = False + Me.FlatButton5.FlatAppearance.BorderSize = 0 + Me.FlatButton5.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.FlatButton5.ForeColor = System.Drawing.Color.Black + Me.FlatButton5.Image = Global.SDL.My.Resources.Resources.personInaktiv + Me.FlatButton5.Location = New System.Drawing.Point(382, 17) + Me.FlatButton5.Name = "FlatButton5" + Me.FlatButton5.Size = New System.Drawing.Size(24, 25) + Me.FlatButton5.TabIndex = 2 + Me.FlatButton5.TabStop = False + Me.FlatButton5.UseVisualStyleBackColor = True + ' + 'cboAnlage5 + ' + Me.cboAnlage5._allowedValuesFreiText = Nothing + Me.cboAnlage5._allowFreiText = True + Me.cboAnlage5._value = "" + Me.cboAnlage5.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.cboAnlage5.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.cboAnlage5.FormattingEnabled = True + Me.cboAnlage5.Location = New System.Drawing.Point(280, 974) + Me.cboAnlage5.MaxLength = 35 + Me.cboAnlage5.Name = "cboAnlage5" + Me.cboAnlage5.Size = New System.Drawing.Size(266, 21) + Me.cboAnlage5.TabIndex = 32 + ' + 'cboAnlage1 + ' + Me.cboAnlage1._allowedValuesFreiText = Nothing + Me.cboAnlage1._allowFreiText = True + Me.cboAnlage1._value = "" + Me.cboAnlage1.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.cboAnlage1.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.cboAnlage1.FormattingEnabled = True + Me.cboAnlage1.Location = New System.Drawing.Point(10, 954) + Me.cboAnlage1.MaxLength = 35 + Me.cboAnlage1.Name = "cboAnlage1" + Me.cboAnlage1.Size = New System.Drawing.Size(266, 21) + Me.cboAnlage1.TabIndex = 28 + ' + 'txtWarenwertUmrechnung + ' + Me.txtWarenwertUmrechnung._DateTimeOnly = False + Me.txtWarenwertUmrechnung._numbersOnly = False + Me.txtWarenwertUmrechnung._numbersOnlyKommastellen = "" + Me.txtWarenwertUmrechnung._Prozent = False + Me.txtWarenwertUmrechnung._ShortDateNew = False + Me.txtWarenwertUmrechnung._ShortDateOnly = False + Me.txtWarenwertUmrechnung._TimeOnly = False + Me.txtWarenwertUmrechnung._value = "" + Me.txtWarenwertUmrechnung._Waehrung = True + Me.txtWarenwertUmrechnung._WaehrungZeichen = False + Me.txtWarenwertUmrechnung.Enabled = False + Me.txtWarenwertUmrechnung.ForeColor = System.Drawing.Color.Black + Me.txtWarenwertUmrechnung.Location = New System.Drawing.Point(147, 414) + Me.txtWarenwertUmrechnung.MaxLength = 35 + Me.txtWarenwertUmrechnung.MaxLineLength = -1 + Me.txtWarenwertUmrechnung.MaxLines_Warning = "" + Me.txtWarenwertUmrechnung.MaxLines_Warning_Label = Nothing + Me.txtWarenwertUmrechnung.Name = "txtWarenwertUmrechnung" + Me.txtWarenwertUmrechnung.Size = New System.Drawing.Size(129, 20) + Me.txtWarenwertUmrechnung.TabIndex = 18 + Me.txtWarenwertUmrechnung.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'cboAnlage2 + ' + Me.cboAnlage2._allowedValuesFreiText = Nothing + Me.cboAnlage2._allowFreiText = True + Me.cboAnlage2._value = "" + Me.cboAnlage2.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.cboAnlage2.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.cboAnlage2.FormattingEnabled = True + Me.cboAnlage2.Location = New System.Drawing.Point(10, 974) + Me.cboAnlage2.MaxLength = 35 + Me.cboAnlage2.Name = "cboAnlage2" + Me.cboAnlage2.Size = New System.Drawing.Size(266, 21) + Me.cboAnlage2.TabIndex = 29 + ' + 'cboAnlage3 + ' + Me.cboAnlage3._allowedValuesFreiText = Nothing + Me.cboAnlage3._allowFreiText = True + Me.cboAnlage3._value = "" + Me.cboAnlage3.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.cboAnlage3.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.cboAnlage3.FormattingEnabled = True + Me.cboAnlage3.Location = New System.Drawing.Point(10, 994) + Me.cboAnlage3.MaxLength = 35 + Me.cboAnlage3.Name = "cboAnlage3" + Me.cboAnlage3.Size = New System.Drawing.Size(266, 21) + Me.cboAnlage3.TabIndex = 30 + ' + 'txtVermerk + ' + Me.txtVermerk._DateTimeOnly = False + Me.txtVermerk._numbersOnly = False + Me.txtVermerk._numbersOnlyKommastellen = "" + Me.txtVermerk._Prozent = False + Me.txtVermerk._ShortDateNew = False + Me.txtVermerk._ShortDateOnly = False + Me.txtVermerk._TimeOnly = False + Me.txtVermerk._value = Nothing + Me.txtVermerk._Waehrung = False + Me.txtVermerk._WaehrungZeichen = True + Me.txtVermerk.ForeColor = System.Drawing.Color.Black + Me.txtVermerk.Location = New System.Drawing.Point(102, 456) + Me.txtVermerk.MaxLength = 35 + Me.txtVermerk.MaxLineLength = -1 + Me.txtVermerk.MaxLines_Warning = "" + Me.txtVermerk.MaxLines_Warning_Label = Nothing + Me.txtVermerk.Name = "txtVermerk" + Me.txtVermerk.Size = New System.Drawing.Size(305, 20) + Me.txtVermerk.TabIndex = 25 + ' + 'cboAnlage6 + ' + Me.cboAnlage6._allowedValuesFreiText = Nothing + Me.cboAnlage6._allowFreiText = True + Me.cboAnlage6._value = "" + Me.cboAnlage6.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.cboAnlage6.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.cboAnlage6.FormattingEnabled = True + Me.cboAnlage6.Location = New System.Drawing.Point(280, 994) + Me.cboAnlage6.MaxLength = 35 + Me.cboAnlage6.Name = "cboAnlage6" + Me.cboAnlage6.Size = New System.Drawing.Size(266, 21) + Me.cboAnlage6.TabIndex = 33 + ' + 'cboAnlage4 + ' + Me.cboAnlage4._allowedValuesFreiText = Nothing + Me.cboAnlage4._allowFreiText = True + Me.cboAnlage4._value = "" + Me.cboAnlage4.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.cboAnlage4.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.cboAnlage4.FormattingEnabled = True + Me.cboAnlage4.Location = New System.Drawing.Point(280, 954) + Me.cboAnlage4.MaxLength = 35 + Me.cboAnlage4.Name = "cboAnlage4" + Me.cboAnlage4.Size = New System.Drawing.Size(266, 21) + Me.cboAnlage4.TabIndex = 31 + ' + 'txtErfassungsnummer + ' + Me.txtErfassungsnummer._DateTimeOnly = False + Me.txtErfassungsnummer._numbersOnly = False + Me.txtErfassungsnummer._numbersOnlyKommastellen = "" + Me.txtErfassungsnummer._Prozent = False + Me.txtErfassungsnummer._ShortDateNew = False + Me.txtErfassungsnummer._ShortDateOnly = False + Me.txtErfassungsnummer._TimeOnly = False + Me.txtErfassungsnummer._value = Nothing + Me.txtErfassungsnummer._Waehrung = False + Me.txtErfassungsnummer._WaehrungZeichen = True + Me.txtErfassungsnummer.ForeColor = System.Drawing.Color.Black + Me.txtErfassungsnummer.Location = New System.Drawing.Point(516, 376) + Me.txtErfassungsnummer.MaxLength = 35 + Me.txtErfassungsnummer.MaxLineLength = -1 + Me.txtErfassungsnummer.MaxLines_Warning = "" + Me.txtErfassungsnummer.MaxLines_Warning_Label = Nothing + Me.txtErfassungsnummer.Name = "txtErfassungsnummer" + Me.txtErfassungsnummer.Size = New System.Drawing.Size(305, 20) + Me.txtErfassungsnummer.TabIndex = 11 + ' + 'cboRechnungNotiz + ' + Me.cboRechnungNotiz._allowedValuesFreiText = Nothing + Me.cboRechnungNotiz._allowFreiText = True + Me.cboRechnungNotiz._value = "" + Me.cboRechnungNotiz.FormattingEnabled = True + Me.cboRechnungNotiz.Location = New System.Drawing.Point(102, 1029) + Me.cboRechnungNotiz.Name = "cboRechnungNotiz" + Me.cboRechnungNotiz.Size = New System.Drawing.Size(718, 21) + Me.cboRechnungNotiz.TabIndex = 36 + ' + 'cboFirma + ' + Me.cboFirma._allowedValuesFreiText = Nothing + Me.cboFirma._allowFreiText = False + Me.cboFirma._value = "" + Me.cboFirma.FormattingEnabled = True + Me.cboFirma.Location = New System.Drawing.Point(592, 51) + Me.cboFirma.Margin = New System.Windows.Forms.Padding(2) + Me.cboFirma.Name = "cboFirma" + Me.cboFirma.Size = New System.Drawing.Size(229, 21) + Me.cboFirma.TabIndex = 1 + Me.cboFirma.TabStop = False + ' + 'txtkdNrAuftraggeber + ' + Me.txtkdNrAuftraggeber._DateTimeOnly = False + Me.txtkdNrAuftraggeber._numbersOnly = False + Me.txtkdNrAuftraggeber._numbersOnlyKommastellen = "" + Me.txtkdNrAuftraggeber._Prozent = False + Me.txtkdNrAuftraggeber._ShortDateNew = False + Me.txtkdNrAuftraggeber._ShortDateOnly = False + Me.txtkdNrAuftraggeber._TimeOnly = False + Me.txtkdNrAuftraggeber._value = Nothing + Me.txtkdNrAuftraggeber._Waehrung = False + Me.txtkdNrAuftraggeber._WaehrungZeichen = True + Me.txtkdNrAuftraggeber.BackColor = System.Drawing.Color.White + Me.txtkdNrAuftraggeber.ForeColor = System.Drawing.Color.Black + Me.txtkdNrAuftraggeber.Location = New System.Drawing.Point(8, 23) + Me.txtkdNrAuftraggeber.MaxLength = 35 + Me.txtkdNrAuftraggeber.MaxLineLength = -1 + Me.txtkdNrAuftraggeber.MaxLines_Warning = "" + Me.txtkdNrAuftraggeber.MaxLines_Warning_Label = Nothing + Me.txtkdNrAuftraggeber.Name = "txtkdNrAuftraggeber" + Me.txtkdNrAuftraggeber.ReadOnly = True + Me.txtkdNrAuftraggeber.Size = New System.Drawing.Size(94, 20) + Me.txtkdNrAuftraggeber.TabIndex = 1 + Me.txtkdNrAuftraggeber.TabStop = False + ' + 'kdFirmaAuftraggeber + ' + Me.kdFirmaAuftraggeber._AlleFirmenCLUSTER = False + Me.kdFirmaAuftraggeber._AllowSetValue = True + Me.kdFirmaAuftraggeber._autoSizeGross = False + Me.kdFirmaAuftraggeber._display_Name1 = True + Me.kdFirmaAuftraggeber._displayAVISO_Email = False + Me.kdFirmaAuftraggeber._displayFullName = False + Me.kdFirmaAuftraggeber._displayWoelflKd = False + Me.kdFirmaAuftraggeber._hideIfListEmpty = True + Me.kdFirmaAuftraggeber._loadKdData = True + Me.kdFirmaAuftraggeber._UseFIRMA = "" + Me.kdFirmaAuftraggeber._ValueKdAndName = False + Me.kdFirmaAuftraggeber.BackColor = System.Drawing.Color.White + Me.kdFirmaAuftraggeber.dgvpos = "LEFT" + Me.kdFirmaAuftraggeber.KdName = Nothing + Me.kdFirmaAuftraggeber.KdNr = "-1" + Me.kdFirmaAuftraggeber.kdNrField = Nothing + Me.kdFirmaAuftraggeber.KdNrNullInt = Nothing + Me.kdFirmaAuftraggeber.Location = New System.Drawing.Point(101, 23) + Me.kdFirmaAuftraggeber.MaxLength = 35 + Me.kdFirmaAuftraggeber.Name = "kdFirmaAuftraggeber" + Me.kdFirmaAuftraggeber.nurAktive = True + Me.kdFirmaAuftraggeber.searchActive = True + Me.kdFirmaAuftraggeber.Size = New System.Drawing.Size(283, 20) + Me.kdFirmaAuftraggeber.TabIndex = 3 + Me.kdFirmaAuftraggeber.TabStop = False + Me.kdFirmaAuftraggeber.TIMER_SEARCH = True + Me.kdFirmaAuftraggeber.usrcntl = Nothing + ' + 'txtAuftraggeberName2 + ' + Me.txtAuftraggeberName2._DateTimeOnly = False + Me.txtAuftraggeberName2._numbersOnly = False + Me.txtAuftraggeberName2._numbersOnlyKommastellen = "" + Me.txtAuftraggeberName2._Prozent = False + Me.txtAuftraggeberName2._ShortDateNew = False + Me.txtAuftraggeberName2._ShortDateOnly = False + Me.txtAuftraggeberName2._TimeOnly = False + Me.txtAuftraggeberName2._value = Nothing + Me.txtAuftraggeberName2._Waehrung = False + Me.txtAuftraggeberName2._WaehrungZeichen = True + Me.txtAuftraggeberName2.BackColor = System.Drawing.Color.White + Me.txtAuftraggeberName2.ForeColor = System.Drawing.Color.Black + Me.txtAuftraggeberName2.Location = New System.Drawing.Point(101, 42) + Me.txtAuftraggeberName2.MaxLength = 35 + Me.txtAuftraggeberName2.MaxLineLength = -1 + Me.txtAuftraggeberName2.MaxLines_Warning = "" + Me.txtAuftraggeberName2.MaxLines_Warning_Label = Nothing + Me.txtAuftraggeberName2.Name = "txtAuftraggeberName2" + Me.txtAuftraggeberName2.Size = New System.Drawing.Size(305, 20) + Me.txtAuftraggeberName2.TabIndex = 4 + Me.txtAuftraggeberName2.TabStop = False + ' + 'txtAuftragggeberOrt + ' + Me.txtAuftragggeberOrt._DateTimeOnly = False + Me.txtAuftragggeberOrt._numbersOnly = False + Me.txtAuftragggeberOrt._numbersOnlyKommastellen = "" + Me.txtAuftragggeberOrt._Prozent = False + Me.txtAuftragggeberOrt._ShortDateNew = False + Me.txtAuftragggeberOrt._ShortDateOnly = False + Me.txtAuftragggeberOrt._TimeOnly = False + Me.txtAuftragggeberOrt._value = Nothing + Me.txtAuftragggeberOrt._Waehrung = False + Me.txtAuftragggeberOrt._WaehrungZeichen = True + Me.txtAuftragggeberOrt.BackColor = System.Drawing.Color.White + Me.txtAuftragggeberOrt.ForeColor = System.Drawing.Color.Black + Me.txtAuftragggeberOrt.Location = New System.Drawing.Point(101, 80) + Me.txtAuftragggeberOrt.MaxLength = 35 + Me.txtAuftragggeberOrt.MaxLineLength = -1 + Me.txtAuftragggeberOrt.MaxLines_Warning = "" + Me.txtAuftragggeberOrt.MaxLines_Warning_Label = Nothing + Me.txtAuftragggeberOrt.Name = "txtAuftragggeberOrt" + Me.txtAuftragggeberOrt.Size = New System.Drawing.Size(305, 20) + Me.txtAuftragggeberOrt.TabIndex = 7 + Me.txtAuftragggeberOrt.TabStop = False + ' + 'txtAuftragggeberStrasse + ' + Me.txtAuftragggeberStrasse._DateTimeOnly = False + Me.txtAuftragggeberStrasse._numbersOnly = False + Me.txtAuftragggeberStrasse._numbersOnlyKommastellen = "" + Me.txtAuftragggeberStrasse._Prozent = False + Me.txtAuftragggeberStrasse._ShortDateNew = False + Me.txtAuftragggeberStrasse._ShortDateOnly = False + Me.txtAuftragggeberStrasse._TimeOnly = False + Me.txtAuftragggeberStrasse._value = Nothing + Me.txtAuftragggeberStrasse._Waehrung = False + Me.txtAuftragggeberStrasse._WaehrungZeichen = True + Me.txtAuftragggeberStrasse.BackColor = System.Drawing.Color.White + Me.txtAuftragggeberStrasse.ForeColor = System.Drawing.Color.Black + Me.txtAuftragggeberStrasse.Location = New System.Drawing.Point(101, 61) + Me.txtAuftragggeberStrasse.MaxLength = 35 + Me.txtAuftragggeberStrasse.MaxLineLength = -1 + Me.txtAuftragggeberStrasse.MaxLines_Warning = "" + Me.txtAuftragggeberStrasse.MaxLines_Warning_Label = Nothing + Me.txtAuftragggeberStrasse.Name = "txtAuftragggeberStrasse" + Me.txtAuftragggeberStrasse.Size = New System.Drawing.Size(305, 20) + Me.txtAuftragggeberStrasse.TabIndex = 6 + Me.txtAuftragggeberStrasse.TabStop = False + ' + 'FlatButton4 + ' + Me.FlatButton4.allowBorder = False + Me.FlatButton4.FlatAppearance.BorderSize = 0 + Me.FlatButton4.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.FlatButton4.ForeColor = System.Drawing.Color.Black + Me.FlatButton4.Image = Global.SDL.My.Resources.Resources.personInaktiv + Me.FlatButton4.Location = New System.Drawing.Point(382, 18) + Me.FlatButton4.Name = "FlatButton4" + Me.FlatButton4.Size = New System.Drawing.Size(24, 25) + Me.FlatButton4.TabIndex = 2 + Me.FlatButton4.TabStop = False + Me.FlatButton4.UseVisualStyleBackColor = True + ' + 'txtText + ' + Me.txtText.Location = New System.Drawing.Point(102, 1071) + Me.txtText.MaxLineLength = -1 + Me.txtText.MaxLines_Warning = "" + Me.txtText.MaxLines_Warning_Label = Nothing + Me.txtText.Name = "txtText" + Me.txtText.ReadOnly = True + Me.txtText.Size = New System.Drawing.Size(720, 53) + Me.txtText.TabIndex = 35 + Me.txtText.Text = "" + ' + 'txtBefoerderungsmittel + ' + Me.txtBefoerderungsmittel._DateTimeOnly = False + Me.txtBefoerderungsmittel._numbersOnly = False + Me.txtBefoerderungsmittel._numbersOnlyKommastellen = "" + Me.txtBefoerderungsmittel._Prozent = False + Me.txtBefoerderungsmittel._ShortDateNew = False + Me.txtBefoerderungsmittel._ShortDateOnly = False + Me.txtBefoerderungsmittel._TimeOnly = False + Me.txtBefoerderungsmittel._value = Nothing + Me.txtBefoerderungsmittel._Waehrung = False + Me.txtBefoerderungsmittel._WaehrungZeichen = True + Me.txtBefoerderungsmittel.ForeColor = System.Drawing.Color.Black + Me.txtBefoerderungsmittel.Location = New System.Drawing.Point(516, 413) + Me.txtBefoerderungsmittel.MaxLength = 35 + Me.txtBefoerderungsmittel.MaxLineLength = -1 + Me.txtBefoerderungsmittel.MaxLines_Warning = "" + Me.txtBefoerderungsmittel.MaxLines_Warning_Label = Nothing + Me.txtBefoerderungsmittel.Name = "txtBefoerderungsmittel" + Me.txtBefoerderungsmittel.Size = New System.Drawing.Size(305, 20) + Me.txtBefoerderungsmittel.TabIndex = 19 + ' + 'txtGrenze + ' + Me.txtGrenze._DateTimeOnly = False + Me.txtGrenze._numbersOnly = False + Me.txtGrenze._numbersOnlyKommastellen = "" + Me.txtGrenze._Prozent = False + Me.txtGrenze._ShortDateNew = False + Me.txtGrenze._ShortDateOnly = False + Me.txtGrenze._TimeOnly = False + Me.txtGrenze._value = Nothing + Me.txtGrenze._Waehrung = False + Me.txtGrenze._WaehrungZeichen = True + Me.txtGrenze.ForeColor = System.Drawing.Color.Black + Me.txtGrenze.Location = New System.Drawing.Point(516, 394) + Me.txtGrenze.MaxLength = 35 + Me.txtGrenze.MaxLineLength = -1 + Me.txtGrenze.MaxLines_Warning = "" + Me.txtGrenze.MaxLines_Warning_Label = Nothing + Me.txtGrenze.Name = "txtGrenze" + Me.txtGrenze.Size = New System.Drawing.Size(305, 20) + Me.txtGrenze.TabIndex = 16 + ' + 'txtSendungsdaten + ' + Me.txtSendungsdaten._DateTimeOnly = False + Me.txtSendungsdaten._numbersOnly = False + Me.txtSendungsdaten._numbersOnlyKommastellen = "" + Me.txtSendungsdaten._Prozent = False + Me.txtSendungsdaten._ShortDateNew = False + Me.txtSendungsdaten._ShortDateOnly = False + Me.txtSendungsdaten._TimeOnly = False + Me.txtSendungsdaten._value = Nothing + Me.txtSendungsdaten._Waehrung = False + Me.txtSendungsdaten._WaehrungZeichen = True + Me.txtSendungsdaten.ForeColor = System.Drawing.Color.Black + Me.txtSendungsdaten.Location = New System.Drawing.Point(102, 438) + Me.txtSendungsdaten.MaxLength = 300 + Me.txtSendungsdaten.MaxLineLength = -1 + Me.txtSendungsdaten.MaxLines_Warning = "" + Me.txtSendungsdaten.MaxLines_Warning_Label = Nothing + Me.txtSendungsdaten.Name = "txtSendungsdaten" + Me.txtSendungsdaten.Size = New System.Drawing.Size(305, 20) + Me.txtSendungsdaten.TabIndex = 22 + ' + 'txtWarenwert + ' + Me.txtWarenwert._DateTimeOnly = False + Me.txtWarenwert._numbersOnly = False + Me.txtWarenwert._numbersOnlyKommastellen = "" + Me.txtWarenwert._Prozent = False + Me.txtWarenwert._ShortDateNew = False + Me.txtWarenwert._ShortDateOnly = False + Me.txtWarenwert._TimeOnly = False + Me.txtWarenwert._value = "" + Me.txtWarenwert._Waehrung = True + Me.txtWarenwert._WaehrungZeichen = False + Me.txtWarenwert.ForeColor = System.Drawing.Color.Black + Me.txtWarenwert.Location = New System.Drawing.Point(147, 395) + Me.txtWarenwert.MaxLength = 35 + Me.txtWarenwert.MaxLineLength = -1 + Me.txtWarenwert.MaxLines_Warning = "" + Me.txtWarenwert.MaxLines_Warning_Label = Nothing + Me.txtWarenwert.Name = "txtWarenwert" + Me.txtWarenwert.Size = New System.Drawing.Size(129, 20) + Me.txtWarenwert.TabIndex = 15 + Me.txtWarenwert.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'txtZollbelegNr + ' + Me.txtZollbelegNr._DateTimeOnly = False + Me.txtZollbelegNr._numbersOnly = False + Me.txtZollbelegNr._numbersOnlyKommastellen = "" + Me.txtZollbelegNr._Prozent = False + Me.txtZollbelegNr._ShortDateNew = False + Me.txtZollbelegNr._ShortDateOnly = False + Me.txtZollbelegNr._TimeOnly = False + Me.txtZollbelegNr._value = Nothing + Me.txtZollbelegNr._Waehrung = False + Me.txtZollbelegNr._WaehrungZeichen = True + Me.txtZollbelegNr.ForeColor = System.Drawing.Color.Black + Me.txtZollbelegNr.Location = New System.Drawing.Point(102, 376) + Me.txtZollbelegNr.MaxLength = 35 + Me.txtZollbelegNr.MaxLineLength = -1 + Me.txtZollbelegNr.MaxLines_Warning = "" + Me.txtZollbelegNr.MaxLines_Warning_Label = Nothing + Me.txtZollbelegNr.Name = "txtZollbelegNr" + Me.txtZollbelegNr.Size = New System.Drawing.Size(305, 20) + Me.txtZollbelegNr.TabIndex = 10 + ' + 'cboSammelrechnung + ' + Me.cboSammelrechnung._allowedValuesFreiText = Nothing + Me.cboSammelrechnung._allowFreiText = False + Me.cboSammelrechnung._value = "" + Me.cboSammelrechnung.FormattingEnabled = True + Me.cboSammelrechnung.Location = New System.Drawing.Point(282, 17) + Me.cboSammelrechnung.Name = "cboSammelrechnung" + Me.cboSammelrechnung.Size = New System.Drawing.Size(102, 21) + Me.cboSammelrechnung.TabIndex = 2 + ' + 'txtRechnungAnName2 + ' + Me.txtRechnungAnName2._DateTimeOnly = False + Me.txtRechnungAnName2._numbersOnly = False + Me.txtRechnungAnName2._numbersOnlyKommastellen = "" + Me.txtRechnungAnName2._Prozent = False + Me.txtRechnungAnName2._ShortDateNew = False + Me.txtRechnungAnName2._ShortDateOnly = False + Me.txtRechnungAnName2._TimeOnly = False + Me.txtRechnungAnName2._value = Nothing + Me.txtRechnungAnName2._Waehrung = False + Me.txtRechnungAnName2._WaehrungZeichen = True + Me.txtRechnungAnName2.ForeColor = System.Drawing.Color.Black + Me.txtRechnungAnName2.Location = New System.Drawing.Point(101, 56) + Me.txtRechnungAnName2.MaxLength = 40 + Me.txtRechnungAnName2.MaxLineLength = -1 + Me.txtRechnungAnName2.MaxLines_Warning = "" + Me.txtRechnungAnName2.MaxLines_Warning_Label = Nothing + Me.txtRechnungAnName2.Name = "txtRechnungAnName2" + Me.txtRechnungAnName2.Size = New System.Drawing.Size(306, 20) + Me.txtRechnungAnName2.TabIndex = 11 + Me.txtRechnungAnName2.TabStop = False + ' + 'kdFirmaRechnungAn + ' + Me.kdFirmaRechnungAn._AlleFirmenCLUSTER = False + Me.kdFirmaRechnungAn._AllowSetValue = True + Me.kdFirmaRechnungAn._autoSizeGross = False + Me.kdFirmaRechnungAn._display_Name1 = True + Me.kdFirmaRechnungAn._displayAVISO_Email = False + Me.kdFirmaRechnungAn._displayFullName = False + Me.kdFirmaRechnungAn._displayWoelflKd = False + Me.kdFirmaRechnungAn._hideIfListEmpty = True + Me.kdFirmaRechnungAn._loadKdData = True + Me.kdFirmaRechnungAn._UseFIRMA = "" + Me.kdFirmaRechnungAn._ValueKdAndName = False + Me.kdFirmaRechnungAn.dgvpos = "LEFT" + Me.kdFirmaRechnungAn.KdName = Nothing + Me.kdFirmaRechnungAn.KdNr = "-1" + Me.kdFirmaRechnungAn.kdNrField = Nothing + Me.kdFirmaRechnungAn.KdNrNullInt = Nothing + Me.kdFirmaRechnungAn.Location = New System.Drawing.Point(101, 37) + Me.kdFirmaRechnungAn.MaxLength = 35 + Me.kdFirmaRechnungAn.Name = "kdFirmaRechnungAn" + Me.kdFirmaRechnungAn.nurAktive = True + Me.kdFirmaRechnungAn.searchActive = True + Me.kdFirmaRechnungAn.Size = New System.Drawing.Size(283, 20) + Me.kdFirmaRechnungAn.TabIndex = 5 + Me.kdFirmaRechnungAn.TabStop = False + Me.kdFirmaRechnungAn.TIMER_SEARCH = True + Me.kdFirmaRechnungAn.usrcntl = Nothing + ' + 'FlatButton3 + ' + Me.FlatButton3.allowBorder = False + Me.FlatButton3.FlatAppearance.BorderSize = 0 + Me.FlatButton3.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.FlatButton3.ForeColor = System.Drawing.Color.Black + Me.FlatButton3.Image = Global.SDL.My.Resources.Resources.personInaktiv + Me.FlatButton3.Location = New System.Drawing.Point(383, 32) + Me.FlatButton3.Name = "FlatButton3" + Me.FlatButton3.Size = New System.Drawing.Size(24, 25) + Me.FlatButton3.TabIndex = 7 + Me.FlatButton3.TabStop = False + Me.FlatButton3.UseVisualStyleBackColor = True + ' + 'txtKdAuftragsNr + ' + Me.txtKdAuftragsNr._DateTimeOnly = False + Me.txtKdAuftragsNr._numbersOnly = False + Me.txtKdAuftragsNr._numbersOnlyKommastellen = "" + Me.txtKdAuftragsNr._Prozent = False + Me.txtKdAuftragsNr._ShortDateNew = False + Me.txtKdAuftragsNr._ShortDateOnly = False + Me.txtKdAuftragsNr._TimeOnly = False + Me.txtKdAuftragsNr._value = Nothing + Me.txtKdAuftragsNr._Waehrung = False + Me.txtKdAuftragsNr._WaehrungZeichen = True + Me.txtKdAuftragsNr.ForeColor = System.Drawing.Color.Black + Me.txtKdAuftragsNr.Location = New System.Drawing.Point(101, 116) + Me.txtKdAuftragsNr.MaxLength = 35 + Me.txtKdAuftragsNr.MaxLineLength = -1 + Me.txtKdAuftragsNr.MaxLines_Warning = "" + Me.txtKdAuftragsNr.MaxLines_Warning_Label = Nothing + Me.txtKdAuftragsNr.Name = "txtKdAuftragsNr" + Me.txtKdAuftragsNr.Size = New System.Drawing.Size(306, 20) + Me.txtKdAuftragsNr.TabIndex = 20 + ' + 'txtRechnungAnUIDKz + ' + Me.txtRechnungAnUIDKz._DateTimeOnly = False + Me.txtRechnungAnUIDKz._numbersOnly = False + Me.txtRechnungAnUIDKz._numbersOnlyKommastellen = "" + Me.txtRechnungAnUIDKz._Prozent = False + Me.txtRechnungAnUIDKz._ShortDateNew = False + Me.txtRechnungAnUIDKz._ShortDateOnly = False + Me.txtRechnungAnUIDKz._TimeOnly = False + Me.txtRechnungAnUIDKz._value = Nothing + Me.txtRechnungAnUIDKz._Waehrung = False + Me.txtRechnungAnUIDKz._WaehrungZeichen = True + Me.txtRechnungAnUIDKz.ForeColor = System.Drawing.Color.Black + Me.txtRechnungAnUIDKz.Location = New System.Drawing.Point(481, 56) + Me.txtRechnungAnUIDKz.MaxLength = 35 + Me.txtRechnungAnUIDKz.MaxLineLength = -1 + Me.txtRechnungAnUIDKz.MaxLines_Warning = "" + Me.txtRechnungAnUIDKz.MaxLines_Warning_Label = Nothing + Me.txtRechnungAnUIDKz.Name = "txtRechnungAnUIDKz" + Me.txtRechnungAnUIDKz.Size = New System.Drawing.Size(27, 20) + Me.txtRechnungAnUIDKz.TabIndex = 18 + Me.txtRechnungAnUIDKz.TabStop = False + ' + 'cboRechnungAn + ' + Me.cboRechnungAn._allowedValuesFreiText = Nothing + Me.cboRechnungAn._allowFreiText = False + Me.cboRechnungAn._value = "" + Me.cboRechnungAn.FormattingEnabled = True + Me.cboRechnungAn.Location = New System.Drawing.Point(101, 17) + Me.cboRechnungAn.Name = "cboRechnungAn" + Me.cboRechnungAn.Size = New System.Drawing.Size(183, 21) + Me.cboRechnungAn.TabIndex = 1 + ' + 'txtRechnungAnUIDNr + ' + Me.txtRechnungAnUIDNr._DateTimeOnly = False + Me.txtRechnungAnUIDNr._numbersOnly = False + Me.txtRechnungAnUIDNr._numbersOnlyKommastellen = "" + Me.txtRechnungAnUIDNr._Prozent = False + Me.txtRechnungAnUIDNr._ShortDateNew = False + Me.txtRechnungAnUIDNr._ShortDateOnly = False + Me.txtRechnungAnUIDNr._TimeOnly = False + Me.txtRechnungAnUIDNr._value = Nothing + Me.txtRechnungAnUIDNr._Waehrung = False + Me.txtRechnungAnUIDNr._WaehrungZeichen = True + Me.txtRechnungAnUIDNr.ForeColor = System.Drawing.Color.Black + Me.txtRechnungAnUIDNr.Location = New System.Drawing.Point(506, 56) + Me.txtRechnungAnUIDNr.MaxLength = 35 + Me.txtRechnungAnUIDNr.MaxLineLength = -1 + Me.txtRechnungAnUIDNr.MaxLines_Warning = "" + Me.txtRechnungAnUIDNr.MaxLines_Warning_Label = Nothing + Me.txtRechnungAnUIDNr.Name = "txtRechnungAnUIDNr" + Me.txtRechnungAnUIDNr.Size = New System.Drawing.Size(69, 20) + Me.txtRechnungAnUIDNr.TabIndex = 13 + Me.txtRechnungAnUIDNr.TabStop = False + ' + 'txtRechnungAnBuKdNr + ' + Me.txtRechnungAnBuKdNr._DateTimeOnly = False + Me.txtRechnungAnBuKdNr._numbersOnly = False + Me.txtRechnungAnBuKdNr._numbersOnlyKommastellen = "" + Me.txtRechnungAnBuKdNr._Prozent = False + Me.txtRechnungAnBuKdNr._ShortDateNew = False + Me.txtRechnungAnBuKdNr._ShortDateOnly = False + Me.txtRechnungAnBuKdNr._TimeOnly = False + Me.txtRechnungAnBuKdNr._value = Nothing + Me.txtRechnungAnBuKdNr._Waehrung = False + Me.txtRechnungAnBuKdNr._WaehrungZeichen = True + Me.txtRechnungAnBuKdNr.ForeColor = System.Drawing.Color.Black + Me.txtRechnungAnBuKdNr.Location = New System.Drawing.Point(481, 37) + Me.txtRechnungAnBuKdNr.MaxLength = 35 + Me.txtRechnungAnBuKdNr.MaxLineLength = -1 + Me.txtRechnungAnBuKdNr.MaxLines_Warning = "" + Me.txtRechnungAnBuKdNr.MaxLines_Warning_Label = Nothing + Me.txtRechnungAnBuKdNr.Name = "txtRechnungAnBuKdNr" + Me.txtRechnungAnBuKdNr.Size = New System.Drawing.Size(94, 20) + Me.txtRechnungAnBuKdNr.TabIndex = 10 + Me.txtRechnungAnBuKdNr.TabStop = False + ' + 'txtkdNrRechnungAn + ' + Me.txtkdNrRechnungAn._DateTimeOnly = False + Me.txtkdNrRechnungAn._numbersOnly = False + Me.txtkdNrRechnungAn._numbersOnlyKommastellen = "" + Me.txtkdNrRechnungAn._Prozent = False + Me.txtkdNrRechnungAn._ShortDateNew = False + Me.txtkdNrRechnungAn._ShortDateOnly = False + Me.txtkdNrRechnungAn._TimeOnly = False + Me.txtkdNrRechnungAn._value = Nothing + Me.txtkdNrRechnungAn._Waehrung = False + Me.txtkdNrRechnungAn._WaehrungZeichen = True + Me.txtkdNrRechnungAn.ForeColor = System.Drawing.Color.Black + Me.txtkdNrRechnungAn.Location = New System.Drawing.Point(8, 37) + Me.txtkdNrRechnungAn.MaxLength = 35 + Me.txtkdNrRechnungAn.MaxLineLength = -1 + Me.txtkdNrRechnungAn.MaxLines_Warning = "" + Me.txtkdNrRechnungAn.MaxLines_Warning_Label = Nothing + Me.txtkdNrRechnungAn.Name = "txtkdNrRechnungAn" + Me.txtkdNrRechnungAn.Size = New System.Drawing.Size(94, 20) + Me.txtkdNrRechnungAn.TabIndex = 3 + Me.txtkdNrRechnungAn.TabStop = False + ' + 'txtRechnungAnOrt + ' + Me.txtRechnungAnOrt._DateTimeOnly = False + Me.txtRechnungAnOrt._numbersOnly = False + Me.txtRechnungAnOrt._numbersOnlyKommastellen = "" + Me.txtRechnungAnOrt._Prozent = False + Me.txtRechnungAnOrt._ShortDateNew = False + Me.txtRechnungAnOrt._ShortDateOnly = False + Me.txtRechnungAnOrt._TimeOnly = False + Me.txtRechnungAnOrt._value = Nothing + Me.txtRechnungAnOrt._Waehrung = False + Me.txtRechnungAnOrt._WaehrungZeichen = True + Me.txtRechnungAnOrt.ForeColor = System.Drawing.Color.Black + Me.txtRechnungAnOrt.Location = New System.Drawing.Point(101, 94) + Me.txtRechnungAnOrt.MaxLength = 52 + Me.txtRechnungAnOrt.MaxLineLength = -1 + Me.txtRechnungAnOrt.MaxLines_Warning = "" + Me.txtRechnungAnOrt.MaxLines_Warning_Label = Nothing + Me.txtRechnungAnOrt.Name = "txtRechnungAnOrt" + Me.txtRechnungAnOrt.Size = New System.Drawing.Size(306, 20) + Me.txtRechnungAnOrt.TabIndex = 17 + Me.txtRechnungAnOrt.TabStop = False + ' + 'txtRechnungAnStrasse + ' + Me.txtRechnungAnStrasse._DateTimeOnly = False + Me.txtRechnungAnStrasse._numbersOnly = False + Me.txtRechnungAnStrasse._numbersOnlyKommastellen = "" + Me.txtRechnungAnStrasse._Prozent = False + Me.txtRechnungAnStrasse._ShortDateNew = False + Me.txtRechnungAnStrasse._ShortDateOnly = False + Me.txtRechnungAnStrasse._TimeOnly = False + Me.txtRechnungAnStrasse._value = Nothing + Me.txtRechnungAnStrasse._Waehrung = False + Me.txtRechnungAnStrasse._WaehrungZeichen = True + Me.txtRechnungAnStrasse.ForeColor = System.Drawing.Color.Black + Me.txtRechnungAnStrasse.Location = New System.Drawing.Point(101, 75) + Me.txtRechnungAnStrasse.MaxLength = 40 + Me.txtRechnungAnStrasse.MaxLineLength = -1 + Me.txtRechnungAnStrasse.MaxLines_Warning = "" + Me.txtRechnungAnStrasse.MaxLines_Warning_Label = Nothing + Me.txtRechnungAnStrasse.Name = "txtRechnungAnStrasse" + Me.txtRechnungAnStrasse.Size = New System.Drawing.Size(306, 20) + Me.txtRechnungAnStrasse.TabIndex = 14 + Me.txtRechnungAnStrasse.TabStop = False + ' + 'txtkdNrAbsender + ' + Me.txtkdNrAbsender._DateTimeOnly = False + Me.txtkdNrAbsender._numbersOnly = False + Me.txtkdNrAbsender._numbersOnlyKommastellen = "" + Me.txtkdNrAbsender._Prozent = False + Me.txtkdNrAbsender._ShortDateNew = False + Me.txtkdNrAbsender._ShortDateOnly = False + Me.txtkdNrAbsender._TimeOnly = False + Me.txtkdNrAbsender._value = Nothing + Me.txtkdNrAbsender._Waehrung = False + Me.txtkdNrAbsender._WaehrungZeichen = True + Me.txtkdNrAbsender.BackColor = System.Drawing.Color.White + Me.txtkdNrAbsender.ForeColor = System.Drawing.Color.Black + Me.txtkdNrAbsender.Location = New System.Drawing.Point(8, 23) + Me.txtkdNrAbsender.MaxLength = 35 + Me.txtkdNrAbsender.MaxLineLength = -1 + Me.txtkdNrAbsender.MaxLines_Warning = "" + Me.txtkdNrAbsender.MaxLines_Warning_Label = Nothing + Me.txtkdNrAbsender.Name = "txtkdNrAbsender" + Me.txtkdNrAbsender.ReadOnly = True + Me.txtkdNrAbsender.Size = New System.Drawing.Size(94, 20) + Me.txtkdNrAbsender.TabIndex = 1 + Me.txtkdNrAbsender.TabStop = False + ' + 'kdFirmaAbsender + ' + Me.kdFirmaAbsender._AlleFirmenCLUSTER = False + Me.kdFirmaAbsender._AllowSetValue = True + Me.kdFirmaAbsender._autoSizeGross = False + Me.kdFirmaAbsender._display_Name1 = True + Me.kdFirmaAbsender._displayAVISO_Email = False + Me.kdFirmaAbsender._displayFullName = False + Me.kdFirmaAbsender._displayWoelflKd = False + Me.kdFirmaAbsender._hideIfListEmpty = True + Me.kdFirmaAbsender._loadKdData = True + Me.kdFirmaAbsender._UseFIRMA = "" + Me.kdFirmaAbsender._ValueKdAndName = False + Me.kdFirmaAbsender.BackColor = System.Drawing.Color.White + Me.kdFirmaAbsender.dgvpos = "LEFT" + Me.kdFirmaAbsender.KdName = Nothing + Me.kdFirmaAbsender.KdNr = "-1" + Me.kdFirmaAbsender.kdNrField = Nothing + Me.kdFirmaAbsender.KdNrNullInt = Nothing + Me.kdFirmaAbsender.Location = New System.Drawing.Point(101, 23) + Me.kdFirmaAbsender.MaxLength = 35 + Me.kdFirmaAbsender.Name = "kdFirmaAbsender" + Me.kdFirmaAbsender.nurAktive = True + Me.kdFirmaAbsender.searchActive = True + Me.kdFirmaAbsender.Size = New System.Drawing.Size(283, 20) + Me.kdFirmaAbsender.TabIndex = 3 + Me.kdFirmaAbsender.TabStop = False + Me.kdFirmaAbsender.TIMER_SEARCH = True + Me.kdFirmaAbsender.usrcntl = Nothing + ' + 'txtAbsenderName2 + ' + Me.txtAbsenderName2._DateTimeOnly = False + Me.txtAbsenderName2._numbersOnly = False + Me.txtAbsenderName2._numbersOnlyKommastellen = "" + Me.txtAbsenderName2._Prozent = False + Me.txtAbsenderName2._ShortDateNew = False + Me.txtAbsenderName2._ShortDateOnly = False + Me.txtAbsenderName2._TimeOnly = False + Me.txtAbsenderName2._value = Nothing + Me.txtAbsenderName2._Waehrung = False + Me.txtAbsenderName2._WaehrungZeichen = True + Me.txtAbsenderName2.BackColor = System.Drawing.Color.White + Me.txtAbsenderName2.ForeColor = System.Drawing.Color.Black + Me.txtAbsenderName2.Location = New System.Drawing.Point(101, 42) + Me.txtAbsenderName2.MaxLength = 35 + Me.txtAbsenderName2.MaxLineLength = -1 + Me.txtAbsenderName2.MaxLines_Warning = "" + Me.txtAbsenderName2.MaxLines_Warning_Label = Nothing + Me.txtAbsenderName2.Name = "txtAbsenderName2" + Me.txtAbsenderName2.Size = New System.Drawing.Size(305, 20) + Me.txtAbsenderName2.TabIndex = 4 + Me.txtAbsenderName2.TabStop = False + ' + 'txtAbsenderOrt + ' + Me.txtAbsenderOrt._DateTimeOnly = False + Me.txtAbsenderOrt._numbersOnly = False + Me.txtAbsenderOrt._numbersOnlyKommastellen = "" + Me.txtAbsenderOrt._Prozent = False + Me.txtAbsenderOrt._ShortDateNew = False + Me.txtAbsenderOrt._ShortDateOnly = False + Me.txtAbsenderOrt._TimeOnly = False + Me.txtAbsenderOrt._value = Nothing + Me.txtAbsenderOrt._Waehrung = False + Me.txtAbsenderOrt._WaehrungZeichen = True + Me.txtAbsenderOrt.BackColor = System.Drawing.Color.White + Me.txtAbsenderOrt.ForeColor = System.Drawing.Color.Black + Me.txtAbsenderOrt.Location = New System.Drawing.Point(101, 80) + Me.txtAbsenderOrt.MaxLength = 35 + Me.txtAbsenderOrt.MaxLineLength = -1 + Me.txtAbsenderOrt.MaxLines_Warning = "" + Me.txtAbsenderOrt.MaxLines_Warning_Label = Nothing + Me.txtAbsenderOrt.Name = "txtAbsenderOrt" + Me.txtAbsenderOrt.Size = New System.Drawing.Size(305, 20) + Me.txtAbsenderOrt.TabIndex = 7 + Me.txtAbsenderOrt.TabStop = False + ' + 'txtAbsenderStrasse + ' + Me.txtAbsenderStrasse._DateTimeOnly = False + Me.txtAbsenderStrasse._numbersOnly = False + Me.txtAbsenderStrasse._numbersOnlyKommastellen = "" + Me.txtAbsenderStrasse._Prozent = False + Me.txtAbsenderStrasse._ShortDateNew = False + Me.txtAbsenderStrasse._ShortDateOnly = False + Me.txtAbsenderStrasse._TimeOnly = False + Me.txtAbsenderStrasse._value = Nothing + Me.txtAbsenderStrasse._Waehrung = False + Me.txtAbsenderStrasse._WaehrungZeichen = True + Me.txtAbsenderStrasse.BackColor = System.Drawing.Color.White + Me.txtAbsenderStrasse.ForeColor = System.Drawing.Color.Black + Me.txtAbsenderStrasse.Location = New System.Drawing.Point(101, 61) + Me.txtAbsenderStrasse.MaxLength = 35 + Me.txtAbsenderStrasse.MaxLineLength = -1 + Me.txtAbsenderStrasse.MaxLines_Warning = "" + Me.txtAbsenderStrasse.MaxLines_Warning_Label = Nothing + Me.txtAbsenderStrasse.Name = "txtAbsenderStrasse" + Me.txtAbsenderStrasse.Size = New System.Drawing.Size(305, 20) + Me.txtAbsenderStrasse.TabIndex = 6 + Me.txtAbsenderStrasse.TabStop = False + ' + 'FlatButton1 + ' + Me.FlatButton1.allowBorder = False + Me.FlatButton1.FlatAppearance.BorderSize = 0 + Me.FlatButton1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.FlatButton1.ForeColor = System.Drawing.Color.Black + Me.FlatButton1.Image = Global.SDL.My.Resources.Resources.personInaktiv + Me.FlatButton1.Location = New System.Drawing.Point(382, 18) + Me.FlatButton1.Name = "FlatButton1" + Me.FlatButton1.Size = New System.Drawing.Size(24, 25) + Me.FlatButton1.TabIndex = 2 + Me.FlatButton1.TabStop = False + Me.FlatButton1.UseVisualStyleBackColor = True + ' + 'sbLeistung + ' + Me.sbLeistung._allowFreitext = False + Me.sbLeistung._AllowSetValue = False + Me.sbLeistung._allowSpaceAsSplitter = False + Me.sbLeistung._autoSizeGross = False + Me.sbLeistung._hideIfListEmpty = True + Me.sbLeistung._value = Nothing + Me.sbLeistung.conn_art = "FMZOLL" + Me.sbLeistung.dgvpos = "LEFT" + Me.sbLeistung.DISPLAY_PARAM = Nothing + Me.sbLeistung.INVISIBLE_COLUMNS = Nothing + Me.sbLeistung.key_visible = False + Me.sbLeistung.KEYPARAM = Nothing + Me.sbLeistung.Location = New System.Drawing.Point(595, 232) + Me.sbLeistung.Name = "sbLeistung" + Me.sbLeistung.searchActive = True + Me.sbLeistung.Size = New System.Drawing.Size(189, 20) + Me.sbLeistung.SQL_ORDER_BY = Nothing + Me.sbLeistung.SQL_SELECT = Nothing + Me.sbLeistung.SQL_WHERE = Nothing + Me.sbLeistung.SQL_WhereParamList = Nothing + Me.sbLeistung.TabIndex = 14 + Me.sbLeistung.usrcntl = Nothing + ' + 'txtUnterNrRef + ' + Me.txtUnterNrRef._DateTimeOnly = False + Me.txtUnterNrRef._numbersOnly = False + Me.txtUnterNrRef._numbersOnlyKommastellen = "" + Me.txtUnterNrRef._Prozent = False + Me.txtUnterNrRef._ShortDateNew = False + Me.txtUnterNrRef._ShortDateOnly = False + Me.txtUnterNrRef._TimeOnly = False + Me.txtUnterNrRef._value = Nothing + Me.txtUnterNrRef._Waehrung = False + Me.txtUnterNrRef._WaehrungZeichen = True + Me.txtUnterNrRef.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!) + Me.txtUnterNrRef.Location = New System.Drawing.Point(536, 69) + Me.txtUnterNrRef.MaxLineLength = -1 + Me.txtUnterNrRef.MaxLines_Warning = "" + Me.txtUnterNrRef.MaxLines_Warning_Label = Nothing + Me.txtUnterNrRef.Name = "txtUnterNrRef" + Me.txtUnterNrRef.Size = New System.Drawing.Size(39, 21) + Me.txtUnterNrRef.TabIndex = 8 + Me.txtUnterNrRef.Visible = False + ' + 'cboFilialeRef + ' + Me.cboFilialeRef._allowedValuesFreiText = Nothing + Me.cboFilialeRef._allowFreiText = False + Me.cboFilialeRef._value = "" + Me.cboFilialeRef.DropDownWidth = 280 + Me.cboFilialeRef.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!) + Me.cboFilialeRef.FormattingEnabled = True + Me.cboFilialeRef.Location = New System.Drawing.Point(289, 68) + Me.cboFilialeRef.Name = "cboFilialeRef" + Me.cboFilialeRef.Size = New System.Drawing.Size(80, 22) + Me.cboFilialeRef.TabIndex = 6 + Me.cboFilialeRef.Visible = False + ' + 'txtAbfertigungsnummerRef + ' + Me.txtAbfertigungsnummerRef._DateTimeOnly = False + Me.txtAbfertigungsnummerRef._numbersOnly = False + Me.txtAbfertigungsnummerRef._numbersOnlyKommastellen = "" + Me.txtAbfertigungsnummerRef._Prozent = False + Me.txtAbfertigungsnummerRef._ShortDateNew = False + Me.txtAbfertigungsnummerRef._ShortDateOnly = False + Me.txtAbfertigungsnummerRef._TimeOnly = False + Me.txtAbfertigungsnummerRef._value = Nothing + Me.txtAbfertigungsnummerRef._Waehrung = False + Me.txtAbfertigungsnummerRef._WaehrungZeichen = True + Me.txtAbfertigungsnummerRef.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!) + Me.txtAbfertigungsnummerRef.Location = New System.Drawing.Point(368, 69) + Me.txtAbfertigungsnummerRef.MaxLineLength = -1 + Me.txtAbfertigungsnummerRef.MaxLines_Warning = "" + Me.txtAbfertigungsnummerRef.MaxLines_Warning_Label = Nothing + Me.txtAbfertigungsnummerRef.Name = "txtAbfertigungsnummerRef" + Me.txtAbfertigungsnummerRef.Size = New System.Drawing.Size(169, 21) + Me.txtAbfertigungsnummerRef.TabIndex = 7 + Me.txtAbfertigungsnummerRef.Visible = False + ' + 'dgvRechnungenPositionen + ' + Me.dgvRechnungenPositionen.AKTUALISIERUNGS_INTERVALL = -1 + Me.dgvRechnungenPositionen.AllowUserToAddRows = False + Me.dgvRechnungenPositionen.AllowUserToDeleteRows = False + Me.dgvRechnungenPositionen.AllowUserToResizeColumns = False + Me.dgvRechnungenPositionen.AllowUserToResizeRows = False + Me.dgvRechnungenPositionen.BackgroundColor = System.Drawing.Color.White + Me.dgvRechnungenPositionen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize + Me.dgvRechnungenPositionen.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.Leistung, Me.Anzahl, Me.Preis, Me.SteuerpflichtigerBetrag, Me.SteuerfreierBetrag, Me.Aufschubkonto}) + Me.dgvRechnungenPositionen.Location = New System.Drawing.Point(10, 258) + Me.dgvRechnungenPositionen.Name = "dgvRechnungenPositionen" + Me.dgvRechnungenPositionen.ReadOnly = True + Me.dgvRechnungenPositionen.RowHeadersVisible = False + Me.dgvRechnungenPositionen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect + Me.dgvRechnungenPositionen.Size = New System.Drawing.Size(811, 189) + Me.dgvRechnungenPositionen.TabIndex = 5 + Me.dgvRechnungenPositionen.TabStop = False + ' + 'Leistung + ' + Me.Leistung.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill + Me.Leistung.HeaderText = "Leistung" + Me.Leistung.Name = "Leistung" + Me.Leistung.ReadOnly = True + ' + 'Anzahl + ' + DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleRight + DataGridViewCellStyle1.Format = "N0" + DataGridViewCellStyle1.NullValue = Nothing + Me.Anzahl.DefaultCellStyle = DataGridViewCellStyle1 + Me.Anzahl.HeaderText = "Anzahl" + Me.Anzahl.Name = "Anzahl" + Me.Anzahl.ReadOnly = True + Me.Anzahl.Width = 50 + ' + 'Preis + ' + DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleRight + DataGridViewCellStyle2.Format = "c2" + Me.Preis.DefaultCellStyle = DataGridViewCellStyle2 + Me.Preis.HeaderText = "Preis" + Me.Preis.Name = "Preis" + Me.Preis.ReadOnly = True + Me.Preis.Width = 80 + ' + 'SteuerpflichtigerBetrag + ' + DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleRight + DataGridViewCellStyle3.Format = "c2" + Me.SteuerpflichtigerBetrag.DefaultCellStyle = DataGridViewCellStyle3 + Me.SteuerpflichtigerBetrag.HeaderText = "Steuerpfl." + Me.SteuerpflichtigerBetrag.Name = "SteuerpflichtigerBetrag" + Me.SteuerpflichtigerBetrag.ReadOnly = True + Me.SteuerpflichtigerBetrag.Width = 120 + ' + 'SteuerfreierBetrag + ' + DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleRight + DataGridViewCellStyle4.Format = "C2" + DataGridViewCellStyle4.NullValue = Nothing + Me.SteuerfreierBetrag.DefaultCellStyle = DataGridViewCellStyle4 + Me.SteuerfreierBetrag.HeaderText = "Steuerfrei" + Me.SteuerfreierBetrag.Name = "SteuerfreierBetrag" + Me.SteuerfreierBetrag.ReadOnly = True + Me.SteuerfreierBetrag.Width = 120 + ' + 'Aufschubkonto + ' + Me.Aufschubkonto.HeaderText = "Aufschubkonto" + Me.Aufschubkonto.Name = "Aufschubkonto" + Me.Aufschubkonto.ReadOnly = True + Me.Aufschubkonto.Width = 120 + ' + 'dgvOfferteDetailsUebersicht + ' + Me.dgvOfferteDetailsUebersicht.AKTUALISIERUNGS_INTERVALL = -1 + Me.dgvOfferteDetailsUebersicht.AllowUserToAddRows = False + Me.dgvOfferteDetailsUebersicht.AllowUserToDeleteRows = False + Me.dgvOfferteDetailsUebersicht.AllowUserToOrderColumns = True + Me.dgvOfferteDetailsUebersicht.AllowUserToResizeRows = False + DataGridViewCellStyle6.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer)) + Me.dgvOfferteDetailsUebersicht.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle6 + Me.dgvOfferteDetailsUebersicht.BackgroundColor = System.Drawing.Color.White + Me.dgvOfferteDetailsUebersicht.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D + Me.dgvOfferteDetailsUebersicht.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize + Me.dgvOfferteDetailsUebersicht.Location = New System.Drawing.Point(220, 29) + Me.dgvOfferteDetailsUebersicht.MultiSelect = False + Me.dgvOfferteDetailsUebersicht.Name = "dgvOfferteDetailsUebersicht" + Me.dgvOfferteDetailsUebersicht.RowHeadersVisible = False + DataGridViewCellStyle7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle7.SelectionBackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) + DataGridViewCellStyle7.SelectionForeColor = System.Drawing.Color.Black + Me.dgvOfferteDetailsUebersicht.RowsDefaultCellStyle = DataGridViewCellStyle7 + Me.dgvOfferteDetailsUebersicht.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect + Me.dgvOfferteDetailsUebersicht.Size = New System.Drawing.Size(601, 201) + Me.dgvOfferteDetailsUebersicht.TabIndex = 3 + ' + 'txtRohmasse + ' + Me.txtRohmasse._DateTimeOnly = False + Me.txtRohmasse._numbersOnly = False + Me.txtRohmasse._numbersOnlyKommastellen = "" + Me.txtRohmasse._Prozent = False + Me.txtRohmasse._ShortDateNew = False + Me.txtRohmasse._ShortDateOnly = False + Me.txtRohmasse._TimeOnly = False + Me.txtRohmasse._value = Nothing + Me.txtRohmasse._Waehrung = False + Me.txtRohmasse._WaehrungZeichen = True + Me.txtRohmasse.ForeColor = System.Drawing.Color.Black + Me.txtRohmasse.Location = New System.Drawing.Point(370, 115) + Me.txtRohmasse.MaxLength = 35 + Me.txtRohmasse.MaxLineLength = -1 + Me.txtRohmasse.MaxLines_Warning = "" + Me.txtRohmasse.MaxLines_Warning_Label = Nothing + Me.txtRohmasse.Name = "txtRohmasse" + Me.txtRohmasse.Size = New System.Drawing.Size(305, 20) + Me.txtRohmasse.TabIndex = 24 + Me.txtRohmasse.Visible = False + ' + 'cboWaehrung + ' + Me.cboWaehrung._allowedValuesFreiText = Nothing + Me.cboWaehrung._allowFreiText = False + Me.cboWaehrung._value = "" + Me.cboWaehrung.FormattingEnabled = True + Me.cboWaehrung.Location = New System.Drawing.Point(102, 394) + Me.cboWaehrung.Name = "cboWaehrung" + Me.cboWaehrung.Size = New System.Drawing.Size(47, 21) + Me.cboWaehrung.TabIndex = 14 + ' + 'cboWaehrungUmrechnung + ' + Me.cboWaehrungUmrechnung._allowedValuesFreiText = Nothing + Me.cboWaehrungUmrechnung._allowFreiText = False + Me.cboWaehrungUmrechnung._value = "" + Me.cboWaehrungUmrechnung.Enabled = False + Me.cboWaehrungUmrechnung.FormattingEnabled = True + Me.cboWaehrungUmrechnung.Location = New System.Drawing.Point(102, 413) + Me.cboWaehrungUmrechnung.Name = "cboWaehrungUmrechnung" + Me.cboWaehrungUmrechnung.Size = New System.Drawing.Size(47, 21) + Me.cboWaehrungUmrechnung.TabIndex = 17 + ' + 'txtkdNrEmpfaenger + ' + Me.txtkdNrEmpfaenger._DateTimeOnly = False + Me.txtkdNrEmpfaenger._numbersOnly = False + Me.txtkdNrEmpfaenger._numbersOnlyKommastellen = "" + Me.txtkdNrEmpfaenger._Prozent = False + Me.txtkdNrEmpfaenger._ShortDateNew = False + Me.txtkdNrEmpfaenger._ShortDateOnly = False + Me.txtkdNrEmpfaenger._TimeOnly = False + Me.txtkdNrEmpfaenger._value = Nothing + Me.txtkdNrEmpfaenger._Waehrung = False + Me.txtkdNrEmpfaenger._WaehrungZeichen = True + Me.txtkdNrEmpfaenger.BackColor = System.Drawing.Color.White + Me.txtkdNrEmpfaenger.ForeColor = System.Drawing.Color.Black + Me.txtkdNrEmpfaenger.Location = New System.Drawing.Point(8, 21) + Me.txtkdNrEmpfaenger.MaxLength = 35 + Me.txtkdNrEmpfaenger.MaxLineLength = -1 + Me.txtkdNrEmpfaenger.MaxLines_Warning = "" + Me.txtkdNrEmpfaenger.MaxLines_Warning_Label = Nothing + Me.txtkdNrEmpfaenger.Name = "txtkdNrEmpfaenger" + Me.txtkdNrEmpfaenger.ReadOnly = True + Me.txtkdNrEmpfaenger.Size = New System.Drawing.Size(94, 20) + Me.txtkdNrEmpfaenger.TabIndex = 1 + Me.txtkdNrEmpfaenger.TabStop = False + ' + 'txtEmpfeangerName2 + ' + Me.txtEmpfeangerName2._DateTimeOnly = False + Me.txtEmpfeangerName2._numbersOnly = False + Me.txtEmpfeangerName2._numbersOnlyKommastellen = "" + Me.txtEmpfeangerName2._Prozent = False + Me.txtEmpfeangerName2._ShortDateNew = False + Me.txtEmpfeangerName2._ShortDateOnly = False + Me.txtEmpfeangerName2._TimeOnly = False + Me.txtEmpfeangerName2._value = Nothing + Me.txtEmpfeangerName2._Waehrung = False + Me.txtEmpfeangerName2._WaehrungZeichen = True + Me.txtEmpfeangerName2.BackColor = System.Drawing.Color.White + Me.txtEmpfeangerName2.ForeColor = System.Drawing.Color.Black + Me.txtEmpfeangerName2.Location = New System.Drawing.Point(101, 40) + Me.txtEmpfeangerName2.MaxLength = 35 + Me.txtEmpfeangerName2.MaxLineLength = -1 + Me.txtEmpfeangerName2.MaxLines_Warning = "" + Me.txtEmpfeangerName2.MaxLines_Warning_Label = Nothing + Me.txtEmpfeangerName2.Name = "txtEmpfeangerName2" + Me.txtEmpfeangerName2.Size = New System.Drawing.Size(305, 20) + Me.txtEmpfeangerName2.TabIndex = 4 + Me.txtEmpfeangerName2.TabStop = False + ' + 'txtEmpfaengerOrt + ' + Me.txtEmpfaengerOrt._DateTimeOnly = False + Me.txtEmpfaengerOrt._numbersOnly = False + Me.txtEmpfaengerOrt._numbersOnlyKommastellen = "" + Me.txtEmpfaengerOrt._Prozent = False + Me.txtEmpfaengerOrt._ShortDateNew = False + Me.txtEmpfaengerOrt._ShortDateOnly = False + Me.txtEmpfaengerOrt._TimeOnly = False + Me.txtEmpfaengerOrt._value = Nothing + Me.txtEmpfaengerOrt._Waehrung = False + Me.txtEmpfaengerOrt._WaehrungZeichen = True + Me.txtEmpfaengerOrt.BackColor = System.Drawing.Color.White + Me.txtEmpfaengerOrt.ForeColor = System.Drawing.Color.Black + Me.txtEmpfaengerOrt.Location = New System.Drawing.Point(101, 78) + Me.txtEmpfaengerOrt.MaxLength = 35 + Me.txtEmpfaengerOrt.MaxLineLength = -1 + Me.txtEmpfaengerOrt.MaxLines_Warning = "" + Me.txtEmpfaengerOrt.MaxLines_Warning_Label = Nothing + Me.txtEmpfaengerOrt.Name = "txtEmpfaengerOrt" + Me.txtEmpfaengerOrt.Size = New System.Drawing.Size(305, 20) + Me.txtEmpfaengerOrt.TabIndex = 7 + Me.txtEmpfaengerOrt.TabStop = False + ' + 'txtEmpfaengerStrasse + ' + Me.txtEmpfaengerStrasse._DateTimeOnly = False + Me.txtEmpfaengerStrasse._numbersOnly = False + Me.txtEmpfaengerStrasse._numbersOnlyKommastellen = "" + Me.txtEmpfaengerStrasse._Prozent = False + Me.txtEmpfaengerStrasse._ShortDateNew = False + Me.txtEmpfaengerStrasse._ShortDateOnly = False + Me.txtEmpfaengerStrasse._TimeOnly = False + Me.txtEmpfaengerStrasse._value = Nothing + Me.txtEmpfaengerStrasse._Waehrung = False + Me.txtEmpfaengerStrasse._WaehrungZeichen = True + Me.txtEmpfaengerStrasse.BackColor = System.Drawing.Color.White + Me.txtEmpfaengerStrasse.ForeColor = System.Drawing.Color.Black + Me.txtEmpfaengerStrasse.Location = New System.Drawing.Point(101, 59) + Me.txtEmpfaengerStrasse.MaxLength = 35 + Me.txtEmpfaengerStrasse.MaxLineLength = -1 + Me.txtEmpfaengerStrasse.MaxLines_Warning = "" + Me.txtEmpfaengerStrasse.MaxLines_Warning_Label = Nothing + Me.txtEmpfaengerStrasse.Name = "txtEmpfaengerStrasse" + Me.txtEmpfaengerStrasse.Size = New System.Drawing.Size(305, 20) + Me.txtEmpfaengerStrasse.TabIndex = 6 + Me.txtEmpfaengerStrasse.TabStop = False + ' + 'kdFirmaEmpfaenger + ' + Me.kdFirmaEmpfaenger._AlleFirmenCLUSTER = False + Me.kdFirmaEmpfaenger._AllowSetValue = True + Me.kdFirmaEmpfaenger._autoSizeGross = False + Me.kdFirmaEmpfaenger._display_Name1 = True + Me.kdFirmaEmpfaenger._displayAVISO_Email = False + Me.kdFirmaEmpfaenger._displayFullName = False + Me.kdFirmaEmpfaenger._displayWoelflKd = False + Me.kdFirmaEmpfaenger._hideIfListEmpty = True + Me.kdFirmaEmpfaenger._loadKdData = True + Me.kdFirmaEmpfaenger._UseFIRMA = "" + Me.kdFirmaEmpfaenger._ValueKdAndName = False + Me.kdFirmaEmpfaenger.BackColor = System.Drawing.Color.White + Me.kdFirmaEmpfaenger.dgvpos = "LEFT" + Me.kdFirmaEmpfaenger.KdName = Nothing + Me.kdFirmaEmpfaenger.KdNr = "-1" + Me.kdFirmaEmpfaenger.kdNrField = Nothing + Me.kdFirmaEmpfaenger.KdNrNullInt = Nothing + Me.kdFirmaEmpfaenger.Location = New System.Drawing.Point(101, 21) + Me.kdFirmaEmpfaenger.MaxLength = 35 + Me.kdFirmaEmpfaenger.Name = "kdFirmaEmpfaenger" + Me.kdFirmaEmpfaenger.nurAktive = True + Me.kdFirmaEmpfaenger.searchActive = True + Me.kdFirmaEmpfaenger.Size = New System.Drawing.Size(283, 20) + Me.kdFirmaEmpfaenger.TabIndex = 3 + Me.kdFirmaEmpfaenger.TabStop = False + Me.kdFirmaEmpfaenger.TIMER_SEARCH = True + Me.kdFirmaEmpfaenger.usrcntl = Nothing + ' + 'FlatButton2 + ' + Me.FlatButton2.allowBorder = False + Me.FlatButton2.FlatAppearance.BorderSize = 0 + Me.FlatButton2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.FlatButton2.ForeColor = System.Drawing.Color.Black + Me.FlatButton2.Image = Global.SDL.My.Resources.Resources.personInaktiv + Me.FlatButton2.Location = New System.Drawing.Point(382, 16) + Me.FlatButton2.Name = "FlatButton2" + Me.FlatButton2.Size = New System.Drawing.Size(24, 25) + Me.FlatButton2.TabIndex = 2 + Me.FlatButton2.TabStop = False + Me.FlatButton2.UseVisualStyleBackColor = True + ' 'txtSteuersatz ' Me.txtSteuersatz._DateTimeOnly = False @@ -3181,7 +3139,7 @@ Partial Class usrCntlFaktAbrechnung Me.txtSteuerFreierBetrag._ShortDateNew = False Me.txtSteuerFreierBetrag._ShortDateOnly = False Me.txtSteuerFreierBetrag._TimeOnly = False - Me.txtSteuerFreierBetrag._value = Nothing + Me.txtSteuerFreierBetrag._value = "" Me.txtSteuerFreierBetrag._Waehrung = True Me.txtSteuerFreierBetrag._WaehrungZeichen = True Me.txtSteuerFreierBetrag.ForeColor = System.Drawing.Color.Black @@ -3195,26 +3153,6 @@ Partial Class usrCntlFaktAbrechnung Me.txtSteuerFreierBetrag.Size = New System.Drawing.Size(147, 20) Me.txtSteuerFreierBetrag.TabIndex = 10 ' - 'Label37 - ' - Me.Label37.AutoSize = True - Me.Label37.Location = New System.Drawing.Point(390, 94) - Me.Label37.Name = "Label37" - Me.Label37.Size = New System.Drawing.Size(98, 13) - Me.Label37.TabIndex = 9 - Me.Label37.Text = "Steuerfreier Betrag:" - Me.Label37.TextAlign = System.Drawing.ContentAlignment.TopRight - ' - 'Label36 - ' - Me.Label36.AutoSize = True - Me.Label36.Location = New System.Drawing.Point(390, 77) - Me.Label36.Name = "Label36" - Me.Label36.Size = New System.Drawing.Size(75, 13) - Me.Label36.TabIndex = 7 - Me.Label36.Text = "Steuer-Betrag:" - Me.Label36.TextAlign = System.Drawing.ContentAlignment.TopRight - ' 'txtGesamtsumme ' Me.txtGesamtsumme._DateTimeOnly = False @@ -3224,7 +3162,7 @@ Partial Class usrCntlFaktAbrechnung Me.txtGesamtsumme._ShortDateNew = False Me.txtGesamtsumme._ShortDateOnly = False Me.txtGesamtsumme._TimeOnly = False - Me.txtGesamtsumme._value = Nothing + Me.txtGesamtsumme._value = "" Me.txtGesamtsumme._Waehrung = True Me.txtGesamtsumme._WaehrungZeichen = True Me.txtGesamtsumme.ForeColor = System.Drawing.Color.Black @@ -3270,7 +3208,7 @@ Partial Class usrCntlFaktAbrechnung Me.txtSteuerpflichtigerBetrag._ShortDateNew = False Me.txtSteuerpflichtigerBetrag._ShortDateOnly = False Me.txtSteuerpflichtigerBetrag._TimeOnly = False - Me.txtSteuerpflichtigerBetrag._value = Nothing + Me.txtSteuerpflichtigerBetrag._value = "" Me.txtSteuerpflichtigerBetrag._Waehrung = True Me.txtSteuerpflichtigerBetrag._WaehrungZeichen = True Me.txtSteuerpflichtigerBetrag.ForeColor = System.Drawing.Color.Black @@ -3284,37 +3222,6 @@ Partial Class usrCntlFaktAbrechnung Me.txtSteuerpflichtigerBetrag.Size = New System.Drawing.Size(147, 20) Me.txtSteuerpflichtigerBetrag.TabIndex = 6 ' - 'Label33 - ' - Me.Label33.AutoSize = True - Me.Label33.Location = New System.Drawing.Point(390, 59) - Me.Label33.Name = "Label33" - Me.Label33.Size = New System.Drawing.Size(120, 13) - Me.Label33.TabIndex = 5 - Me.Label33.Text = "Steuerpflichtiger Betrag:" - Me.Label33.TextAlign = System.Drawing.ContentAlignment.TopRight - ' - 'Label35 - ' - Me.Label35.AutoSize = True - Me.Label35.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label35.Location = New System.Drawing.Point(390, 117) - Me.Label35.Name = "Label35" - Me.Label35.Size = New System.Drawing.Size(91, 13) - Me.Label35.TabIndex = 11 - Me.Label35.Text = "Gesamtsumme:" - Me.Label35.TextAlign = System.Drawing.ContentAlignment.TopRight - ' - 'Label28 - ' - Me.Label28.AutoSize = True - Me.Label28.Location = New System.Drawing.Point(6, 23) - Me.Label28.Name = "Label28" - Me.Label28.Size = New System.Drawing.Size(157, 13) - Me.Label28.TabIndex = 0 - Me.Label28.Text = "Besonderheiten für Verrechung:" - Me.Label28.TextAlign = System.Drawing.ContentAlignment.TopRight - ' 'txtBesonderheiten ' Me.txtBesonderheiten.Location = New System.Drawing.Point(9, 37) @@ -3326,9 +3233,102 @@ Partial Class usrCntlFaktAbrechnung Me.txtBesonderheiten.TabIndex = 1 Me.txtBesonderheiten.Text = "" ' - 'Timer + 'cboRgGS ' - Me.Timer.Interval = 6000 + Me.cboRgGS._allowedValuesFreiText = Nothing + Me.cboRgGS._allowFreiText = False + Me.cboRgGS._value = "" + Me.cboRgGS.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.cboRgGS.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboRgGS.Font = New System.Drawing.Font("Microsoft Sans Serif", 16.0!, System.Drawing.FontStyle.Bold) + Me.cboRgGS.ForeColor = System.Drawing.Color.White + Me.cboRgGS.FormattingEnabled = True + Me.cboRgGS.Items.AddRange(New Object() {"Rechnung", "Gutschrift"}) + Me.cboRgGS.Location = New System.Drawing.Point(3, -1) + Me.cboRgGS.Name = "cboRgGS" + Me.cboRgGS.Size = New System.Drawing.Size(211, 33) + Me.cboRgGS.TabIndex = 26 + Me.cboRgGS.Text = "Rechnung" + ' + 'cboSpedBuchUnterNr + ' + Me.cboSpedBuchUnterNr._allowedValuesFreiText = Nothing + Me.cboSpedBuchUnterNr._allowFreiText = False + Me.cboSpedBuchUnterNr._value = "" + Me.cboSpedBuchUnterNr.DropDownWidth = 350 + Me.cboSpedBuchUnterNr.FormattingEnabled = True + Me.cboSpedBuchUnterNr.Location = New System.Drawing.Point(255, 48) + Me.cboSpedBuchUnterNr.Margin = New System.Windows.Forms.Padding(2) + Me.cboSpedBuchUnterNr.Name = "cboSpedBuchUnterNr" + Me.cboSpedBuchUnterNr.Size = New System.Drawing.Size(71, 21) + Me.cboSpedBuchUnterNr.TabIndex = 5 + ' + 'txtUnterNr + ' + Me.txtUnterNr._DateTimeOnly = False + Me.txtUnterNr._numbersOnly = False + Me.txtUnterNr._numbersOnlyKommastellen = "" + Me.txtUnterNr._Prozent = False + Me.txtUnterNr._ShortDateNew = False + Me.txtUnterNr._ShortDateOnly = False + Me.txtUnterNr._TimeOnly = False + Me.txtUnterNr._value = Nothing + Me.txtUnterNr._Waehrung = False + Me.txtUnterNr._WaehrungZeichen = True + Me.txtUnterNr.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!) + Me.txtUnterNr.Location = New System.Drawing.Point(417, 48) + Me.txtUnterNr.MaxLineLength = -1 + Me.txtUnterNr.MaxLines_Warning = "" + Me.txtUnterNr.MaxLines_Warning_Label = Nothing + Me.txtUnterNr.Name = "txtUnterNr" + Me.txtUnterNr.ReadOnly = True + Me.txtUnterNr.Size = New System.Drawing.Size(55, 21) + Me.txtUnterNr.TabIndex = 7 + ' + 'cboFiliale + ' + Me.cboFiliale._allowedValuesFreiText = Nothing + Me.cboFiliale._allowFreiText = False + Me.cboFiliale._value = "" + Me.cboFiliale.DropDownWidth = 280 + Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboFiliale.FormattingEnabled = True + Me.cboFiliale.Location = New System.Drawing.Point(8, 48) + Me.cboFiliale.Name = "cboFiliale" + Me.cboFiliale.Size = New System.Drawing.Size(80, 21) + Me.cboFiliale.TabIndex = 3 + ' + 'txtAbfertigungsnummer + ' + Me.txtAbfertigungsnummer._DateTimeOnly = False + Me.txtAbfertigungsnummer._numbersOnly = True + Me.txtAbfertigungsnummer._numbersOnlyKommastellen = "" + Me.txtAbfertigungsnummer._Prozent = False + Me.txtAbfertigungsnummer._ShortDateNew = False + Me.txtAbfertigungsnummer._ShortDateOnly = False + Me.txtAbfertigungsnummer._TimeOnly = False + Me.txtAbfertigungsnummer._value = "" + Me.txtAbfertigungsnummer._Waehrung = False + Me.txtAbfertigungsnummer._WaehrungZeichen = True + Me.txtAbfertigungsnummer.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!) + Me.txtAbfertigungsnummer.Location = New System.Drawing.Point(87, 48) + Me.txtAbfertigungsnummer.MaxLength = 8 + Me.txtAbfertigungsnummer.MaxLineLength = -1 + Me.txtAbfertigungsnummer.MaxLines_Warning = "" + Me.txtAbfertigungsnummer.MaxLines_Warning_Label = Nothing + Me.txtAbfertigungsnummer.Name = "txtAbfertigungsnummer" + Me.txtAbfertigungsnummer.Size = New System.Drawing.Size(169, 21) + Me.txtAbfertigungsnummer.TabIndex = 4 + ' + 'rtbAbf_Besonderheiten + ' + Me.rtbAbf_Besonderheiten.BackColor = System.Drawing.Color.White + Me.rtbAbf_Besonderheiten.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.rtbAbf_Besonderheiten.Location = New System.Drawing.Point(10, 39) + Me.rtbAbf_Besonderheiten.Name = "rtbAbf_Besonderheiten" + Me.rtbAbf_Besonderheiten.Size = New System.Drawing.Size(107, 52) + Me.rtbAbf_Besonderheiten.TabIndex = 235 + Me.rtbAbf_Besonderheiten.Visible = False ' 'usrCntlFaktAbrechnung ' @@ -3361,9 +3361,7 @@ Partial Class usrCntlFaktAbrechnung Me.pnlAbsender.PerformLayout() Me.Panel7.ResumeLayout(False) Me.Panel7.PerformLayout() - CType(Me.dgvRechnungenPositionen, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.dgvOffertenSperrliste, System.ComponentModel.ISupportInitialize).EndInit() - CType(Me.dgvOfferteDetailsUebersicht, System.ComponentModel.ISupportInitialize).EndInit() Me.pnlEmpfaenger.ResumeLayout(False) Me.pnlEmpfaenger.PerformLayout() Me.pnl.ResumeLayout(False) @@ -3372,6 +3370,8 @@ Partial Class usrCntlFaktAbrechnung Me.pnlDocs.PerformLayout() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.dgvRechnungenPositionen, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.dgvOfferteDetailsUebersicht, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub diff --git a/SDL/Fakturierung/usrCntlFaktAbrechnung.vb b/SDL/Fakturierung/usrCntlFaktAbrechnung.vb index c38b08e0..5284f471 100644 --- a/SDL/Fakturierung/usrCntlFaktAbrechnung.vb +++ b/SDL/Fakturierung/usrCntlFaktAbrechnung.vb @@ -263,8 +263,8 @@ Public Class usrCntlFaktAbrechnung cboWaehrung.changeItem(If(RECHNUNG.WährungsNr, 900)) cboWaehrungUmrechnung.changeItem(If(RECHNUNG.Währungscode, "EUR")) txtSendungsdaten.Text = If(RECHNUNG.Packstücke_und_Warenbezeichnung, "") + txtGrenze.Text = If(RECHNUNG.Grenze, "") - ' txtGrenze.Text = If(RECHNUNG.ste, "") txtVermerk.Text = If(RECHNUNG.Vermerk, "") 'txtRohmasse.Text = If(RECHNUNG.ro, "") txtBefoerderungsmittel.Text = If(RECHNUNG.LKW_Kennzeichen, "") @@ -1133,12 +1133,13 @@ Public Class usrCntlFaktAbrechnung txtSteuerpflichtigerBetrag._value = steuerPflichtigerBetrag * vorzeichen txtSteuerBetrag._value = steuerBetrag * vorzeichen txtGesamtsumme._value = (steuerFreierBetrag + steuerPflichtigerBetrag + steuerBetrag) * vorzeichen + ' txtSteuerFreierBetrag._value = steuerFreierBetrag ' txtSteuerpflichtigerBetrag._value = steuerPflichtigerBetrag ' RECHNUNG.SteuerpflichtigerGesamtbetrag = steuerPflichtigerBetrag ' RECHNUNG.SteuerfreierGesamtbetrag = steuerFreierBetrag - + txtText.Text = cFakturierung.przRechnungstext(RECHNUNG) 'Das war vorher unter przBerechneRAPos ' przBerechneRAPos("") @@ -1249,6 +1250,7 @@ Public Class usrCntlFaktAbrechnung RECHNUNG.POSITIONEN.RemoveAll(Function(p) p.Anzahl = 0 Or p.Preis = 0) initDGVRechnungenPositionen() + 'loaded = True loaded = loadedTmp @@ -1408,6 +1410,25 @@ Public Class usrCntlFaktAbrechnung 'RECHNUNG.EMailRechnungstext = SPEDBUCH.XXXXXXXX RECHNUNG.AvisoID = SPEDBUCH.AvisoID + If SPEDBUCH.Grenzstelle IsNot Nothing Then + If SPEDBUCH.Grenzstelle.Replace("???", "") = "" Then + If RECHNUNG.AvisoID IsNot Nothing Then + Dim Zollstelle = SQL.DLookup("Zollstelle", "AVISO", "AvisoID='" & SPEDBUCH.AvisoID & "'", "AVISO") + RECHNUNG.Grenze = SQL.getValueTxtBySql("SELECT [basncd_name] FROM basncd WHERE basncd_dstnr='" & If(Zollstelle, "") & "' ", "ATLAS") + End If + Else + Select Case SPEDBUCH.Grenzstelle + Case "SUB" : RECHNUNG.Grenze = "Suben" + Case "WAI" : RECHNUNG.Grenze = "Waidhaus" + Case "SBG" : RECHNUNG.Grenze = "Bad Reichenhall" + Case "NKD" : RECHNUNG.Grenze = "Nickelsdorf" + Case "SFD" : RECHNUNG.Grenze = "Spielfeld" + End Select + End If + End If + If RECHNUNG.Grenze = String.Empty Then RECHNUNG.Grenze = SQL.getValueTxtBySql("SELECT TOP 1 isnull([Grenzstelle],'') FROM [Filialen] where FilialenNr='" & RECHNUNG.FilialenNr & "'", "FMZOLL") + + If SPEDBUCH.SendungID IsNot Nothing AndAlso IsNumeric(SPEDBUCH.SendungID) AndAlso SPEDBUCH.SendungID > 0 Then Dim SND As New VERAG_PROG_ALLGEMEIN.cSendungen(SPEDBUCH.SendungID) SND.LOAD_HANDLING() @@ -1677,6 +1698,7 @@ Public Class usrCntlFaktAbrechnung ' If RECHNUNG.Umrechnungskurs Is Nothing Then RECHNUNG.Umrechnungskurs = 1 RECHNUNG.Packstücke_und_Warenbezeichnung = cProgramFunctions.isLeerNothing(txtSendungsdaten.Text) '!!!! + RECHNUNG.Grenze = cProgramFunctions.isLeerNothing(txtGrenze.Text) '!!!! RECHNUNG.Vermerk = txtVermerk.Text RECHNUNG.Anlage_1 = cProgramFunctions.isLeerNothing(cboAnlage1.Text) '!!!! RECHNUNG.Anlage_2 = cProgramFunctions.isLeerNothing(cboAnlage2.Text) '!!!! @@ -1820,10 +1842,10 @@ Public Class usrCntlFaktAbrechnung + ' initDGVRechnungenPositionen() - - txtText.Text = cFakturierung.przRechnungstext(RECHNUNG) ', zahlbar, MyRichTextBox2.Text) + 'txtText.Text = cFakturierung.przRechnungstext(RECHNUNG) ', zahlbar, MyRichTextBox2.Text) ' przRechnungstext() 'initDGVRechnungenPositionen() ?????????????? diff --git a/SDL/My Project/Resources.Designer.vb b/SDL/My Project/Resources.Designer.vb index e84b1988..ae8bfcff 100644 --- a/SDL/My Project/Resources.Designer.vb +++ b/SDL/My Project/Resources.Designer.vb @@ -1683,15 +1683,6 @@ Namespace My.Resources End Get End Property - ''' - ''' Sucht eine lokalisierte Zeichenfolge, die ähnelt. - ''' - Friend ReadOnly Property sdfs3sdfsdfsdf() As String - Get - Return ResourceManager.GetString("sdfs3sdfsdfsdf", resourceCulture) - End Get - End Property - ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -2211,7 +2202,7 @@ Namespace My.Resources End Property ''' - ''' Sucht eine lokalisierte Zeichenfolge, die 1.1.8.3 ähnelt. + ''' Sucht eine lokalisierte Zeichenfolge, die 1.1.8.4 ähnelt. ''' Friend ReadOnly Property Version() As String Get diff --git a/SDL/My Project/Resources.resx b/SDL/My Project/Resources.resx index c647615b..4cb7c16d 100644 --- a/SDL/My Project/Resources.resx +++ b/SDL/My Project/Resources.resx @@ -638,7 +638,7 @@ ..\Resources\email.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - 1.1.8.3 + 1.1.8.4 ..\Resources\axxes.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -799,7 +799,4 @@ ..\Resources\Unisped_ZS_logo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - - \ No newline at end of file diff --git a/SDL/Reports/Zoll/subrptKontrolleLKW_NCTSTR_Abrechnung.vb b/SDL/Reports/Zoll/subrptKontrolleLKW_NCTSTR_Abrechnung.vb index 56cbb44c..92513ce2 100644 --- a/SDL/Reports/Zoll/subrptKontrolleLKW_NCTSTR_Abrechnung.vb +++ b/SDL/Reports/Zoll/subrptKontrolleLKW_NCTSTR_Abrechnung.vb @@ -54,7 +54,6 @@ Public Class subrptKontrolleLKW_NCTSTR_Abrechnung End Select - GesSumme += "€ " & CDbl(Fields.Item("GESAMTBETRAG").Value) AnzT += 1 diff --git a/SDL/kunden/frmKundenblatt.Designer.vb b/SDL/kunden/frmKundenblatt.Designer.vb index e714a327..c8e90b10 100644 --- a/SDL/kunden/frmKundenblatt.Designer.vb +++ b/SDL/kunden/frmKundenblatt.Designer.vb @@ -1817,6 +1817,7 @@ Partial Class frmKundenblatt ' Me.cntxtCntxtMDM.ImageScalingSize = New System.Drawing.Size(24, 24) Me.cntxtCntxtMDM.Name = "cntxtCntxtMDM" + Me.cntxtCntxtMDM.OwnerItem = Me.ToolStripMenuItem4 Me.cntxtCntxtMDM.Size = New System.Drawing.Size(61, 4) Me.cntxtCntxtMDM.Text = "cntxtMDM" ' @@ -1904,6 +1905,7 @@ Partial Class frmKundenblatt Me.KdSearchBox1.searchActive = True Me.KdSearchBox1.Size = New System.Drawing.Size(1184, 34) Me.KdSearchBox1.TabIndex = 0 + Me.KdSearchBox1.TIMER_SEARCH = True Me.KdSearchBox1.usrcntl = Nothing ' 'tbiLeistungen diff --git a/SDL/kunden/frmLKW_AnhaengeDatenarchiv.Designer.vb b/SDL/kunden/frmLKW_AnhaengeDatenarchiv.Designer.vb index 20903ebc..dcf1a46c 100644 --- a/SDL/kunden/frmLKW_AnhaengeDatenarchiv.Designer.vb +++ b/SDL/kunden/frmLKW_AnhaengeDatenarchiv.Designer.vb @@ -29,10 +29,13 @@ Partial Class frmLKW_AnhaengeDatenarchiv Me.clmnZulassung_docID = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.clmnCEMT_docID = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.clmnLeasing_docID = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.clmnMiete_docID = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.clmnZulassung = New System.Windows.Forms.DataGridViewCheckBoxColumn() Me.clmnCEMT = New System.Windows.Forms.DataGridViewCheckBoxColumn() Me.clmnLeasing = New System.Windows.Forms.DataGridViewCheckBoxColumn() + Me.Column1 = New System.Windows.Forms.DataGridViewCheckBoxColumn() Me.MyPanel1 = New VERAG_PROG_ALLGEMEIN.MyPanel(Me.components) + Me.cbxMiete = New System.Windows.Forms.CheckBox() Me.cbxLeasing = New System.Windows.Forms.CheckBox() Me.cbxCEMT = New System.Windows.Forms.CheckBox() Me.cbxZulassung = New System.Windows.Forms.CheckBox() @@ -53,11 +56,11 @@ Partial Class frmLKW_AnhaengeDatenarchiv Me.MyDatagridview1.AllowUserToResizeColumns = False Me.MyDatagridview1.AllowUserToResizeRows = False Me.MyDatagridview1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize - Me.MyDatagridview1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnLKW, Me.clmnZulassung_docID, Me.clmnCEMT_docID, Me.clmnLeasing_docID, Me.clmnZulassung, Me.clmnCEMT, Me.clmnLeasing}) + Me.MyDatagridview1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnLKW, Me.clmnZulassung_docID, Me.clmnCEMT_docID, Me.clmnLeasing_docID, Me.clmnMiete_docID, Me.clmnZulassung, Me.clmnCEMT, Me.clmnLeasing, Me.Column1}) Me.MyDatagridview1.Location = New System.Drawing.Point(13, 36) Me.MyDatagridview1.Name = "MyDatagridview1" Me.MyDatagridview1.ReadOnly = True - Me.MyDatagridview1.Size = New System.Drawing.Size(495, 383) + Me.MyDatagridview1.Size = New System.Drawing.Size(555, 383) Me.MyDatagridview1.TabIndex = 0 ' 'clmnLKW @@ -88,6 +91,13 @@ Partial Class frmLKW_AnhaengeDatenarchiv Me.clmnLeasing_docID.ReadOnly = True Me.clmnLeasing_docID.Visible = False ' + 'clmnMiete_docID + ' + Me.clmnMiete_docID.HeaderText = "Column2" + Me.clmnMiete_docID.Name = "clmnMiete_docID" + Me.clmnMiete_docID.ReadOnly = True + Me.clmnMiete_docID.Visible = False + ' 'clmnZulassung ' Me.clmnZulassung.HeaderText = "Zulassung" @@ -111,17 +121,36 @@ Partial Class frmLKW_AnhaengeDatenarchiv Me.clmnLeasing.ReadOnly = True Me.clmnLeasing.Width = 60 ' + 'Column1 + ' + Me.Column1.HeaderText = "Miete" + Me.Column1.Name = "Column1" + Me.Column1.ReadOnly = True + Me.Column1.Resizable = System.Windows.Forms.DataGridViewTriState.[True] + Me.Column1.SortMode = System.Windows.Forms.DataGridViewColumnSortMode.Automatic + Me.Column1.Width = 60 + ' 'MyPanel1 ' + Me.MyPanel1.Controls.Add(Me.cbxMiete) Me.MyPanel1.Controls.Add(Me.cbxLeasing) Me.MyPanel1.Controls.Add(Me.cbxCEMT) Me.MyPanel1.Controls.Add(Me.cbxZulassung) Me.MyPanel1.Controls.Add(Me.cbx) Me.MyPanel1.Location = New System.Drawing.Point(13, 12) Me.MyPanel1.Name = "MyPanel1" - Me.MyPanel1.Size = New System.Drawing.Size(495, 26) + Me.MyPanel1.Size = New System.Drawing.Size(555, 26) Me.MyPanel1.TabIndex = 1 ' + 'cbxMiete + ' + Me.cbxMiete.AutoSize = True + Me.cbxMiete.Location = New System.Drawing.Point(515, 4) + Me.cbxMiete.Name = "cbxMiete" + Me.cbxMiete.Size = New System.Drawing.Size(15, 14) + Me.cbxMiete.TabIndex = 4 + Me.cbxMiete.UseVisualStyleBackColor = True + ' 'cbxLeasing ' Me.cbxLeasing.AutoSize = True @@ -210,7 +239,7 @@ Partial Class frmLKW_AnhaengeDatenarchiv Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.White - Me.ClientSize = New System.Drawing.Size(520, 503) + Me.ClientSize = New System.Drawing.Size(582, 503) Me.Controls.Add(Me.Button2) Me.Controls.Add(Me.CheckBox4) Me.Controls.Add(Me.Button1) @@ -236,13 +265,16 @@ Partial Class frmLKW_AnhaengeDatenarchiv Friend WithEvents cbxZulassung As CheckBox Friend WithEvents Button3 As Button Friend WithEvents Button1 As Button + Friend WithEvents CheckBox4 As CheckBox + Friend WithEvents Button2 As Button + Friend WithEvents cbxMiete As CheckBox Friend WithEvents clmnLKW As DataGridViewTextBoxColumn Friend WithEvents clmnZulassung_docID As DataGridViewTextBoxColumn Friend WithEvents clmnCEMT_docID As DataGridViewTextBoxColumn Friend WithEvents clmnLeasing_docID As DataGridViewTextBoxColumn + Friend WithEvents clmnMiete_docID As DataGridViewTextBoxColumn Friend WithEvents clmnZulassung As DataGridViewCheckBoxColumn Friend WithEvents clmnCEMT As DataGridViewCheckBoxColumn Friend WithEvents clmnLeasing As DataGridViewCheckBoxColumn - Friend WithEvents CheckBox4 As CheckBox - Friend WithEvents Button2 As Button + Friend WithEvents Column1 As DataGridViewCheckBoxColumn End Class diff --git a/SDL/kunden/frmLKW_AnhaengeDatenarchiv.resx b/SDL/kunden/frmLKW_AnhaengeDatenarchiv.resx index f4f5c64f..d65f1ec0 100644 --- a/SDL/kunden/frmLKW_AnhaengeDatenarchiv.resx +++ b/SDL/kunden/frmLKW_AnhaengeDatenarchiv.resx @@ -129,6 +129,9 @@ True + + True + True @@ -138,6 +141,9 @@ True + + True + diff --git a/SDL/kunden/frmLKW_AnhaengeDatenarchiv.vb b/SDL/kunden/frmLKW_AnhaengeDatenarchiv.vb index 95af0856..d118fb6f 100644 --- a/SDL/kunden/frmLKW_AnhaengeDatenarchiv.vb +++ b/SDL/kunden/frmLKW_AnhaengeDatenarchiv.vb @@ -56,15 +56,17 @@ Public Class frmLKW_AnhaengeDatenarchiv Dim Zulassungsschein = "" Dim CEMT = "" Dim Leasing = "" + Dim Miete = "" For Each r In dt.Rows If r("coll_pfad") IsNot DBNull.Value AndAlso r("coll_pfad") <> "" Then If r("da_name") = "Zulassungsschein" Then Zulassungsschein = r("coll_pfad") If r("da_name") = "CEMT" Then CEMT = r("coll_pfad") If r("da_name") = "Leasing-Vertrag" Then Leasing = r("coll_pfad") + If r("da_name") = "Miet-Vertrag" Then Miete = r("coll_pfad") End If Next - MyDatagridview1.Rows.Add(l, Zulassungsschein, CEMT, Leasing, (Zulassungsschein <> ""), (CEMT <> ""), (Leasing <> "")) + MyDatagridview1.Rows.Add(l, Zulassungsschein, CEMT, Leasing, Miete, (Zulassungsschein <> ""), (CEMT <> ""), (Leasing <> ""), (Miete <> "")) Next Catch ex As Exception MsgBox(ex.Message & ex.StackTrace) @@ -98,6 +100,7 @@ Public Class frmLKW_AnhaengeDatenarchiv If cbxZulassung.Checked Then If r.Cells("clmnZulassung_docID").Value <> "" Then myList.Add(copyFileToTMP(r.Cells("clmnZulassung_docID").Value, r.Cells("clmnLKW").Value, "Zulassung", zielPfad)) ' If cbxCEMT.Checked Then If r.Cells("clmnCEMT_docID").Value <> "" Then myList.Add(copyFileToTMP(r.Cells("clmnCEMT_docID").Value, r.Cells("clmnLKW").Value, "CEMT", zielPfad)) 'r.Cells("clmnCEMT_docID").Value) If cbxLeasing.Checked Then If r.Cells("clmnLeasing_docID").Value <> "" Then myList.Add(copyFileToTMP(r.Cells("clmnLeasing_docID").Value, r.Cells("clmnLKW").Value, "Leasing", zielPfad)) 'r.Cells("clmnLeasing_docID").Value) + If cbxMiete.Checked Then If r.Cells("clmnMiete_docID").Value <> "" Then myList.Add(copyFileToTMP(r.Cells("clmnMiete_docID").Value, r.Cells("clmnLKW").Value, "Miete", zielPfad)) 'r.Cells("clmnLeasing_docID").Value) Next 'zusammenfassen If CheckBox4.Checked Then diff --git a/SDL/kunden/usrCntlKundenuebersicht.Designer.vb b/SDL/kunden/usrCntlKundenuebersicht.Designer.vb index f296dd80..47e70b77 100644 --- a/SDL/kunden/usrCntlKundenuebersicht.Designer.vb +++ b/SDL/kunden/usrCntlKundenuebersicht.Designer.vb @@ -37,7 +37,6 @@ Partial Class usrCntlKundenuebersicht Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.cntxtAddSdl = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.DToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - 'Me.CheckVatService1 = New SDL.eu.europa.ec.checkVatService() Me.btnExcel = New System.Windows.Forms.Button() Me.lblInaktiv = New System.Windows.Forms.Label() Me.Label30 = New System.Windows.Forms.Label() @@ -72,6 +71,10 @@ Partial Class usrCntlKundenuebersicht Me.lblKdNr = New System.Windows.Forms.TextBox() Me.Label13 = New System.Windows.Forms.Label() Me.grpAbfertigung = New System.Windows.Forms.GroupBox() + Me.txtVerzolltBei = New System.Windows.Forms.TextBox() + Me.Label15 = New System.Windows.Forms.Label() + Me.lblAviso = New System.Windows.Forms.TextBox() + Me.Label2 = New System.Windows.Forms.Label() Me.UsrCntlKundenBesonderheiten1 = New SDL.usrCntlKundenBesonderheiten() Me.rtbInfo = New System.Windows.Forms.RichTextBox() Me.lblAbfertigungsverbot = New System.Windows.Forms.Label() @@ -79,7 +82,7 @@ Partial Class usrCntlKundenuebersicht Me.txtSammelrechnung = New System.Windows.Forms.TextBox() Me.Label12 = New System.Windows.Forms.Label() Me.txtVorauskasse = New System.Windows.Forms.TextBox() - Me.Label42 = New System.Windows.Forms.Label() + Me.lblVorkasse = New System.Windows.Forms.Label() Me.pnlVERAGSnspr = New System.Windows.Forms.Panel() Me.txtKundenbetreuerTeam = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.btnVeragAnspr = New VERAG_PROG_ALLGEMEIN.FlatButton() @@ -97,18 +100,16 @@ Partial Class usrCntlKundenuebersicht Me.txtUmsatzJahr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label29 = New System.Windows.Forms.Label() Me.txtOffenePosten = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.Label28 = New System.Windows.Forms.Label() + Me.lblOffenePosten = New System.Windows.Forms.Label() Me.cbxFiskalabfertigung = New VERAG_PROG_ALLGEMEIN.MyCheckbox(Me.components) Me.lblFisk = New System.Windows.Forms.Label() Me.lblKreditlimit = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label1 = New System.Windows.Forms.Label() - Me.lblAviso = New System.Windows.Forms.TextBox() Me.txtAbf_ErsteAbfertigung = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.Label2 = New System.Windows.Forms.Label() Me.Label41 = New System.Windows.Forms.Label() Me.rtbAbf_Besonderheiten = New System.Windows.Forms.RichTextBox() Me.lblNeutralisierung = New System.Windows.Forms.TextBox() - Me.Label37 = New System.Windows.Forms.Label() + Me.lblBesonderheiten = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.lblNoGespr = New System.Windows.Forms.Label() Me.lklGanzerText = New System.Windows.Forms.LinkLabel() @@ -125,7 +126,7 @@ Partial Class usrCntlKundenuebersicht Me.Label46 = New System.Windows.Forms.Label() Me.grpAdresse = New System.Windows.Forms.GroupBox() Me.tbKontakt = New System.Windows.Forms.TabControl() - Me.TabPage10 = New System.Windows.Forms.TabPage() + Me.tbKontaktKontakt = New System.Windows.Forms.TabPage() Me.FlatButton1 = New VERAG_PROG_ALLGEMEIN.FlatButton() Me.PictureBox1 = New System.Windows.Forms.PictureBox() Me.lblAnsprechpartner = New System.Windows.Forms.TextBox() @@ -138,7 +139,7 @@ Partial Class usrCntlKundenuebersicht Me.lblTel = New System.Windows.Forms.TextBox() Me.PictureBox3 = New System.Windows.Forms.PictureBox() Me.PictureBox5 = New System.Windows.Forms.PictureBox() - Me.TabPage11 = New System.Windows.Forms.TabPage() + Me.tbKontaktSpez = New System.Windows.Forms.TabPage() Me.ucKundenKontakte = New SDL.usrCntlKundenKontakte() Me.Label38 = New System.Windows.Forms.Label() Me.txtDebitorennr = New System.Windows.Forms.TextBox() @@ -158,9 +159,9 @@ Partial Class usrCntlKundenuebersicht Me.Button3 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button() Me.tbcntrAllg = New System.Windows.Forms.TabControl() - Me.TabPage5 = New System.Windows.Forms.TabPage() + Me.tbVollmachten = New System.Windows.Forms.TabPage() Me.dgvVollmachten = New System.Windows.Forms.DataGridView() - Me.TabPage9 = New System.Windows.Forms.TabPage() + Me.tbGestellGarant = New System.Windows.Forms.TabPage() Me.dgvGestGarantie = New System.Windows.Forms.DataGridView() Me.Panel2 = New System.Windows.Forms.Panel() Me.cbxGG = New System.Windows.Forms.CheckBox() @@ -169,9 +170,9 @@ Partial Class usrCntlKundenuebersicht Me.Label11 = New System.Windows.Forms.Label() Me.Button8 = New System.Windows.Forms.Button() Me.Button9 = New System.Windows.Forms.Button() - Me.TabPage6 = New System.Windows.Forms.TabPage() + Me.tbAvisoMail = New System.Windows.Forms.TabPage() Me.UsrCntlKundenAvisoMailBenachrichtigung1 = New SDL.usrCntlKundenAvisoMailBenachrichtigung() - Me.TabPage7 = New System.Windows.Forms.TabPage() + Me.tbKdSpez = New System.Windows.Forms.TabPage() Me.Label14 = New System.Windows.Forms.Label() Me.txtInfoKdAtrNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label43 = New System.Windows.Forms.Label() @@ -182,7 +183,7 @@ Partial Class usrCntlKundenuebersicht Me.Label10 = New System.Windows.Forms.Label() Me.txtFixeKdAtrNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.FlatButton4 = New VERAG_PROG_ALLGEMEIN.FlatButton() - Me.TabPage2 = New System.Windows.Forms.TabPage() + Me.tbSonstiges = New System.Windows.Forms.TabPage() Me.Label6 = New System.Windows.Forms.Label() Me.lblSteuernummer = New System.Windows.Forms.TextBox() Me.lblAufZoll = New System.Windows.Forms.TextBox() @@ -192,10 +193,10 @@ Partial Class usrCntlKundenuebersicht Me.lblZnv = New System.Windows.Forms.TextBox() Me.Label7 = New System.Windows.Forms.Label() Me.btncheckliste = New VERAG_PROG_ALLGEMEIN.FlatButton() - Me.Label4 = New System.Windows.Forms.Label() + Me.lblUIDNr = New System.Windows.Forms.Label() Me.lblUid = New System.Windows.Forms.TextBox() Me.lblEORI = New System.Windows.Forms.TextBox() - Me.Label5 = New System.Windows.Forms.Label() + Me.lblEORINr = New System.Windows.Forms.Label() Me.dgvAufschub = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.KtoId = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.Art = New System.Windows.Forms.DataGridViewTextBoxColumn() @@ -214,8 +215,6 @@ Partial Class usrCntlKundenuebersicht Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem() Me.lblFirma = New System.Windows.Forms.Label() - Me.Label15 = New System.Windows.Forms.Label() - Me.txtVerzolltBei = New System.Windows.Forms.TextBox() Me.cntxtAddSdl.SuspendLayout() Me.tbWeitereKundenDetails.SuspendLayout() Me.TabPage4.SuspendLayout() @@ -236,23 +235,23 @@ Partial Class usrCntlKundenuebersicht Me.Panel4.SuspendLayout() Me.grpAdresse.SuspendLayout() Me.tbKontakt.SuspendLayout() - Me.TabPage10.SuspendLayout() + Me.tbKontaktKontakt.SuspendLayout() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit() - Me.TabPage11.SuspendLayout() + Me.tbKontaktSpez.SuspendLayout() Me.grpSonstiges.SuspendLayout() Me.tbcntrAllg.SuspendLayout() - Me.TabPage5.SuspendLayout() + Me.tbVollmachten.SuspendLayout() CType(Me.dgvVollmachten, System.ComponentModel.ISupportInitialize).BeginInit() - Me.TabPage9.SuspendLayout() + Me.tbGestellGarant.SuspendLayout() CType(Me.dgvGestGarantie, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel2.SuspendLayout() - Me.TabPage6.SuspendLayout() - Me.TabPage7.SuspendLayout() - Me.TabPage2.SuspendLayout() + Me.tbAvisoMail.SuspendLayout() + Me.tbKdSpez.SuspendLayout() + Me.tbSonstiges.SuspendLayout() CType(Me.dgvAufschub, System.ComponentModel.ISupportInitialize).BeginInit() Me.ContextMenuStrip1.SuspendLayout() Me.ContextMenuStrip3.SuspendLayout() @@ -271,12 +270,6 @@ Partial Class usrCntlKundenuebersicht Me.DToolStripMenuItem.Size = New System.Drawing.Size(81, 22) Me.DToolStripMenuItem.Text = "d" ' - 'CheckVatService1 - ' - 'Me.CheckVatService1.Credentials = Nothing - 'Me.CheckVatService1.Url = "http://ec.europa.eu/taxation_customs/vies/services/checkVatService" - 'Me.CheckVatService1.UseDefaultCredentials = False - ' 'btnExcel ' Me.btnExcel.BackgroundImage = Global.SDL.My.Resources.Resources.Excel_logo @@ -788,7 +781,7 @@ Partial Class usrCntlKundenuebersicht Me.grpAbfertigung.Controls.Add(Me.txtSammelrechnung) Me.grpAbfertigung.Controls.Add(Me.Label12) Me.grpAbfertigung.Controls.Add(Me.txtVorauskasse) - Me.grpAbfertigung.Controls.Add(Me.Label42) + Me.grpAbfertigung.Controls.Add(Me.lblVorkasse) Me.grpAbfertigung.Controls.Add(Me.pnlVERAGSnspr) Me.grpAbfertigung.Controls.Add(Me.btnPunkt2Save) Me.grpAbfertigung.Controls.Add(Me.Button7) @@ -801,7 +794,7 @@ Partial Class usrCntlKundenuebersicht Me.grpAbfertigung.Controls.Add(Me.txtUmsatzJahr) Me.grpAbfertigung.Controls.Add(Me.Label29) Me.grpAbfertigung.Controls.Add(Me.txtOffenePosten) - Me.grpAbfertigung.Controls.Add(Me.Label28) + Me.grpAbfertigung.Controls.Add(Me.lblOffenePosten) Me.grpAbfertigung.Controls.Add(Me.cbxFiskalabfertigung) Me.grpAbfertigung.Controls.Add(Me.lblFisk) Me.grpAbfertigung.Controls.Add(Me.lblKreditlimit) @@ -810,7 +803,7 @@ Partial Class usrCntlKundenuebersicht Me.grpAbfertigung.Controls.Add(Me.Label41) Me.grpAbfertigung.Controls.Add(Me.rtbAbf_Besonderheiten) Me.grpAbfertigung.Controls.Add(Me.lblNeutralisierung) - Me.grpAbfertigung.Controls.Add(Me.Label37) + Me.grpAbfertigung.Controls.Add(Me.lblBesonderheiten) Me.grpAbfertigung.Controls.Add(Me.Label3) Me.grpAbfertigung.Controls.Add(Me.lblNoGespr) Me.grpAbfertigung.Controls.Add(Me.lklGanzerText) @@ -823,6 +816,50 @@ Partial Class usrCntlKundenuebersicht Me.grpAbfertigung.TabStop = False Me.grpAbfertigung.Text = "Abfertigung" ' + 'txtVerzolltBei + ' + Me.txtVerzolltBei.BackColor = System.Drawing.Color.White + Me.txtVerzolltBei.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.txtVerzolltBei.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtVerzolltBei.ForeColor = System.Drawing.Color.Black + Me.txtVerzolltBei.Location = New System.Drawing.Point(358, 235) + Me.txtVerzolltBei.Name = "txtVerzolltBei" + Me.txtVerzolltBei.ReadOnly = True + Me.txtVerzolltBei.Size = New System.Drawing.Size(177, 13) + Me.txtVerzolltBei.TabIndex = 236 + ' + 'Label15 + ' + Me.Label15.AutoSize = True + Me.Label15.Location = New System.Drawing.Point(270, 235) + Me.Label15.Name = "Label15" + Me.Label15.Size = New System.Drawing.Size(61, 13) + Me.Label15.TabIndex = 235 + Me.Label15.Text = "Verzollt bei:" + ' + 'lblAviso + ' + Me.lblAviso.BackColor = System.Drawing.Color.White + Me.lblAviso.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.lblAviso.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblAviso.ForeColor = System.Drawing.Color.Black + Me.lblAviso.Location = New System.Drawing.Point(293, 176) + Me.lblAviso.Name = "lblAviso" + Me.lblAviso.ReadOnly = True + Me.lblAviso.Size = New System.Drawing.Size(127, 13) + Me.lblAviso.TabIndex = 185 + Me.lblAviso.Visible = False + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(205, 176) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(36, 13) + Me.Label2.TabIndex = 184 + Me.Label2.Text = "Aviso:" + Me.Label2.Visible = False + ' 'UsrCntlKundenBesonderheiten1 ' Me.UsrCntlKundenBesonderheiten1.BackColor = System.Drawing.Color.White @@ -905,15 +942,15 @@ Partial Class usrCntlKundenuebersicht Me.txtVorauskasse.TabIndex = 226 Me.txtVorauskasse.Visible = False ' - 'Label42 + 'lblVorkasse ' - Me.Label42.AutoSize = True - Me.Label42.Location = New System.Drawing.Point(270, 267) - Me.Label42.Name = "Label42" - Me.Label42.Size = New System.Drawing.Size(71, 13) - Me.Label42.TabIndex = 225 - Me.Label42.Text = "Vorauskasse:" - Me.Label42.Visible = False + Me.lblVorkasse.AutoSize = True + Me.lblVorkasse.Location = New System.Drawing.Point(270, 267) + Me.lblVorkasse.Name = "lblVorkasse" + Me.lblVorkasse.Size = New System.Drawing.Size(71, 13) + Me.lblVorkasse.TabIndex = 225 + Me.lblVorkasse.Text = "Vorauskasse:" + Me.lblVorkasse.Visible = False ' 'pnlVERAGSnspr ' @@ -1230,15 +1267,15 @@ Partial Class usrCntlKundenuebersicht Me.txtOffenePosten.TabIndex = 208 Me.txtOffenePosten.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' - 'Label28 + 'lblOffenePosten ' - 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(7, 293) - Me.Label28.Name = "Label28" - Me.Label28.Size = New System.Drawing.Size(78, 13) - Me.Label28.TabIndex = 207 - Me.Label28.Text = "Offene Posten:" + Me.lblOffenePosten.AutoSize = True + Me.lblOffenePosten.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblOffenePosten.Location = New System.Drawing.Point(7, 293) + Me.lblOffenePosten.Name = "lblOffenePosten" + Me.lblOffenePosten.Size = New System.Drawing.Size(78, 13) + Me.lblOffenePosten.TabIndex = 207 + Me.lblOffenePosten.Text = "Offene Posten:" ' 'cbxFiskalabfertigung ' @@ -1303,19 +1340,6 @@ Partial Class usrCntlKundenuebersicht Me.Label1.TabIndex = 189 Me.Label1.Text = "Kreditlimit:" ' - 'lblAviso - ' - Me.lblAviso.BackColor = System.Drawing.Color.White - Me.lblAviso.BorderStyle = System.Windows.Forms.BorderStyle.None - Me.lblAviso.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblAviso.ForeColor = System.Drawing.Color.Black - Me.lblAviso.Location = New System.Drawing.Point(293, 176) - Me.lblAviso.Name = "lblAviso" - Me.lblAviso.ReadOnly = True - Me.lblAviso.Size = New System.Drawing.Size(127, 13) - Me.lblAviso.TabIndex = 185 - Me.lblAviso.Visible = False - ' 'txtAbf_ErsteAbfertigung ' Me.txtAbf_ErsteAbfertigung._DateTimeOnly = False @@ -1343,16 +1367,6 @@ Partial Class usrCntlKundenuebersicht Me.txtAbf_ErsteAbfertigung.TabIndex = 38 Me.txtAbf_ErsteAbfertigung.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' - 'Label2 - ' - Me.Label2.AutoSize = True - Me.Label2.Location = New System.Drawing.Point(205, 176) - Me.Label2.Name = "Label2" - Me.Label2.Size = New System.Drawing.Size(36, 13) - Me.Label2.TabIndex = 184 - Me.Label2.Text = "Aviso:" - Me.Label2.Visible = False - ' 'Label41 ' Me.Label41.AutoSize = True @@ -1389,14 +1403,14 @@ Partial Class usrCntlKundenuebersicht Me.lblNeutralisierung.Size = New System.Drawing.Size(127, 13) Me.lblNeutralisierung.TabIndex = 183 ' - 'Label37 + 'lblBesonderheiten ' - Me.Label37.AutoSize = True - Me.Label37.Location = New System.Drawing.Point(7, 16) - Me.Label37.Name = "Label37" - Me.Label37.Size = New System.Drawing.Size(84, 13) - Me.Label37.TabIndex = 23 - Me.Label37.Text = "Besonderheiten:" + Me.lblBesonderheiten.AutoSize = True + Me.lblBesonderheiten.Location = New System.Drawing.Point(7, 16) + Me.lblBesonderheiten.Name = "lblBesonderheiten" + Me.lblBesonderheiten.Size = New System.Drawing.Size(84, 13) + Me.lblBesonderheiten.TabIndex = 23 + Me.lblBesonderheiten.Text = "Besonderheiten:" ' 'Label3 ' @@ -1644,34 +1658,34 @@ Partial Class usrCntlKundenuebersicht ' 'tbKontakt ' - Me.tbKontakt.Controls.Add(Me.TabPage10) - Me.tbKontakt.Controls.Add(Me.TabPage11) + Me.tbKontakt.Controls.Add(Me.tbKontaktKontakt) + Me.tbKontakt.Controls.Add(Me.tbKontaktSpez) Me.tbKontakt.Location = New System.Drawing.Point(6, 152) Me.tbKontakt.Name = "tbKontakt" Me.tbKontakt.SelectedIndex = 0 Me.tbKontakt.Size = New System.Drawing.Size(487, 190) Me.tbKontakt.TabIndex = 213 ' - 'TabPage10 + 'tbKontaktKontakt ' - Me.TabPage10.Controls.Add(Me.FlatButton1) - Me.TabPage10.Controls.Add(Me.PictureBox1) - Me.TabPage10.Controls.Add(Me.lblAnsprechpartner) - Me.TabPage10.Controls.Add(Me.lblMobil) - Me.TabPage10.Controls.Add(Me.lblFax) - Me.TabPage10.Controls.Add(Me.lblEmail2) - Me.TabPage10.Controls.Add(Me.lblEmail) - Me.TabPage10.Controls.Add(Me.PictureBox4) - Me.TabPage10.Controls.Add(Me.PictureBox2) - Me.TabPage10.Controls.Add(Me.lblTel) - Me.TabPage10.Controls.Add(Me.PictureBox3) - Me.TabPage10.Controls.Add(Me.PictureBox5) - Me.TabPage10.Location = New System.Drawing.Point(4, 22) - Me.TabPage10.Name = "TabPage10" - Me.TabPage10.Size = New System.Drawing.Size(479, 164) - Me.TabPage10.TabIndex = 2 - Me.TabPage10.Text = "Kontakt" - Me.TabPage10.UseVisualStyleBackColor = True + Me.tbKontaktKontakt.Controls.Add(Me.FlatButton1) + Me.tbKontaktKontakt.Controls.Add(Me.PictureBox1) + Me.tbKontaktKontakt.Controls.Add(Me.lblAnsprechpartner) + Me.tbKontaktKontakt.Controls.Add(Me.lblMobil) + Me.tbKontaktKontakt.Controls.Add(Me.lblFax) + Me.tbKontaktKontakt.Controls.Add(Me.lblEmail2) + Me.tbKontaktKontakt.Controls.Add(Me.lblEmail) + Me.tbKontaktKontakt.Controls.Add(Me.PictureBox4) + Me.tbKontaktKontakt.Controls.Add(Me.PictureBox2) + Me.tbKontaktKontakt.Controls.Add(Me.lblTel) + Me.tbKontaktKontakt.Controls.Add(Me.PictureBox3) + Me.tbKontaktKontakt.Controls.Add(Me.PictureBox5) + Me.tbKontaktKontakt.Location = New System.Drawing.Point(4, 22) + Me.tbKontaktKontakt.Name = "tbKontaktKontakt" + Me.tbKontaktKontakt.Size = New System.Drawing.Size(479, 164) + Me.tbKontaktKontakt.TabIndex = 2 + Me.tbKontaktKontakt.Text = "Kontakt" + Me.tbKontaktKontakt.UseVisualStyleBackColor = True ' 'FlatButton1 ' @@ -1820,16 +1834,16 @@ Partial Class usrCntlKundenuebersicht Me.PictureBox5.TabIndex = 180 Me.PictureBox5.TabStop = False ' - 'TabPage11 + 'tbKontaktSpez ' - 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(479, 164) - Me.TabPage11.TabIndex = 3 - Me.TabPage11.Text = "Spezifisch" - Me.TabPage11.UseVisualStyleBackColor = True + Me.tbKontaktSpez.Controls.Add(Me.ucKundenKontakte) + Me.tbKontaktSpez.Location = New System.Drawing.Point(4, 22) + Me.tbKontaktSpez.Name = "tbKontaktSpez" + Me.tbKontaktSpez.Padding = New System.Windows.Forms.Padding(3) + Me.tbKontaktSpez.Size = New System.Drawing.Size(479, 164) + Me.tbKontaktSpez.TabIndex = 3 + Me.tbKontaktSpez.Text = "Spezifisch" + Me.tbKontaktSpez.UseVisualStyleBackColor = True ' 'ucKundenKontakte ' @@ -1966,10 +1980,10 @@ Partial Class usrCntlKundenuebersicht Me.grpSonstiges.Controls.Add(Me.Button1) Me.grpSonstiges.Controls.Add(Me.tbcntrAllg) Me.grpSonstiges.Controls.Add(Me.btncheckliste) - Me.grpSonstiges.Controls.Add(Me.Label4) + Me.grpSonstiges.Controls.Add(Me.lblUIDNr) Me.grpSonstiges.Controls.Add(Me.lblUid) Me.grpSonstiges.Controls.Add(Me.lblEORI) - Me.grpSonstiges.Controls.Add(Me.Label5) + Me.grpSonstiges.Controls.Add(Me.lblEORINr) Me.grpSonstiges.Controls.Add(Me.dgvAufschub) Me.grpSonstiges.Location = New System.Drawing.Point(3, 362) Me.grpSonstiges.Name = "grpSonstiges" @@ -2055,27 +2069,27 @@ Partial Class usrCntlKundenuebersicht ' 'tbcntrAllg ' - Me.tbcntrAllg.Controls.Add(Me.TabPage5) - Me.tbcntrAllg.Controls.Add(Me.TabPage9) - Me.tbcntrAllg.Controls.Add(Me.TabPage6) - Me.tbcntrAllg.Controls.Add(Me.TabPage7) - Me.tbcntrAllg.Controls.Add(Me.TabPage2) + Me.tbcntrAllg.Controls.Add(Me.tbVollmachten) + Me.tbcntrAllg.Controls.Add(Me.tbGestellGarant) + Me.tbcntrAllg.Controls.Add(Me.tbAvisoMail) + Me.tbcntrAllg.Controls.Add(Me.tbKdSpez) + Me.tbcntrAllg.Controls.Add(Me.tbSonstiges) Me.tbcntrAllg.Location = New System.Drawing.Point(6, 142) Me.tbcntrAllg.Name = "tbcntrAllg" Me.tbcntrAllg.SelectedIndex = 0 Me.tbcntrAllg.Size = New System.Drawing.Size(487, 190) Me.tbcntrAllg.TabIndex = 205 ' - 'TabPage5 + 'tbVollmachten ' - Me.TabPage5.Controls.Add(Me.dgvVollmachten) - Me.TabPage5.Location = New System.Drawing.Point(4, 22) - Me.TabPage5.Name = "TabPage5" - Me.TabPage5.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage5.Size = New System.Drawing.Size(479, 164) - Me.TabPage5.TabIndex = 0 - Me.TabPage5.Text = "Vollmachten" - Me.TabPage5.UseVisualStyleBackColor = True + Me.tbVollmachten.Controls.Add(Me.dgvVollmachten) + Me.tbVollmachten.Location = New System.Drawing.Point(4, 22) + Me.tbVollmachten.Name = "tbVollmachten" + Me.tbVollmachten.Padding = New System.Windows.Forms.Padding(3) + Me.tbVollmachten.Size = New System.Drawing.Size(479, 164) + Me.tbVollmachten.TabIndex = 0 + Me.tbVollmachten.Text = "Vollmachten" + Me.tbVollmachten.UseVisualStyleBackColor = True ' 'dgvVollmachten ' @@ -2097,17 +2111,17 @@ Partial Class usrCntlKundenuebersicht Me.dgvVollmachten.Size = New System.Drawing.Size(473, 158) Me.dgvVollmachten.TabIndex = 4 ' - 'TabPage9 + 'tbGestellGarant ' - Me.TabPage9.Controls.Add(Me.dgvGestGarantie) - Me.TabPage9.Controls.Add(Me.Panel2) - Me.TabPage9.Location = New System.Drawing.Point(4, 22) - Me.TabPage9.Name = "TabPage9" - Me.TabPage9.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage9.Size = New System.Drawing.Size(479, 164) - Me.TabPage9.TabIndex = 4 - Me.TabPage9.Text = "Gestell.Garant." - Me.TabPage9.UseVisualStyleBackColor = True + Me.tbGestellGarant.Controls.Add(Me.dgvGestGarantie) + Me.tbGestellGarant.Controls.Add(Me.Panel2) + Me.tbGestellGarant.Location = New System.Drawing.Point(4, 22) + Me.tbGestellGarant.Name = "tbGestellGarant" + Me.tbGestellGarant.Padding = New System.Windows.Forms.Padding(3) + Me.tbGestellGarant.Size = New System.Drawing.Size(479, 164) + Me.tbGestellGarant.TabIndex = 4 + Me.tbGestellGarant.Text = "Gestell.Garant." + Me.tbGestellGarant.UseVisualStyleBackColor = True ' 'dgvGestGarantie ' @@ -2239,16 +2253,16 @@ Partial Class usrCntlKundenuebersicht Me.Button9.UseVisualStyleBackColor = True Me.Button9.Visible = False ' - 'TabPage6 + 'tbAvisoMail ' - Me.TabPage6.Controls.Add(Me.UsrCntlKundenAvisoMailBenachrichtigung1) - Me.TabPage6.Location = New System.Drawing.Point(4, 22) - Me.TabPage6.Name = "TabPage6" - Me.TabPage6.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage6.Size = New System.Drawing.Size(479, 164) - Me.TabPage6.TabIndex = 1 - Me.TabPage6.Text = "Aviso E-Mails" - Me.TabPage6.UseVisualStyleBackColor = True + Me.tbAvisoMail.Controls.Add(Me.UsrCntlKundenAvisoMailBenachrichtigung1) + Me.tbAvisoMail.Location = New System.Drawing.Point(4, 22) + Me.tbAvisoMail.Name = "tbAvisoMail" + Me.tbAvisoMail.Padding = New System.Windows.Forms.Padding(3) + Me.tbAvisoMail.Size = New System.Drawing.Size(479, 164) + Me.tbAvisoMail.TabIndex = 1 + Me.tbAvisoMail.Text = "Aviso E-Mails" + Me.tbAvisoMail.UseVisualStyleBackColor = True ' 'UsrCntlKundenAvisoMailBenachrichtigung1 ' @@ -2259,24 +2273,24 @@ Partial Class usrCntlKundenuebersicht Me.UsrCntlKundenAvisoMailBenachrichtigung1.Size = New System.Drawing.Size(473, 158) Me.UsrCntlKundenAvisoMailBenachrichtigung1.TabIndex = 0 ' - 'TabPage7 + 'tbKdSpez ' - Me.TabPage7.Controls.Add(Me.Label14) - Me.TabPage7.Controls.Add(Me.txtInfoKdAtrNr) - Me.TabPage7.Controls.Add(Me.Label43) - Me.TabPage7.Controls.Add(Me.cbxKdAuftragsNr) - Me.TabPage7.Controls.Add(Me.RichTextBox1) - Me.TabPage7.Controls.Add(Me.Label31) - Me.TabPage7.Controls.Add(Me.rtbLKWFreigabeSenden) - Me.TabPage7.Controls.Add(Me.Label10) - Me.TabPage7.Controls.Add(Me.txtFixeKdAtrNr) - Me.TabPage7.Controls.Add(Me.FlatButton4) - Me.TabPage7.Location = New System.Drawing.Point(4, 22) - Me.TabPage7.Name = "TabPage7" - Me.TabPage7.Size = New System.Drawing.Size(479, 164) - Me.TabPage7.TabIndex = 2 - Me.TabPage7.Text = "Kundenspezifisch" - Me.TabPage7.UseVisualStyleBackColor = True + Me.tbKdSpez.Controls.Add(Me.Label14) + Me.tbKdSpez.Controls.Add(Me.txtInfoKdAtrNr) + Me.tbKdSpez.Controls.Add(Me.Label43) + Me.tbKdSpez.Controls.Add(Me.cbxKdAuftragsNr) + Me.tbKdSpez.Controls.Add(Me.RichTextBox1) + Me.tbKdSpez.Controls.Add(Me.Label31) + Me.tbKdSpez.Controls.Add(Me.rtbLKWFreigabeSenden) + Me.tbKdSpez.Controls.Add(Me.Label10) + Me.tbKdSpez.Controls.Add(Me.txtFixeKdAtrNr) + Me.tbKdSpez.Controls.Add(Me.FlatButton4) + Me.tbKdSpez.Location = New System.Drawing.Point(4, 22) + Me.tbKdSpez.Name = "tbKdSpez" + Me.tbKdSpez.Size = New System.Drawing.Size(479, 164) + Me.tbKdSpez.TabIndex = 2 + Me.tbKdSpez.Text = "Kundenspezifisch" + Me.tbKdSpez.UseVisualStyleBackColor = True ' 'Label14 ' @@ -2405,23 +2419,23 @@ Partial Class usrCntlKundenuebersicht Me.FlatButton4.Text = "Speichern" Me.FlatButton4.UseVisualStyleBackColor = True ' - 'TabPage2 + 'tbSonstiges ' - Me.TabPage2.Controls.Add(Me.Label6) - Me.TabPage2.Controls.Add(Me.lblSteuernummer) - Me.TabPage2.Controls.Add(Me.lblAufZoll) - Me.TabPage2.Controls.Add(Me.Label9) - Me.TabPage2.Controls.Add(Me.lblAufEust) - Me.TabPage2.Controls.Add(Me.Label8) - Me.TabPage2.Controls.Add(Me.lblZnv) - Me.TabPage2.Controls.Add(Me.Label7) - Me.TabPage2.Location = New System.Drawing.Point(4, 22) - Me.TabPage2.Name = "TabPage2" - Me.TabPage2.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage2.Size = New System.Drawing.Size(479, 164) - Me.TabPage2.TabIndex = 3 - Me.TabPage2.Text = "Sonstiges" - Me.TabPage2.UseVisualStyleBackColor = True + Me.tbSonstiges.Controls.Add(Me.Label6) + Me.tbSonstiges.Controls.Add(Me.lblSteuernummer) + Me.tbSonstiges.Controls.Add(Me.lblAufZoll) + Me.tbSonstiges.Controls.Add(Me.Label9) + Me.tbSonstiges.Controls.Add(Me.lblAufEust) + Me.tbSonstiges.Controls.Add(Me.Label8) + Me.tbSonstiges.Controls.Add(Me.lblZnv) + Me.tbSonstiges.Controls.Add(Me.Label7) + 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(479, 164) + Me.tbSonstiges.TabIndex = 3 + Me.tbSonstiges.Text = "Sonstiges" + Me.tbSonstiges.UseVisualStyleBackColor = True ' 'Label6 ' @@ -2529,15 +2543,15 @@ Partial Class usrCntlKundenuebersicht Me.btncheckliste.TextAlign = System.Drawing.ContentAlignment.BottomCenter Me.btncheckliste.UseVisualStyleBackColor = True ' - 'Label4 + 'lblUIDNr ' - Me.Label4.AutoSize = True - 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.Location = New System.Drawing.Point(10, 16) - Me.Label4.Name = "Label4" - Me.Label4.Size = New System.Drawing.Size(57, 17) - Me.Label4.TabIndex = 193 - Me.Label4.Text = "UId-Nr.:" + Me.lblUIDNr.AutoSize = True + Me.lblUIDNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblUIDNr.Location = New System.Drawing.Point(10, 16) + Me.lblUIDNr.Name = "lblUIDNr" + Me.lblUIDNr.Size = New System.Drawing.Size(57, 17) + Me.lblUIDNr.TabIndex = 193 + Me.lblUIDNr.Text = "UId-Nr.:" ' 'lblUid ' @@ -2563,15 +2577,15 @@ Partial Class usrCntlKundenuebersicht Me.lblEORI.TabIndex = 197 Me.lblEORI.Text = "AT000000000000000" ' - 'Label5 + 'lblEORINr ' - Me.Label5.AutoSize = True - Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label5.Location = New System.Drawing.Point(10, 37) - Me.Label5.Name = "Label5" - Me.Label5.Size = New System.Drawing.Size(69, 17) - Me.Label5.TabIndex = 193 - Me.Label5.Text = "EORI-Nr.:" + Me.lblEORINr.AutoSize = True + Me.lblEORINr.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblEORINr.Location = New System.Drawing.Point(10, 37) + Me.lblEORINr.Name = "lblEORINr" + Me.lblEORINr.Size = New System.Drawing.Size(69, 17) + Me.lblEORINr.TabIndex = 193 + Me.lblEORINr.Text = "EORI-Nr.:" ' 'dgvAufschub ' @@ -2730,27 +2744,6 @@ Partial Class usrCntlKundenuebersicht Me.lblFirma.Text = "VERAG" Me.lblFirma.Visible = False ' - 'Label15 - ' - Me.Label15.AutoSize = True - Me.Label15.Location = New System.Drawing.Point(270, 235) - Me.Label15.Name = "Label15" - Me.Label15.Size = New System.Drawing.Size(61, 13) - Me.Label15.TabIndex = 235 - Me.Label15.Text = "Verzollt bei:" - ' - 'txtVerzolltBei - ' - Me.txtVerzolltBei.BackColor = System.Drawing.Color.White - Me.txtVerzolltBei.BorderStyle = System.Windows.Forms.BorderStyle.None - Me.txtVerzolltBei.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtVerzolltBei.ForeColor = System.Drawing.Color.Black - Me.txtVerzolltBei.Location = New System.Drawing.Point(358, 235) - Me.txtVerzolltBei.Name = "txtVerzolltBei" - Me.txtVerzolltBei.ReadOnly = True - Me.txtVerzolltBei.Size = New System.Drawing.Size(177, 13) - Me.txtVerzolltBei.TabIndex = 236 - ' 'usrCntlKundenuebersicht ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -2797,28 +2790,28 @@ Partial Class usrCntlKundenuebersicht Me.grpAdresse.ResumeLayout(False) Me.grpAdresse.PerformLayout() Me.tbKontakt.ResumeLayout(False) - Me.TabPage10.ResumeLayout(False) - Me.TabPage10.PerformLayout() + Me.tbKontaktKontakt.ResumeLayout(False) + Me.tbKontaktKontakt.PerformLayout() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).EndInit() - Me.TabPage11.ResumeLayout(False) + Me.tbKontaktSpez.ResumeLayout(False) Me.grpSonstiges.ResumeLayout(False) Me.grpSonstiges.PerformLayout() Me.tbcntrAllg.ResumeLayout(False) - Me.TabPage5.ResumeLayout(False) + Me.tbVollmachten.ResumeLayout(False) CType(Me.dgvVollmachten, System.ComponentModel.ISupportInitialize).EndInit() - Me.TabPage9.ResumeLayout(False) + Me.tbGestellGarant.ResumeLayout(False) CType(Me.dgvGestGarantie, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel2.ResumeLayout(False) Me.Panel2.PerformLayout() - Me.TabPage6.ResumeLayout(False) - Me.TabPage7.ResumeLayout(False) - Me.TabPage7.PerformLayout() - Me.TabPage2.ResumeLayout(False) - Me.TabPage2.PerformLayout() + Me.tbAvisoMail.ResumeLayout(False) + Me.tbKdSpez.ResumeLayout(False) + Me.tbKdSpez.PerformLayout() + Me.tbSonstiges.ResumeLayout(False) + Me.tbSonstiges.PerformLayout() CType(Me.dgvAufschub, System.ComponentModel.ISupportInitialize).EndInit() Me.ContextMenuStrip1.ResumeLayout(False) Me.ContextMenuStrip3.ResumeLayout(False) @@ -2868,7 +2861,7 @@ Partial Class usrCntlKundenuebersicht Friend WithEvents txtSammelrechnung As TextBox Friend WithEvents Label12 As Label Friend WithEvents txtVorauskasse As TextBox - Friend WithEvents Label42 As Label + Friend WithEvents lblVorkasse As Label Friend WithEvents pnlVERAGSnspr As Panel Friend WithEvents txtKundenbetreuerTeam As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents btnVeragAnspr As VERAG_PROG_ALLGEMEIN.FlatButton @@ -2886,7 +2879,7 @@ Partial Class usrCntlKundenuebersicht Friend WithEvents txtUmsatzJahr As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents Label29 As Label Friend WithEvents txtOffenePosten As VERAG_PROG_ALLGEMEIN.MyTextBox - Friend WithEvents Label28 As Label + Friend WithEvents lblOffenePosten As Label Friend WithEvents cbxFiskalabfertigung As VERAG_PROG_ALLGEMEIN.MyCheckbox Friend WithEvents lblFisk As Label Friend WithEvents lblKreditlimit As VERAG_PROG_ALLGEMEIN.MyTextBox @@ -2897,7 +2890,7 @@ Partial Class usrCntlKundenuebersicht Friend WithEvents Label41 As Label Friend WithEvents rtbAbf_Besonderheiten As RichTextBox Friend WithEvents lblNeutralisierung As TextBox - Friend WithEvents Label37 As Label + Friend WithEvents lblBesonderheiten As Label Friend WithEvents Label3 As Label Friend WithEvents lblNoGespr As Label Friend WithEvents lklGanzerText As LinkLabel @@ -2914,7 +2907,7 @@ Partial Class usrCntlKundenuebersicht Friend WithEvents Label46 As Label Friend WithEvents grpAdresse As GroupBox Friend WithEvents tbKontakt As TabControl - Friend WithEvents TabPage10 As TabPage + Friend WithEvents tbKontaktKontakt As TabPage Friend WithEvents FlatButton1 As VERAG_PROG_ALLGEMEIN.FlatButton Friend WithEvents PictureBox1 As PictureBox Friend WithEvents lblAnsprechpartner As TextBox @@ -2927,7 +2920,7 @@ Partial Class usrCntlKundenuebersicht Friend WithEvents lblTel As TextBox Friend WithEvents PictureBox3 As PictureBox Friend WithEvents PictureBox5 As PictureBox - Friend WithEvents TabPage11 As TabPage + Friend WithEvents tbKontaktSpez As TabPage Friend WithEvents ucKundenKontakte As usrCntlKundenKontakte Friend WithEvents Label38 As Label Friend WithEvents txtDebitorennr As TextBox @@ -2945,9 +2938,9 @@ Partial Class usrCntlKundenuebersicht Friend WithEvents Button3 As Button Friend WithEvents Button1 As Button Friend WithEvents tbcntrAllg As TabControl - Friend WithEvents TabPage5 As TabPage + Friend WithEvents tbVollmachten As TabPage Friend WithEvents dgvVollmachten As DataGridView - Friend WithEvents TabPage9 As TabPage + Friend WithEvents tbGestellGarant As TabPage Friend WithEvents dgvGestGarantie As DataGridView Friend WithEvents Panel2 As Panel Friend WithEvents cbxGG As CheckBox @@ -2956,9 +2949,9 @@ Partial Class usrCntlKundenuebersicht Friend WithEvents Label11 As Label Friend WithEvents Button8 As Button Friend WithEvents Button9 As Button - Friend WithEvents TabPage6 As TabPage + Friend WithEvents tbAvisoMail As TabPage Friend WithEvents UsrCntlKundenAvisoMailBenachrichtigung1 As usrCntlKundenAvisoMailBenachrichtigung - Friend WithEvents TabPage7 As TabPage + Friend WithEvents tbKdSpez As TabPage Friend WithEvents Label43 As Label Friend WithEvents cbxKdAuftragsNr As CheckBox Friend WithEvents RichTextBox1 As RichTextBox @@ -2967,7 +2960,7 @@ Partial Class usrCntlKundenuebersicht Friend WithEvents Label10 As Label Friend WithEvents txtFixeKdAtrNr As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents FlatButton4 As VERAG_PROG_ALLGEMEIN.FlatButton - Friend WithEvents TabPage2 As TabPage + Friend WithEvents tbSonstiges As TabPage Friend WithEvents Label6 As Label Friend WithEvents lblSteuernummer As TextBox Friend WithEvents lblAufZoll As TextBox @@ -2977,10 +2970,10 @@ Partial Class usrCntlKundenuebersicht Friend WithEvents lblZnv As TextBox Friend WithEvents Label7 As Label Friend WithEvents btncheckliste As VERAG_PROG_ALLGEMEIN.FlatButton - Friend WithEvents Label4 As Label + Friend WithEvents lblUIDNr As Label Friend WithEvents lblUid As TextBox Friend WithEvents lblEORI As TextBox - Friend WithEvents Label5 As Label + Friend WithEvents lblEORINr As Label Friend WithEvents dgvAufschub As VERAG_PROG_ALLGEMEIN.MyDatagridview Friend WithEvents KtoId As DataGridViewTextBoxColumn Friend WithEvents Art As DataGridViewTextBoxColumn diff --git a/SDL/kunden/usrCntlKundenuebersicht.resx b/SDL/kunden/usrCntlKundenuebersicht.resx index ae854107..bfe449fc 100644 --- a/SDL/kunden/usrCntlKundenuebersicht.resx +++ b/SDL/kunden/usrCntlKundenuebersicht.resx @@ -120,9 +120,6 @@ 17, 17 - - 135, 17 - diff --git a/SDL/kunden/usrCntlKundenuebersicht.vb b/SDL/kunden/usrCntlKundenuebersicht.vb index 8825edbd..b5f309f1 100644 --- a/SDL/kunden/usrCntlKundenuebersicht.vb +++ b/SDL/kunden/usrCntlKundenuebersicht.vb @@ -156,7 +156,7 @@ Public Class usrCntlKundenuebersicht If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("KUNDEN_Vorauskasse_anzeigen", "SDL") Then txtVorauskasse.Visible = True - Label42.Visible = True + lblVorkasse.Visible = True End If If True Then 'VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("KUNDEN_Verwaltung", "SDL") Then btnThereforeKundeninfo.Visible = True @@ -173,8 +173,8 @@ Public Class usrCntlKundenuebersicht tbWeitereKundenDetails.TabPages.Remove(TabPage3) tbWeitereKundenDetails.TabPages.Remove(tbOffenePosten) - tbcntrAllg.TabPages.Remove(TabPage6) - tbcntrAllg.TabPages.Remove(TabPage7) + tbcntrAllg.TabPages.Remove(tbAvisoMail) + tbcntrAllg.TabPages.Remove(tbKdSpez) Catch ex As Exception End Try @@ -220,7 +220,7 @@ Public Class usrCntlKundenuebersicht Button4.Visible = True End If - + VERAG_PROG_ALLGEMEIN.cAllgemein._TRANSLATE(Me) Catch ex As Exception ' MsgBox(ex.Message & ex.StackTrace) End Try @@ -1950,7 +1950,7 @@ Public Class usrCntlKundenuebersicht End Sub Private Sub tbKontakt_TabIndexChanged(sender As Object, e As EventArgs) Handles tbKontakt.SelectedIndexChanged - If tbKontakt.SelectedTab Is TabPage11 Then + If tbKontakt.SelectedTab Is tbKontaktSpez Then initKdKontakSpeziell() End If End Sub diff --git a/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MyComboBox.vb b/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MyComboBox.vb index 81b20723..34e822b3 100644 --- a/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MyComboBox.vb +++ b/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MyComboBox.vb @@ -19,6 +19,7 @@ Public Class MyComboBox End Sub Sub fillWithSQL(sqlstr As String, Optional showValueInText As Boolean = True, Optional conn As String = "SDL", Optional firstEmpty As Boolean = False, Optional clearList As Boolean = True) fillWithMyListItem((New SQL).loadCboBySqlWithListItem(sqlstr, showValueInText, conn), firstEmpty, clearList) + _TRANSLATE() End Sub Public Property _value As String @@ -134,5 +135,45 @@ Public Class MyComboBox ' MsgBox(Me._value) End Sub + + + Public Sub _TRANSLATE() + Try + + If VERAG_PROG_ALLGEMEIN.cAllgemein._LAN = "" Then Exit Sub + If VERAG_PROG_ALLGEMEIN.cAllgemein._LAN = "DE" Then Exit Sub + + Dim lanTxtAll = VERAG_PROG_ALLGEMEIN.cAllgemein.TRANSLATE.list.FindAll(Function(x) x.trs_object = Me.FindForm.Name And x.trs_control = Me.Name And x.trs_sprache = VERAG_PROG_ALLGEMEIN.cAllgemein._LAN) + If lanTxtAll.Count > 0 Then + + Dim listItems(Me.Items.Count) As MyListItem + Me.Items.CopyTo(listItems, 0) + + Me.Items.Clear() + + For Each l In listItems + If l IsNot Nothing Then + + Dim lanTxt = l.Text + For Each txt In lanTxtAll + If txt.trs_subControl IsNot DBNull.Value AndAlso txt.trs_subControl = l.Text Then + lanTxt = txt.trs_text + End If + Next + ' Dim lanTxt = VERAG_PROG_ALLGEMEIN.cAllgemein.TRANSLATE.list.Find(Function(x) x.trs_object = Me.FindForm.Name And x.trs_control = Me.Name And x.trs_sprache = VERAG_PROG_ALLGEMEIN.cAllgemein._LAN And (x.trs_subControl IsNot DBNull.Value AndAlso x.trs_subControl = l.Text)) + ' MsgBox(If(lanTxt Is Nothing, "noth " & Me.Name, lanTxt.trs_text)) + Me.Items.Add(New MyListItem(lanTxt, l.Value)) + + End If + Next + End If + + Catch ex As Exception + MsgBox(ex.Message & ex.StackTrace) + End Try + End Sub + + + End Class diff --git a/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MyDatagridview.vb b/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MyDatagridview.vb index 592d9a36..f4514da6 100644 --- a/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MyDatagridview.vb +++ b/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MyDatagridview.vb @@ -134,6 +134,7 @@ Public Class MyDatagridview Public Sub LOAD(Optional showErr As Boolean = False, Optional ByRef errOccured As Boolean = False) If SQL_STR <> "" Then Me.DataSource = SQL.loadDgvBySql_Param(SQL_STR, CONN_ART, , SQL_PARAM, showErr, errOccured) + Me._TRANSLATE() End If End Sub @@ -291,4 +292,28 @@ Public Class MyDatagridview End Function #End Region + + + + Public Sub _TRANSLATE() + Try + + If VERAG_PROG_ALLGEMEIN.cAllgemein._LAN = "" Then Exit Sub + If VERAG_PROG_ALLGEMEIN.cAllgemein._LAN = "DE" Then Exit Sub + + Dim lanTxtAll = VERAG_PROG_ALLGEMEIN.cAllgemein.TRANSLATE.list.FindAll(Function(x) x.trs_object = Me.FindForm.Name And x.trs_control = Me.Name And x.trs_sprache = VERAG_PROG_ALLGEMEIN.cAllgemein._LAN) + If lanTxtAll.Count > 0 Then + For Each txt In lanTxtAll + If Me.Columns(txt.trs_subControl) IsNot Nothing Then + Me.Columns(txt.trs_subControl).HeaderText = txt.trs_text + End If + Next + End If + + Catch ex As Exception + MsgBox(ex.Message & ex.StackTrace) + End Try + End Sub + + End Class diff --git a/VERAG_PROG_ALLGEMEIN/Classes/cMitarbeiter.vb b/VERAG_PROG_ALLGEMEIN/Classes/cMitarbeiter.vb index 24e58ead..2111ba8b 100644 --- a/VERAG_PROG_ALLGEMEIN/Classes/cMitarbeiter.vb +++ b/VERAG_PROG_ALLGEMEIN/Classes/cMitarbeiter.vb @@ -75,6 +75,7 @@ Public Class cMitarbeiter Property mit_MAVerzeichnis_Spitzname As Object = Nothing Property mit_foto_DocId As Object = Nothing + Property mit_sprache As String = "DE" Dim SQL As New SQL @@ -179,6 +180,7 @@ Public Class cMitarbeiter list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_MAVerzeichnis_Spitzname", mit_MAVerzeichnis_Spitzname)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_foto_DocId", mit_foto_DocId)) + list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_sprache", mit_sprache)) Return list End Function @@ -364,6 +366,7 @@ Public Class cMitarbeiter If Not dr.Item("mit_foto_DocId") Is DBNull.Value Then Me.mit_foto_DocId = dr.Item("mit_foto_DocId") If Not dr.Item("mit_MAVerzeichnis_Spitzname") Is DBNull.Value Then Me.mit_MAVerzeichnis_Spitzname = dr.Item("mit_MAVerzeichnis_Spitzname") If Not dr.Item("mit_MAVerzeichnis_Motto") Is DBNull.Value Then Me.mit_MAVerzeichnis_Motto = dr.Item("mit_MAVerzeichnis_Motto") + If Not dr.Item("mit_sprache") Is DBNull.Value Then Me.mit_sprache = dr.Item("mit_sprache") diff --git a/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsausgang.vb b/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsausgang.vb index d2ad58c9..bd63051e 100644 --- a/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsausgang.vb +++ b/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsausgang.vb @@ -102,6 +102,7 @@ Public Class cRechnungsausgang Property KdAuftragsNr As Object = Nothing Property Handling As Object = Nothing Property VorschauID As Object = Nothing + Property Grenze As Object = Nothing @@ -240,6 +241,7 @@ Public Class cRechnungsausgang list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("KdAuftragsNr", KdAuftragsNr)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Handling", Handling)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("VorschauID", VorschauID)) + list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Grenze", Grenze)) Return list End Function diff --git a/VERAG_PROG_ALLGEMEIN/cAllgemein.vb b/VERAG_PROG_ALLGEMEIN/cAllgemein.vb index 5071be7e..e0c598ce 100644 --- a/VERAG_PROG_ALLGEMEIN/cAllgemein.vb +++ b/VERAG_PROG_ALLGEMEIN/cAllgemein.vb @@ -43,7 +43,7 @@ Public Class cAllgemein Public Shared BENUTZER_BERECHTIGUNGS_GRUPPEN As cBerechtigungenBenutzerGruppenZuordnung_List = Nothing Public Shared PARAMS As cParameterList = Nothing Public Shared TRANSLATE As cTranslate_LIST = Nothing - Public Shared _LAN As String = "" '"EN" + Public Shared _LAN As String = "DE" '"EN" Public Shared SESSION As New cSession @@ -57,6 +57,7 @@ Public Class cAllgemein If MITARBEITER.LOAD(USRID) Then USR_NNAME = MITARBEITER.mit_nname USR_VNAME = MITARBEITER.mit_vname + _LAN = MITARBEITER.mit_sprache USR_HrFrNAME = "" Select Case MITARBEITER.mit_geschlecht @@ -129,17 +130,57 @@ Public Class cAllgemein 'o... Form 's... SubContainer 'c... Control - + ' MsgBox(o.GetType.ToString & " - " & o.name) Dim TextTmp = VERAG_PROG_ALLGEMEIN.cAllgemein.TRANSLATE.list.FindAll(Function(x) x.trs_object = o.Name And x.trs_sprache = lan) If TextTmp IsNot Nothing Then For Each TXT As cTranslate In TextTmp Dim found = o.Controls.Find(TXT.trs_control, True) + + ' MsgBox(TXT.trs_control) If found IsNot Nothing AndAlso found.Count > 0 Then + ' MsgBox("JA") Dim obj As System.Windows.Forms.Control = found(0) If obj IsNot Nothing Then If (TypeOf obj Is System.Windows.Forms.Label) Then DirectCast(obj, System.Windows.Forms.Label).Text = TXT.trs_text End If + If (TypeOf obj Is System.Windows.Forms.Button) Or (TypeOf obj Is VERAG_PROG_ALLGEMEIN.FlatButton) Then + DirectCast(obj, System.Windows.Forms.Button).Text = TXT.trs_text + End If + If (TypeOf obj Is System.Windows.Forms.TabPage) Then + DirectCast(obj, System.Windows.Forms.TabPage).Text = TXT.trs_text + End If + If (TypeOf obj Is System.Windows.Forms.RadioButton) Or (TypeOf obj Is VERAG_PROG_ALLGEMEIN.MyRadioButton) Then + DirectCast(obj, System.Windows.Forms.RadioButton).Text = TXT.trs_text + End If + If (TypeOf obj Is System.Windows.Forms.GroupBox) Then + DirectCast(obj, System.Windows.Forms.GroupBox).Text = TXT.trs_text + End If + 'If (TypeOf obj Is System.Windows.Forms.TabControl) Then -->in Tabpage geregelt + ' For Each tb As System.Windows.Forms.TabPage In DirectCast(obj, System.Windows.Forms.TabControl).TabPages + ' If tb.Name = TXT.trs_subControl Then + ' tb.Text = TXT.trs_text + ' End If + ' Next + 'End If + + If (TypeOf obj Is System.Windows.Forms.ComboBox) Or (TypeOf obj Is VERAG_PROG_ALLGEMEIN.MyComboBox) Then + 'DirectCast(obj, System.Windows.Forms.Label).Text = TXT.trs_text + + End If + 'If (TypeOf obj Is VERAG_PROG_ALLGEMEIN.MyComboBox) Then + + ' Dim cboItems = VERAG_PROG_ALLGEMEIN.cAllgemein.TRANSLATE.list.FindAll(Function(x) x.trs_object = o.Name And x.trs_sprache = lan And x.trs_control = TXT.trs_control) + + ' For Each item As VERAG_PROG_ALLGEMEIN.MyListItem In DirectCast(obj, VERAG_PROG_ALLGEMEIN.MyComboBox).Items + ' For Each sitem As cTranslate In cboItems + ' If item.Text = sitem.trs_subControl Then + ' Dim index = DirectCast(obj, VERAG_PROG_ALLGEMEIN.MyComboBox).Items(0).Equals + ' DirectCast(DirectCast(obj, VERAG_PROG_ALLGEMEIN.MyComboBox).Items(item), VERAG_PROG_ALLGEMEIN.MyListItem).Text = sitem.trs_text + ' End If + ' Next + ' Next + 'End If End If End If Next