diff --git a/SDL/Fakturierung/frmFaktEmail.vb b/SDL/Fakturierung/frmFaktEmail.vb index b4fc0757..53e3b707 100644 --- a/SDL/Fakturierung/frmFaktEmail.vb +++ b/SDL/Fakturierung/frmFaktEmail.vb @@ -1097,12 +1097,30 @@ Public Class frmFaktEmail list3megered = FormularManagerNEU.MergePdfFiles(myListPOSLIST, zielPfadZusammenfassung_POSListe) End If + If RECHNUNG.VermittlerKundenNr = 150000 Or RECHNUNG.VermittlerKundenNr = 140000 Then + + 'bei RMC und Durmaz doch wieder alles in einem Anhang !!!!!!!!!!!!!!!!!!!!!!!!!!!! + For Each a In myListLiefereranten + myList.Add(a) + Next + + For Each a In myListPOSLIST + myList.Add(a) + Next + + If FormularManagerNEU.MergePdfFiles(myList, zielPfadZusammenfassung) Then + ATTACHMENTS.Add(New cFakt_MailATTach(zielPfadZusammenfassung, "")) + End If - If FormularManagerNEU.MergePdfFiles(myList, zielPfadZusammenfassung) Then - ATTACHMENTS.Add(New cFakt_MailATTach(zielPfadZusammenfassung, "")) - If myListLiefereranten.Count > 0 AndAlso list2megered Then ATTACHMENTS.Add(New cFakt_MailATTach(zielPfadZusammenfassung_Lieferantenrechnungen, "")) - If myListPOSLIST.Count > 0 AndAlso list3megered Then ATTACHMENTS.Add(New cFakt_MailATTach(zielPfadZusammenfassung_POSListe, "")) + Else + 'Ansonsten extra!!!! + If FormularManagerNEU.MergePdfFiles(myList, zielPfadZusammenfassung) Then + ATTACHMENTS.Add(New cFakt_MailATTach(zielPfadZusammenfassung, "")) + If myListLiefereranten.Count > 0 AndAlso list2megered Then ATTACHMENTS.Add(New cFakt_MailATTach(zielPfadZusammenfassung_Lieferantenrechnungen, "")) + If myListPOSLIST.Count > 0 AndAlso list3megered Then ATTACHMENTS.Add(New cFakt_MailATTach(zielPfadZusammenfassung_POSListe, "")) + + End If End If diff --git a/SDL/My Project/AssemblyInfo.vb b/SDL/My Project/AssemblyInfo.vb index 8b68c701..4093d484 100644 --- a/SDL/My Project/AssemblyInfo.vb +++ b/SDL/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/SDL/USTV/usrCntlUSTV.vb b/SDL/USTV/usrCntlUSTV.vb index f5164bff..1bc3ce43 100644 --- a/SDL/USTV/usrCntlUSTV.vb +++ b/SDL/USTV/usrCntlUSTV.vb @@ -206,7 +206,7 @@ Public Class usrCntlUSTV Risiko = 0 End If - + 'Beim Differenzbetrag Differnezbetrag = GesamtUSteuer - GesamtErstattung diff --git a/SDL/kunden/frmKundenblatt.Designer.vb b/SDL/kunden/frmKundenblatt.Designer.vb index 8b27efd6..0873cea3 100644 --- a/SDL/kunden/frmKundenblatt.Designer.vb +++ b/SDL/kunden/frmKundenblatt.Designer.vb @@ -53,9 +53,13 @@ Partial Class frmKundenblatt Me.txtInfotext = New System.Windows.Forms.Label() Me.tbFirmendaten = New System.Windows.Forms.TabPage() Me.Panel4 = New System.Windows.Forms.Panel() + Me.UsrcntlKundeBearbeitenFull1 = New SDL.usrcntlKundeBearbeitenFull() Me.tbcntrMain = New System.Windows.Forms.TabControl() Me.tbAllgemein = New System.Windows.Forms.TabPage() + Me.FlatButton6 = New VERAG_PROG_ALLGEMEIN.FlatButton() + Me.lblBonitaet = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label39 = New System.Windows.Forms.Label() + Me.btnBonitaetBearbeiten = New VERAG_PROG_ALLGEMEIN.FlatButton() Me.TabControl1 = New System.Windows.Forms.TabControl() Me.TabPage1 = New System.Windows.Forms.TabPage() Me.btnReloadOP = New System.Windows.Forms.Button() @@ -65,11 +69,13 @@ Partial Class frmKundenblatt Me.TabPage2 = New System.Windows.Forms.TabPage() Me.dgvUmsaetze = New System.Windows.Forms.DataGridView() Me.Label13 = New System.Windows.Forms.Label() + Me.txtUmsatzJahr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.TabPage3 = New System.Windows.Forms.TabPage() Me.PictureBox7 = New System.Windows.Forms.PictureBox() Me.dgvUmsatzNachLeistngsNr = New System.Windows.Forms.DataGridView() Me.lblAdressenzusatz = New System.Windows.Forms.TextBox() Me.Label11 = New System.Windows.Forms.Label() + Me.cboFirmaFMZOLL = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Label17 = New System.Windows.Forms.Label() Me.dgvOfferte = New System.Windows.Forms.DataGridView() Me.picLogo = New System.Windows.Forms.PictureBox() @@ -116,6 +122,9 @@ Partial Class frmKundenblatt Me.Button7 = New System.Windows.Forms.Button() Me.Label35 = New System.Windows.Forms.Label() Me.flpSDLDok = New System.Windows.Forms.FlowLayoutPanel() + Me.scanErstbestellung = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() + Me.scanJaraVereinbarung = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() + Me.scanMWSTAgreement = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() Me.Label34 = New System.Windows.Forms.Label() Me.Panel2 = New System.Windows.Forms.Panel() Me.Button6 = New System.Windows.Forms.Button() @@ -126,18 +135,24 @@ Partial Class frmKundenblatt Me.Label33 = New System.Windows.Forms.Label() Me.Label5 = New System.Windows.Forms.Label() Me.Label32 = New System.Windows.Forms.Label() + Me.scanSDLSonst = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() Me.lblAenderungsdatum_SDL = New System.Windows.Forms.Label() Me.lblErfassungsdatum_SDL = New System.Windows.Forms.Label() Me.grpMautDE = New System.Windows.Forms.GroupBox() Me.Button15 = New System.Windows.Forms.Button() Me.Label1 = New System.Windows.Forms.Label() + Me.txtMautDE_BenutzerNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.lblMautDEFlottenPIN = New System.Windows.Forms.Label() Me.Label6 = New System.Windows.Forms.Label() + Me.txtMautDE_FlottenPIN = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtMautDEMasterPIN = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.lblLetzterSA_SDL = New System.Windows.Forms.Label() Me.rtbVermerke = New System.Windows.Forms.RichTextBox() Me.tbSDLKarten = New System.Windows.Forms.TabPage() + Me.usrcntlKarten = New SDL.usrCntlKartenDaten() Me.tbLKW = New System.Windows.Forms.TabPage() Me.pnlLKWRight = New System.Windows.Forms.Panel() + Me.UsrCntlLKW1 = New SDL.usrCntlLKW() Me.pnlLKW = New System.Windows.Forms.Panel() Me.dgvLKW = New System.Windows.Forms.DataGridView() Me.pnlLKWBottom = New System.Windows.Forms.Panel() @@ -158,16 +173,29 @@ Partial Class frmKundenblatt Me.Label7 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.lblSonstigeDokumente = New System.Windows.Forms.Label() + Me.scanUebernahmebestätigungen = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() + Me.scanHKA = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() + Me.scanSonstiges = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() + Me.scanEULizenz = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() + Me.scanHRA = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() + Me.scanPersonalAusweisGF = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() + Me.scanBankGarantie = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() + Me.scanVertragVeragKd = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() Me.tbBesuchsberichte = New System.Windows.Forms.TabPage() Me.tbFremdrechnungen = New System.Windows.Forms.TabPage() Me.tbOfferte = New System.Windows.Forms.TabPage() + Me.UsrCntlOfferte1 = New SDL.usrCntlOfferte() Me.tbUSTV = New System.Windows.Forms.TabPage() Me.tbcntrUSTV = New System.Windows.Forms.TabControl() Me.tbUSTVDokumente = New System.Windows.Forms.TabPage() Me.Label8 = New System.Windows.Forms.Label() + Me.scanUSTVsonstigeDokumente = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() Me.Label27 = New System.Windows.Forms.Label() Me.Label37 = New System.Windows.Forms.Label() + Me.scanUSTVFABest = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() + Me.scanUSTVVollmachten = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() Me.tbUSTVAntrage = New System.Windows.Forms.TabPage() + Me.UsrCntlUSTV = New SDL.usrCntlUSTV() Me.cntxtExcel = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem6 = New System.Windows.Forms.ToolStripMenuItem() @@ -188,39 +216,11 @@ Partial Class frmKundenblatt Me.ToolStripMenuItem7 = New System.Windows.Forms.ToolStripMenuItem() Me.pnl = New System.Windows.Forms.Panel() Me.lblINAKTIV = New System.Windows.Forms.Label() + Me.KdSearchBox1 = New VERAG_PROG_ALLGEMEIN.KdSearchBox() Me.tbiLeistungen = New System.Windows.Forms.ToolStripMenuItem() Me.tbiKartenverwaltung = New System.Windows.Forms.ToolStripMenuItem() Me.tbiLKW = New System.Windows.Forms.ToolStripMenuItem() Me.tbiVERAGCard = New System.Windows.Forms.ToolStripMenuItem() - Me.FlatButton6 = New VERAG_PROG_ALLGEMEIN.FlatButton() - Me.lblBonitaet = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.btnBonitaetBearbeiten = New VERAG_PROG_ALLGEMEIN.FlatButton() - Me.txtUmsatzJahr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cboFirmaFMZOLL = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.scanErstbestellung = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() - Me.scanJaraVereinbarung = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() - Me.scanMWSTAgreement = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() - Me.scanSDLSonst = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() - Me.txtMautDE_BenutzerNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtMautDE_FlottenPIN = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtMautDEMasterPIN = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.scanUebernahmebestätigungen = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() - Me.scanHKA = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() - Me.scanSonstiges = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() - Me.scanEULizenz = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() - Me.scanHRA = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() - Me.scanPersonalAusweisGF = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() - Me.scanBankGarantie = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() - Me.scanVertragVeragKd = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan() - Me.scanUSTVsonstigeDokumente = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() - Me.scanUSTVFABest = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() - Me.scanUSTVVollmachten = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList() - Me.KdSearchBox1 = New VERAG_PROG_ALLGEMEIN.KdSearchBox() - Me.UsrcntlKundeBearbeitenFull1 = New SDL.usrcntlKundeBearbeitenFull() - Me.usrcntlKarten = New SDL.usrCntlKartenDaten() - Me.UsrCntlLKW1 = New SDL.usrCntlLKW() - Me.UsrCntlOfferte1 = New SDL.usrCntlOfferte() - Me.UsrCntlUSTV = New SDL.usrCntlUSTV() Me.pnlInfo.SuspendLayout() Me.tbFirmendaten.SuspendLayout() Me.Panel4.SuspendLayout() @@ -317,6 +317,16 @@ Partial Class frmKundenblatt Me.Panel4.Size = New System.Drawing.Size(1638, 1299) Me.Panel4.TabIndex = 0 ' + 'UsrcntlKundeBearbeitenFull1 + ' + Me.UsrcntlKundeBearbeitenFull1.BackColor = System.Drawing.Color.White + Me.UsrcntlKundeBearbeitenFull1.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrcntlKundeBearbeitenFull1.Location = New System.Drawing.Point(0, 0) + Me.UsrcntlKundeBearbeitenFull1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) + Me.UsrcntlKundeBearbeitenFull1.Name = "UsrcntlKundeBearbeitenFull1" + Me.UsrcntlKundeBearbeitenFull1.Size = New System.Drawing.Size(1638, 1299) + Me.UsrcntlKundeBearbeitenFull1.TabIndex = 0 + ' 'tbcntrMain ' Me.tbcntrMain.Appearance = System.Windows.Forms.TabAppearance.FlatButtons @@ -377,6 +387,48 @@ Partial Class frmKundenblatt Me.tbAllgemein.TabIndex = 0 Me.tbAllgemein.Text = "Allgemein" ' + 'FlatButton6 + ' + Me.FlatButton6.allowBorder = False + Me.FlatButton6.BackgroundImage = Global.SDL.My.Resources.Resources.list + Me.FlatButton6.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.FlatButton6.FlatAppearance.BorderSize = 0 + Me.FlatButton6.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.FlatButton6.ForeColor = System.Drawing.Color.Black + Me.FlatButton6.Location = New System.Drawing.Point(708, 547) + Me.FlatButton6.Name = "FlatButton6" + Me.FlatButton6.Size = New System.Drawing.Size(15, 12) + Me.FlatButton6.TabIndex = 191 + Me.FlatButton6.UseVisualStyleBackColor = True + ' + 'lblBonitaet + ' + Me.lblBonitaet._DateTimeOnly = False + Me.lblBonitaet._numbersOnly = False + Me.lblBonitaet._numbersOnlyKommastellen = "" + Me.lblBonitaet._numbersOnlyTrennzeichen = True + Me.lblBonitaet._Prozent = False + Me.lblBonitaet._ShortDateNew = False + Me.lblBonitaet._ShortDateOnly = False + Me.lblBonitaet._TimeOnly = False + Me.lblBonitaet._TimeOnly_Seconds = False + Me.lblBonitaet._value = Nothing + Me.lblBonitaet._Waehrung = False + Me.lblBonitaet._WaehrungZeichen = True + Me.lblBonitaet.BackColor = System.Drawing.Color.WhiteSmoke + Me.lblBonitaet.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.lblBonitaet.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblBonitaet.ForeColor = System.Drawing.Color.Black + Me.lblBonitaet.Location = New System.Drawing.Point(648, 546) + Me.lblBonitaet.MaxLineLength = -1 + Me.lblBonitaet.MaxLines_Warning = "" + Me.lblBonitaet.MaxLines_Warning_Label = Nothing + Me.lblBonitaet.Name = "lblBonitaet" + Me.lblBonitaet.ReadOnly = True + Me.lblBonitaet.Size = New System.Drawing.Size(54, 13) + Me.lblBonitaet.TabIndex = 189 + Me.lblBonitaet.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' 'Label39 ' Me.Label39.AutoSize = True @@ -387,6 +439,21 @@ Partial Class frmKundenblatt Me.Label39.TabIndex = 188 Me.Label39.Text = "Bonität:" ' + 'btnBonitaetBearbeiten + ' + Me.btnBonitaetBearbeiten.allowBorder = False + Me.btnBonitaetBearbeiten.BackgroundImage = Global.SDL.My.Resources.Resources.plus + Me.btnBonitaetBearbeiten.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnBonitaetBearbeiten.FlatAppearance.BorderSize = 0 + Me.btnBonitaetBearbeiten.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnBonitaetBearbeiten.ForeColor = System.Drawing.Color.Black + Me.btnBonitaetBearbeiten.Location = New System.Drawing.Point(568, 546) + Me.btnBonitaetBearbeiten.Name = "btnBonitaetBearbeiten" + Me.btnBonitaetBearbeiten.Size = New System.Drawing.Size(15, 12) + Me.btnBonitaetBearbeiten.TabIndex = 187 + Me.btnBonitaetBearbeiten.UseVisualStyleBackColor = True + Me.btnBonitaetBearbeiten.Visible = False + ' 'TabControl1 ' Me.TabControl1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ @@ -409,7 +476,7 @@ Partial Class frmKundenblatt Me.TabPage1.Location = New System.Drawing.Point(4, 22) Me.TabPage1.Name = "TabPage1" Me.TabPage1.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage1.Size = New System.Drawing.Size(710, 708) + Me.TabPage1.Size = New System.Drawing.Size(710, 691) Me.TabPage1.TabIndex = 0 Me.TabPage1.Text = "Offene Posten" Me.TabPage1.UseVisualStyleBackColor = True @@ -468,7 +535,7 @@ Partial Class frmKundenblatt Me.dgvOffenePosten.RowHeadersDefaultCellStyle = DataGridViewCellStyle4 Me.dgvOffenePosten.RowHeadersVisible = False Me.dgvOffenePosten.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvOffenePosten.Size = New System.Drawing.Size(707, 673) + Me.dgvOffenePosten.Size = New System.Drawing.Size(707, 656) Me.dgvOffenePosten.TabIndex = 175 ' 'Label10 @@ -559,6 +626,34 @@ Partial Class frmKundenblatt Me.Label13.TabIndex = 184 Me.Label13.Text = "Umsatz Jahr:" ' + 'txtUmsatzJahr + ' + Me.txtUmsatzJahr._DateTimeOnly = False + Me.txtUmsatzJahr._numbersOnly = False + Me.txtUmsatzJahr._numbersOnlyKommastellen = "" + Me.txtUmsatzJahr._numbersOnlyTrennzeichen = True + Me.txtUmsatzJahr._Prozent = False + Me.txtUmsatzJahr._ShortDateNew = False + Me.txtUmsatzJahr._ShortDateOnly = False + Me.txtUmsatzJahr._TimeOnly = False + Me.txtUmsatzJahr._TimeOnly_Seconds = False + Me.txtUmsatzJahr._value = Nothing + Me.txtUmsatzJahr._Waehrung = False + Me.txtUmsatzJahr._WaehrungZeichen = True + Me.txtUmsatzJahr.BackColor = System.Drawing.Color.White + Me.txtUmsatzJahr.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.txtUmsatzJahr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtUmsatzJahr.ForeColor = System.Drawing.Color.Black + Me.txtUmsatzJahr.Location = New System.Drawing.Point(608, 6) + Me.txtUmsatzJahr.MaxLineLength = -1 + Me.txtUmsatzJahr.MaxLines_Warning = "" + Me.txtUmsatzJahr.MaxLines_Warning_Label = Nothing + Me.txtUmsatzJahr.Name = "txtUmsatzJahr" + Me.txtUmsatzJahr.ReadOnly = True + Me.txtUmsatzJahr.Size = New System.Drawing.Size(96, 13) + Me.txtUmsatzJahr.TabIndex = 185 + Me.txtUmsatzJahr.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' 'TabPage3 ' Me.TabPage3.AutoScroll = True @@ -647,6 +742,18 @@ Partial Class frmKundenblatt Me.Label11.TabIndex = 178 Me.Label11.Text = "Daten für Firma:" ' + 'cboFirmaFMZOLL + ' + Me.cboFirmaFMZOLL._allowedValuesFreiText = Nothing + Me.cboFirmaFMZOLL._allowFreiText = False + Me.cboFirmaFMZOLL._value = "" + Me.cboFirmaFMZOLL.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboFirmaFMZOLL.FormattingEnabled = True + Me.cboFirmaFMZOLL.Location = New System.Drawing.Point(100, 543) + Me.cboFirmaFMZOLL.Name = "cboFirmaFMZOLL" + Me.cboFirmaFMZOLL.Size = New System.Drawing.Size(184, 21) + Me.cboFirmaFMZOLL.TabIndex = 179 + ' 'Label17 ' Me.Label17.AutoSize = True @@ -1270,6 +1377,67 @@ Partial Class frmKundenblatt Me.flpSDLDok.Size = New System.Drawing.Size(158, 125) Me.flpSDLDok.TabIndex = 176 ' + 'scanErstbestellung + ' + Me.scanErstbestellung._ARCHIV = True + Me.scanErstbestellung._DATENSERVER_KATEGORIE = "DOKUMENTE" + Me.scanErstbestellung._DATENSERVER_ORDNER = "MDM" + Me.scanErstbestellung._DATENSERVER_UOrdner1 = Nothing + Me.scanErstbestellung._DATENSERVER_UOrdner2 = Nothing + Me.scanErstbestellung._DATENSERVER_UOrdner3 = Nothing + Me.scanErstbestellung._MULTI_FILES = True + Me.scanErstbestellung._TEXT_PDF = "Erstbestellung" + Me.scanErstbestellung.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink + Me.scanErstbestellung.BackColor = System.Drawing.Color.White + Me.scanErstbestellung.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.scanErstbestellung.Cursor = System.Windows.Forms.Cursors.Hand + Me.scanErstbestellung.Location = New System.Drawing.Point(1, 1) + Me.scanErstbestellung.Margin = New System.Windows.Forms.Padding(1) + Me.scanErstbestellung.Name = "scanErstbestellung" + Me.scanErstbestellung.Size = New System.Drawing.Size(137, 24) + Me.scanErstbestellung.TabIndex = 172 + ' + 'scanJaraVereinbarung + ' + Me.scanJaraVereinbarung._ARCHIV = True + Me.scanJaraVereinbarung._DATENSERVER_KATEGORIE = "DOKUMENTE" + Me.scanJaraVereinbarung._DATENSERVER_ORDNER = "MDM" + Me.scanJaraVereinbarung._DATENSERVER_UOrdner1 = Nothing + Me.scanJaraVereinbarung._DATENSERVER_UOrdner2 = Nothing + Me.scanJaraVereinbarung._DATENSERVER_UOrdner3 = Nothing + Me.scanJaraVereinbarung._MULTI_FILES = True + Me.scanJaraVereinbarung._TEXT_PDF = "Jara-Vereinbarung" + Me.scanJaraVereinbarung.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink + Me.scanJaraVereinbarung.BackColor = System.Drawing.Color.White + Me.scanJaraVereinbarung.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.scanJaraVereinbarung.Cursor = System.Windows.Forms.Cursors.Hand + Me.scanJaraVereinbarung.Location = New System.Drawing.Point(1, 27) + Me.scanJaraVereinbarung.Margin = New System.Windows.Forms.Padding(1) + Me.scanJaraVereinbarung.Name = "scanJaraVereinbarung" + Me.scanJaraVereinbarung.Size = New System.Drawing.Size(137, 24) + Me.scanJaraVereinbarung.TabIndex = 173 + ' + 'scanMWSTAgreement + ' + Me.scanMWSTAgreement._ARCHIV = True + Me.scanMWSTAgreement._DATENSERVER_KATEGORIE = "DOKUMENTE" + Me.scanMWSTAgreement._DATENSERVER_ORDNER = "MDM" + Me.scanMWSTAgreement._DATENSERVER_UOrdner1 = Nothing + Me.scanMWSTAgreement._DATENSERVER_UOrdner2 = Nothing + Me.scanMWSTAgreement._DATENSERVER_UOrdner3 = Nothing + Me.scanMWSTAgreement._MULTI_FILES = True + Me.scanMWSTAgreement._TEXT_PDF = "MST Agreement" + Me.scanMWSTAgreement.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink + Me.scanMWSTAgreement.BackColor = System.Drawing.Color.White + Me.scanMWSTAgreement.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.scanMWSTAgreement.Cursor = System.Windows.Forms.Cursors.Hand + Me.scanMWSTAgreement.Location = New System.Drawing.Point(1, 53) + Me.scanMWSTAgreement.Margin = New System.Windows.Forms.Padding(1) + Me.scanMWSTAgreement.Name = "scanMWSTAgreement" + Me.scanMWSTAgreement.Size = New System.Drawing.Size(137, 24) + Me.scanMWSTAgreement.TabIndex = 174 + Me.scanMWSTAgreement.Visible = False + ' 'Label34 ' Me.Label34.AutoSize = True @@ -1369,6 +1537,26 @@ Partial Class frmKundenblatt Me.Label32.TabIndex = 13 Me.Label32.Text = "Letzter Sachbearbeiter:" ' + 'scanSDLSonst + ' + Me.scanSDLSonst._DATENSERVER_KATEGORIE = "DOKUMENTE" + Me.scanSDLSonst._DATENSERVER_ORDNER = "MDM" + Me.scanSDLSonst._DATENSERVER_UOrdner1 = "" + Me.scanSDLSonst._DATENSERVER_UOrdner2 = "" + Me.scanSDLSonst._DATENSERVER_UOrdner3 = "" + Me.scanSDLSonst._OPEN_ORIGINAL = False + Me.scanSDLSonst._TYPE = "PDF" + Me.scanSDLSonst.AllowDrop = True + Me.scanSDLSonst.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink + Me.scanSDLSonst.BackColor = System.Drawing.Color.White + Me.scanSDLSonst.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.scanSDLSonst.Cursor = System.Windows.Forms.Cursors.Default + Me.scanSDLSonst.Location = New System.Drawing.Point(890, 19) + Me.scanSDLSonst.Margin = New System.Windows.Forms.Padding(0) + Me.scanSDLSonst.Name = "scanSDLSonst" + Me.scanSDLSonst.Size = New System.Drawing.Size(260, 124) + Me.scanSDLSonst.TabIndex = 173 + ' 'lblAenderungsdatum_SDL ' Me.lblAenderungsdatum_SDL.AutoSize = True @@ -1425,6 +1613,29 @@ Partial Class frmKundenblatt Me.Label1.TabIndex = 19 Me.Label1.Text = "Benutzer-Nr:" ' + 'txtMautDE_BenutzerNr + ' + Me.txtMautDE_BenutzerNr._DateTimeOnly = False + Me.txtMautDE_BenutzerNr._numbersOnly = True + Me.txtMautDE_BenutzerNr._numbersOnlyKommastellen = "" + Me.txtMautDE_BenutzerNr._numbersOnlyTrennzeichen = True + Me.txtMautDE_BenutzerNr._Prozent = False + Me.txtMautDE_BenutzerNr._ShortDateNew = False + Me.txtMautDE_BenutzerNr._ShortDateOnly = False + Me.txtMautDE_BenutzerNr._TimeOnly = False + Me.txtMautDE_BenutzerNr._TimeOnly_Seconds = False + Me.txtMautDE_BenutzerNr._value = "" + Me.txtMautDE_BenutzerNr._Waehrung = False + Me.txtMautDE_BenutzerNr._WaehrungZeichen = True + Me.txtMautDE_BenutzerNr.ForeColor = System.Drawing.Color.Black + Me.txtMautDE_BenutzerNr.Location = New System.Drawing.Point(72, 21) + Me.txtMautDE_BenutzerNr.MaxLineLength = -1 + Me.txtMautDE_BenutzerNr.MaxLines_Warning = "" + Me.txtMautDE_BenutzerNr.MaxLines_Warning_Label = Nothing + Me.txtMautDE_BenutzerNr.Name = "txtMautDE_BenutzerNr" + Me.txtMautDE_BenutzerNr.Size = New System.Drawing.Size(129, 20) + Me.txtMautDE_BenutzerNr.TabIndex = 18 + ' 'lblMautDEFlottenPIN ' Me.lblMautDEFlottenPIN.AutoSize = True @@ -1443,6 +1654,52 @@ Partial Class frmKundenblatt Me.Label6.TabIndex = 17 Me.Label6.Text = "Master-PIN:" ' + 'txtMautDE_FlottenPIN + ' + Me.txtMautDE_FlottenPIN._DateTimeOnly = False + Me.txtMautDE_FlottenPIN._numbersOnly = True + Me.txtMautDE_FlottenPIN._numbersOnlyKommastellen = "" + Me.txtMautDE_FlottenPIN._numbersOnlyTrennzeichen = True + Me.txtMautDE_FlottenPIN._Prozent = False + Me.txtMautDE_FlottenPIN._ShortDateNew = False + Me.txtMautDE_FlottenPIN._ShortDateOnly = False + Me.txtMautDE_FlottenPIN._TimeOnly = False + Me.txtMautDE_FlottenPIN._TimeOnly_Seconds = False + Me.txtMautDE_FlottenPIN._value = "" + Me.txtMautDE_FlottenPIN._Waehrung = False + Me.txtMautDE_FlottenPIN._WaehrungZeichen = True + Me.txtMautDE_FlottenPIN.ForeColor = System.Drawing.Color.Black + Me.txtMautDE_FlottenPIN.Location = New System.Drawing.Point(72, 47) + Me.txtMautDE_FlottenPIN.MaxLineLength = -1 + Me.txtMautDE_FlottenPIN.MaxLines_Warning = "" + Me.txtMautDE_FlottenPIN.MaxLines_Warning_Label = Nothing + Me.txtMautDE_FlottenPIN.Name = "txtMautDE_FlottenPIN" + Me.txtMautDE_FlottenPIN.Size = New System.Drawing.Size(63, 20) + Me.txtMautDE_FlottenPIN.TabIndex = 14 + ' + 'txtMautDEMasterPIN + ' + Me.txtMautDEMasterPIN._DateTimeOnly = False + Me.txtMautDEMasterPIN._numbersOnly = True + Me.txtMautDEMasterPIN._numbersOnlyKommastellen = "" + Me.txtMautDEMasterPIN._numbersOnlyTrennzeichen = True + Me.txtMautDEMasterPIN._Prozent = False + Me.txtMautDEMasterPIN._ShortDateNew = False + Me.txtMautDEMasterPIN._ShortDateOnly = False + Me.txtMautDEMasterPIN._TimeOnly = False + Me.txtMautDEMasterPIN._TimeOnly_Seconds = False + Me.txtMautDEMasterPIN._value = "" + Me.txtMautDEMasterPIN._Waehrung = False + Me.txtMautDEMasterPIN._WaehrungZeichen = True + Me.txtMautDEMasterPIN.ForeColor = System.Drawing.Color.Black + Me.txtMautDEMasterPIN.Location = New System.Drawing.Point(207, 47) + Me.txtMautDEMasterPIN.MaxLineLength = -1 + Me.txtMautDEMasterPIN.MaxLines_Warning = "" + Me.txtMautDEMasterPIN.MaxLines_Warning_Label = Nothing + Me.txtMautDEMasterPIN.Name = "txtMautDEMasterPIN" + Me.txtMautDEMasterPIN.Size = New System.Drawing.Size(63, 20) + Me.txtMautDEMasterPIN.TabIndex = 16 + ' 'lblLetzterSA_SDL ' Me.lblLetzterSA_SDL.AutoSize = True @@ -1468,11 +1725,21 @@ Partial Class frmKundenblatt Me.tbSDLKarten.Location = New System.Drawing.Point(4, 22) Me.tbSDLKarten.Name = "tbSDLKarten" Me.tbSDLKarten.Padding = New System.Windows.Forms.Padding(3) - Me.tbSDLKarten.Size = New System.Drawing.Size(1630, 1273) + Me.tbSDLKarten.Size = New System.Drawing.Size(178, 39) Me.tbSDLKarten.TabIndex = 7 Me.tbSDLKarten.Text = "SDL-Kartenverwaltung" Me.tbSDLKarten.UseVisualStyleBackColor = True ' + 'usrcntlKarten + ' + Me.usrcntlKarten.Cursor = System.Windows.Forms.Cursors.Default + Me.usrcntlKarten.Dock = System.Windows.Forms.DockStyle.Fill + Me.usrcntlKarten.Location = New System.Drawing.Point(3, 3) + Me.usrcntlKarten.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) + Me.usrcntlKarten.Name = "usrcntlKarten" + Me.usrcntlKarten.Size = New System.Drawing.Size(172, 33) + Me.usrcntlKarten.TabIndex = 0 + ' 'tbLKW ' Me.tbLKW.Controls.Add(Me.pnlLKWRight) @@ -1480,7 +1747,7 @@ Partial Class frmKundenblatt Me.tbLKW.Location = New System.Drawing.Point(4, 22) Me.tbLKW.Name = "tbLKW" Me.tbLKW.Padding = New System.Windows.Forms.Padding(3) - Me.tbLKW.Size = New System.Drawing.Size(1630, 1273) + Me.tbLKW.Size = New System.Drawing.Size(178, 39) Me.tbLKW.TabIndex = 4 Me.tbLKW.Text = "LKWs" Me.tbLKW.UseVisualStyleBackColor = True @@ -1492,9 +1759,22 @@ Partial Class frmKundenblatt Me.pnlLKWRight.Location = New System.Drawing.Point(309, 3) Me.pnlLKWRight.Name = "pnlLKWRight" Me.pnlLKWRight.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) - Me.pnlLKWRight.Size = New System.Drawing.Size(1318, 1267) + Me.pnlLKWRight.Size = New System.Drawing.Size(0, 33) Me.pnlLKWRight.TabIndex = 2 ' + 'UsrCntlLKW1 + ' + Me.UsrCntlLKW1.BackColor = System.Drawing.Color.White + Me.UsrCntlLKW1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.UsrCntlLKW1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.UsrCntlLKW1.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrCntlLKW1.Location = New System.Drawing.Point(10, 0) + Me.UsrCntlLKW1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) + Me.UsrCntlLKW1.MaximumSize = New System.Drawing.Size(1200, 1000) + Me.UsrCntlLKW1.Name = "UsrCntlLKW1" + Me.UsrCntlLKW1.Size = New System.Drawing.Size(0, 33) + Me.UsrCntlLKW1.TabIndex = 0 + ' 'pnlLKW ' Me.pnlLKW.Controls.Add(Me.dgvLKW) @@ -1503,7 +1783,7 @@ Partial Class frmKundenblatt Me.pnlLKW.Dock = System.Windows.Forms.DockStyle.Left Me.pnlLKW.Location = New System.Drawing.Point(3, 3) Me.pnlLKW.Name = "pnlLKW" - Me.pnlLKW.Size = New System.Drawing.Size(306, 1267) + Me.pnlLKW.Size = New System.Drawing.Size(306, 33) Me.pnlLKW.TabIndex = 3 ' 'dgvLKW @@ -1544,7 +1824,7 @@ Partial Class frmKundenblatt Me.dgvLKW.RowHeadersDefaultCellStyle = DataGridViewCellStyle25 Me.dgvLKW.RowHeadersVisible = False Me.dgvLKW.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvLKW.Size = New System.Drawing.Size(306, 1093) + Me.dgvLKW.Size = New System.Drawing.Size(306, 0) Me.dgvLKW.TabIndex = 2 ' 'pnlLKWBottom @@ -1556,7 +1836,7 @@ Partial Class frmKundenblatt Me.pnlLKWBottom.Controls.Add(Me.Button13) Me.pnlLKWBottom.Controls.Add(Me.lblErgebnisse) Me.pnlLKWBottom.Dock = System.Windows.Forms.DockStyle.Bottom - Me.pnlLKWBottom.Location = New System.Drawing.Point(0, 1155) + Me.pnlLKWBottom.Location = New System.Drawing.Point(0, -79) Me.pnlLKWBottom.Name = "pnlLKWBottom" Me.pnlLKWBottom.Size = New System.Drawing.Size(306, 112) Me.pnlLKWBottom.TabIndex = 3 @@ -1697,7 +1977,7 @@ Partial Class frmKundenblatt Me.tbVERAGCard.Location = New System.Drawing.Point(4, 22) Me.tbVERAGCard.Name = "tbVERAGCard" Me.tbVERAGCard.Padding = New System.Windows.Forms.Padding(3) - Me.tbVERAGCard.Size = New System.Drawing.Size(1630, 1273) + Me.tbVERAGCard.Size = New System.Drawing.Size(178, 39) Me.tbVERAGCard.TabIndex = 6 Me.tbVERAGCard.Text = "VERAG Card" Me.tbVERAGCard.UseVisualStyleBackColor = True @@ -1709,7 +1989,7 @@ Partial Class frmKundenblatt Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel3.Location = New System.Drawing.Point(3, 3) Me.Panel3.Name = "Panel3" - Me.Panel3.Size = New System.Drawing.Size(1624, 1267) + Me.Panel3.Size = New System.Drawing.Size(172, 33) Me.Panel3.TabIndex = 0 ' 'tbDokumente @@ -1727,7 +2007,7 @@ Partial Class frmKundenblatt Me.tbDokumente.Controls.Add(Me.scanVertragVeragKd) Me.tbDokumente.Location = New System.Drawing.Point(4, 22) Me.tbDokumente.Name = "tbDokumente" - Me.tbDokumente.Size = New System.Drawing.Size(1630, 1273) + Me.tbDokumente.Size = New System.Drawing.Size(178, 39) Me.tbDokumente.TabIndex = 8 Me.tbDokumente.Text = "Dokumente" Me.tbDokumente.UseVisualStyleBackColor = True @@ -1762,603 +2042,6 @@ Partial Class frmKundenblatt Me.lblSonstigeDokumente.TabIndex = 2 Me.lblSonstigeDokumente.Text = "Sonstige Dokumente" ' - 'tbBesuchsberichte - ' - Me.tbBesuchsberichte.Location = New System.Drawing.Point(4, 22) - Me.tbBesuchsberichte.Name = "tbBesuchsberichte" - Me.tbBesuchsberichte.Padding = New System.Windows.Forms.Padding(3) - Me.tbBesuchsberichte.Size = New System.Drawing.Size(1630, 1273) - Me.tbBesuchsberichte.TabIndex = 9 - Me.tbBesuchsberichte.Text = "Besuchsberichte" - Me.tbBesuchsberichte.UseVisualStyleBackColor = True - ' - 'tbFremdrechnungen - ' - Me.tbFremdrechnungen.Location = New System.Drawing.Point(4, 22) - Me.tbFremdrechnungen.Name = "tbFremdrechnungen" - Me.tbFremdrechnungen.Size = New System.Drawing.Size(1630, 1273) - Me.tbFremdrechnungen.TabIndex = 10 - Me.tbFremdrechnungen.Text = "Fremdrechnungen" - Me.tbFremdrechnungen.UseVisualStyleBackColor = True - ' - 'tbOfferte - ' - Me.tbOfferte.Controls.Add(Me.UsrCntlOfferte1) - Me.tbOfferte.Location = New System.Drawing.Point(4, 25) - Me.tbOfferte.Margin = New System.Windows.Forms.Padding(2) - Me.tbOfferte.Name = "tbOfferte" - Me.tbOfferte.Size = New System.Drawing.Size(1644, 1305) - Me.tbOfferte.TabIndex = 11 - Me.tbOfferte.Text = "Offerte" - Me.tbOfferte.UseVisualStyleBackColor = True - ' - 'tbUSTV - ' - Me.tbUSTV.Controls.Add(Me.tbcntrUSTV) - Me.tbUSTV.Location = New System.Drawing.Point(4, 25) - Me.tbUSTV.Name = "tbUSTV" - Me.tbUSTV.Size = New System.Drawing.Size(1644, 1305) - Me.tbUSTV.TabIndex = 12 - Me.tbUSTV.Text = "USTV" - Me.tbUSTV.UseVisualStyleBackColor = True - ' - 'tbcntrUSTV - ' - Me.tbcntrUSTV.Controls.Add(Me.tbUSTVDokumente) - Me.tbcntrUSTV.Controls.Add(Me.tbUSTVAntrage) - Me.tbcntrUSTV.Dock = System.Windows.Forms.DockStyle.Fill - Me.tbcntrUSTV.Location = New System.Drawing.Point(0, 0) - Me.tbcntrUSTV.Margin = New System.Windows.Forms.Padding(0) - Me.tbcntrUSTV.Name = "tbcntrUSTV" - Me.tbcntrUSTV.SelectedIndex = 0 - Me.tbcntrUSTV.Size = New System.Drawing.Size(1644, 1305) - Me.tbcntrUSTV.TabIndex = 1 - ' - 'tbUSTVDokumente - ' - Me.tbUSTVDokumente.Controls.Add(Me.Label8) - Me.tbUSTVDokumente.Controls.Add(Me.scanUSTVsonstigeDokumente) - Me.tbUSTVDokumente.Controls.Add(Me.Label27) - Me.tbUSTVDokumente.Controls.Add(Me.Label37) - Me.tbUSTVDokumente.Controls.Add(Me.scanUSTVFABest) - Me.tbUSTVDokumente.Controls.Add(Me.scanUSTVVollmachten) - Me.tbUSTVDokumente.Location = New System.Drawing.Point(4, 22) - Me.tbUSTVDokumente.Name = "tbUSTVDokumente" - Me.tbUSTVDokumente.Size = New System.Drawing.Size(1636, 1279) - Me.tbUSTVDokumente.TabIndex = 8 - Me.tbUSTVDokumente.Text = "Dokumente" - Me.tbUSTVDokumente.UseVisualStyleBackColor = True - ' - 'Label8 - ' - Me.Label8.AutoSize = True - Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label8.Location = New System.Drawing.Point(604, 17) - Me.Label8.Name = "Label8" - Me.Label8.Size = New System.Drawing.Size(126, 13) - Me.Label8.TabIndex = 8 - Me.Label8.Text = "sonstige Dokumente:" - ' - 'Label27 - ' - Me.Label27.AutoSize = True - Me.Label27.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label27.Location = New System.Drawing.Point(311, 17) - Me.Label27.Name = "Label27" - Me.Label27.Size = New System.Drawing.Size(153, 13) - Me.Label27.TabIndex = 6 - Me.Label27.Text = "Finanzamt-Bestätigungen:" - ' - 'Label37 - ' - Me.Label37.AutoSize = True - Me.Label37.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label37.Location = New System.Drawing.Point(14, 17) - Me.Label37.Name = "Label37" - Me.Label37.Size = New System.Drawing.Size(113, 13) - Me.Label37.TabIndex = 2 - Me.Label37.Text = "USTV Vollmachten" - ' - 'tbUSTVAntrage - ' - Me.tbUSTVAntrage.Controls.Add(Me.UsrCntlUSTV) - Me.tbUSTVAntrage.Location = New System.Drawing.Point(4, 22) - Me.tbUSTVAntrage.Name = "tbUSTVAntrage" - Me.tbUSTVAntrage.Padding = New System.Windows.Forms.Padding(3) - Me.tbUSTVAntrage.Size = New System.Drawing.Size(1636, 1279) - Me.tbUSTVAntrage.TabIndex = 9 - Me.tbUSTVAntrage.Text = "USTV-Anträge" - Me.tbUSTVAntrage.UseVisualStyleBackColor = True - ' - 'cntxtExcel - ' - Me.cntxtExcel.ImageScalingSize = New System.Drawing.Size(24, 24) - Me.cntxtExcel.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem3, Me.ToolStripMenuItem6}) - Me.cntxtExcel.Name = "cntxtExcel" - Me.cntxtExcel.Size = New System.Drawing.Size(211, 48) - Me.cntxtExcel.Text = "Excel" - ' - 'ToolStripMenuItem3 - ' - Me.ToolStripMenuItem3.Name = "ToolStripMenuItem3" - Me.ToolStripMenuItem3.Size = New System.Drawing.Size(210, 22) - Me.ToolStripMenuItem3.Text = "Einfach" - ' - 'ToolStripMenuItem6 - ' - Me.ToolStripMenuItem6.Name = "ToolStripMenuItem6" - Me.ToolStripMenuItem6.Size = New System.Drawing.Size(210, 22) - Me.ToolStripMenuItem6.Text = "Formatiert (dauert länger)" - ' - 'btnAbfVerb - ' - Me.btnAbfVerb.BackColor = System.Drawing.Color.White - Me.btnAbfVerb.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnAbfVerb.ForeColor = System.Drawing.Color.Black - Me.btnAbfVerb.Location = New System.Drawing.Point(1024, 43) - Me.btnAbfVerb.Name = "btnAbfVerb" - Me.btnAbfVerb.Size = New System.Drawing.Size(165, 25) - Me.btnAbfVerb.TabIndex = 1 - Me.btnAbfVerb.Text = "Abfertigungsverbot setzen" - Me.btnAbfVerb.UseVisualStyleBackColor = False - Me.btnAbfVerb.Visible = False - ' - 'lblAbfVerb - ' - Me.lblAbfVerb.AutoSize = True - Me.lblAbfVerb.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.lblAbfVerb.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblAbfVerb.ForeColor = System.Drawing.Color.White - Me.lblAbfVerb.Location = New System.Drawing.Point(1410, 117) - Me.lblAbfVerb.Name = "lblAbfVerb" - Me.lblAbfVerb.Size = New System.Drawing.Size(242, 20) - Me.lblAbfVerb.TabIndex = 2 - Me.lblAbfVerb.Text = "! ABFERTIGUNGSVERBOT !" - Me.lblAbfVerb.Visible = False - ' - 'ContextMenuStrip1 - ' - Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(24, 24) - Me.ContextMenuStrip1.Name = "ContextMenuStrip1" - Me.ContextMenuStrip1.Size = New System.Drawing.Size(61, 4) - ' - 'ContextMenuStrip2 - ' - Me.ContextMenuStrip2.ImageScalingSize = New System.Drawing.Size(24, 24) - Me.ContextMenuStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.LöschenToolStripMenuItem}) - Me.ContextMenuStrip2.Name = "ContextMenuStrip1" - Me.ContextMenuStrip2.Size = New System.Drawing.Size(119, 26) - ' - 'LöschenToolStripMenuItem - ' - Me.LöschenToolStripMenuItem.Name = "LöschenToolStripMenuItem" - Me.LöschenToolStripMenuItem.Size = New System.Drawing.Size(118, 22) - Me.LöschenToolStripMenuItem.Text = "Löschen" - ' - 'ContextMenuStrip3 - ' - Me.ContextMenuStrip3.ImageScalingSize = New System.Drawing.Size(24, 24) - Me.ContextMenuStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem1}) - Me.ContextMenuStrip3.Name = "ContextMenuStrip1" - Me.ContextMenuStrip3.Size = New System.Drawing.Size(119, 26) - ' - 'ToolStripMenuItem1 - ' - Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1" - Me.ToolStripMenuItem1.Size = New System.Drawing.Size(118, 22) - Me.ToolStripMenuItem1.Text = "Löschen" - ' - 'mne - ' - Me.mne.AutoSize = False - Me.mne.BackgroundImage = Global.SDL.My.Resources.Resources.transp - Me.mne.Dock = System.Windows.Forms.DockStyle.Bottom - Me.mne.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.mne.ImageScalingSize = New System.Drawing.Size(25, 25) - Me.mne.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AllgemeinToolStripMenuItem, Me.ToolStripMenuItem2, Me.ToolStripMenuItem4, Me.ToolStripMenuItem8, Me.ToolStripMenuItem5, Me.ToolStripMenuItem7}) - Me.mne.Location = New System.Drawing.Point(0, 31) - Me.mne.Name = "mne" - Me.mne.Padding = New System.Windows.Forms.Padding(5, 0, 0, 0) - Me.mne.Size = New System.Drawing.Size(1652, 81) - Me.mne.TabIndex = 3 - Me.mne.Text = "mnue" - ' - 'AllgemeinToolStripMenuItem - ' - Me.AllgemeinToolStripMenuItem.AutoSize = False - Me.AllgemeinToolStripMenuItem.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.AllgemeinToolStripMenuItem.ForeColor = System.Drawing.Color.White - Me.AllgemeinToolStripMenuItem.Image = Global.SDL.My.Resources.Resources.report - Me.AllgemeinToolStripMenuItem.ImageAlign = System.Drawing.ContentAlignment.TopCenter - Me.AllgemeinToolStripMenuItem.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None - Me.AllgemeinToolStripMenuItem.Name = "AllgemeinToolStripMenuItem" - Me.AllgemeinToolStripMenuItem.Size = New System.Drawing.Size(94, 70) - Me.AllgemeinToolStripMenuItem.Text = "Allgemein" - Me.AllgemeinToolStripMenuItem.TextAlign = System.Drawing.ContentAlignment.BottomCenter - Me.AllgemeinToolStripMenuItem.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText - ' - 'ToolStripMenuItem2 - ' - Me.ToolStripMenuItem2.AutoSize = False - Me.ToolStripMenuItem2.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.ToolStripMenuItem2.ForeColor = System.Drawing.Color.White - Me.ToolStripMenuItem2.Image = Global.SDL.My.Resources.Resources.kunden - Me.ToolStripMenuItem2.ImageAlign = System.Drawing.ContentAlignment.TopCenter - Me.ToolStripMenuItem2.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None - Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2" - Me.ToolStripMenuItem2.Size = New System.Drawing.Size(122, 70) - Me.ToolStripMenuItem2.Text = "Firmendaten" - Me.ToolStripMenuItem2.TextAlign = System.Drawing.ContentAlignment.BottomCenter - Me.ToolStripMenuItem2.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText - ' - 'ToolStripMenuItem4 - ' - Me.ToolStripMenuItem4.AutoSize = False - Me.ToolStripMenuItem4.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.ToolStripMenuItem4.DropDown = Me.cntxtCntxtMDM - Me.ToolStripMenuItem4.ForeColor = System.Drawing.Color.White - Me.ToolStripMenuItem4.Image = Global.SDL.My.Resources.Resources.logo_mdm - Me.ToolStripMenuItem4.ImageAlign = System.Drawing.ContentAlignment.TopCenter - Me.ToolStripMenuItem4.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None - Me.ToolStripMenuItem4.MergeIndex = 10 - Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4" - Me.ToolStripMenuItem4.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0) - Me.ToolStripMenuItem4.Size = New System.Drawing.Size(122, 60) - Me.ToolStripMenuItem4.Text = "Maut/Diesel" - Me.ToolStripMenuItem4.TextAlign = System.Drawing.ContentAlignment.BottomCenter - Me.ToolStripMenuItem4.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText - ' - 'cntxtCntxtMDM - ' - Me.cntxtCntxtMDM.ImageScalingSize = New System.Drawing.Size(24, 24) - Me.cntxtCntxtMDM.Name = "cntxtCntxtMDM" - Me.cntxtCntxtMDM.OwnerItem = Me.ToolStripMenuItem8 - Me.cntxtCntxtMDM.Size = New System.Drawing.Size(61, 4) - Me.cntxtCntxtMDM.Text = "cntxtMDM" - ' - 'ToolStripMenuItem8 - ' - Me.ToolStripMenuItem8.AutoSize = False - Me.ToolStripMenuItem8.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.ToolStripMenuItem8.DropDown = Me.cntxtCntxtMDM - Me.ToolStripMenuItem8.ForeColor = System.Drawing.Color.White - Me.ToolStripMenuItem8.Image = Global.SDL.My.Resources.Resources.logo_mdm - Me.ToolStripMenuItem8.ImageAlign = System.Drawing.ContentAlignment.TopCenter - Me.ToolStripMenuItem8.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None - Me.ToolStripMenuItem8.MergeIndex = 10 - Me.ToolStripMenuItem8.Name = "ToolStripMenuItem8" - Me.ToolStripMenuItem8.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0) - Me.ToolStripMenuItem8.Size = New System.Drawing.Size(122, 60) - Me.ToolStripMenuItem8.Text = "USTV" - Me.ToolStripMenuItem8.TextAlign = System.Drawing.ContentAlignment.BottomCenter - Me.ToolStripMenuItem8.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText - ' - 'ToolStripMenuItem5 - ' - Me.ToolStripMenuItem5.AutoSize = False - Me.ToolStripMenuItem5.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.ToolStripMenuItem5.ForeColor = System.Drawing.Color.White - Me.ToolStripMenuItem5.Image = Global.SDL.My.Resources.Resources.zoll - Me.ToolStripMenuItem5.ImageAlign = System.Drawing.ContentAlignment.TopCenter - Me.ToolStripMenuItem5.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None - Me.ToolStripMenuItem5.Name = "ToolStripMenuItem5" - Me.ToolStripMenuItem5.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0) - Me.ToolStripMenuItem5.Size = New System.Drawing.Size(55, 60) - Me.ToolStripMenuItem5.Text = "Zoll" - Me.ToolStripMenuItem5.TextAlign = System.Drawing.ContentAlignment.BottomCenter - Me.ToolStripMenuItem5.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText - ' - 'ToolStripMenuItem7 - ' - Me.ToolStripMenuItem7.AutoSize = False - Me.ToolStripMenuItem7.ForeColor = System.Drawing.Color.White - Me.ToolStripMenuItem7.Image = Global.SDL.My.Resources.Resources.checklist1 - Me.ToolStripMenuItem7.ImageAlign = System.Drawing.ContentAlignment.TopCenter - Me.ToolStripMenuItem7.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None - Me.ToolStripMenuItem7.Name = "ToolStripMenuItem7" - Me.ToolStripMenuItem7.Padding = New System.Windows.Forms.Padding(0) - Me.ToolStripMenuItem7.Size = New System.Drawing.Size(150, 60) - Me.ToolStripMenuItem7.Text = "Offerte / Preise" - Me.ToolStripMenuItem7.TextAlign = System.Drawing.ContentAlignment.BottomCenter - Me.ToolStripMenuItem7.TextImageRelation = System.Windows.Forms.TextImageRelation.Overlay - ' - 'pnl - ' - Me.pnl.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.pnl.Controls.Add(Me.pnlInfo) - Me.pnl.Controls.Add(Me.lblINAKTIV) - Me.pnl.Controls.Add(Me.mne) - Me.pnl.Controls.Add(Me.KdSearchBox1) - Me.pnl.Dock = System.Windows.Forms.DockStyle.Top - Me.pnl.Location = New System.Drawing.Point(0, 0) - Me.pnl.Name = "pnl" - Me.pnl.Size = New System.Drawing.Size(1652, 112) - Me.pnl.TabIndex = 0 - ' - 'lblINAKTIV - ' - Me.lblINAKTIV.AutoSize = True - Me.lblINAKTIV.BackColor = System.Drawing.Color.White - Me.lblINAKTIV.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblINAKTIV.ForeColor = System.Drawing.Color.Red - Me.lblINAKTIV.Location = New System.Drawing.Point(1070, 8) - Me.lblINAKTIV.Name = "lblINAKTIV" - Me.lblINAKTIV.Size = New System.Drawing.Size(98, 20) - Me.lblINAKTIV.TabIndex = 2 - Me.lblINAKTIV.Text = "! INAKTIV !" - Me.lblINAKTIV.Visible = False - ' - 'tbiLeistungen - ' - Me.tbiLeistungen.Name = "tbiLeistungen" - Me.tbiLeistungen.Size = New System.Drawing.Size(186, 22) - Me.tbiLeistungen.Text = "Leistungen" - ' - 'tbiKartenverwaltung - ' - Me.tbiKartenverwaltung.Name = "tbiKartenverwaltung" - Me.tbiKartenverwaltung.Size = New System.Drawing.Size(186, 22) - Me.tbiKartenverwaltung.Text = "Kartenverwaltung" - ' - 'tbiLKW - ' - Me.tbiLKW.Name = "tbiLKW" - Me.tbiLKW.Size = New System.Drawing.Size(186, 22) - Me.tbiLKW.Text = "LKWs" - ' - 'tbiVERAGCard - ' - Me.tbiVERAGCard.Name = "tbiVERAGCard" - Me.tbiVERAGCard.Size = New System.Drawing.Size(186, 22) - Me.tbiVERAGCard.Text = "VERAG Card" - ' - 'FlatButton6 - ' - Me.FlatButton6.allowBorder = False - Me.FlatButton6.BackgroundImage = Global.SDL.My.Resources.Resources.list - Me.FlatButton6.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.FlatButton6.FlatAppearance.BorderSize = 0 - Me.FlatButton6.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.FlatButton6.ForeColor = System.Drawing.Color.Black - Me.FlatButton6.Location = New System.Drawing.Point(708, 547) - Me.FlatButton6.Name = "FlatButton6" - Me.FlatButton6.Size = New System.Drawing.Size(15, 12) - Me.FlatButton6.TabIndex = 191 - Me.FlatButton6.UseVisualStyleBackColor = True - ' - 'lblBonitaet - ' - Me.lblBonitaet._DateTimeOnly = False - Me.lblBonitaet._numbersOnly = False - Me.lblBonitaet._numbersOnlyKommastellen = "" - Me.lblBonitaet._numbersOnlyTrennzeichen = True - Me.lblBonitaet._Prozent = False - Me.lblBonitaet._ShortDateNew = False - Me.lblBonitaet._ShortDateOnly = False - Me.lblBonitaet._TimeOnly = False - Me.lblBonitaet._TimeOnly_Seconds = False - Me.lblBonitaet._value = Nothing - Me.lblBonitaet._Waehrung = False - Me.lblBonitaet._WaehrungZeichen = True - Me.lblBonitaet.BackColor = System.Drawing.Color.WhiteSmoke - Me.lblBonitaet.BorderStyle = System.Windows.Forms.BorderStyle.None - Me.lblBonitaet.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblBonitaet.ForeColor = System.Drawing.Color.Black - Me.lblBonitaet.Location = New System.Drawing.Point(648, 546) - Me.lblBonitaet.MaxLineLength = -1 - Me.lblBonitaet.MaxLines_Warning = "" - Me.lblBonitaet.MaxLines_Warning_Label = Nothing - Me.lblBonitaet.Name = "lblBonitaet" - Me.lblBonitaet.ReadOnly = True - Me.lblBonitaet.Size = New System.Drawing.Size(54, 13) - Me.lblBonitaet.TabIndex = 189 - Me.lblBonitaet.TextAlign = System.Windows.Forms.HorizontalAlignment.Center - ' - 'btnBonitaetBearbeiten - ' - Me.btnBonitaetBearbeiten.allowBorder = False - Me.btnBonitaetBearbeiten.BackgroundImage = Global.SDL.My.Resources.Resources.plus - Me.btnBonitaetBearbeiten.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.btnBonitaetBearbeiten.FlatAppearance.BorderSize = 0 - Me.btnBonitaetBearbeiten.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnBonitaetBearbeiten.ForeColor = System.Drawing.Color.Black - Me.btnBonitaetBearbeiten.Location = New System.Drawing.Point(568, 546) - Me.btnBonitaetBearbeiten.Name = "btnBonitaetBearbeiten" - Me.btnBonitaetBearbeiten.Size = New System.Drawing.Size(15, 12) - Me.btnBonitaetBearbeiten.TabIndex = 187 - Me.btnBonitaetBearbeiten.UseVisualStyleBackColor = True - Me.btnBonitaetBearbeiten.Visible = False - ' - 'txtUmsatzJahr - ' - Me.txtUmsatzJahr._DateTimeOnly = False - Me.txtUmsatzJahr._numbersOnly = False - Me.txtUmsatzJahr._numbersOnlyKommastellen = "" - Me.txtUmsatzJahr._numbersOnlyTrennzeichen = True - Me.txtUmsatzJahr._Prozent = False - Me.txtUmsatzJahr._ShortDateNew = False - Me.txtUmsatzJahr._ShortDateOnly = False - Me.txtUmsatzJahr._TimeOnly = False - Me.txtUmsatzJahr._TimeOnly_Seconds = False - Me.txtUmsatzJahr._value = Nothing - Me.txtUmsatzJahr._Waehrung = False - Me.txtUmsatzJahr._WaehrungZeichen = True - Me.txtUmsatzJahr.BackColor = System.Drawing.Color.White - Me.txtUmsatzJahr.BorderStyle = System.Windows.Forms.BorderStyle.None - Me.txtUmsatzJahr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtUmsatzJahr.ForeColor = System.Drawing.Color.Black - Me.txtUmsatzJahr.Location = New System.Drawing.Point(608, 6) - Me.txtUmsatzJahr.MaxLineLength = -1 - Me.txtUmsatzJahr.MaxLines_Warning = "" - Me.txtUmsatzJahr.MaxLines_Warning_Label = Nothing - Me.txtUmsatzJahr.Name = "txtUmsatzJahr" - Me.txtUmsatzJahr.ReadOnly = True - Me.txtUmsatzJahr.Size = New System.Drawing.Size(96, 13) - Me.txtUmsatzJahr.TabIndex = 185 - Me.txtUmsatzJahr.TextAlign = System.Windows.Forms.HorizontalAlignment.Right - ' - 'cboFirmaFMZOLL - ' - Me.cboFirmaFMZOLL._allowedValuesFreiText = Nothing - Me.cboFirmaFMZOLL._allowFreiText = False - Me.cboFirmaFMZOLL._value = "" - Me.cboFirmaFMZOLL.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboFirmaFMZOLL.FormattingEnabled = True - Me.cboFirmaFMZOLL.Location = New System.Drawing.Point(100, 543) - Me.cboFirmaFMZOLL.Name = "cboFirmaFMZOLL" - Me.cboFirmaFMZOLL.Size = New System.Drawing.Size(184, 21) - Me.cboFirmaFMZOLL.TabIndex = 179 - ' - 'scanErstbestellung - ' - Me.scanErstbestellung._ARCHIV = True - Me.scanErstbestellung._DATENSERVER_KATEGORIE = "DOKUMENTE" - Me.scanErstbestellung._DATENSERVER_ORDNER = "MDM" - Me.scanErstbestellung._DATENSERVER_UOrdner1 = Nothing - Me.scanErstbestellung._DATENSERVER_UOrdner2 = Nothing - Me.scanErstbestellung._DATENSERVER_UOrdner3 = Nothing - Me.scanErstbestellung._MULTI_FILES = True - Me.scanErstbestellung._TEXT_PDF = "Erstbestellung" - Me.scanErstbestellung.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink - Me.scanErstbestellung.BackColor = System.Drawing.Color.White - Me.scanErstbestellung.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.scanErstbestellung.Cursor = System.Windows.Forms.Cursors.Hand - Me.scanErstbestellung.Location = New System.Drawing.Point(1, 1) - Me.scanErstbestellung.Margin = New System.Windows.Forms.Padding(1) - Me.scanErstbestellung.Name = "scanErstbestellung" - Me.scanErstbestellung.Size = New System.Drawing.Size(137, 24) - Me.scanErstbestellung.TabIndex = 172 - ' - 'scanJaraVereinbarung - ' - Me.scanJaraVereinbarung._ARCHIV = True - Me.scanJaraVereinbarung._DATENSERVER_KATEGORIE = "DOKUMENTE" - Me.scanJaraVereinbarung._DATENSERVER_ORDNER = "MDM" - Me.scanJaraVereinbarung._DATENSERVER_UOrdner1 = Nothing - Me.scanJaraVereinbarung._DATENSERVER_UOrdner2 = Nothing - Me.scanJaraVereinbarung._DATENSERVER_UOrdner3 = Nothing - Me.scanJaraVereinbarung._MULTI_FILES = True - Me.scanJaraVereinbarung._TEXT_PDF = "Jara-Vereinbarung" - Me.scanJaraVereinbarung.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink - Me.scanJaraVereinbarung.BackColor = System.Drawing.Color.White - Me.scanJaraVereinbarung.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.scanJaraVereinbarung.Cursor = System.Windows.Forms.Cursors.Hand - Me.scanJaraVereinbarung.Location = New System.Drawing.Point(1, 27) - Me.scanJaraVereinbarung.Margin = New System.Windows.Forms.Padding(1) - Me.scanJaraVereinbarung.Name = "scanJaraVereinbarung" - Me.scanJaraVereinbarung.Size = New System.Drawing.Size(137, 24) - Me.scanJaraVereinbarung.TabIndex = 173 - ' - 'scanMWSTAgreement - ' - Me.scanMWSTAgreement._ARCHIV = True - Me.scanMWSTAgreement._DATENSERVER_KATEGORIE = "DOKUMENTE" - Me.scanMWSTAgreement._DATENSERVER_ORDNER = "MDM" - Me.scanMWSTAgreement._DATENSERVER_UOrdner1 = Nothing - Me.scanMWSTAgreement._DATENSERVER_UOrdner2 = Nothing - Me.scanMWSTAgreement._DATENSERVER_UOrdner3 = Nothing - Me.scanMWSTAgreement._MULTI_FILES = True - Me.scanMWSTAgreement._TEXT_PDF = "MST Agreement" - Me.scanMWSTAgreement.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink - Me.scanMWSTAgreement.BackColor = System.Drawing.Color.White - Me.scanMWSTAgreement.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.scanMWSTAgreement.Cursor = System.Windows.Forms.Cursors.Hand - Me.scanMWSTAgreement.Location = New System.Drawing.Point(1, 53) - Me.scanMWSTAgreement.Margin = New System.Windows.Forms.Padding(1) - Me.scanMWSTAgreement.Name = "scanMWSTAgreement" - Me.scanMWSTAgreement.Size = New System.Drawing.Size(137, 24) - Me.scanMWSTAgreement.TabIndex = 174 - Me.scanMWSTAgreement.Visible = False - ' - 'scanSDLSonst - ' - Me.scanSDLSonst._DATENSERVER_KATEGORIE = "DOKUMENTE" - Me.scanSDLSonst._DATENSERVER_ORDNER = "MDM" - Me.scanSDLSonst._DATENSERVER_UOrdner1 = "" - Me.scanSDLSonst._DATENSERVER_UOrdner2 = "" - Me.scanSDLSonst._DATENSERVER_UOrdner3 = "" - Me.scanSDLSonst._OPEN_ORIGINAL = False - Me.scanSDLSonst._TYPE = "PDF" - Me.scanSDLSonst.AllowDrop = True - Me.scanSDLSonst.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink - Me.scanSDLSonst.BackColor = System.Drawing.Color.White - Me.scanSDLSonst.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.scanSDLSonst.Cursor = System.Windows.Forms.Cursors.Default - Me.scanSDLSonst.Location = New System.Drawing.Point(890, 19) - Me.scanSDLSonst.Margin = New System.Windows.Forms.Padding(0) - Me.scanSDLSonst.Name = "scanSDLSonst" - Me.scanSDLSonst.Size = New System.Drawing.Size(260, 124) - Me.scanSDLSonst.TabIndex = 173 - ' - 'txtMautDE_BenutzerNr - ' - Me.txtMautDE_BenutzerNr._DateTimeOnly = False - Me.txtMautDE_BenutzerNr._numbersOnly = True - Me.txtMautDE_BenutzerNr._numbersOnlyKommastellen = "" - Me.txtMautDE_BenutzerNr._numbersOnlyTrennzeichen = True - Me.txtMautDE_BenutzerNr._Prozent = False - Me.txtMautDE_BenutzerNr._ShortDateNew = False - Me.txtMautDE_BenutzerNr._ShortDateOnly = False - Me.txtMautDE_BenutzerNr._TimeOnly = False - Me.txtMautDE_BenutzerNr._TimeOnly_Seconds = False - Me.txtMautDE_BenutzerNr._value = "" - Me.txtMautDE_BenutzerNr._Waehrung = False - Me.txtMautDE_BenutzerNr._WaehrungZeichen = True - Me.txtMautDE_BenutzerNr.ForeColor = System.Drawing.Color.Black - Me.txtMautDE_BenutzerNr.Location = New System.Drawing.Point(72, 21) - Me.txtMautDE_BenutzerNr.MaxLineLength = -1 - Me.txtMautDE_BenutzerNr.MaxLines_Warning = "" - Me.txtMautDE_BenutzerNr.MaxLines_Warning_Label = Nothing - Me.txtMautDE_BenutzerNr.Name = "txtMautDE_BenutzerNr" - Me.txtMautDE_BenutzerNr.Size = New System.Drawing.Size(129, 20) - Me.txtMautDE_BenutzerNr.TabIndex = 18 - ' - 'txtMautDE_FlottenPIN - ' - Me.txtMautDE_FlottenPIN._DateTimeOnly = False - Me.txtMautDE_FlottenPIN._numbersOnly = True - Me.txtMautDE_FlottenPIN._numbersOnlyKommastellen = "" - Me.txtMautDE_FlottenPIN._numbersOnlyTrennzeichen = True - Me.txtMautDE_FlottenPIN._Prozent = False - Me.txtMautDE_FlottenPIN._ShortDateNew = False - Me.txtMautDE_FlottenPIN._ShortDateOnly = False - Me.txtMautDE_FlottenPIN._TimeOnly = False - Me.txtMautDE_FlottenPIN._TimeOnly_Seconds = False - Me.txtMautDE_FlottenPIN._value = "" - Me.txtMautDE_FlottenPIN._Waehrung = False - Me.txtMautDE_FlottenPIN._WaehrungZeichen = True - Me.txtMautDE_FlottenPIN.ForeColor = System.Drawing.Color.Black - Me.txtMautDE_FlottenPIN.Location = New System.Drawing.Point(72, 47) - Me.txtMautDE_FlottenPIN.MaxLineLength = -1 - Me.txtMautDE_FlottenPIN.MaxLines_Warning = "" - Me.txtMautDE_FlottenPIN.MaxLines_Warning_Label = Nothing - Me.txtMautDE_FlottenPIN.Name = "txtMautDE_FlottenPIN" - Me.txtMautDE_FlottenPIN.Size = New System.Drawing.Size(63, 20) - Me.txtMautDE_FlottenPIN.TabIndex = 14 - ' - 'txtMautDEMasterPIN - ' - Me.txtMautDEMasterPIN._DateTimeOnly = False - Me.txtMautDEMasterPIN._numbersOnly = True - Me.txtMautDEMasterPIN._numbersOnlyKommastellen = "" - Me.txtMautDEMasterPIN._numbersOnlyTrennzeichen = True - Me.txtMautDEMasterPIN._Prozent = False - Me.txtMautDEMasterPIN._ShortDateNew = False - Me.txtMautDEMasterPIN._ShortDateOnly = False - Me.txtMautDEMasterPIN._TimeOnly = False - Me.txtMautDEMasterPIN._TimeOnly_Seconds = False - Me.txtMautDEMasterPIN._value = "" - Me.txtMautDEMasterPIN._Waehrung = False - Me.txtMautDEMasterPIN._WaehrungZeichen = True - Me.txtMautDEMasterPIN.ForeColor = System.Drawing.Color.Black - Me.txtMautDEMasterPIN.Location = New System.Drawing.Point(207, 47) - Me.txtMautDEMasterPIN.MaxLineLength = -1 - Me.txtMautDEMasterPIN.MaxLines_Warning = "" - Me.txtMautDEMasterPIN.MaxLines_Warning_Label = Nothing - Me.txtMautDEMasterPIN.Name = "txtMautDEMasterPIN" - Me.txtMautDEMasterPIN.Size = New System.Drawing.Size(63, 20) - Me.txtMautDEMasterPIN.TabIndex = 16 - ' 'scanUebernahmebestätigungen ' Me.scanUebernahmebestätigungen._DATENSERVER_KATEGORIE = "DOKUMENTE" @@ -2519,6 +2202,93 @@ Partial Class frmKundenblatt Me.scanVertragVeragKd.Size = New System.Drawing.Size(168, 24) Me.scanVertragVeragKd.TabIndex = 0 ' + 'tbBesuchsberichte + ' + Me.tbBesuchsberichte.Location = New System.Drawing.Point(4, 22) + Me.tbBesuchsberichte.Name = "tbBesuchsberichte" + Me.tbBesuchsberichte.Padding = New System.Windows.Forms.Padding(3) + Me.tbBesuchsberichte.Size = New System.Drawing.Size(178, 39) + Me.tbBesuchsberichte.TabIndex = 9 + Me.tbBesuchsberichte.Text = "Besuchsberichte" + Me.tbBesuchsberichte.UseVisualStyleBackColor = True + ' + 'tbFremdrechnungen + ' + Me.tbFremdrechnungen.Location = New System.Drawing.Point(4, 22) + Me.tbFremdrechnungen.Name = "tbFremdrechnungen" + Me.tbFremdrechnungen.Size = New System.Drawing.Size(178, 39) + Me.tbFremdrechnungen.TabIndex = 10 + Me.tbFremdrechnungen.Text = "Fremdrechnungen" + Me.tbFremdrechnungen.UseVisualStyleBackColor = True + ' + 'tbOfferte + ' + Me.tbOfferte.Controls.Add(Me.UsrCntlOfferte1) + Me.tbOfferte.Location = New System.Drawing.Point(4, 25) + Me.tbOfferte.Margin = New System.Windows.Forms.Padding(2) + Me.tbOfferte.Name = "tbOfferte" + Me.tbOfferte.Size = New System.Drawing.Size(1644, 1305) + Me.tbOfferte.TabIndex = 11 + Me.tbOfferte.Text = "Offerte" + Me.tbOfferte.UseVisualStyleBackColor = True + ' + 'UsrCntlOfferte1 + ' + Me.UsrCntlOfferte1.BackColor = System.Drawing.Color.White + Me.UsrCntlOfferte1.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrCntlOfferte1.Location = New System.Drawing.Point(0, 0) + Me.UsrCntlOfferte1.Margin = New System.Windows.Forms.Padding(1) + Me.UsrCntlOfferte1.Name = "UsrCntlOfferte1" + Me.UsrCntlOfferte1.Size = New System.Drawing.Size(1644, 1305) + Me.UsrCntlOfferte1.TabIndex = 0 + ' + 'tbUSTV + ' + Me.tbUSTV.Controls.Add(Me.tbcntrUSTV) + Me.tbUSTV.Location = New System.Drawing.Point(4, 25) + Me.tbUSTV.Name = "tbUSTV" + Me.tbUSTV.Size = New System.Drawing.Size(1644, 1305) + Me.tbUSTV.TabIndex = 12 + Me.tbUSTV.Text = "USTV" + Me.tbUSTV.UseVisualStyleBackColor = True + ' + 'tbcntrUSTV + ' + Me.tbcntrUSTV.Controls.Add(Me.tbUSTVDokumente) + Me.tbcntrUSTV.Controls.Add(Me.tbUSTVAntrage) + Me.tbcntrUSTV.Dock = System.Windows.Forms.DockStyle.Fill + Me.tbcntrUSTV.Location = New System.Drawing.Point(0, 0) + Me.tbcntrUSTV.Margin = New System.Windows.Forms.Padding(0) + Me.tbcntrUSTV.Name = "tbcntrUSTV" + Me.tbcntrUSTV.SelectedIndex = 0 + Me.tbcntrUSTV.Size = New System.Drawing.Size(1644, 1305) + Me.tbcntrUSTV.TabIndex = 1 + ' + 'tbUSTVDokumente + ' + Me.tbUSTVDokumente.Controls.Add(Me.Label8) + Me.tbUSTVDokumente.Controls.Add(Me.scanUSTVsonstigeDokumente) + Me.tbUSTVDokumente.Controls.Add(Me.Label27) + Me.tbUSTVDokumente.Controls.Add(Me.Label37) + Me.tbUSTVDokumente.Controls.Add(Me.scanUSTVFABest) + Me.tbUSTVDokumente.Controls.Add(Me.scanUSTVVollmachten) + Me.tbUSTVDokumente.Location = New System.Drawing.Point(4, 22) + Me.tbUSTVDokumente.Name = "tbUSTVDokumente" + Me.tbUSTVDokumente.Size = New System.Drawing.Size(1636, 1279) + Me.tbUSTVDokumente.TabIndex = 8 + Me.tbUSTVDokumente.Text = "Dokumente" + Me.tbUSTVDokumente.UseVisualStyleBackColor = True + ' + 'Label8 + ' + Me.Label8.AutoSize = True + Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label8.Location = New System.Drawing.Point(604, 17) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(126, 13) + Me.Label8.TabIndex = 8 + Me.Label8.Text = "sonstige Dokumente:" + ' 'scanUSTVsonstigeDokumente ' Me.scanUSTVsonstigeDokumente._DATENSERVER_KATEGORIE = "DOKUMENTE" @@ -2539,6 +2309,26 @@ Partial Class frmKundenblatt Me.scanUSTVsonstigeDokumente.Size = New System.Drawing.Size(285, 505) Me.scanUSTVsonstigeDokumente.TabIndex = 7 ' + 'Label27 + ' + Me.Label27.AutoSize = True + Me.Label27.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label27.Location = New System.Drawing.Point(311, 17) + Me.Label27.Name = "Label27" + Me.Label27.Size = New System.Drawing.Size(153, 13) + Me.Label27.TabIndex = 6 + Me.Label27.Text = "Finanzamt-Bestätigungen:" + ' + 'Label37 + ' + Me.Label37.AutoSize = True + Me.Label37.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label37.Location = New System.Drawing.Point(14, 17) + Me.Label37.Name = "Label37" + Me.Label37.Size = New System.Drawing.Size(113, 13) + Me.Label37.TabIndex = 2 + Me.Label37.Text = "USTV Vollmachten" + ' 'scanUSTVFABest ' Me.scanUSTVFABest._DATENSERVER_KATEGORIE = "DOKUMENTE" @@ -2579,6 +2369,243 @@ Partial Class frmKundenblatt Me.scanUSTVVollmachten.Size = New System.Drawing.Size(285, 505) Me.scanUSTVVollmachten.TabIndex = 1 ' + 'tbUSTVAntrage + ' + Me.tbUSTVAntrage.Controls.Add(Me.UsrCntlUSTV) + Me.tbUSTVAntrage.Location = New System.Drawing.Point(4, 22) + Me.tbUSTVAntrage.Name = "tbUSTVAntrage" + Me.tbUSTVAntrage.Padding = New System.Windows.Forms.Padding(3) + Me.tbUSTVAntrage.Size = New System.Drawing.Size(184, 45) + Me.tbUSTVAntrage.TabIndex = 9 + Me.tbUSTVAntrage.Text = "USTV-Anträge" + Me.tbUSTVAntrage.UseVisualStyleBackColor = True + ' + 'UsrCntlUSTV + ' + Me.UsrCntlUSTV.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrCntlUSTV.Location = New System.Drawing.Point(3, 3) + Me.UsrCntlUSTV.Name = "UsrCntlUSTV" + Me.UsrCntlUSTV.Size = New System.Drawing.Size(178, 39) + Me.UsrCntlUSTV.TabIndex = 0 + ' + 'cntxtExcel + ' + Me.cntxtExcel.ImageScalingSize = New System.Drawing.Size(24, 24) + Me.cntxtExcel.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem3, Me.ToolStripMenuItem6}) + Me.cntxtExcel.Name = "cntxtExcel" + Me.cntxtExcel.Size = New System.Drawing.Size(211, 48) + Me.cntxtExcel.Text = "Excel" + ' + 'ToolStripMenuItem3 + ' + Me.ToolStripMenuItem3.Name = "ToolStripMenuItem3" + Me.ToolStripMenuItem3.Size = New System.Drawing.Size(210, 22) + Me.ToolStripMenuItem3.Text = "Einfach" + ' + 'ToolStripMenuItem6 + ' + Me.ToolStripMenuItem6.Name = "ToolStripMenuItem6" + Me.ToolStripMenuItem6.Size = New System.Drawing.Size(210, 22) + Me.ToolStripMenuItem6.Text = "Formatiert (dauert länger)" + ' + 'btnAbfVerb + ' + Me.btnAbfVerb.BackColor = System.Drawing.Color.White + Me.btnAbfVerb.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnAbfVerb.ForeColor = System.Drawing.Color.Black + Me.btnAbfVerb.Location = New System.Drawing.Point(1024, 43) + Me.btnAbfVerb.Name = "btnAbfVerb" + Me.btnAbfVerb.Size = New System.Drawing.Size(165, 25) + Me.btnAbfVerb.TabIndex = 1 + Me.btnAbfVerb.Text = "Abfertigungsverbot setzen" + Me.btnAbfVerb.UseVisualStyleBackColor = False + Me.btnAbfVerb.Visible = False + ' + 'lblAbfVerb + ' + Me.lblAbfVerb.AutoSize = True + Me.lblAbfVerb.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lblAbfVerb.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblAbfVerb.ForeColor = System.Drawing.Color.White + Me.lblAbfVerb.Location = New System.Drawing.Point(1410, 117) + Me.lblAbfVerb.Name = "lblAbfVerb" + Me.lblAbfVerb.Size = New System.Drawing.Size(242, 20) + Me.lblAbfVerb.TabIndex = 2 + Me.lblAbfVerb.Text = "! ABFERTIGUNGSVERBOT !" + Me.lblAbfVerb.Visible = False + ' + 'ContextMenuStrip1 + ' + Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(24, 24) + Me.ContextMenuStrip1.Name = "ContextMenuStrip1" + Me.ContextMenuStrip1.Size = New System.Drawing.Size(61, 4) + ' + 'ContextMenuStrip2 + ' + Me.ContextMenuStrip2.ImageScalingSize = New System.Drawing.Size(24, 24) + Me.ContextMenuStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.LöschenToolStripMenuItem}) + Me.ContextMenuStrip2.Name = "ContextMenuStrip1" + Me.ContextMenuStrip2.Size = New System.Drawing.Size(119, 26) + ' + 'LöschenToolStripMenuItem + ' + Me.LöschenToolStripMenuItem.Name = "LöschenToolStripMenuItem" + Me.LöschenToolStripMenuItem.Size = New System.Drawing.Size(118, 22) + Me.LöschenToolStripMenuItem.Text = "Löschen" + ' + 'ContextMenuStrip3 + ' + Me.ContextMenuStrip3.ImageScalingSize = New System.Drawing.Size(24, 24) + Me.ContextMenuStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem1}) + Me.ContextMenuStrip3.Name = "ContextMenuStrip1" + Me.ContextMenuStrip3.Size = New System.Drawing.Size(119, 26) + ' + 'ToolStripMenuItem1 + ' + Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1" + Me.ToolStripMenuItem1.Size = New System.Drawing.Size(118, 22) + Me.ToolStripMenuItem1.Text = "Löschen" + ' + 'mne + ' + Me.mne.AutoSize = False + Me.mne.BackgroundImage = Global.SDL.My.Resources.Resources.transp + Me.mne.Dock = System.Windows.Forms.DockStyle.Bottom + Me.mne.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.mne.ImageScalingSize = New System.Drawing.Size(25, 25) + Me.mne.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AllgemeinToolStripMenuItem, Me.ToolStripMenuItem2, Me.ToolStripMenuItem4, Me.ToolStripMenuItem8, Me.ToolStripMenuItem5, Me.ToolStripMenuItem7}) + Me.mne.Location = New System.Drawing.Point(0, 31) + Me.mne.Name = "mne" + Me.mne.Padding = New System.Windows.Forms.Padding(5, 0, 0, 0) + Me.mne.Size = New System.Drawing.Size(1652, 81) + Me.mne.TabIndex = 3 + Me.mne.Text = "mnue" + ' + 'AllgemeinToolStripMenuItem + ' + Me.AllgemeinToolStripMenuItem.AutoSize = False + Me.AllgemeinToolStripMenuItem.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.AllgemeinToolStripMenuItem.ForeColor = System.Drawing.Color.White + Me.AllgemeinToolStripMenuItem.Image = Global.SDL.My.Resources.Resources.report + Me.AllgemeinToolStripMenuItem.ImageAlign = System.Drawing.ContentAlignment.TopCenter + Me.AllgemeinToolStripMenuItem.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None + Me.AllgemeinToolStripMenuItem.Name = "AllgemeinToolStripMenuItem" + Me.AllgemeinToolStripMenuItem.Size = New System.Drawing.Size(94, 70) + Me.AllgemeinToolStripMenuItem.Text = "Allgemein" + Me.AllgemeinToolStripMenuItem.TextAlign = System.Drawing.ContentAlignment.BottomCenter + Me.AllgemeinToolStripMenuItem.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText + ' + 'ToolStripMenuItem2 + ' + Me.ToolStripMenuItem2.AutoSize = False + Me.ToolStripMenuItem2.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.ToolStripMenuItem2.ForeColor = System.Drawing.Color.White + Me.ToolStripMenuItem2.Image = Global.SDL.My.Resources.Resources.kunden + Me.ToolStripMenuItem2.ImageAlign = System.Drawing.ContentAlignment.TopCenter + Me.ToolStripMenuItem2.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None + Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2" + Me.ToolStripMenuItem2.Size = New System.Drawing.Size(122, 70) + Me.ToolStripMenuItem2.Text = "Firmendaten" + Me.ToolStripMenuItem2.TextAlign = System.Drawing.ContentAlignment.BottomCenter + Me.ToolStripMenuItem2.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText + ' + 'ToolStripMenuItem4 + ' + Me.ToolStripMenuItem4.AutoSize = False + Me.ToolStripMenuItem4.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.ToolStripMenuItem4.DropDown = Me.cntxtCntxtMDM + Me.ToolStripMenuItem4.ForeColor = System.Drawing.Color.White + Me.ToolStripMenuItem4.Image = Global.SDL.My.Resources.Resources.logo_mdm + Me.ToolStripMenuItem4.ImageAlign = System.Drawing.ContentAlignment.TopCenter + Me.ToolStripMenuItem4.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None + Me.ToolStripMenuItem4.MergeIndex = 10 + Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4" + Me.ToolStripMenuItem4.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0) + Me.ToolStripMenuItem4.Size = New System.Drawing.Size(122, 60) + Me.ToolStripMenuItem4.Text = "Maut/Diesel" + Me.ToolStripMenuItem4.TextAlign = System.Drawing.ContentAlignment.BottomCenter + Me.ToolStripMenuItem4.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText + ' + 'cntxtCntxtMDM + ' + 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" + ' + 'ToolStripMenuItem8 + ' + Me.ToolStripMenuItem8.AutoSize = False + Me.ToolStripMenuItem8.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.ToolStripMenuItem8.DropDown = Me.cntxtCntxtMDM + Me.ToolStripMenuItem8.ForeColor = System.Drawing.Color.White + Me.ToolStripMenuItem8.Image = Global.SDL.My.Resources.Resources.logo_mdm + Me.ToolStripMenuItem8.ImageAlign = System.Drawing.ContentAlignment.TopCenter + Me.ToolStripMenuItem8.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None + Me.ToolStripMenuItem8.MergeIndex = 10 + Me.ToolStripMenuItem8.Name = "ToolStripMenuItem8" + Me.ToolStripMenuItem8.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0) + Me.ToolStripMenuItem8.Size = New System.Drawing.Size(122, 60) + Me.ToolStripMenuItem8.Text = "USTV" + Me.ToolStripMenuItem8.TextAlign = System.Drawing.ContentAlignment.BottomCenter + Me.ToolStripMenuItem8.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText + ' + 'ToolStripMenuItem5 + ' + Me.ToolStripMenuItem5.AutoSize = False + Me.ToolStripMenuItem5.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.ToolStripMenuItem5.ForeColor = System.Drawing.Color.White + Me.ToolStripMenuItem5.Image = Global.SDL.My.Resources.Resources.zoll + Me.ToolStripMenuItem5.ImageAlign = System.Drawing.ContentAlignment.TopCenter + Me.ToolStripMenuItem5.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None + Me.ToolStripMenuItem5.Name = "ToolStripMenuItem5" + Me.ToolStripMenuItem5.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0) + Me.ToolStripMenuItem5.Size = New System.Drawing.Size(55, 60) + Me.ToolStripMenuItem5.Text = "Zoll" + Me.ToolStripMenuItem5.TextAlign = System.Drawing.ContentAlignment.BottomCenter + Me.ToolStripMenuItem5.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText + ' + 'ToolStripMenuItem7 + ' + Me.ToolStripMenuItem7.AutoSize = False + Me.ToolStripMenuItem7.ForeColor = System.Drawing.Color.White + Me.ToolStripMenuItem7.Image = Global.SDL.My.Resources.Resources.checklist1 + Me.ToolStripMenuItem7.ImageAlign = System.Drawing.ContentAlignment.TopCenter + Me.ToolStripMenuItem7.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None + Me.ToolStripMenuItem7.Name = "ToolStripMenuItem7" + Me.ToolStripMenuItem7.Padding = New System.Windows.Forms.Padding(0) + Me.ToolStripMenuItem7.Size = New System.Drawing.Size(150, 60) + Me.ToolStripMenuItem7.Text = "Offerte / Preise" + Me.ToolStripMenuItem7.TextAlign = System.Drawing.ContentAlignment.BottomCenter + Me.ToolStripMenuItem7.TextImageRelation = System.Windows.Forms.TextImageRelation.Overlay + ' + 'pnl + ' + Me.pnl.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.pnl.Controls.Add(Me.pnlInfo) + Me.pnl.Controls.Add(Me.lblINAKTIV) + Me.pnl.Controls.Add(Me.mne) + Me.pnl.Controls.Add(Me.KdSearchBox1) + Me.pnl.Dock = System.Windows.Forms.DockStyle.Top + Me.pnl.Location = New System.Drawing.Point(0, 0) + Me.pnl.Name = "pnl" + Me.pnl.Size = New System.Drawing.Size(1652, 112) + Me.pnl.TabIndex = 0 + ' + 'lblINAKTIV + ' + Me.lblINAKTIV.AutoSize = True + Me.lblINAKTIV.BackColor = System.Drawing.Color.White + Me.lblINAKTIV.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblINAKTIV.ForeColor = System.Drawing.Color.Red + Me.lblINAKTIV.Location = New System.Drawing.Point(1070, 8) + Me.lblINAKTIV.Name = "lblINAKTIV" + Me.lblINAKTIV.Size = New System.Drawing.Size(98, 20) + Me.lblINAKTIV.TabIndex = 2 + Me.lblINAKTIV.Text = "! INAKTIV !" + Me.lblINAKTIV.Visible = False + ' 'KdSearchBox1 ' Me.KdSearchBox1._AlleFirmenCLUSTER = False @@ -2613,56 +2640,29 @@ Partial Class frmKundenblatt Me.KdSearchBox1.TIMER_SEARCH = True Me.KdSearchBox1.usrcntl = Nothing ' - 'UsrcntlKundeBearbeitenFull1 + 'tbiLeistungen ' - Me.UsrcntlKundeBearbeitenFull1.BackColor = System.Drawing.Color.White - Me.UsrcntlKundeBearbeitenFull1.Dock = System.Windows.Forms.DockStyle.Fill - Me.UsrcntlKundeBearbeitenFull1.Location = New System.Drawing.Point(0, 0) - Me.UsrcntlKundeBearbeitenFull1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) - Me.UsrcntlKundeBearbeitenFull1.Name = "UsrcntlKundeBearbeitenFull1" - Me.UsrcntlKundeBearbeitenFull1.Size = New System.Drawing.Size(1638, 1299) - Me.UsrcntlKundeBearbeitenFull1.TabIndex = 0 + Me.tbiLeistungen.Name = "tbiLeistungen" + Me.tbiLeistungen.Size = New System.Drawing.Size(186, 22) + Me.tbiLeistungen.Text = "Leistungen" ' - 'usrcntlKarten + 'tbiKartenverwaltung ' - Me.usrcntlKarten.Cursor = System.Windows.Forms.Cursors.Default - Me.usrcntlKarten.Dock = System.Windows.Forms.DockStyle.Fill - Me.usrcntlKarten.Location = New System.Drawing.Point(3, 3) - Me.usrcntlKarten.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) - Me.usrcntlKarten.Name = "usrcntlKarten" - Me.usrcntlKarten.Size = New System.Drawing.Size(1624, 1267) - Me.usrcntlKarten.TabIndex = 0 + Me.tbiKartenverwaltung.Name = "tbiKartenverwaltung" + Me.tbiKartenverwaltung.Size = New System.Drawing.Size(186, 22) + Me.tbiKartenverwaltung.Text = "Kartenverwaltung" ' - 'UsrCntlLKW1 + 'tbiLKW ' - Me.UsrCntlLKW1.BackColor = System.Drawing.Color.White - Me.UsrCntlLKW1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.UsrCntlLKW1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.UsrCntlLKW1.Dock = System.Windows.Forms.DockStyle.Fill - Me.UsrCntlLKW1.Location = New System.Drawing.Point(10, 0) - Me.UsrCntlLKW1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) - Me.UsrCntlLKW1.MaximumSize = New System.Drawing.Size(1200, 1000) - Me.UsrCntlLKW1.Name = "UsrCntlLKW1" - Me.UsrCntlLKW1.Size = New System.Drawing.Size(1200, 1000) - Me.UsrCntlLKW1.TabIndex = 0 + Me.tbiLKW.Name = "tbiLKW" + Me.tbiLKW.Size = New System.Drawing.Size(186, 22) + Me.tbiLKW.Text = "LKWs" ' - 'UsrCntlOfferte1 + 'tbiVERAGCard ' - Me.UsrCntlOfferte1.BackColor = System.Drawing.Color.White - Me.UsrCntlOfferte1.Dock = System.Windows.Forms.DockStyle.Fill - Me.UsrCntlOfferte1.Location = New System.Drawing.Point(0, 0) - Me.UsrCntlOfferte1.Margin = New System.Windows.Forms.Padding(1) - Me.UsrCntlOfferte1.Name = "UsrCntlOfferte1" - Me.UsrCntlOfferte1.Size = New System.Drawing.Size(1644, 1305) - Me.UsrCntlOfferte1.TabIndex = 0 - ' - 'UsrCntlUSTV - ' - Me.UsrCntlUSTV.Dock = System.Windows.Forms.DockStyle.Fill - Me.UsrCntlUSTV.Location = New System.Drawing.Point(3, 3) - Me.UsrCntlUSTV.Name = "UsrCntlUSTV" - Me.UsrCntlUSTV.Size = New System.Drawing.Size(1630, 1273) - Me.UsrCntlUSTV.TabIndex = 0 + Me.tbiVERAGCard.Name = "tbiVERAGCard" + Me.tbiVERAGCard.Size = New System.Drawing.Size(186, 22) + Me.tbiVERAGCard.Text = "VERAG Card" ' 'frmKundenblatt ' diff --git a/SDL/kunden/frmKundenblatt.vb b/SDL/kunden/frmKundenblatt.vb index 086530a4..cb52b7a0 100644 --- a/SDL/kunden/frmKundenblatt.vb +++ b/SDL/kunden/frmKundenblatt.vb @@ -1982,7 +1982,7 @@ Public Class frmKundenblatt .Columns(6).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight .Columns(7).Width = 20 - .Columns(6).DefaultCellStyle.Format = "N0" + .Columns(6).DefaultCellStyle.Format = "N2" .Columns(7).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter .Columns(8).Width = 70 diff --git a/SDL/seriendruck/usrCntlFakturierung.vb b/SDL/seriendruck/usrCntlFakturierung.vb index 1aca9573..d288d3aa 100644 --- a/SDL/seriendruck/usrCntlFakturierung.vb +++ b/SDL/seriendruck/usrCntlFakturierung.vb @@ -2181,13 +2181,8 @@ Public Class usrcntlFakturierung Private Sub Button4_Click(sender As Object, e As EventArgs) Handles btnLieferantenrechnungen.Click - If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG("MDM_Fakturierung", "SDL") = 0 Then - - Dim frm As New frmMDMLieferantenrechnungen - frm.Show(Me) - - End If - + Dim frm As New frmMDMLieferantenrechnungen + frm.Show(Me) End Sub diff --git a/VERAG_PROG_ALLGEMEIN/Classes/cMDMFunctionsAllgemein.vb b/VERAG_PROG_ALLGEMEIN/Classes/cMDMFunctionsAllgemein.vb index ebffacee..3df41c11 100644 --- a/VERAG_PROG_ALLGEMEIN/Classes/cMDMFunctionsAllgemein.vb +++ b/VERAG_PROG_ALLGEMEIN/Classes/cMDMFunctionsAllgemein.vb @@ -159,7 +159,7 @@ Public Class cMDMFunctionsAllgemein 'Deswegen sollten alle ungarischen Anträge die wir für SRB und BIH Kunden stellen, nicht beim Risiko mitberechnet werden - Dim sqlSummeBilden = "SELECT + Dim sqlSummeBilden_OLD = "SELECT tblUStVAntrag.UStVAn_KuNr, SUM(tblUStVAntrag.UStVAn_USteuerbetragEUR) As UStVKu_SummeUmsatzsteuer, SUM(tblUStVAntrag.UStVAn_ErstattungsbetragEUR) As UStVKu_SummeErstattung, @@ -175,6 +175,39 @@ Public Class cMDMFunctionsAllgemein Where tblUStVAntrag.UStVAn_KuNr = " & r.Item("KundenNr") & " Group By tblUStVAntrag.UStVAn_KuNr" + + + Dim sqlSummeBilden = "SELECT + tblUStVAntrag.UStVAn_KuNr, + + SUM( + CASE WHEN (tblUStVAntrag.UStVAn_LandKz = 'SRB' OR tblUStVAntrag.UStVAn_LandKz = 'BIH') AND tblUStVAntrag.UStVAn_LandNr = 64 + THEN 0 + Else UStVAn_USteuerbetragEUR + End + ) AS UStVKu_SummeUmsatzsteuer, + + + + SUM( + CASE WHEN (tblUStVAntrag.UStVAn_LandKz = 'SRB' OR tblUStVAntrag.UStVAn_LandKz = 'BIH') AND tblUStVAntrag.UStVAn_LandNr = 64 + THEN 0 + Else UStVAn_ErstattungsbetragEUR + End + ) AS UStVKu_SummeErstattung, + + SUM(ISNULL(tblUStVAntrag.UStVAn_3470, 0)) As UStVKu_SummeKonto3470, + SUM( + CASE + WHEN (ISNULL(tblUStVAntrag.UStVAn_VZBetrag, 0) - ISNULL(tblUStVAntrag.UStVAn_RZBetragVZ, 0)) > tblUStVAntrag.UStVAn_ErstattungsbetragEUR + THEN (ISNULL(tblUStVAntrag.UStVAn_VZBetrag, 0) - ISNULL(tblUStVAntrag.UStVAn_RZBetragVZ, 0)) - tblUStVAntrag.UStVAn_ErstattungsbetragEUR + Else 0 + End + ) AS UStVKu_SummeVorauszahlung + From tblUStVAntrag + Where tblUStVAntrag.UStVAn_KuNr = " & r.Item("KundenNr") & + " Group By tblUStVAntrag.UStVAn_KuNr" + Dim dtKundenSummen As DataTable = sql.loadDgvBySql(sqlSummeBilden, "FMZOLL") Dim curUStV_SummeVorschaubetragEUR As Double = 0