diff --git a/UID/frmMain.Designer.vb b/UID/frmMain.Designer.vb index 5a4ad7a..6eae914 100644 --- a/UID/frmMain.Designer.vb +++ b/UID/frmMain.Designer.vb @@ -33,8 +33,8 @@ Partial Class frmMain Me.TableAdapterManager1 = New ADMIN.DataSetBerechtigungenTableAdapters.TableAdapterManager() Me.pnlMain = New System.Windows.Forms.Panel() Me.Panel3 = New System.Windows.Forms.Panel() - Me.Button3 = New System.Windows.Forms.Button() - Me.Button2 = New System.Windows.Forms.Button() + Me.btnAPIZugang = New System.Windows.Forms.Button() + Me.btnDatenarchiv = New System.Windows.Forms.Button() Me.btnFehler = New System.Windows.Forms.Button() Me.btnAPI = New System.Windows.Forms.Button() Me.btnHomepage = New System.Windows.Forms.Button() @@ -48,6 +48,7 @@ Partial Class frmMain Me.btnMitarbeiter = New System.Windows.Forms.Button() Me.Panel2 = New System.Windows.Forms.Panel() Me.PictureBox1 = New System.Windows.Forms.PictureBox() + Me.btnMailroutine = New System.Windows.Forms.Button() Me.Panel3.SuspendLayout() Me.Panel2.SuspendLayout() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() @@ -110,8 +111,9 @@ Partial Class frmMain 'Panel3 ' Me.Panel3.BackColor = System.Drawing.Color.White - Me.Panel3.Controls.Add(Me.Button3) - Me.Panel3.Controls.Add(Me.Button2) + Me.Panel3.Controls.Add(Me.btnMailroutine) + Me.Panel3.Controls.Add(Me.btnAPIZugang) + Me.Panel3.Controls.Add(Me.btnDatenarchiv) Me.Panel3.Controls.Add(Me.btnFehler) Me.Panel3.Controls.Add(Me.btnAPI) Me.Panel3.Controls.Add(Me.btnHomepage) @@ -129,29 +131,29 @@ Partial Class frmMain Me.Panel3.Size = New System.Drawing.Size(137, 801) Me.Panel3.TabIndex = 32 ' - 'Button3 + 'btnAPIZugang ' - Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button3.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button3.Location = New System.Drawing.Point(12, 437) - Me.Button3.Name = "Button3" - Me.Button3.Size = New System.Drawing.Size(94, 33) - Me.Button3.TabIndex = 42 - Me.Button3.Text = "Zugänge API" - Me.Button3.TextAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button3.UseVisualStyleBackColor = True + Me.btnAPIZugang.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnAPIZugang.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnAPIZugang.Location = New System.Drawing.Point(12, 437) + Me.btnAPIZugang.Name = "btnAPIZugang" + Me.btnAPIZugang.Size = New System.Drawing.Size(94, 33) + Me.btnAPIZugang.TabIndex = 42 + Me.btnAPIZugang.Text = "Zugänge API" + Me.btnAPIZugang.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnAPIZugang.UseVisualStyleBackColor = True ' - 'Button2 + 'btnDatenarchiv ' - Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button2.Location = New System.Drawing.Point(12, 319) - Me.Button2.Name = "Button2" - Me.Button2.Size = New System.Drawing.Size(94, 33) - Me.Button2.TabIndex = 41 - Me.Button2.Text = "Datenarchiv" - Me.Button2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button2.UseVisualStyleBackColor = True + Me.btnDatenarchiv.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnDatenarchiv.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnDatenarchiv.Location = New System.Drawing.Point(12, 319) + Me.btnDatenarchiv.Name = "btnDatenarchiv" + Me.btnDatenarchiv.Size = New System.Drawing.Size(94, 33) + Me.btnDatenarchiv.TabIndex = 41 + Me.btnDatenarchiv.Text = "Datenarchiv" + Me.btnDatenarchiv.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnDatenarchiv.UseVisualStyleBackColor = True ' 'btnFehler ' @@ -302,6 +304,18 @@ Partial Class frmMain Me.PictureBox1.TabIndex = 31 Me.PictureBox1.TabStop = False ' + 'btnMailroutine + ' + Me.btnMailroutine.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnMailroutine.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnMailroutine.Location = New System.Drawing.Point(12, 516) + Me.btnMailroutine.Name = "btnMailroutine" + Me.btnMailroutine.Size = New System.Drawing.Size(94, 33) + Me.btnMailroutine.TabIndex = 43 + Me.btnMailroutine.Text = "Mailsender" + Me.btnMailroutine.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnMailroutine.UseVisualStyleBackColor = True + ' 'frmMain ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -344,6 +358,7 @@ Partial Class frmMain Friend WithEvents btnHomepage As System.Windows.Forms.Button Friend WithEvents btnFehler As Button Friend WithEvents btnAPI As Button - Friend WithEvents Button2 As Button - Friend WithEvents Button3 As Button + Friend WithEvents btnDatenarchiv As Button + Friend WithEvents btnAPIZugang As Button + Friend WithEvents btnMailroutine As Button End Class diff --git a/UID/frmMain.vb b/UID/frmMain.vb index e2318bb..461f2c2 100644 --- a/UID/frmMain.vb +++ b/UID/frmMain.vb @@ -215,7 +215,7 @@ Public Class frmMain button_Click(sender) End Sub - Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click + Private Sub btnDatenarchiv_Click(sender As Object, e As EventArgs) Handles btnDatenarchiv.Click clrPnlMain() Dim usrCntl As New usrCntlDatenarchiv("tblPartnersystem_Paramter", "FMZOLL") pnlMain.Controls.Add(usrCntl) @@ -223,8 +223,16 @@ Public Class frmMain button_Click(sender) End Sub - Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click + Private Sub Button3_Click(sender As Object, e As EventArgs) Handles btnAPIZugang.Click Dim f = New frmAPIZugaenge("tblRESTAuthentication", "ADMIN") f.Show() End Sub + + Private Sub btnMailroutine_Click(sender As Object, e As EventArgs) Handles btnMailroutine.Click + clrPnlMain() + Dim usrCntl As New usrCntlDatenarchiv("tblMailsender", "ADMIN") + pnlMain.Controls.Add(usrCntl) + usrCntl.Dock = DockStyle.Fill + button_Click(sender) + End Sub End Class diff --git a/UID/usrCntlMailsender.Designer.vb b/UID/usrCntlMailsender.Designer.vb new file mode 100644 index 0000000..42a509c --- /dev/null +++ b/UID/usrCntlMailsender.Designer.vb @@ -0,0 +1,346 @@ + +Partial Class usrCntlMailsender + Inherits System.Windows.Forms.UserControl + + 'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. + + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Wird vom Windows Form-Designer benötigt. + Private components As System.ComponentModel.IContainer + + 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. + 'Das Bearbeiten ist mit dem Windows Form-Designer möglich. + 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. + + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.SplitContainer = New System.Windows.Forms.SplitContainer() + Me.pnlSearch = New System.Windows.Forms.Panel() + Me.SplitContainer1 = New System.Windows.Forms.SplitContainer() + Me.cbxTestsystem = New System.Windows.Forms.CheckBox() + Me.cboPartnersystem = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.Label8 = New System.Windows.Forms.Label() + Me.btnSuche = New System.Windows.Forms.Button() + Me.cboFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.Label12 = New System.Windows.Forms.Label() + Me.pnlAnzeige = New System.Windows.Forms.Panel() + Me.DataGridView = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) + Me.Panel1 = New System.Windows.Forms.Panel() + Me.btnSave = New System.Windows.Forms.Button() + Me.lblErgebnis = New System.Windows.Forms.Label() + Me.Label4 = New System.Windows.Forms.Label() + Me.txtMaxSrch = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.Button10 = New System.Windows.Forms.Button() + Me.Button11 = New System.Windows.Forms.Button() + CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SplitContainer.Panel1.SuspendLayout() + Me.SplitContainer.Panel2.SuspendLayout() + Me.SplitContainer.SuspendLayout() + Me.pnlSearch.SuspendLayout() + CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SplitContainer1.Panel1.SuspendLayout() + Me.SplitContainer1.SuspendLayout() + Me.pnlAnzeige.SuspendLayout() + CType(Me.DataGridView, System.ComponentModel.ISupportInitialize).BeginInit() + Me.Panel1.SuspendLayout() + Me.SuspendLayout() + ' + 'SplitContainer + ' + Me.SplitContainer.Dock = System.Windows.Forms.DockStyle.Fill + Me.SplitContainer.FixedPanel = System.Windows.Forms.FixedPanel.Panel1 + Me.SplitContainer.IsSplitterFixed = True + Me.SplitContainer.Location = New System.Drawing.Point(0, 0) + Me.SplitContainer.Name = "SplitContainer" + Me.SplitContainer.Orientation = System.Windows.Forms.Orientation.Horizontal + ' + 'SplitContainer.Panel1 + ' + Me.SplitContainer.Panel1.Controls.Add(Me.pnlSearch) + ' + 'SplitContainer.Panel2 + ' + Me.SplitContainer.Panel2.Controls.Add(Me.pnlAnzeige) + Me.SplitContainer.Size = New System.Drawing.Size(1020, 687) + Me.SplitContainer.SplitterDistance = 80 + Me.SplitContainer.SplitterWidth = 2 + Me.SplitContainer.TabIndex = 3 + ' + 'pnlSearch + ' + Me.pnlSearch.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink + Me.pnlSearch.BackColor = System.Drawing.Color.White + Me.pnlSearch.Controls.Add(Me.SplitContainer1) + Me.pnlSearch.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlSearch.Location = New System.Drawing.Point(0, 0) + Me.pnlSearch.Name = "pnlSearch" + Me.pnlSearch.Size = New System.Drawing.Size(1020, 80) + Me.pnlSearch.TabIndex = 0 + ' + 'SplitContainer1 + ' + Me.SplitContainer1.Dock = System.Windows.Forms.DockStyle.Fill + Me.SplitContainer1.FixedPanel = System.Windows.Forms.FixedPanel.Panel1 + Me.SplitContainer1.Location = New System.Drawing.Point(0, 0) + Me.SplitContainer1.Name = "SplitContainer1" + Me.SplitContainer1.Orientation = System.Windows.Forms.Orientation.Horizontal + ' + 'SplitContainer1.Panel1 + ' + Me.SplitContainer1.Panel1.Controls.Add(Me.cbxTestsystem) + Me.SplitContainer1.Panel1.Controls.Add(Me.cboPartnersystem) + Me.SplitContainer1.Panel1.Controls.Add(Me.Label8) + Me.SplitContainer1.Panel1.Controls.Add(Me.btnSuche) + Me.SplitContainer1.Panel1.Controls.Add(Me.cboFirma) + Me.SplitContainer1.Panel1.Controls.Add(Me.Label12) + Me.SplitContainer1.Panel2Collapsed = True + Me.SplitContainer1.Size = New System.Drawing.Size(1020, 80) + Me.SplitContainer1.SplitterDistance = 55 + Me.SplitContainer1.TabIndex = 0 + ' + 'cbxTestsystem + ' + Me.cbxTestsystem.AutoSize = True + Me.cbxTestsystem.Location = New System.Drawing.Point(15, 3) + Me.cbxTestsystem.Name = "cbxTestsystem" + Me.cbxTestsystem.Size = New System.Drawing.Size(79, 17) + Me.cbxTestsystem.TabIndex = 55 + Me.cbxTestsystem.Text = "Testsystem" + Me.cbxTestsystem.UseVisualStyleBackColor = True + ' + 'cboPartnersystem + ' + Me.cboPartnersystem._allowedValuesFreiText = Nothing + Me.cboPartnersystem._allowFreiText = False + Me.cboPartnersystem._value = "" + Me.cboPartnersystem.DropDownWidth = 250 + Me.cboPartnersystem.Font = New System.Drawing.Font("Microsoft Tai Le", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboPartnersystem.FormattingEnabled = True + Me.cboPartnersystem.Location = New System.Drawing.Point(367, 28) + Me.cboPartnersystem.Name = "cboPartnersystem" + Me.cboPartnersystem.Size = New System.Drawing.Size(73, 22) + Me.cboPartnersystem.TabIndex = 54 + ' + '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(364, 13) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(90, 13) + Me.Label8.TabIndex = 45 + Me.Label8.Text = "Partnersystem:" + ' + 'btnSuche + ' + Me.btnSuche.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnSuche.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnSuche.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnSuche.Location = New System.Drawing.Point(850, 9) + Me.btnSuche.Name = "btnSuche" + Me.btnSuche.Size = New System.Drawing.Size(162, 52) + Me.btnSuche.TabIndex = 28 + Me.btnSuche.Text = "Ergebnisse laden" + Me.btnSuche.UseVisualStyleBackColor = True + ' + 'cboFirma + ' + Me.cboFirma._allowedValuesFreiText = Nothing + Me.cboFirma._allowFreiText = False + Me.cboFirma._value = "" + Me.cboFirma.DropDownWidth = 250 + Me.cboFirma.Font = New System.Drawing.Font("Microsoft Tai Le", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboFirma.FormattingEnabled = True + Me.cboFirma.Location = New System.Drawing.Point(15, 41) + Me.cboFirma.Name = "cboFirma" + Me.cboFirma.Size = New System.Drawing.Size(104, 22) + Me.cboFirma.TabIndex = 20 + Me.cboFirma.Visible = False + ' + 'Label12 + ' + Me.Label12.AutoSize = True + Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label12.Location = New System.Drawing.Point(12, 23) + Me.Label12.Name = "Label12" + Me.Label12.Size = New System.Drawing.Size(37, 13) + Me.Label12.TabIndex = 6 + Me.Label12.Text = "Firma" + Me.Label12.Visible = False + ' + 'pnlAnzeige + ' + Me.pnlAnzeige.BackColor = System.Drawing.Color.White + Me.pnlAnzeige.Controls.Add(Me.DataGridView) + Me.pnlAnzeige.Controls.Add(Me.Panel1) + Me.pnlAnzeige.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlAnzeige.Location = New System.Drawing.Point(0, 0) + Me.pnlAnzeige.Name = "pnlAnzeige" + Me.pnlAnzeige.Size = New System.Drawing.Size(1020, 605) + Me.pnlAnzeige.TabIndex = 0 + ' + 'DataGridView + ' + Me.DataGridView.AKTUALISIERUNGS_INTERVALL = -1 + Me.DataGridView.AllowUserToAddRows = False + Me.DataGridView.AllowUserToDeleteRows = False + Me.DataGridView.AllowUserToOrderColumns = True + Me.DataGridView.AllowUserToResizeRows = False + Me.DataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize + Me.DataGridView.Dock = System.Windows.Forms.DockStyle.Fill + Me.DataGridView.Location = New System.Drawing.Point(0, 0) + Me.DataGridView.Name = "DataGridView" + Me.DataGridView.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.CellSelect + Me.DataGridView.Size = New System.Drawing.Size(1020, 561) + Me.DataGridView.TabIndex = 0 + ' + 'Panel1 + ' + Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.Panel1.Controls.Add(Me.btnSave) + Me.Panel1.Controls.Add(Me.lblErgebnis) + Me.Panel1.Controls.Add(Me.Label4) + Me.Panel1.Controls.Add(Me.txtMaxSrch) + Me.Panel1.Controls.Add(Me.Button10) + Me.Panel1.Controls.Add(Me.Button11) + Me.Panel1.Dock = System.Windows.Forms.DockStyle.Bottom + Me.Panel1.Location = New System.Drawing.Point(0, 561) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(1020, 44) + Me.Panel1.TabIndex = 1 + ' + 'btnSave + ' + Me.btnSave.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnSave.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnSave.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnSave.Location = New System.Drawing.Point(789, 5) + Me.btnSave.Name = "btnSave" + Me.btnSave.Size = New System.Drawing.Size(118, 26) + Me.btnSave.TabIndex = 56 + Me.btnSave.Text = "speichern" + Me.btnSave.UseVisualStyleBackColor = True + ' + 'lblErgebnis + ' + Me.lblErgebnis.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblErgebnis.Location = New System.Drawing.Point(864, 25) + Me.lblErgebnis.Name = "lblErgebnis" + Me.lblErgebnis.Size = New System.Drawing.Size(152, 13) + Me.lblErgebnis.TabIndex = 45 + Me.lblErgebnis.Text = "Max:" + Me.lblErgebnis.TextAlign = System.Drawing.ContentAlignment.TopRight + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Location = New System.Drawing.Point(930, 5) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(30, 13) + Me.Label4.TabIndex = 43 + Me.Label4.Text = "Max:" + ' + 'txtMaxSrch + ' + Me.txtMaxSrch._DateTimeOnly = False + Me.txtMaxSrch._numbersOnly = True + Me.txtMaxSrch._numbersOnlyKommastellen = "" + Me.txtMaxSrch._numbersOnlyTrennzeichen = True + Me.txtMaxSrch._Prozent = False + Me.txtMaxSrch._ShortDateNew = False + Me.txtMaxSrch._ShortDateOnly = False + Me.txtMaxSrch._TimeOnly = False + Me.txtMaxSrch._TimeOnly_Seconds = False + Me.txtMaxSrch._value = "" + Me.txtMaxSrch._Waehrung = False + Me.txtMaxSrch._WaehrungZeichen = True + Me.txtMaxSrch.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtMaxSrch.ForeColor = System.Drawing.Color.Black + Me.txtMaxSrch.Location = New System.Drawing.Point(966, 2) + Me.txtMaxSrch.MaxLineLength = -1 + Me.txtMaxSrch.MaxLines_Warning = "" + Me.txtMaxSrch.MaxLines_Warning_Label = Nothing + Me.txtMaxSrch.Name = "txtMaxSrch" + Me.txtMaxSrch.Size = New System.Drawing.Size(51, 20) + Me.txtMaxSrch.TabIndex = 44 + Me.txtMaxSrch.Text = "1000" + Me.txtMaxSrch.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'Button10 + ' + Me.Button10.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.Button10.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button10.Location = New System.Drawing.Point(1117, 1) + Me.Button10.Name = "Button10" + Me.Button10.Size = New System.Drawing.Size(41, 34) + Me.Button10.TabIndex = 3 + Me.Button10.UseVisualStyleBackColor = True + ' + 'Button11 + ' + Me.Button11.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.Button11.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button11.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Button11.ForeColor = System.Drawing.Color.Black + Me.Button11.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button11.Location = New System.Drawing.Point(1164, 1) + Me.Button11.Name = "Button11" + Me.Button11.Size = New System.Drawing.Size(41, 34) + Me.Button11.TabIndex = 4 + Me.Button11.UseVisualStyleBackColor = True + ' + 'usrCntlMailsender + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.Controls.Add(Me.SplitContainer) + Me.Name = "usrCntlMailsender" + Me.Size = New System.Drawing.Size(1020, 687) + Me.SplitContainer.Panel1.ResumeLayout(False) + Me.SplitContainer.Panel2.ResumeLayout(False) + CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).EndInit() + Me.SplitContainer.ResumeLayout(False) + Me.pnlSearch.ResumeLayout(False) + Me.SplitContainer1.Panel1.ResumeLayout(False) + Me.SplitContainer1.Panel1.PerformLayout() + CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit() + Me.SplitContainer1.ResumeLayout(False) + Me.pnlAnzeige.ResumeLayout(False) + CType(Me.DataGridView, System.ComponentModel.ISupportInitialize).EndInit() + Me.Panel1.ResumeLayout(False) + Me.Panel1.PerformLayout() + Me.ResumeLayout(False) + + End Sub + + Friend WithEvents SplitContainer As SplitContainer + Friend WithEvents pnlSearch As Panel + Friend WithEvents SplitContainer1 As SplitContainer + Friend WithEvents btnSuche As Button + Friend WithEvents pnlAnzeige As Panel + Friend WithEvents DataGridView As VERAG_PROG_ALLGEMEIN.MyDatagridview + Friend WithEvents Panel1 As Panel + Friend WithEvents Label4 As Label + Friend WithEvents txtMaxSrch As VERAG_PROG_ALLGEMEIN.MyTextBox + Friend WithEvents Button10 As Button + Friend WithEvents Button11 As Button + Friend WithEvents Label8 As Label + Friend WithEvents lblErgebnis As Label + Friend WithEvents cboPartnersystem As VERAG_PROG_ALLGEMEIN.MyComboBox + Friend WithEvents cboFirma As VERAG_PROG_ALLGEMEIN.MyComboBox + Friend WithEvents Label12 As Label + Friend WithEvents cbxTestsystem As CheckBox + Friend WithEvents btnSave As Button +End Class diff --git a/UID/usrCntlMailsender.resx b/UID/usrCntlMailsender.resx new file mode 100644 index 0000000..732373b --- /dev/null +++ b/UID/usrCntlMailsender.resx @@ -0,0 +1,123 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + True + + \ No newline at end of file diff --git a/UID/usrCntlMailsender.vb b/UID/usrCntlMailsender.vb new file mode 100644 index 0000000..db3d782 --- /dev/null +++ b/UID/usrCntlMailsender.vb @@ -0,0 +1,181 @@ +Imports System.ComponentModel +Imports System.IO +Imports System.Windows.Documents +Imports VERAG_PROG_ALLGEMEIN + +Public Class usrCntlMailsender + + + Dim DatenarchivBind As cEasyBinding + Public table + Public BIND_DB + Private EditRow As Integer = -1 + Sub New(table, BIND_DB) + Me.table = table + Me.BIND_DB = BIND_DB + InitializeComponent() + End Sub + + + Private Sub usrCntlDatenarchiv_Load(sender As Object, e As EventArgs) Handles Me.Load + + loaddgv() + + + 'Dim distinctDT As DataTable = DatenarchivBind.bindingdataTable.DefaultView.ToTable(True, "firma") + + 'For Each d As DataRow In distinctDT.Rows + ' If Not cboPartnersystem.Items.Contains(d.Item(0)) Then cboPartnersystem.Items.Add(d.Item(0)) + 'Next + + + End Sub + + Private Sub btnSuche_Click(sender As Object, e As EventArgs) Handles btnSuche.Click + Me.Cursor = Cursors.WaitCursor + + loaddgv() + + Me.Cursor = Cursors.Default + End Sub + + Function getAPIList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) + + Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) + + list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("param", cboPartnersystem._value)) + + Return list + + End Function + + Function getDatenarchivwhere() As String + + Dim sqlstr = "" + If cboPartnersystem._value <> "" Then sqlstr &= " AND [param] = '" & cboPartnersystem._value & "'" + + Return sqlstr + End Function + + + Private Sub DataGridView_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView.CellDoubleClick + Me.Cursor = Cursors.WaitCursor + Dim tmprowindex As Integer = e.RowIndex + If DataGridView.Columns(e.ColumnIndex).Name = "open" Then + + If DataGridView.CurrentRow.Cells("param").Value IsNot DBNull.Value AndAlso DataGridView.CurrentRow.Cells("param").Value.ToString.StartsWith("\\") Then + Process.Start(DataGridView.CurrentRow.Cells("param").Value) + End If + Else + + End If + Me.Cursor = Cursors.Default + End Sub + + Private Sub cbxProduktivsystem_CheckedChanged(sender As Object, e As EventArgs) Handles cbxTestsystem.CheckedChanged + + VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = cbxTestsystem.Checked + + DatenarchivBind = New cEasyBinding(BIND_DB) + + + Dim sqlstr As String = "" + Dim TopMax = If(IsNumeric(txtMaxSrch.Text), " TOP " & txtMaxSrch.Text, "") + + + DatenarchivBind.initBinding("SELECT " & TopMax & " * FROM " & table & " WHERE 1 = 1 " & getDatenarchivwhere(), table) + + DataGridView.DataSource = DatenarchivBind.bindingdataTable + + Dim distinctDT As DataTable = DatenarchivBind.bindingdataTable.DefaultView.ToTable(True, "param") + + For Each d As DataRow In distinctDT.Rows + If Not cboPartnersystem.Items.Contains(d.Item(0)) Then cboPartnersystem.Items.Add(d.Item(0)) + Next + + Me.usrCntlDatenarchiv_Load(sender, e) + + End Sub + + Private Sub cboPartnersystem_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboPartnersystem.SelectedIndexChanged + btnSuche_Click(sender, e) + End Sub + + + Public Sub loaddgv() + + VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = cbxTestsystem.Checked + + Try + DatenarchivBind = New cEasyBinding(BIND_DB) + + + Dim sqlstr As String = "" + Dim TopMax = If(IsNumeric(txtMaxSrch.Text), " TOP " & txtMaxSrch.Text, "") + + + DatenarchivBind.initBinding("SELECT " & TopMax & " * FROM " & table & " WHERE 1 = 1 " & getDatenarchivwhere(), table) + + DataGridView.DataSource = DatenarchivBind.bindingdataTable + + + With DataGridView + + If .RowCount = 0 Then Me.Cursor = Cursors.Default : Exit Sub + .RowHeadersVisible = False + .ReadOnly = False + '.SelectionMode = DataGridViewSelectionMode.FullRowSelect + .MultiSelect = False + + + For Each cc As DataGridViewColumn In .Columns + If cc.Name.ToLower.Contains("param_") Then + cc.HeaderText = cc.Name.Replace("Param_", "") + If cc.Name.ToLower.Contains("value") Then + cc.AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill + Else + cc.Width = 200 + End If + End If + Next + + + lblErgebnis.Text = "Ergebnisse: " & .RowCount + + + End With + + Catch ex As Exception + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) + End Try + + End Sub + + Private Sub btnOK_Click(sender As Object, e As EventArgs) Handles btnSave.Click + + If DataGridView.Columns.Count = 0 Or DataGridView.SelectedRows.Count = 0 Then 'alles gelöscht oder markierte Zeile gelöscht + DatenarchivBind.updateBinding() + Exit Sub + End If + + If DataGridView.CurrentRow.Cells("param").ToString <> "" AndAlso DataGridView.CurrentRow.Cells("param").ToString <> "" AndAlso DataGridView.CurrentRow.Cells("param").ToString <> "" AndAlso EditRow >= 0 Then + DatenarchivBind.updateBinding() + End If + + End Sub + + + Private Sub DataGridView_EditingControlShowing(sender As Object, e As DataGridViewEditingControlShowingEventArgs) Handles DataGridView.EditingControlShowing + EditRow = DataGridView.CurrentRow.Index + End Sub + + Private Sub DataGridView_SelectionChanged(sender As Object, e As EventArgs) Handles DataGridView.SelectionChanged + If EditRow >= 0 Then + Dim new_row As Integer = EditRow + EditRow = -1 + DataGridView.CurrentCell = DataGridView.Rows(new_row).Cells( + DataGridView.CurrentCell.ColumnIndex) + End If + End Sub + +End Class diff --git a/initATLASAufschubkonten/frmStartOptions.Designer.vb b/initATLASAufschubkonten/frmStartOptions.Designer.vb index 2d87764..bd28a89 100644 --- a/initATLASAufschubkonten/frmStartOptions.Designer.vb +++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb @@ -31,6 +31,7 @@ Partial Class frmStartOptions Me.Button24 = New System.Windows.Forms.Button() Me.CheckBox8 = New System.Windows.Forms.CheckBox() Me.Label43 = New System.Windows.Forms.Label() + Me.txtKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.PictureBox25 = New System.Windows.Forms.PictureBox() Me.Button23 = New System.Windows.Forms.Button() Me.PictureBox24 = New System.Windows.Forms.PictureBox() @@ -38,6 +39,7 @@ Partial Class frmStartOptions Me.LinkLabel63 = New System.Windows.Forms.LinkLabel() Me.PictureBox23 = New System.Windows.Forms.PictureBox() Me.Label27 = New System.Windows.Forms.Label() + Me.MyTextBox3 = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.LinkLabel51 = New System.Windows.Forms.LinkLabel() Me.PictureBox22 = New System.Windows.Forms.PictureBox() Me.Button22 = New System.Windows.Forms.Button() @@ -55,16 +57,20 @@ Partial Class frmStartOptions Me.Label20 = New System.Windows.Forms.Label() Me.Label19 = New System.Windows.Forms.Label() Me.Label18 = New System.Windows.Forms.Label() + Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.LinkLabel36 = New System.Windows.Forms.LinkLabel() Me.Button13 = New System.Windows.Forms.Button() Me.Button12 = New System.Windows.Forms.Button() Me.cbxSyskaWdh = New System.Windows.Forms.CheckBox() + Me.txtSyskaWdhDateiname = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Button10 = New System.Windows.Forms.Button() Me.piceZollAnh = New System.Windows.Forms.PictureBox() + Me.txtEZOLLAnhDat = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.lblEZOLLDat = New System.Windows.Forms.LinkLabel() Me.Button6 = New System.Windows.Forms.Button() Me.CheckBox6 = New System.Windows.Forms.CheckBox() Me.Button7 = New System.Windows.Forms.Button() + Me.cboSYSKAFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.CheckBox7 = New System.Windows.Forms.CheckBox() Me.Label16 = New System.Windows.Forms.Label() Me.LinkLabel33 = New System.Windows.Forms.LinkLabel() @@ -73,12 +79,14 @@ Partial Class frmStartOptions Me.Button4 = New System.Windows.Forms.Button() Me.CheckBox5 = New System.Windows.Forms.CheckBox() Me.Button3 = New System.Windows.Forms.Button() + Me.cboBMDUnispedFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.CheckBox4 = New System.Windows.Forms.CheckBox() Me.Label13 = New System.Windows.Forms.Label() Me.CheckBox3 = New System.Windows.Forms.CheckBox() Me.tbcntr = New System.Windows.Forms.TabControl() Me.TabPage1 = New System.Windows.Forms.TabPage() Me.cbxGestellungspeichern = New System.Windows.Forms.CheckBox() + Me.MyTextBox4 = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label41 = New System.Windows.Forms.Label() Me.LinkLabel99 = New System.Windows.Forms.LinkLabel() Me.PictureBox99 = New System.Windows.Forms.PictureBox() @@ -148,6 +156,15 @@ Partial Class frmStartOptions Me.Label6 = New System.Windows.Forms.Label() Me.PictureBox15 = New System.Windows.Forms.PictureBox() Me.PictureBox14 = New System.Windows.Forms.PictureBox() + Me.dgvMRN = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) + Me.clmnMRN = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.txtVRGOut_MRN = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVRGOut_FilialenNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtVRGOut_AbfertigungsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtVRGOutEZA_BezugsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtVRGOut_BezugsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.TabPage3 = New System.Windows.Forms.TabPage() Me.LinkLabel50 = New System.Windows.Forms.LinkLabel() Me.Label26 = New System.Windows.Forms.Label() @@ -163,6 +180,7 @@ Partial Class frmStartOptions Me.LinkLabel30 = New System.Windows.Forms.LinkLabel() Me.Label11 = New System.Windows.Forms.Label() Me.TabPage4 = New System.Windows.Forms.TabPage() + Me.txtUTAYear = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.LinkLabel65 = New System.Windows.Forms.LinkLabel() Me.LinkLabel64 = New System.Windows.Forms.LinkLabel() Me.Label42 = New System.Windows.Forms.Label() @@ -217,6 +235,13 @@ Partial Class frmStartOptions Me.LinkLabel43 = New System.Windows.Forms.LinkLabel() Me.LinkLabel44 = New System.Windows.Forms.LinkLabel() Me.Label24 = New System.Windows.Forms.Label() + Me.txtBatchNrofTransaction = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtBatchNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cbxMSEBatchNr = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtTransactionID = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cbxRMC = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtTBLNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.txtTWLNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.CheckBox2 = New System.Windows.Forms.CheckBox() Me.LinkLabel25 = New System.Windows.Forms.LinkLabel() Me.CheckBox1 = New System.Windows.Forms.CheckBox() @@ -224,6 +249,7 @@ Partial Class frmStartOptions Me.cbxKd = New System.Windows.Forms.CheckBox() Me.Button9 = New System.Windows.Forms.Button() Me.Label3 = New System.Windows.Forms.Label() + Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.PictureBox12 = New System.Windows.Forms.PictureBox() Me.LinkLabel20 = New System.Windows.Forms.LinkLabel() Me.PictureBox11 = New System.Windows.Forms.PictureBox() @@ -239,35 +265,20 @@ Partial Class frmStartOptions Me.LinkLabel3 = New System.Windows.Forms.LinkLabel() Me.lklAufschubkontenATLASEZOLL = New System.Windows.Forms.LinkLabel() Me.lblRoutineManager = New System.Windows.Forms.Label() - Me.Button21 = New System.Windows.Forms.Button() - Me.txtKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.MyTextBox3 = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtSyskaWdhDateiname = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtEZOLLAnhDat = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cboSYSKAFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.cboBMDUnispedFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.MyTextBox4 = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.dgvMRN = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) - Me.clmnMRN = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.txtVRGOut_MRN = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVRGOut_FilialenNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtVRGOut_AbfertigungsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtVRGOutEZA_BezugsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtVRGOut_BezugsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtUTAYear = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtBatchNrofTransaction = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtBatchNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cbxMSEBatchNr = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtTransactionID = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cbxRMC = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.txtTBLNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.txtTWLNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.Button21 = New System.Windows.Forms.Button() Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.cbxIDSalt = New System.Windows.Forms.CheckBox() + Me.cbxIDSneu = New System.Windows.Forms.CheckBox() + Me.cbxUTANeu = New System.Windows.Forms.CheckBox() + Me.cbxUTAalt = New System.Windows.Forms.CheckBox() + Me.cbxMSEneu = New System.Windows.Forms.CheckBox() + Me.cbxMSEalt = New System.Windows.Forms.CheckBox() + Me.Label44 = New System.Windows.Forms.Label() + Me.Label45 = New System.Windows.Forms.Label() + Me.Label46 = New System.Windows.Forms.Label() + Me.cbxPlose = New System.Windows.Forms.CheckBox() + Me.cbxITalt = New System.Windows.Forms.CheckBox() Me.pnl.SuspendLayout() CType(Me.PictureBox25, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox24, System.ComponentModel.ISupportInitialize).BeginInit() @@ -293,6 +304,7 @@ Partial Class frmStartOptions Me.TabPage2.SuspendLayout() CType(Me.PictureBox15, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox14, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.dgvMRN, System.ComponentModel.ISupportInitialize).BeginInit() Me.TabPage3.SuspendLayout() Me.TabPage4.SuspendLayout() CType(Me.PictureBox21, System.ComponentModel.ISupportInitialize).BeginInit() @@ -302,7 +314,6 @@ Partial Class frmStartOptions CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox10, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).BeginInit() - CType(Me.dgvMRN, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'pnl @@ -311,13 +322,6 @@ Partial Class frmStartOptions Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.pnl.Controls.Add(Me.txtMRNPrefix) Me.pnl.Controls.Add(Me.LinkLabel66) - Me.pnl.Controls.Add(Me.Button25) - Me.pnl.Controls.Add(Me.Button24) - Me.pnl.Controls.Add(Me.CheckBox8) - Me.pnl.Controls.Add(Me.Label43) - Me.pnl.Controls.Add(Me.txtKdNr) - Me.pnl.Controls.Add(Me.PictureBox25) - Me.pnl.Controls.Add(Me.Button23) Me.pnl.Controls.Add(Me.PictureBox24) Me.pnl.Controls.Add(Me.buchungenAMBAR) Me.pnl.Controls.Add(Me.LinkLabel63) @@ -422,7 +426,7 @@ Partial Class frmStartOptions Me.Button25.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button25.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Button25.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button25.Location = New System.Drawing.Point(910, 298) + Me.Button25.Location = New System.Drawing.Point(986, 292) Me.Button25.Name = "Button25" Me.Button25.Size = New System.Drawing.Size(187, 38) Me.Button25.TabIndex = 135 @@ -434,7 +438,7 @@ Partial Class frmStartOptions Me.Button24.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button24.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Button24.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button24.Location = New System.Drawing.Point(883, 370) + Me.Button24.Location = New System.Drawing.Point(1000, 358) Me.Button24.Name = "Button24" Me.Button24.Size = New System.Drawing.Size(187, 38) Me.Button24.TabIndex = 134 @@ -448,7 +452,7 @@ Partial Class frmStartOptions Me.CheckBox8.Checked = True Me.CheckBox8.CheckState = System.Windows.Forms.CheckState.Checked Me.CheckBox8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.CheckBox8.Location = New System.Drawing.Point(1018, 207) + Me.CheckBox8.Location = New System.Drawing.Point(1094, 66) Me.CheckBox8.Name = "CheckBox8" Me.CheckBox8.Size = New System.Drawing.Size(79, 17) Me.CheckBox8.TabIndex = 133 @@ -459,17 +463,41 @@ Partial Class frmStartOptions ' Me.Label43.AutoSize = True Me.Label43.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label43.Location = New System.Drawing.Point(907, 234) + Me.Label43.Location = New System.Drawing.Point(983, 93) Me.Label43.Name = "Label43" Me.Label43.Size = New System.Drawing.Size(35, 13) Me.Label43.TabIndex = 132 Me.Label43.Text = "KdNr" ' + 'txtKdNr + ' + Me.txtKdNr._DateTimeOnly = False + Me.txtKdNr._numbersOnly = True + Me.txtKdNr._numbersOnlyKommastellen = "" + Me.txtKdNr._numbersOnlyTrennzeichen = False + Me.txtKdNr._Prozent = False + Me.txtKdNr._ShortDateNew = False + Me.txtKdNr._ShortDateOnly = False + Me.txtKdNr._TimeOnly = False + Me.txtKdNr._TimeOnly_Seconds = False + Me.txtKdNr._value = "" + Me.txtKdNr._Waehrung = False + Me.txtKdNr._WaehrungZeichen = True + Me.txtKdNr.ForeColor = System.Drawing.Color.Black + Me.txtKdNr.Location = New System.Drawing.Point(1037, 86) + Me.txtKdNr.MaxLength = 50 + Me.txtKdNr.MaxLineLength = -1 + Me.txtKdNr.MaxLines_Warning = "" + Me.txtKdNr.MaxLines_Warning_Label = Nothing + Me.txtKdNr.Name = "txtKdNr" + Me.txtKdNr.Size = New System.Drawing.Size(136, 20) + Me.txtKdNr.TabIndex = 95 + ' 'PictureBox25 ' Me.PictureBox25.BackgroundImage = CType(resources.GetObject("PictureBox25.BackgroundImage"), System.Drawing.Image) Me.PictureBox25.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.PictureBox25.Location = New System.Drawing.Point(1108, 264) + Me.PictureBox25.Location = New System.Drawing.Point(1194, 263) Me.PictureBox25.Name = "PictureBox25" Me.PictureBox25.Size = New System.Drawing.Size(18, 18) Me.PictureBox25.TabIndex = 94 @@ -481,7 +509,7 @@ Partial Class frmStartOptions Me.Button23.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button23.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Button23.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button23.Location = New System.Drawing.Point(910, 253) + Me.Button23.Location = New System.Drawing.Point(986, 247) Me.Button23.Name = "Button23" Me.Button23.Size = New System.Drawing.Size(187, 38) Me.Button23.TabIndex = 93 @@ -542,6 +570,29 @@ Partial Class frmStartOptions Me.Label27.TabIndex = 87 Me.Label27.Text = "älter als Tage" ' + 'MyTextBox3 + ' + Me.MyTextBox3._DateTimeOnly = False + Me.MyTextBox3._numbersOnly = True + Me.MyTextBox3._numbersOnlyKommastellen = "" + Me.MyTextBox3._numbersOnlyTrennzeichen = True + Me.MyTextBox3._Prozent = False + Me.MyTextBox3._ShortDateNew = False + Me.MyTextBox3._ShortDateOnly = False + Me.MyTextBox3._TimeOnly = False + Me.MyTextBox3._TimeOnly_Seconds = False + Me.MyTextBox3._value = "" + Me.MyTextBox3._Waehrung = False + Me.MyTextBox3._WaehrungZeichen = True + Me.MyTextBox3.ForeColor = System.Drawing.Color.Red + Me.MyTextBox3.Location = New System.Drawing.Point(127, 208) + Me.MyTextBox3.MaxLineLength = -1 + Me.MyTextBox3.MaxLines_Warning = "" + Me.MyTextBox3.MaxLines_Warning_Label = Nothing + Me.MyTextBox3.Name = "MyTextBox3" + Me.MyTextBox3.Size = New System.Drawing.Size(53, 20) + Me.MyTextBox3.TabIndex = 86 + ' 'LinkLabel51 ' Me.LinkLabel51.AutoSize = True @@ -731,6 +782,29 @@ Partial Class frmStartOptions Me.Label18.TabIndex = 64 Me.Label18.Text = "Max" ' + 'MyTextBox2 + ' + Me.MyTextBox2._DateTimeOnly = False + Me.MyTextBox2._numbersOnly = True + Me.MyTextBox2._numbersOnlyKommastellen = "" + Me.MyTextBox2._numbersOnlyTrennzeichen = True + Me.MyTextBox2._Prozent = False + Me.MyTextBox2._ShortDateNew = False + Me.MyTextBox2._ShortDateOnly = False + Me.MyTextBox2._TimeOnly = False + Me.MyTextBox2._TimeOnly_Seconds = False + Me.MyTextBox2._value = "" + Me.MyTextBox2._Waehrung = False + Me.MyTextBox2._WaehrungZeichen = True + Me.MyTextBox2.ForeColor = System.Drawing.Color.Red + Me.MyTextBox2.Location = New System.Drawing.Point(151, 152) + Me.MyTextBox2.MaxLineLength = -1 + Me.MyTextBox2.MaxLines_Warning = "" + Me.MyTextBox2.MaxLines_Warning_Label = Nothing + Me.MyTextBox2.Name = "MyTextBox2" + Me.MyTextBox2.Size = New System.Drawing.Size(53, 20) + Me.MyTextBox2.TabIndex = 63 + ' 'LinkLabel36 ' Me.LinkLabel36.AutoSize = True @@ -777,6 +851,30 @@ Partial Class frmStartOptions Me.cbxSyskaWdh.Text = "Buchungen wiederh." Me.cbxSyskaWdh.UseVisualStyleBackColor = True ' + 'txtSyskaWdhDateiname + ' + Me.txtSyskaWdhDateiname._DateTimeOnly = False + Me.txtSyskaWdhDateiname._numbersOnly = False + Me.txtSyskaWdhDateiname._numbersOnlyKommastellen = "" + Me.txtSyskaWdhDateiname._numbersOnlyTrennzeichen = True + Me.txtSyskaWdhDateiname._Prozent = False + Me.txtSyskaWdhDateiname._ShortDateNew = False + Me.txtSyskaWdhDateiname._ShortDateOnly = False + Me.txtSyskaWdhDateiname._TimeOnly = False + Me.txtSyskaWdhDateiname._TimeOnly_Seconds = False + Me.txtSyskaWdhDateiname._value = "" + Me.txtSyskaWdhDateiname._Waehrung = False + Me.txtSyskaWdhDateiname._WaehrungZeichen = True + Me.txtSyskaWdhDateiname.ForeColor = System.Drawing.Color.Black + Me.txtSyskaWdhDateiname.Location = New System.Drawing.Point(692, 318) + Me.txtSyskaWdhDateiname.MaxLength = 50 + Me.txtSyskaWdhDateiname.MaxLineLength = -1 + Me.txtSyskaWdhDateiname.MaxLines_Warning = "" + Me.txtSyskaWdhDateiname.MaxLines_Warning_Label = Nothing + Me.txtSyskaWdhDateiname.Name = "txtSyskaWdhDateiname" + Me.txtSyskaWdhDateiname.Size = New System.Drawing.Size(136, 20) + Me.txtSyskaWdhDateiname.TabIndex = 58 + ' 'Button10 ' Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat @@ -801,6 +899,30 @@ Partial Class frmStartOptions Me.piceZollAnh.TabStop = False Me.piceZollAnh.Visible = False ' + 'txtEZOLLAnhDat + ' + Me.txtEZOLLAnhDat._DateTimeOnly = False + Me.txtEZOLLAnhDat._numbersOnly = False + Me.txtEZOLLAnhDat._numbersOnlyKommastellen = "" + Me.txtEZOLLAnhDat._numbersOnlyTrennzeichen = True + Me.txtEZOLLAnhDat._Prozent = False + Me.txtEZOLLAnhDat._ShortDateNew = True + Me.txtEZOLLAnhDat._ShortDateOnly = False + Me.txtEZOLLAnhDat._TimeOnly = False + Me.txtEZOLLAnhDat._TimeOnly_Seconds = False + Me.txtEZOLLAnhDat._value = "" + Me.txtEZOLLAnhDat._Waehrung = False + Me.txtEZOLLAnhDat._WaehrungZeichen = True + Me.txtEZOLLAnhDat.ForeColor = System.Drawing.Color.Black + Me.txtEZOLLAnhDat.Location = New System.Drawing.Point(408, 190) + Me.txtEZOLLAnhDat.MaxLength = 10 + Me.txtEZOLLAnhDat.MaxLineLength = -1 + Me.txtEZOLLAnhDat.MaxLines_Warning = "" + Me.txtEZOLLAnhDat.MaxLines_Warning_Label = Nothing + Me.txtEZOLLAnhDat.Name = "txtEZOLLAnhDat" + Me.txtEZOLLAnhDat.Size = New System.Drawing.Size(87, 20) + Me.txtEZOLLAnhDat.TabIndex = 55 + ' 'lblEZOLLDat ' Me.lblEZOLLDat.AutoSize = True @@ -849,6 +971,17 @@ Partial Class frmStartOptions Me.Button7.Text = "Buchungen --> Syska" Me.Button7.UseVisualStyleBackColor = True ' + 'cboSYSKAFirma + ' + Me.cboSYSKAFirma._allowedValuesFreiText = Nothing + Me.cboSYSKAFirma._allowFreiText = False + Me.cboSYSKAFirma._value = "" + Me.cboSYSKAFirma.FormattingEnabled = True + Me.cboSYSKAFirma.Location = New System.Drawing.Point(564, 299) + Me.cboSYSKAFirma.Name = "cboSYSKAFirma" + Me.cboSYSKAFirma.Size = New System.Drawing.Size(129, 21) + Me.cboSYSKAFirma.TabIndex = 51 + ' 'CheckBox7 ' Me.CheckBox7.AutoSize = True @@ -941,6 +1074,17 @@ Partial Class frmStartOptions Me.Button3.Text = "Buchungen --> BMD" Me.Button3.UseVisualStyleBackColor = True ' + 'cboBMDUnispedFirma + ' + Me.cboBMDUnispedFirma._allowedValuesFreiText = Nothing + Me.cboBMDUnispedFirma._allowFreiText = False + Me.cboBMDUnispedFirma._value = "" + Me.cboBMDUnispedFirma.FormattingEnabled = True + Me.cboBMDUnispedFirma.Location = New System.Drawing.Point(268, 276) + Me.cboBMDUnispedFirma.Name = "cboBMDUnispedFirma" + Me.cboBMDUnispedFirma.Size = New System.Drawing.Size(124, 21) + Me.cboBMDUnispedFirma.TabIndex = 42 + ' 'CheckBox4 ' Me.CheckBox4.AutoSize = True @@ -1055,6 +1199,30 @@ Partial Class frmStartOptions Me.cbxGestellungspeichern.Text = "Gestellungen speichern" Me.cbxGestellungspeichern.UseVisualStyleBackColor = True ' + 'MyTextBox4 + ' + Me.MyTextBox4._DateTimeOnly = False + Me.MyTextBox4._numbersOnly = False + Me.MyTextBox4._numbersOnlyKommastellen = "" + Me.MyTextBox4._numbersOnlyTrennzeichen = True + Me.MyTextBox4._Prozent = False + Me.MyTextBox4._ShortDateNew = True + Me.MyTextBox4._ShortDateOnly = False + Me.MyTextBox4._TimeOnly = False + Me.MyTextBox4._TimeOnly_Seconds = False + Me.MyTextBox4._value = "" + Me.MyTextBox4._Waehrung = False + Me.MyTextBox4._WaehrungZeichen = True + Me.MyTextBox4.ForeColor = System.Drawing.Color.Black + Me.MyTextBox4.Location = New System.Drawing.Point(775, 277) + Me.MyTextBox4.MaxLength = 10 + Me.MyTextBox4.MaxLineLength = -1 + Me.MyTextBox4.MaxLines_Warning = "" + Me.MyTextBox4.MaxLines_Warning_Label = Nothing + Me.MyTextBox4.Name = "MyTextBox4" + Me.MyTextBox4.Size = New System.Drawing.Size(80, 20) + Me.MyTextBox4.TabIndex = 90 + ' 'Label41 ' Me.Label41.AutoSize = True @@ -1849,6 +2017,165 @@ Partial Class frmStartOptions Me.PictureBox14.TabStop = False Me.PictureBox14.Visible = False ' + 'dgvMRN + ' + Me.dgvMRN.AKTUALISIERUNGS_INTERVALL = -1 + Me.dgvMRN.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize + Me.dgvMRN.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnMRN}) + Me.dgvMRN.Location = New System.Drawing.Point(637, 63) + Me.dgvMRN.Name = "dgvMRN" + Me.dgvMRN.RowHeadersWidth = 62 + Me.dgvMRN.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect + Me.dgvMRN.Size = New System.Drawing.Size(207, 134) + Me.dgvMRN.TabIndex = 75 + ' + 'clmnMRN + ' + Me.clmnMRN.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill + Me.clmnMRN.HeaderText = "MRN" + Me.clmnMRN.MinimumWidth = 8 + Me.clmnMRN.Name = "clmnMRN" + ' + 'txtVRGOut_MRN + ' + Me.txtVRGOut_MRN._DateTimeOnly = False + Me.txtVRGOut_MRN._numbersOnly = False + Me.txtVRGOut_MRN._numbersOnlyKommastellen = "" + Me.txtVRGOut_MRN._numbersOnlyTrennzeichen = True + Me.txtVRGOut_MRN._Prozent = False + Me.txtVRGOut_MRN._ShortDateNew = False + Me.txtVRGOut_MRN._ShortDateOnly = False + Me.txtVRGOut_MRN._TimeOnly = False + Me.txtVRGOut_MRN._TimeOnly_Seconds = False + Me.txtVRGOut_MRN._value = "" + Me.txtVRGOut_MRN._Waehrung = False + Me.txtVRGOut_MRN._WaehrungZeichen = False + Me.txtVRGOut_MRN.ForeColor = System.Drawing.Color.Red + Me.txtVRGOut_MRN.Location = New System.Drawing.Point(359, 84) + Me.txtVRGOut_MRN.MaxLineLength = -1 + Me.txtVRGOut_MRN.MaxLines_Warning = "" + Me.txtVRGOut_MRN.MaxLines_Warning_Label = Nothing + Me.txtVRGOut_MRN.Name = "txtVRGOut_MRN" + Me.txtVRGOut_MRN.Size = New System.Drawing.Size(153, 20) + Me.txtVRGOut_MRN.TabIndex = 73 + ' + 'txtVRGOut_FilialenNr + ' + Me.txtVRGOut_FilialenNr._DateTimeOnly = False + Me.txtVRGOut_FilialenNr._numbersOnly = False + Me.txtVRGOut_FilialenNr._numbersOnlyKommastellen = "" + Me.txtVRGOut_FilialenNr._numbersOnlyTrennzeichen = True + Me.txtVRGOut_FilialenNr._Prozent = False + Me.txtVRGOut_FilialenNr._ShortDateNew = False + Me.txtVRGOut_FilialenNr._ShortDateOnly = False + Me.txtVRGOut_FilialenNr._TimeOnly = False + Me.txtVRGOut_FilialenNr._TimeOnly_Seconds = False + Me.txtVRGOut_FilialenNr._value = "" + Me.txtVRGOut_FilialenNr._Waehrung = False + Me.txtVRGOut_FilialenNr._WaehrungZeichen = False + Me.txtVRGOut_FilialenNr.ForeColor = System.Drawing.Color.Red + Me.txtVRGOut_FilialenNr.Location = New System.Drawing.Point(398, 176) + Me.txtVRGOut_FilialenNr.MaxLineLength = -1 + Me.txtVRGOut_FilialenNr.MaxLines_Warning = "" + Me.txtVRGOut_FilialenNr.MaxLines_Warning_Label = Nothing + Me.txtVRGOut_FilialenNr.Multiline = True + Me.txtVRGOut_FilialenNr.Name = "txtVRGOut_FilialenNr" + Me.txtVRGOut_FilialenNr.Size = New System.Drawing.Size(56, 21) + Me.txtVRGOut_FilialenNr.TabIndex = 71 + ' + 'txtVRGOut_AbfertigungsNr + ' + Me.txtVRGOut_AbfertigungsNr._DateTimeOnly = False + Me.txtVRGOut_AbfertigungsNr._numbersOnly = False + Me.txtVRGOut_AbfertigungsNr._numbersOnlyKommastellen = "" + Me.txtVRGOut_AbfertigungsNr._numbersOnlyTrennzeichen = True + Me.txtVRGOut_AbfertigungsNr._Prozent = False + Me.txtVRGOut_AbfertigungsNr._ShortDateNew = False + Me.txtVRGOut_AbfertigungsNr._ShortDateOnly = False + Me.txtVRGOut_AbfertigungsNr._TimeOnly = False + Me.txtVRGOut_AbfertigungsNr._TimeOnly_Seconds = False + Me.txtVRGOut_AbfertigungsNr._value = "" + Me.txtVRGOut_AbfertigungsNr._Waehrung = False + Me.txtVRGOut_AbfertigungsNr._WaehrungZeichen = False + Me.txtVRGOut_AbfertigungsNr.ForeColor = System.Drawing.Color.Red + Me.txtVRGOut_AbfertigungsNr.Location = New System.Drawing.Point(453, 176) + Me.txtVRGOut_AbfertigungsNr.MaxLineLength = -1 + Me.txtVRGOut_AbfertigungsNr.MaxLines_Warning = "" + Me.txtVRGOut_AbfertigungsNr.MaxLines_Warning_Label = Nothing + Me.txtVRGOut_AbfertigungsNr.Multiline = True + Me.txtVRGOut_AbfertigungsNr.Name = "txtVRGOut_AbfertigungsNr" + Me.txtVRGOut_AbfertigungsNr.Size = New System.Drawing.Size(137, 21) + Me.txtVRGOut_AbfertigungsNr.TabIndex = 70 + ' + 'MyComboBox2 + ' + Me.MyComboBox2._allowedValuesFreiText = Nothing + Me.MyComboBox2._allowFreiText = False + Me.MyComboBox2._value = "" + Me.MyComboBox2.FormattingEnabled = True + Me.MyComboBox2.Location = New System.Drawing.Point(298, 252) + Me.MyComboBox2.Name = "MyComboBox2" + Me.MyComboBox2.Size = New System.Drawing.Size(62, 21) + Me.MyComboBox2.TabIndex = 64 + ' + 'txtVRGOutEZA_BezugsNr + ' + Me.txtVRGOutEZA_BezugsNr._DateTimeOnly = False + Me.txtVRGOutEZA_BezugsNr._numbersOnly = False + Me.txtVRGOutEZA_BezugsNr._numbersOnlyKommastellen = "" + Me.txtVRGOutEZA_BezugsNr._numbersOnlyTrennzeichen = True + Me.txtVRGOutEZA_BezugsNr._Prozent = False + Me.txtVRGOutEZA_BezugsNr._ShortDateNew = False + Me.txtVRGOutEZA_BezugsNr._ShortDateOnly = False + Me.txtVRGOutEZA_BezugsNr._TimeOnly = False + Me.txtVRGOutEZA_BezugsNr._TimeOnly_Seconds = False + Me.txtVRGOutEZA_BezugsNr._value = "" + Me.txtVRGOutEZA_BezugsNr._Waehrung = False + Me.txtVRGOutEZA_BezugsNr._WaehrungZeichen = False + Me.txtVRGOutEZA_BezugsNr.ForeColor = System.Drawing.Color.Red + Me.txtVRGOutEZA_BezugsNr.Location = New System.Drawing.Point(359, 252) + Me.txtVRGOutEZA_BezugsNr.MaxLineLength = -1 + Me.txtVRGOutEZA_BezugsNr.MaxLines_Warning = "" + Me.txtVRGOutEZA_BezugsNr.MaxLines_Warning_Label = Nothing + Me.txtVRGOutEZA_BezugsNr.Multiline = True + Me.txtVRGOutEZA_BezugsNr.Name = "txtVRGOutEZA_BezugsNr" + Me.txtVRGOutEZA_BezugsNr.Size = New System.Drawing.Size(153, 21) + Me.txtVRGOutEZA_BezugsNr.TabIndex = 65 + ' + 'MyComboBox1 + ' + Me.MyComboBox1._allowedValuesFreiText = Nothing + Me.MyComboBox1._allowFreiText = False + Me.MyComboBox1._value = "" + Me.MyComboBox1.FormattingEnabled = True + Me.MyComboBox1.Location = New System.Drawing.Point(298, 62) + Me.MyComboBox1.Name = "MyComboBox1" + Me.MyComboBox1.Size = New System.Drawing.Size(62, 21) + Me.MyComboBox1.TabIndex = 4 + ' + 'txtVRGOut_BezugsNr + ' + Me.txtVRGOut_BezugsNr._DateTimeOnly = False + Me.txtVRGOut_BezugsNr._numbersOnly = False + Me.txtVRGOut_BezugsNr._numbersOnlyKommastellen = "" + Me.txtVRGOut_BezugsNr._numbersOnlyTrennzeichen = True + Me.txtVRGOut_BezugsNr._Prozent = False + Me.txtVRGOut_BezugsNr._ShortDateNew = False + Me.txtVRGOut_BezugsNr._ShortDateOnly = False + Me.txtVRGOut_BezugsNr._TimeOnly = False + Me.txtVRGOut_BezugsNr._TimeOnly_Seconds = False + Me.txtVRGOut_BezugsNr._value = "" + Me.txtVRGOut_BezugsNr._Waehrung = False + Me.txtVRGOut_BezugsNr._WaehrungZeichen = False + Me.txtVRGOut_BezugsNr.ForeColor = System.Drawing.Color.Red + Me.txtVRGOut_BezugsNr.Location = New System.Drawing.Point(359, 62) + Me.txtVRGOut_BezugsNr.MaxLineLength = -1 + Me.txtVRGOut_BezugsNr.MaxLines_Warning = "" + Me.txtVRGOut_BezugsNr.MaxLines_Warning_Label = Nothing + Me.txtVRGOut_BezugsNr.Name = "txtVRGOut_BezugsNr" + Me.txtVRGOut_BezugsNr.Size = New System.Drawing.Size(153, 20) + Me.txtVRGOut_BezugsNr.TabIndex = 5 + ' 'TabPage3 ' Me.TabPage3.Controls.Add(Me.LinkLabel50) @@ -2009,20 +2336,38 @@ Partial Class frmStartOptions ' 'TabPage4 ' + Me.TabPage4.Controls.Add(Me.cbxITalt) + Me.TabPage4.Controls.Add(Me.cbxPlose) + Me.TabPage4.Controls.Add(Me.Label46) + Me.TabPage4.Controls.Add(Me.Label45) + Me.TabPage4.Controls.Add(Me.Label44) + Me.TabPage4.Controls.Add(Me.cbxMSEneu) + Me.TabPage4.Controls.Add(Me.Button24) Me.TabPage4.Controls.Add(Me.txtUTAYear) + Me.TabPage4.Controls.Add(Me.cbxMSEalt) Me.TabPage4.Controls.Add(Me.LinkLabel65) + Me.TabPage4.Controls.Add(Me.cbxUTANeu) Me.TabPage4.Controls.Add(Me.LinkLabel64) + Me.TabPage4.Controls.Add(Me.cbxUTAalt) Me.TabPage4.Controls.Add(Me.Label42) + Me.TabPage4.Controls.Add(Me.cbxIDSneu) Me.TabPage4.Controls.Add(Me.cbxUploadDA) + Me.TabPage4.Controls.Add(Me.cbxIDSalt) Me.TabPage4.Controls.Add(Me.Label5) Me.TabPage4.Controls.Add(Me.LinkLabel23) Me.TabPage4.Controls.Add(Me.LinkLabel24) + Me.TabPage4.Controls.Add(Me.Button25) Me.TabPage4.Controls.Add(Me.cbxOnlyBilledTransactions) Me.TabPage4.Controls.Add(Me.LinkLabel62) + Me.TabPage4.Controls.Add(Me.CheckBox8) Me.TabPage4.Controls.Add(Me.LinkLabel60) + Me.TabPage4.Controls.Add(Me.Label43) Me.TabPage4.Controls.Add(Me.LinkLabel61) + Me.TabPage4.Controls.Add(Me.txtKdNr) Me.TabPage4.Controls.Add(Me.Label40) + Me.TabPage4.Controls.Add(Me.PictureBox25) Me.TabPage4.Controls.Add(Me.LinkLabel59) + Me.TabPage4.Controls.Add(Me.Button23) Me.TabPage4.Controls.Add(Me.Label39) Me.TabPage4.Controls.Add(Me.Label38) Me.TabPage4.Controls.Add(Me.Label37) @@ -2078,11 +2423,37 @@ Partial Class frmStartOptions Me.TabPage4.Text = "VERAG 360" Me.TabPage4.UseVisualStyleBackColor = True ' + 'txtUTAYear + ' + Me.txtUTAYear._DateTimeOnly = False + Me.txtUTAYear._numbersOnly = True + Me.txtUTAYear._numbersOnlyKommastellen = "" + Me.txtUTAYear._numbersOnlyTrennzeichen = False + Me.txtUTAYear._Prozent = False + Me.txtUTAYear._ShortDateNew = False + Me.txtUTAYear._ShortDateOnly = False + Me.txtUTAYear._TimeOnly = False + Me.txtUTAYear._TimeOnly_Seconds = False + Me.txtUTAYear._value = "" + Me.txtUTAYear._Waehrung = False + Me.txtUTAYear._WaehrungZeichen = True + Me.txtUTAYear.BackColor = System.Drawing.SystemColors.Window + Me.txtUTAYear.ForeColor = System.Drawing.Color.Red + Me.txtUTAYear.Location = New System.Drawing.Point(558, 341) + Me.txtUTAYear.MaxLength = 10 + Me.txtUTAYear.MaxLineLength = -1 + Me.txtUTAYear.MaxLines_Warning = "" + Me.txtUTAYear.MaxLines_Warning_Label = Nothing + Me.txtUTAYear.Name = "txtUTAYear" + Me.txtUTAYear.Size = New System.Drawing.Size(66, 20) + Me.txtUTAYear.TabIndex = 133 + Me.txtUTAYear.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' 'LinkLabel65 ' Me.LinkLabel65.AutoSize = True Me.LinkLabel65.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel65.Location = New System.Drawing.Point(575, 84) + Me.LinkLabel65.Location = New System.Drawing.Point(21, 370) Me.LinkLabel65.Name = "LinkLabel65" Me.LinkLabel65.Size = New System.Drawing.Size(115, 13) Me.LinkLabel65.TabIndex = 132 @@ -2093,7 +2464,7 @@ Partial Class frmStartOptions ' Me.LinkLabel64.AutoSize = True Me.LinkLabel64.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel64.Location = New System.Drawing.Point(422, 189) + Me.LinkLabel64.Location = New System.Drawing.Point(555, 393) Me.LinkLabel64.Name = "LinkLabel64" Me.LinkLabel64.Size = New System.Drawing.Size(135, 13) Me.LinkLabel64.TabIndex = 131 @@ -2104,7 +2475,7 @@ Partial Class frmStartOptions ' Me.Label42.AutoSize = True Me.Label42.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label42.Location = New System.Drawing.Point(884, 235) + Me.Label42.Location = New System.Drawing.Point(379, 235) Me.Label42.Name = "Label42" Me.Label42.Size = New System.Drawing.Size(40, 13) Me.Label42.TabIndex = 130 @@ -2114,7 +2485,7 @@ Partial Class frmStartOptions ' Me.cbxUploadDA.AutoSize = True Me.cbxUploadDA.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxUploadDA.Location = New System.Drawing.Point(884, 324) + Me.cbxUploadDA.Location = New System.Drawing.Point(379, 324) Me.cbxUploadDA.Name = "cbxUploadDA" Me.cbxUploadDA.Size = New System.Drawing.Size(81, 17) Me.cbxUploadDA.TabIndex = 128 @@ -2126,7 +2497,7 @@ Partial Class frmStartOptions Me.Label5.AutoSize = True Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label5.ForeColor = System.Drawing.Color.Red - Me.Label5.Location = New System.Drawing.Point(991, 39) + Me.Label5.Location = New System.Drawing.Point(722, 39) Me.Label5.Name = "Label5" Me.Label5.Size = New System.Drawing.Size(56, 16) Me.Label5.TabIndex = 126 @@ -2136,7 +2507,7 @@ Partial Class frmStartOptions ' Me.LinkLabel23.AutoSize = True Me.LinkLabel23.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel23.Location = New System.Drawing.Point(991, 117) + Me.LinkLabel23.Location = New System.Drawing.Point(722, 90) Me.LinkLabel23.Name = "LinkLabel23" Me.LinkLabel23.Size = New System.Drawing.Size(180, 13) Me.LinkLabel23.TabIndex = 125 @@ -2147,7 +2518,7 @@ Partial Class frmStartOptions ' Me.LinkLabel24.AutoSize = True Me.LinkLabel24.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel24.Location = New System.Drawing.Point(991, 92) + Me.LinkLabel24.Location = New System.Drawing.Point(722, 65) Me.LinkLabel24.Name = "LinkLabel24" Me.LinkLabel24.Size = New System.Drawing.Size(177, 13) Me.LinkLabel24.TabIndex = 124 @@ -2160,7 +2531,7 @@ Partial Class frmStartOptions Me.cbxOnlyBilledTransactions.Checked = True Me.cbxOnlyBilledTransactions.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxOnlyBilledTransactions.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxOnlyBilledTransactions.Location = New System.Drawing.Point(782, 84) + Me.cbxOnlyBilledTransactions.Location = New System.Drawing.Point(277, 84) Me.cbxOnlyBilledTransactions.Name = "cbxOnlyBilledTransactions" Me.cbxOnlyBilledTransactions.Size = New System.Drawing.Size(172, 17) Me.cbxOnlyBilledTransactions.TabIndex = 121 @@ -2171,7 +2542,7 @@ Partial Class frmStartOptions ' Me.LinkLabel62.AutoSize = True Me.LinkLabel62.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel62.Location = New System.Drawing.Point(734, 374) + Me.LinkLabel62.Location = New System.Drawing.Point(265, 378) Me.LinkLabel62.Name = "LinkLabel62" Me.LinkLabel62.Size = New System.Drawing.Size(226, 13) Me.LinkLabel62.TabIndex = 120 @@ -2182,7 +2553,7 @@ Partial Class frmStartOptions ' Me.LinkLabel60.AutoSize = True Me.LinkLabel60.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel60.Location = New System.Drawing.Point(774, 131) + Me.LinkLabel60.Location = New System.Drawing.Point(269, 131) Me.LinkLabel60.Name = "LinkLabel60" Me.LinkLabel60.Size = New System.Drawing.Size(144, 13) Me.LinkLabel60.TabIndex = 119 @@ -2193,7 +2564,7 @@ Partial Class frmStartOptions ' Me.LinkLabel61.AutoSize = True Me.LinkLabel61.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel61.Location = New System.Drawing.Point(769, 351) + Me.LinkLabel61.Location = New System.Drawing.Point(264, 351) Me.LinkLabel61.Name = "LinkLabel61" Me.LinkLabel61.Size = New System.Drawing.Size(158, 13) Me.LinkLabel61.TabIndex = 118 @@ -2204,7 +2575,7 @@ Partial Class frmStartOptions ' Me.Label40.AutoSize = True Me.Label40.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label40.Location = New System.Drawing.Point(770, 235) + Me.Label40.Location = New System.Drawing.Point(265, 235) Me.Label40.Name = "Label40" Me.Label40.Size = New System.Drawing.Size(20, 13) Me.Label40.TabIndex = 116 @@ -2214,7 +2585,7 @@ Partial Class frmStartOptions ' Me.LinkLabel59.AutoSize = True Me.LinkLabel59.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel59.Location = New System.Drawing.Point(782, 255) + Me.LinkLabel59.Location = New System.Drawing.Point(277, 255) Me.LinkLabel59.Name = "LinkLabel59" Me.LinkLabel59.Size = New System.Drawing.Size(149, 13) Me.LinkLabel59.TabIndex = 114 @@ -2225,7 +2596,7 @@ Partial Class frmStartOptions ' Me.Label39.AutoSize = True Me.Label39.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label39.Location = New System.Drawing.Point(769, 296) + Me.Label39.Location = New System.Drawing.Point(264, 296) Me.Label39.Name = "Label39" Me.Label39.Size = New System.Drawing.Size(28, 13) Me.Label39.TabIndex = 113 @@ -2235,7 +2606,7 @@ Partial Class frmStartOptions ' Me.Label38.AutoSize = True Me.Label38.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label38.Location = New System.Drawing.Point(768, 439) + Me.Label38.Location = New System.Drawing.Point(263, 439) Me.Label38.Name = "Label38" Me.Label38.Size = New System.Drawing.Size(23, 13) Me.Label38.TabIndex = 112 @@ -2245,7 +2616,7 @@ Partial Class frmStartOptions ' 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(768, 420) + Me.Label37.Location = New System.Drawing.Point(263, 420) Me.Label37.Name = "Label37" Me.Label37.Size = New System.Drawing.Size(28, 13) Me.Label37.TabIndex = 111 @@ -2255,7 +2626,7 @@ Partial Class frmStartOptions ' Me.LinkLabel58.AutoSize = True Me.LinkLabel58.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel58.Location = New System.Drawing.Point(775, 156) + Me.LinkLabel58.Location = New System.Drawing.Point(270, 156) Me.LinkLabel58.Name = "LinkLabel58" Me.LinkLabel58.Size = New System.Drawing.Size(126, 13) Me.LinkLabel58.TabIndex = 110 @@ -2266,7 +2637,7 @@ Partial Class frmStartOptions ' Me.LinkLabel57.AutoSize = True Me.LinkLabel57.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel57.Location = New System.Drawing.Point(775, 205) + Me.LinkLabel57.Location = New System.Drawing.Point(270, 205) Me.LinkLabel57.Name = "LinkLabel57" Me.LinkLabel57.Size = New System.Drawing.Size(166, 13) Me.LinkLabel57.TabIndex = 108 @@ -2276,7 +2647,7 @@ Partial Class frmStartOptions 'DateTimePicker2 ' Me.DateTimePicker2.Format = System.Windows.Forms.DateTimePickerFormat.[Short] - Me.DateTimePicker2.Location = New System.Drawing.Point(803, 433) + Me.DateTimePicker2.Location = New System.Drawing.Point(298, 433) Me.DateTimePicker2.Name = "DateTimePicker2" Me.DateTimePicker2.Size = New System.Drawing.Size(85, 20) Me.DateTimePicker2.TabIndex = 107 @@ -2284,7 +2655,7 @@ Partial Class frmStartOptions 'DateTimePicker1 ' Me.DateTimePicker1.Format = System.Windows.Forms.DateTimePickerFormat.[Short] - Me.DateTimePicker1.Location = New System.Drawing.Point(803, 414) + Me.DateTimePicker1.Location = New System.Drawing.Point(298, 414) Me.DateTimePicker1.Name = "DateTimePicker1" Me.DateTimePicker1.Size = New System.Drawing.Size(85, 20) Me.DateTimePicker1.TabIndex = 106 @@ -2293,7 +2664,7 @@ Partial Class frmStartOptions ' Me.LinkLabel56.AutoSize = True Me.LinkLabel56.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel56.Location = New System.Drawing.Point(768, 456) + Me.LinkLabel56.Location = New System.Drawing.Point(263, 456) Me.LinkLabel56.Name = "LinkLabel56" Me.LinkLabel56.Size = New System.Drawing.Size(114, 13) Me.LinkLabel56.TabIndex = 105 @@ -2303,7 +2674,7 @@ Partial Class frmStartOptions 'datVon ' Me.datVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short] - Me.datVon.Location = New System.Drawing.Point(803, 296) + Me.datVon.Location = New System.Drawing.Point(298, 296) Me.datVon.Name = "datVon" Me.datVon.Size = New System.Drawing.Size(85, 20) Me.datVon.TabIndex = 104 @@ -2312,7 +2683,7 @@ Partial Class frmStartOptions ' Me.LinkLabel55.AutoSize = True Me.LinkLabel55.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel55.Location = New System.Drawing.Point(770, 324) + Me.LinkLabel55.Location = New System.Drawing.Point(265, 324) Me.LinkLabel55.Name = "LinkLabel55" Me.LinkLabel55.Size = New System.Drawing.Size(108, 13) Me.LinkLabel55.TabIndex = 103 @@ -2323,7 +2694,7 @@ Partial Class frmStartOptions ' Me.LinkLabel54.AutoSize = True Me.LinkLabel54.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel54.Location = New System.Drawing.Point(775, 106) + Me.LinkLabel54.Location = New System.Drawing.Point(270, 106) Me.LinkLabel54.Name = "LinkLabel54" Me.LinkLabel54.Size = New System.Drawing.Size(157, 13) Me.LinkLabel54.TabIndex = 102 @@ -2333,7 +2704,7 @@ Partial Class frmStartOptions 'TextBox2 ' Me.TextBox2.BackColor = System.Drawing.SystemColors.Menu - Me.TextBox2.Location = New System.Drawing.Point(263, 81) + Me.TextBox2.Location = New System.Drawing.Point(555, 81) Me.TextBox2.Multiline = True Me.TextBox2.Name = "TextBox2" Me.TextBox2.Size = New System.Drawing.Size(72, 55) @@ -2343,7 +2714,7 @@ Partial Class frmStartOptions 'TextBox1 ' Me.TextBox1.BackColor = System.Drawing.SystemColors.Menu - Me.TextBox1.Location = New System.Drawing.Point(425, 81) + Me.TextBox1.Location = New System.Drawing.Point(558, 285) Me.TextBox1.Multiline = True Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New System.Drawing.Size(89, 51) @@ -2356,7 +2727,7 @@ Partial Class frmStartOptions Me.cbxDateienlöschenUTA.Checked = True Me.cbxDateienlöschenUTA.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxDateienlöschenUTA.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxDateienlöschenUTA.Location = New System.Drawing.Point(404, 95) + Me.cbxDateienlöschenUTA.Location = New System.Drawing.Point(537, 299) Me.cbxDateienlöschenUTA.Name = "cbxDateienlöschenUTA" Me.cbxDateienlöschenUTA.Size = New System.Drawing.Size(15, 14) Me.cbxDateienlöschenUTA.TabIndex = 99 @@ -2368,7 +2739,7 @@ Partial Class frmStartOptions Me.cbxDateienlöschenRMC.Checked = True Me.cbxDateienlöschenRMC.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxDateienlöschenRMC.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxDateienlöschenRMC.Location = New System.Drawing.Point(241, 105) + Me.cbxDateienlöschenRMC.Location = New System.Drawing.Point(533, 105) Me.cbxDateienlöschenRMC.Name = "cbxDateienlöschenRMC" Me.cbxDateienlöschenRMC.Size = New System.Drawing.Size(15, 14) Me.cbxDateienlöschenRMC.TabIndex = 98 @@ -2378,7 +2749,7 @@ Partial Class frmStartOptions ' Me.LinkLabel53.AutoSize = True Me.LinkLabel53.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel53.Location = New System.Drawing.Point(422, 168) + Me.LinkLabel53.Location = New System.Drawing.Point(555, 372) Me.LinkLabel53.Name = "LinkLabel53" Me.LinkLabel53.Size = New System.Drawing.Size(82, 13) Me.LinkLabel53.TabIndex = 97 @@ -2389,7 +2760,7 @@ Partial Class frmStartOptions ' Me.Label36.AutoSize = True Me.Label36.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label36.Location = New System.Drawing.Point(775, 65) + Me.Label36.Location = New System.Drawing.Point(270, 65) Me.Label36.Name = "Label36" Me.Label36.Size = New System.Drawing.Size(42, 13) Me.Label36.TabIndex = 96 @@ -2399,7 +2770,7 @@ Partial Class frmStartOptions ' 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(572, 65) + Me.Label35.Location = New System.Drawing.Point(18, 351) Me.Label35.Name = "Label35" Me.Label35.Size = New System.Drawing.Size(42, 13) Me.Label35.TabIndex = 95 @@ -2409,7 +2780,7 @@ Partial Class frmStartOptions ' Me.Label34.AutoSize = True Me.Label34.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label34.Location = New System.Drawing.Point(401, 65) + Me.Label34.Location = New System.Drawing.Point(534, 269) Me.Label34.Name = "Label34" Me.Label34.Size = New System.Drawing.Size(42, 13) Me.Label34.TabIndex = 94 @@ -2420,7 +2791,7 @@ Partial Class frmStartOptions Me.Label33.AutoSize = True Me.Label33.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label33.ForeColor = System.Drawing.Color.Red - Me.Label33.Location = New System.Drawing.Point(775, 39) + Me.Label33.Location = New System.Drawing.Point(270, 39) Me.Label33.Name = "Label33" Me.Label33.Size = New System.Drawing.Size(39, 16) Me.Label33.TabIndex = 93 @@ -2431,7 +2802,7 @@ Partial Class frmStartOptions Me.Label32.AutoSize = True Me.Label32.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label32.ForeColor = System.Drawing.Color.Red - Me.Label32.Location = New System.Drawing.Point(572, 39) + Me.Label32.Location = New System.Drawing.Point(18, 325) Me.Label32.Name = "Label32" Me.Label32.Size = New System.Drawing.Size(32, 16) Me.Label32.TabIndex = 92 @@ -2442,7 +2813,7 @@ Partial Class frmStartOptions Me.Label31.AutoSize = True Me.Label31.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label31.ForeColor = System.Drawing.Color.Red - Me.Label31.Location = New System.Drawing.Point(401, 39) + Me.Label31.Location = New System.Drawing.Point(534, 243) Me.Label31.Name = "Label31" Me.Label31.Size = New System.Drawing.Size(38, 16) Me.Label31.TabIndex = 91 @@ -2452,7 +2823,7 @@ Partial Class frmStartOptions ' Me.LinkLabel52.AutoSize = True Me.LinkLabel52.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel52.Location = New System.Drawing.Point(238, 152) + Me.LinkLabel52.Location = New System.Drawing.Point(530, 152) Me.LinkLabel52.Name = "LinkLabel52" Me.LinkLabel52.Size = New System.Drawing.Size(109, 13) Me.LinkLabel52.TabIndex = 84 @@ -2463,7 +2834,7 @@ Partial Class frmStartOptions ' Me.Label30.AutoSize = True Me.Label30.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label30.Location = New System.Drawing.Point(238, 65) + Me.Label30.Location = New System.Drawing.Point(530, 65) Me.Label30.Name = "Label30" Me.Label30.Size = New System.Drawing.Size(42, 13) Me.Label30.TabIndex = 83 @@ -2474,7 +2845,7 @@ Partial Class frmStartOptions Me.Label29.AutoSize = True Me.Label29.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label29.ForeColor = System.Drawing.Color.Red - Me.Label29.Location = New System.Drawing.Point(238, 39) + Me.Label29.Location = New System.Drawing.Point(530, 39) Me.Label29.Name = "Label29" Me.Label29.Size = New System.Drawing.Size(40, 16) Me.Label29.TabIndex = 82 @@ -2655,6 +3026,157 @@ Partial Class frmStartOptions Me.Label24.TabIndex = 30 Me.Label24.Text = "Import" ' + 'txtBatchNrofTransaction + ' + Me.txtBatchNrofTransaction._DateTimeOnly = False + Me.txtBatchNrofTransaction._numbersOnly = True + Me.txtBatchNrofTransaction._numbersOnlyKommastellen = "" + Me.txtBatchNrofTransaction._numbersOnlyTrennzeichen = False + Me.txtBatchNrofTransaction._Prozent = False + Me.txtBatchNrofTransaction._ShortDateNew = False + Me.txtBatchNrofTransaction._ShortDateOnly = False + Me.txtBatchNrofTransaction._TimeOnly = False + Me.txtBatchNrofTransaction._TimeOnly_Seconds = False + Me.txtBatchNrofTransaction._value = "" + Me.txtBatchNrofTransaction._Waehrung = False + Me.txtBatchNrofTransaction._WaehrungZeichen = True + Me.txtBatchNrofTransaction.BackColor = System.Drawing.SystemColors.Window + Me.txtBatchNrofTransaction.ForeColor = System.Drawing.Color.Red + Me.txtBatchNrofTransaction.Location = New System.Drawing.Point(424, 232) + Me.txtBatchNrofTransaction.MaxLength = 10 + Me.txtBatchNrofTransaction.MaxLineLength = -1 + Me.txtBatchNrofTransaction.MaxLines_Warning = "" + Me.txtBatchNrofTransaction.MaxLines_Warning_Label = Nothing + Me.txtBatchNrofTransaction.Name = "txtBatchNrofTransaction" + Me.txtBatchNrofTransaction.Size = New System.Drawing.Size(36, 20) + Me.txtBatchNrofTransaction.TabIndex = 129 + Me.txtBatchNrofTransaction.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'txtBatchNr + ' + Me.txtBatchNr._DateTimeOnly = False + Me.txtBatchNr._numbersOnly = True + Me.txtBatchNr._numbersOnlyKommastellen = "" + Me.txtBatchNr._numbersOnlyTrennzeichen = False + Me.txtBatchNr._Prozent = False + Me.txtBatchNr._ShortDateNew = False + Me.txtBatchNr._ShortDateOnly = False + Me.txtBatchNr._TimeOnly = False + Me.txtBatchNr._TimeOnly_Seconds = False + Me.txtBatchNr._value = "" + Me.txtBatchNr._Waehrung = False + Me.txtBatchNr._WaehrungZeichen = True + Me.txtBatchNr.BackColor = System.Drawing.SystemColors.Window + Me.txtBatchNr.ForeColor = System.Drawing.Color.Red + Me.txtBatchNr.Location = New System.Drawing.Point(328, 181) + Me.txtBatchNr.MaxLength = 10 + Me.txtBatchNr.MaxLineLength = -1 + Me.txtBatchNr.MaxLines_Warning = "" + Me.txtBatchNr.MaxLines_Warning_Label = Nothing + Me.txtBatchNr.Name = "txtBatchNr" + Me.txtBatchNr.Size = New System.Drawing.Size(36, 20) + Me.txtBatchNr.TabIndex = 127 + Me.txtBatchNr.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'cbxMSEBatchNr + ' + Me.cbxMSEBatchNr._allowedValuesFreiText = Nothing + Me.cbxMSEBatchNr._allowFreiText = True + Me.cbxMSEBatchNr._value = "" + Me.cbxMSEBatchNr.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cbxMSEBatchNr.DropDownWidth = 20 + Me.cbxMSEBatchNr.FormattingEnabled = True + Me.cbxMSEBatchNr.Location = New System.Drawing.Point(277, 181) + Me.cbxMSEBatchNr.Name = "cbxMSEBatchNr" + Me.cbxMSEBatchNr.Size = New System.Drawing.Size(44, 21) + Me.cbxMSEBatchNr.TabIndex = 122 + ' + 'txtTransactionID + ' + Me.txtTransactionID._DateTimeOnly = False + Me.txtTransactionID._numbersOnly = True + Me.txtTransactionID._numbersOnlyKommastellen = "" + Me.txtTransactionID._numbersOnlyTrennzeichen = False + Me.txtTransactionID._Prozent = False + Me.txtTransactionID._ShortDateNew = False + Me.txtTransactionID._ShortDateOnly = False + Me.txtTransactionID._TimeOnly = False + Me.txtTransactionID._TimeOnly_Seconds = False + Me.txtTransactionID._value = "" + Me.txtTransactionID._Waehrung = False + Me.txtTransactionID._WaehrungZeichen = True + Me.txtTransactionID.BackColor = System.Drawing.SystemColors.Window + Me.txtTransactionID.ForeColor = System.Drawing.Color.Black + Me.txtTransactionID.Location = New System.Drawing.Point(288, 232) + Me.txtTransactionID.MaxLength = 10 + Me.txtTransactionID.MaxLineLength = -1 + Me.txtTransactionID.MaxLines_Warning = "" + Me.txtTransactionID.MaxLines_Warning_Label = Nothing + Me.txtTransactionID.Name = "txtTransactionID" + Me.txtTransactionID.Size = New System.Drawing.Size(85, 20) + Me.txtTransactionID.TabIndex = 115 + Me.txtTransactionID.Text = "1001723285" + Me.txtTransactionID.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'cbxRMC + ' + Me.cbxRMC._allowedValuesFreiText = Nothing + Me.cbxRMC._allowFreiText = False + Me.cbxRMC._value = "" + Me.cbxRMC.FormattingEnabled = True + Me.cbxRMC.Location = New System.Drawing.Point(533, 168) + Me.cbxRMC.Name = "cbxRMC" + Me.cbxRMC.Size = New System.Drawing.Size(80, 21) + Me.cbxRMC.TabIndex = 90 + ' + 'txtTBLNr + ' + Me.txtTBLNr._DateTimeOnly = False + Me.txtTBLNr._numbersOnly = True + Me.txtTBLNr._numbersOnlyKommastellen = "" + Me.txtTBLNr._numbersOnlyTrennzeichen = False + Me.txtTBLNr._Prozent = False + Me.txtTBLNr._ShortDateNew = False + Me.txtTBLNr._ShortDateOnly = False + Me.txtTBLNr._TimeOnly = False + Me.txtTBLNr._TimeOnly_Seconds = False + Me.txtTBLNr._value = "" + Me.txtTBLNr._Waehrung = False + Me.txtTBLNr._WaehrungZeichen = True + Me.txtTBLNr.ForeColor = System.Drawing.Color.Red + Me.txtTBLNr.Location = New System.Drawing.Point(165, 246) + Me.txtTBLNr.MaxLineLength = -1 + Me.txtTBLNr.MaxLines_Warning = "" + Me.txtTBLNr.MaxLines_Warning_Label = Nothing + Me.txtTBLNr.Name = "txtTBLNr" + Me.txtTBLNr.ReadOnly = True + Me.txtTBLNr.Size = New System.Drawing.Size(53, 20) + Me.txtTBLNr.TabIndex = 79 + ' + 'txtTWLNr + ' + Me.txtTWLNr._DateTimeOnly = False + Me.txtTWLNr._numbersOnly = True + Me.txtTWLNr._numbersOnlyKommastellen = "" + Me.txtTWLNr._numbersOnlyTrennzeichen = False + Me.txtTWLNr._Prozent = False + Me.txtTWLNr._ShortDateNew = False + Me.txtTWLNr._ShortDateOnly = False + Me.txtTWLNr._TimeOnly = False + Me.txtTWLNr._TimeOnly_Seconds = False + Me.txtTWLNr._value = "" + Me.txtTWLNr._Waehrung = False + Me.txtTWLNr._WaehrungZeichen = True + Me.txtTWLNr.ForeColor = System.Drawing.Color.Red + Me.txtTWLNr.Location = New System.Drawing.Point(165, 218) + Me.txtTWLNr.MaxLineLength = -1 + Me.txtTWLNr.MaxLines_Warning = "" + Me.txtTWLNr.MaxLines_Warning_Label = Nothing + Me.txtTWLNr.Name = "txtTWLNr" + Me.txtTWLNr.ReadOnly = True + Me.txtTWLNr.Size = New System.Drawing.Size(53, 20) + Me.txtTWLNr.TabIndex = 78 + ' 'CheckBox2 ' Me.CheckBox2.AutoSize = True @@ -2733,6 +3255,30 @@ Partial Class frmStartOptions Me.Label3.TabIndex = 14 Me.Label3.Text = "Routine Manager IMEX" ' + 'MyTextBox1 + ' + Me.MyTextBox1._DateTimeOnly = False + Me.MyTextBox1._numbersOnly = True + Me.MyTextBox1._numbersOnlyKommastellen = "" + Me.MyTextBox1._numbersOnlyTrennzeichen = True + Me.MyTextBox1._Prozent = False + Me.MyTextBox1._ShortDateNew = False + Me.MyTextBox1._ShortDateOnly = False + Me.MyTextBox1._TimeOnly = False + Me.MyTextBox1._TimeOnly_Seconds = False + Me.MyTextBox1._value = "100000" + Me.MyTextBox1._Waehrung = False + Me.MyTextBox1._WaehrungZeichen = True + Me.MyTextBox1.ForeColor = System.Drawing.Color.Black + Me.MyTextBox1.Location = New System.Drawing.Point(151, 132) + Me.MyTextBox1.MaxLineLength = -1 + Me.MyTextBox1.MaxLines_Warning = "" + Me.MyTextBox1.MaxLines_Warning_Label = Nothing + Me.MyTextBox1.Name = "MyTextBox1" + Me.MyTextBox1.Size = New System.Drawing.Size(53, 20) + Me.MyTextBox1.TabIndex = 11 + Me.MyTextBox1.Text = "100000" + ' 'PictureBox12 ' Me.PictureBox12.BackgroundImage = CType(resources.GetObject("PictureBox12.BackgroundImage"), System.Drawing.Image) @@ -2901,542 +3447,6 @@ Partial Class frmStartOptions Me.lblRoutineManager.TabIndex = 1 Me.lblRoutineManager.Text = "Routine Manager" ' - 'Button21 - ' - Me.Button21.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button21.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.Button21.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button21.Location = New System.Drawing.Point(581, 346) - Me.Button21.Name = "Button21" - Me.Button21.Size = New System.Drawing.Size(211, 24) - Me.Button21.TabIndex = 81 - Me.Button21.Text = "AAS Sendung 24h" - Me.Button21.UseVisualStyleBackColor = True - ' - 'txtKdNr - ' - Me.txtKdNr._DateTimeOnly = False - Me.txtKdNr._numbersOnly = True - Me.txtKdNr._numbersOnlyKommastellen = "" - Me.txtKdNr._numbersOnlyTrennzeichen = False - Me.txtKdNr._Prozent = False - Me.txtKdNr._ShortDateNew = False - Me.txtKdNr._ShortDateOnly = False - Me.txtKdNr._TimeOnly = False - Me.txtKdNr._TimeOnly_Seconds = False - Me.txtKdNr._value = "" - Me.txtKdNr._Waehrung = False - Me.txtKdNr._WaehrungZeichen = True - Me.txtKdNr.ForeColor = System.Drawing.Color.Black - Me.txtKdNr.Location = New System.Drawing.Point(961, 227) - Me.txtKdNr.MaxLength = 50 - Me.txtKdNr.MaxLineLength = -1 - Me.txtKdNr.MaxLines_Warning = "" - Me.txtKdNr.MaxLines_Warning_Label = Nothing - Me.txtKdNr.Name = "txtKdNr" - Me.txtKdNr.Size = New System.Drawing.Size(136, 20) - Me.txtKdNr.TabIndex = 95 - ' - 'MyTextBox3 - ' - Me.MyTextBox3._DateTimeOnly = False - Me.MyTextBox3._numbersOnly = True - Me.MyTextBox3._numbersOnlyKommastellen = "" - Me.MyTextBox3._numbersOnlyTrennzeichen = True - Me.MyTextBox3._Prozent = False - Me.MyTextBox3._ShortDateNew = False - Me.MyTextBox3._ShortDateOnly = False - Me.MyTextBox3._TimeOnly = False - Me.MyTextBox3._TimeOnly_Seconds = False - Me.MyTextBox3._value = "" - Me.MyTextBox3._Waehrung = False - Me.MyTextBox3._WaehrungZeichen = True - Me.MyTextBox3.ForeColor = System.Drawing.Color.Red - Me.MyTextBox3.Location = New System.Drawing.Point(127, 208) - Me.MyTextBox3.MaxLineLength = -1 - Me.MyTextBox3.MaxLines_Warning = "" - Me.MyTextBox3.MaxLines_Warning_Label = Nothing - Me.MyTextBox3.Name = "MyTextBox3" - Me.MyTextBox3.Size = New System.Drawing.Size(53, 20) - Me.MyTextBox3.TabIndex = 86 - ' - 'MyTextBox2 - ' - Me.MyTextBox2._DateTimeOnly = False - Me.MyTextBox2._numbersOnly = True - Me.MyTextBox2._numbersOnlyKommastellen = "" - Me.MyTextBox2._numbersOnlyTrennzeichen = True - Me.MyTextBox2._Prozent = False - Me.MyTextBox2._ShortDateNew = False - Me.MyTextBox2._ShortDateOnly = False - Me.MyTextBox2._TimeOnly = False - Me.MyTextBox2._TimeOnly_Seconds = False - Me.MyTextBox2._value = "" - Me.MyTextBox2._Waehrung = False - Me.MyTextBox2._WaehrungZeichen = True - Me.MyTextBox2.ForeColor = System.Drawing.Color.Red - Me.MyTextBox2.Location = New System.Drawing.Point(151, 152) - Me.MyTextBox2.MaxLineLength = -1 - Me.MyTextBox2.MaxLines_Warning = "" - Me.MyTextBox2.MaxLines_Warning_Label = Nothing - Me.MyTextBox2.Name = "MyTextBox2" - Me.MyTextBox2.Size = New System.Drawing.Size(53, 20) - Me.MyTextBox2.TabIndex = 63 - ' - 'txtSyskaWdhDateiname - ' - Me.txtSyskaWdhDateiname._DateTimeOnly = False - Me.txtSyskaWdhDateiname._numbersOnly = False - Me.txtSyskaWdhDateiname._numbersOnlyKommastellen = "" - Me.txtSyskaWdhDateiname._numbersOnlyTrennzeichen = True - Me.txtSyskaWdhDateiname._Prozent = False - Me.txtSyskaWdhDateiname._ShortDateNew = False - Me.txtSyskaWdhDateiname._ShortDateOnly = False - Me.txtSyskaWdhDateiname._TimeOnly = False - Me.txtSyskaWdhDateiname._TimeOnly_Seconds = False - Me.txtSyskaWdhDateiname._value = "" - Me.txtSyskaWdhDateiname._Waehrung = False - Me.txtSyskaWdhDateiname._WaehrungZeichen = True - Me.txtSyskaWdhDateiname.ForeColor = System.Drawing.Color.Black - Me.txtSyskaWdhDateiname.Location = New System.Drawing.Point(692, 318) - Me.txtSyskaWdhDateiname.MaxLength = 50 - Me.txtSyskaWdhDateiname.MaxLineLength = -1 - Me.txtSyskaWdhDateiname.MaxLines_Warning = "" - Me.txtSyskaWdhDateiname.MaxLines_Warning_Label = Nothing - Me.txtSyskaWdhDateiname.Name = "txtSyskaWdhDateiname" - Me.txtSyskaWdhDateiname.Size = New System.Drawing.Size(136, 20) - Me.txtSyskaWdhDateiname.TabIndex = 58 - ' - 'txtEZOLLAnhDat - ' - Me.txtEZOLLAnhDat._DateTimeOnly = False - Me.txtEZOLLAnhDat._numbersOnly = False - Me.txtEZOLLAnhDat._numbersOnlyKommastellen = "" - Me.txtEZOLLAnhDat._numbersOnlyTrennzeichen = True - Me.txtEZOLLAnhDat._Prozent = False - Me.txtEZOLLAnhDat._ShortDateNew = True - Me.txtEZOLLAnhDat._ShortDateOnly = False - Me.txtEZOLLAnhDat._TimeOnly = False - Me.txtEZOLLAnhDat._TimeOnly_Seconds = False - Me.txtEZOLLAnhDat._value = "" - Me.txtEZOLLAnhDat._Waehrung = False - Me.txtEZOLLAnhDat._WaehrungZeichen = True - Me.txtEZOLLAnhDat.ForeColor = System.Drawing.Color.Black - Me.txtEZOLLAnhDat.Location = New System.Drawing.Point(408, 190) - Me.txtEZOLLAnhDat.MaxLength = 10 - Me.txtEZOLLAnhDat.MaxLineLength = -1 - Me.txtEZOLLAnhDat.MaxLines_Warning = "" - Me.txtEZOLLAnhDat.MaxLines_Warning_Label = Nothing - Me.txtEZOLLAnhDat.Name = "txtEZOLLAnhDat" - Me.txtEZOLLAnhDat.Size = New System.Drawing.Size(87, 20) - Me.txtEZOLLAnhDat.TabIndex = 55 - ' - 'cboSYSKAFirma - ' - Me.cboSYSKAFirma._allowedValuesFreiText = Nothing - Me.cboSYSKAFirma._allowFreiText = False - Me.cboSYSKAFirma._value = "" - Me.cboSYSKAFirma.FormattingEnabled = True - Me.cboSYSKAFirma.Location = New System.Drawing.Point(564, 299) - Me.cboSYSKAFirma.Name = "cboSYSKAFirma" - Me.cboSYSKAFirma.Size = New System.Drawing.Size(129, 21) - Me.cboSYSKAFirma.TabIndex = 51 - ' - 'cboBMDUnispedFirma - ' - Me.cboBMDUnispedFirma._allowedValuesFreiText = Nothing - Me.cboBMDUnispedFirma._allowFreiText = False - Me.cboBMDUnispedFirma._value = "" - Me.cboBMDUnispedFirma.FormattingEnabled = True - Me.cboBMDUnispedFirma.Location = New System.Drawing.Point(268, 276) - Me.cboBMDUnispedFirma.Name = "cboBMDUnispedFirma" - Me.cboBMDUnispedFirma.Size = New System.Drawing.Size(124, 21) - Me.cboBMDUnispedFirma.TabIndex = 42 - ' - 'MyTextBox4 - ' - Me.MyTextBox4._DateTimeOnly = False - Me.MyTextBox4._numbersOnly = False - Me.MyTextBox4._numbersOnlyKommastellen = "" - Me.MyTextBox4._numbersOnlyTrennzeichen = True - Me.MyTextBox4._Prozent = False - Me.MyTextBox4._ShortDateNew = True - Me.MyTextBox4._ShortDateOnly = False - Me.MyTextBox4._TimeOnly = False - Me.MyTextBox4._TimeOnly_Seconds = False - Me.MyTextBox4._value = "" - Me.MyTextBox4._Waehrung = False - Me.MyTextBox4._WaehrungZeichen = True - Me.MyTextBox4.ForeColor = System.Drawing.Color.Black - Me.MyTextBox4.Location = New System.Drawing.Point(775, 277) - Me.MyTextBox4.MaxLength = 10 - Me.MyTextBox4.MaxLineLength = -1 - Me.MyTextBox4.MaxLines_Warning = "" - Me.MyTextBox4.MaxLines_Warning_Label = Nothing - Me.MyTextBox4.Name = "MyTextBox4" - Me.MyTextBox4.Size = New System.Drawing.Size(80, 20) - Me.MyTextBox4.TabIndex = 90 - ' - 'dgvMRN - ' - Me.dgvMRN.AKTUALISIERUNGS_INTERVALL = -1 - Me.dgvMRN.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize - Me.dgvMRN.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnMRN}) - Me.dgvMRN.Location = New System.Drawing.Point(637, 63) - Me.dgvMRN.Name = "dgvMRN" - Me.dgvMRN.RowHeadersWidth = 62 - Me.dgvMRN.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvMRN.Size = New System.Drawing.Size(207, 134) - Me.dgvMRN.TabIndex = 75 - ' - 'clmnMRN - ' - Me.clmnMRN.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill - Me.clmnMRN.HeaderText = "MRN" - Me.clmnMRN.MinimumWidth = 8 - Me.clmnMRN.Name = "clmnMRN" - ' - 'txtVRGOut_MRN - ' - Me.txtVRGOut_MRN._DateTimeOnly = False - Me.txtVRGOut_MRN._numbersOnly = False - Me.txtVRGOut_MRN._numbersOnlyKommastellen = "" - Me.txtVRGOut_MRN._numbersOnlyTrennzeichen = True - Me.txtVRGOut_MRN._Prozent = False - Me.txtVRGOut_MRN._ShortDateNew = False - Me.txtVRGOut_MRN._ShortDateOnly = False - Me.txtVRGOut_MRN._TimeOnly = False - Me.txtVRGOut_MRN._TimeOnly_Seconds = False - Me.txtVRGOut_MRN._value = "" - Me.txtVRGOut_MRN._Waehrung = False - Me.txtVRGOut_MRN._WaehrungZeichen = False - Me.txtVRGOut_MRN.ForeColor = System.Drawing.Color.Red - Me.txtVRGOut_MRN.Location = New System.Drawing.Point(359, 84) - Me.txtVRGOut_MRN.MaxLineLength = -1 - Me.txtVRGOut_MRN.MaxLines_Warning = "" - Me.txtVRGOut_MRN.MaxLines_Warning_Label = Nothing - Me.txtVRGOut_MRN.Name = "txtVRGOut_MRN" - Me.txtVRGOut_MRN.Size = New System.Drawing.Size(153, 20) - Me.txtVRGOut_MRN.TabIndex = 73 - ' - 'txtVRGOut_FilialenNr - ' - Me.txtVRGOut_FilialenNr._DateTimeOnly = False - Me.txtVRGOut_FilialenNr._numbersOnly = False - Me.txtVRGOut_FilialenNr._numbersOnlyKommastellen = "" - Me.txtVRGOut_FilialenNr._numbersOnlyTrennzeichen = True - Me.txtVRGOut_FilialenNr._Prozent = False - Me.txtVRGOut_FilialenNr._ShortDateNew = False - Me.txtVRGOut_FilialenNr._ShortDateOnly = False - Me.txtVRGOut_FilialenNr._TimeOnly = False - Me.txtVRGOut_FilialenNr._TimeOnly_Seconds = False - Me.txtVRGOut_FilialenNr._value = "" - Me.txtVRGOut_FilialenNr._Waehrung = False - Me.txtVRGOut_FilialenNr._WaehrungZeichen = False - Me.txtVRGOut_FilialenNr.ForeColor = System.Drawing.Color.Red - Me.txtVRGOut_FilialenNr.Location = New System.Drawing.Point(398, 176) - Me.txtVRGOut_FilialenNr.MaxLineLength = -1 - Me.txtVRGOut_FilialenNr.MaxLines_Warning = "" - Me.txtVRGOut_FilialenNr.MaxLines_Warning_Label = Nothing - Me.txtVRGOut_FilialenNr.Multiline = True - Me.txtVRGOut_FilialenNr.Name = "txtVRGOut_FilialenNr" - Me.txtVRGOut_FilialenNr.Size = New System.Drawing.Size(56, 21) - Me.txtVRGOut_FilialenNr.TabIndex = 71 - ' - 'txtVRGOut_AbfertigungsNr - ' - Me.txtVRGOut_AbfertigungsNr._DateTimeOnly = False - Me.txtVRGOut_AbfertigungsNr._numbersOnly = False - Me.txtVRGOut_AbfertigungsNr._numbersOnlyKommastellen = "" - Me.txtVRGOut_AbfertigungsNr._numbersOnlyTrennzeichen = True - Me.txtVRGOut_AbfertigungsNr._Prozent = False - Me.txtVRGOut_AbfertigungsNr._ShortDateNew = False - Me.txtVRGOut_AbfertigungsNr._ShortDateOnly = False - Me.txtVRGOut_AbfertigungsNr._TimeOnly = False - Me.txtVRGOut_AbfertigungsNr._TimeOnly_Seconds = False - Me.txtVRGOut_AbfertigungsNr._value = "" - Me.txtVRGOut_AbfertigungsNr._Waehrung = False - Me.txtVRGOut_AbfertigungsNr._WaehrungZeichen = False - Me.txtVRGOut_AbfertigungsNr.ForeColor = System.Drawing.Color.Red - Me.txtVRGOut_AbfertigungsNr.Location = New System.Drawing.Point(453, 176) - Me.txtVRGOut_AbfertigungsNr.MaxLineLength = -1 - Me.txtVRGOut_AbfertigungsNr.MaxLines_Warning = "" - Me.txtVRGOut_AbfertigungsNr.MaxLines_Warning_Label = Nothing - Me.txtVRGOut_AbfertigungsNr.Multiline = True - Me.txtVRGOut_AbfertigungsNr.Name = "txtVRGOut_AbfertigungsNr" - Me.txtVRGOut_AbfertigungsNr.Size = New System.Drawing.Size(137, 21) - Me.txtVRGOut_AbfertigungsNr.TabIndex = 70 - ' - 'MyComboBox2 - ' - Me.MyComboBox2._allowedValuesFreiText = Nothing - Me.MyComboBox2._allowFreiText = False - Me.MyComboBox2._value = "" - Me.MyComboBox2.FormattingEnabled = True - Me.MyComboBox2.Location = New System.Drawing.Point(298, 252) - Me.MyComboBox2.Name = "MyComboBox2" - Me.MyComboBox2.Size = New System.Drawing.Size(62, 21) - Me.MyComboBox2.TabIndex = 64 - ' - 'txtVRGOutEZA_BezugsNr - ' - Me.txtVRGOutEZA_BezugsNr._DateTimeOnly = False - Me.txtVRGOutEZA_BezugsNr._numbersOnly = False - Me.txtVRGOutEZA_BezugsNr._numbersOnlyKommastellen = "" - Me.txtVRGOutEZA_BezugsNr._numbersOnlyTrennzeichen = True - Me.txtVRGOutEZA_BezugsNr._Prozent = False - Me.txtVRGOutEZA_BezugsNr._ShortDateNew = False - Me.txtVRGOutEZA_BezugsNr._ShortDateOnly = False - Me.txtVRGOutEZA_BezugsNr._TimeOnly = False - Me.txtVRGOutEZA_BezugsNr._TimeOnly_Seconds = False - Me.txtVRGOutEZA_BezugsNr._value = "" - Me.txtVRGOutEZA_BezugsNr._Waehrung = False - Me.txtVRGOutEZA_BezugsNr._WaehrungZeichen = False - Me.txtVRGOutEZA_BezugsNr.ForeColor = System.Drawing.Color.Red - Me.txtVRGOutEZA_BezugsNr.Location = New System.Drawing.Point(359, 252) - Me.txtVRGOutEZA_BezugsNr.MaxLineLength = -1 - Me.txtVRGOutEZA_BezugsNr.MaxLines_Warning = "" - Me.txtVRGOutEZA_BezugsNr.MaxLines_Warning_Label = Nothing - Me.txtVRGOutEZA_BezugsNr.Multiline = True - Me.txtVRGOutEZA_BezugsNr.Name = "txtVRGOutEZA_BezugsNr" - Me.txtVRGOutEZA_BezugsNr.Size = New System.Drawing.Size(153, 21) - Me.txtVRGOutEZA_BezugsNr.TabIndex = 65 - ' - 'MyComboBox1 - ' - Me.MyComboBox1._allowedValuesFreiText = Nothing - Me.MyComboBox1._allowFreiText = False - Me.MyComboBox1._value = "" - Me.MyComboBox1.FormattingEnabled = True - Me.MyComboBox1.Location = New System.Drawing.Point(298, 62) - Me.MyComboBox1.Name = "MyComboBox1" - Me.MyComboBox1.Size = New System.Drawing.Size(62, 21) - Me.MyComboBox1.TabIndex = 4 - ' - 'txtVRGOut_BezugsNr - ' - Me.txtVRGOut_BezugsNr._DateTimeOnly = False - Me.txtVRGOut_BezugsNr._numbersOnly = False - Me.txtVRGOut_BezugsNr._numbersOnlyKommastellen = "" - Me.txtVRGOut_BezugsNr._numbersOnlyTrennzeichen = True - Me.txtVRGOut_BezugsNr._Prozent = False - Me.txtVRGOut_BezugsNr._ShortDateNew = False - Me.txtVRGOut_BezugsNr._ShortDateOnly = False - Me.txtVRGOut_BezugsNr._TimeOnly = False - Me.txtVRGOut_BezugsNr._TimeOnly_Seconds = False - Me.txtVRGOut_BezugsNr._value = "" - Me.txtVRGOut_BezugsNr._Waehrung = False - Me.txtVRGOut_BezugsNr._WaehrungZeichen = False - Me.txtVRGOut_BezugsNr.ForeColor = System.Drawing.Color.Red - Me.txtVRGOut_BezugsNr.Location = New System.Drawing.Point(359, 62) - Me.txtVRGOut_BezugsNr.MaxLineLength = -1 - Me.txtVRGOut_BezugsNr.MaxLines_Warning = "" - Me.txtVRGOut_BezugsNr.MaxLines_Warning_Label = Nothing - Me.txtVRGOut_BezugsNr.Name = "txtVRGOut_BezugsNr" - Me.txtVRGOut_BezugsNr.Size = New System.Drawing.Size(153, 20) - Me.txtVRGOut_BezugsNr.TabIndex = 5 - ' - 'txtUTAYear - ' - Me.txtUTAYear._DateTimeOnly = False - Me.txtUTAYear._numbersOnly = True - Me.txtUTAYear._numbersOnlyKommastellen = "" - Me.txtUTAYear._numbersOnlyTrennzeichen = False - Me.txtUTAYear._Prozent = False - Me.txtUTAYear._ShortDateNew = False - Me.txtUTAYear._ShortDateOnly = False - Me.txtUTAYear._TimeOnly = False - Me.txtUTAYear._TimeOnly_Seconds = False - Me.txtUTAYear._value = "" - Me.txtUTAYear._Waehrung = False - Me.txtUTAYear._WaehrungZeichen = True - Me.txtUTAYear.BackColor = System.Drawing.SystemColors.Window - Me.txtUTAYear.ForeColor = System.Drawing.Color.Red - Me.txtUTAYear.Location = New System.Drawing.Point(425, 137) - Me.txtUTAYear.MaxLength = 10 - Me.txtUTAYear.MaxLineLength = -1 - Me.txtUTAYear.MaxLines_Warning = "" - Me.txtUTAYear.MaxLines_Warning_Label = Nothing - Me.txtUTAYear.Name = "txtUTAYear" - Me.txtUTAYear.Size = New System.Drawing.Size(66, 20) - Me.txtUTAYear.TabIndex = 133 - Me.txtUTAYear.TextAlign = System.Windows.Forms.HorizontalAlignment.Center - ' - 'txtBatchNrofTransaction - ' - Me.txtBatchNrofTransaction._DateTimeOnly = False - Me.txtBatchNrofTransaction._numbersOnly = True - Me.txtBatchNrofTransaction._numbersOnlyKommastellen = "" - Me.txtBatchNrofTransaction._numbersOnlyTrennzeichen = False - Me.txtBatchNrofTransaction._Prozent = False - Me.txtBatchNrofTransaction._ShortDateNew = False - Me.txtBatchNrofTransaction._ShortDateOnly = False - Me.txtBatchNrofTransaction._TimeOnly = False - Me.txtBatchNrofTransaction._TimeOnly_Seconds = False - Me.txtBatchNrofTransaction._value = "" - Me.txtBatchNrofTransaction._Waehrung = False - Me.txtBatchNrofTransaction._WaehrungZeichen = True - Me.txtBatchNrofTransaction.BackColor = System.Drawing.SystemColors.Window - Me.txtBatchNrofTransaction.ForeColor = System.Drawing.Color.Red - Me.txtBatchNrofTransaction.Location = New System.Drawing.Point(929, 232) - Me.txtBatchNrofTransaction.MaxLength = 10 - Me.txtBatchNrofTransaction.MaxLineLength = -1 - Me.txtBatchNrofTransaction.MaxLines_Warning = "" - Me.txtBatchNrofTransaction.MaxLines_Warning_Label = Nothing - Me.txtBatchNrofTransaction.Name = "txtBatchNrofTransaction" - Me.txtBatchNrofTransaction.Size = New System.Drawing.Size(36, 20) - Me.txtBatchNrofTransaction.TabIndex = 129 - Me.txtBatchNrofTransaction.TextAlign = System.Windows.Forms.HorizontalAlignment.Center - ' - 'txtBatchNr - ' - Me.txtBatchNr._DateTimeOnly = False - Me.txtBatchNr._numbersOnly = True - Me.txtBatchNr._numbersOnlyKommastellen = "" - Me.txtBatchNr._numbersOnlyTrennzeichen = False - Me.txtBatchNr._Prozent = False - Me.txtBatchNr._ShortDateNew = False - Me.txtBatchNr._ShortDateOnly = False - Me.txtBatchNr._TimeOnly = False - Me.txtBatchNr._TimeOnly_Seconds = False - Me.txtBatchNr._value = "" - Me.txtBatchNr._Waehrung = False - Me.txtBatchNr._WaehrungZeichen = True - Me.txtBatchNr.BackColor = System.Drawing.SystemColors.Window - Me.txtBatchNr.ForeColor = System.Drawing.Color.Red - Me.txtBatchNr.Location = New System.Drawing.Point(833, 181) - Me.txtBatchNr.MaxLength = 10 - Me.txtBatchNr.MaxLineLength = -1 - Me.txtBatchNr.MaxLines_Warning = "" - Me.txtBatchNr.MaxLines_Warning_Label = Nothing - Me.txtBatchNr.Name = "txtBatchNr" - Me.txtBatchNr.Size = New System.Drawing.Size(36, 20) - Me.txtBatchNr.TabIndex = 127 - Me.txtBatchNr.TextAlign = System.Windows.Forms.HorizontalAlignment.Center - ' - 'cbxMSEBatchNr - ' - Me.cbxMSEBatchNr._allowedValuesFreiText = Nothing - Me.cbxMSEBatchNr._allowFreiText = True - Me.cbxMSEBatchNr._value = "" - Me.cbxMSEBatchNr.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cbxMSEBatchNr.DropDownWidth = 20 - Me.cbxMSEBatchNr.FormattingEnabled = True - Me.cbxMSEBatchNr.Location = New System.Drawing.Point(782, 181) - Me.cbxMSEBatchNr.Name = "cbxMSEBatchNr" - Me.cbxMSEBatchNr.Size = New System.Drawing.Size(44, 21) - Me.cbxMSEBatchNr.TabIndex = 122 - ' - 'txtTransactionID - ' - Me.txtTransactionID._DateTimeOnly = False - Me.txtTransactionID._numbersOnly = True - Me.txtTransactionID._numbersOnlyKommastellen = "" - Me.txtTransactionID._numbersOnlyTrennzeichen = False - Me.txtTransactionID._Prozent = False - Me.txtTransactionID._ShortDateNew = False - Me.txtTransactionID._ShortDateOnly = False - Me.txtTransactionID._TimeOnly = False - Me.txtTransactionID._TimeOnly_Seconds = False - Me.txtTransactionID._value = "" - Me.txtTransactionID._Waehrung = False - Me.txtTransactionID._WaehrungZeichen = True - Me.txtTransactionID.BackColor = System.Drawing.SystemColors.Window - Me.txtTransactionID.ForeColor = System.Drawing.Color.Black - Me.txtTransactionID.Location = New System.Drawing.Point(793, 232) - Me.txtTransactionID.MaxLength = 10 - Me.txtTransactionID.MaxLineLength = -1 - Me.txtTransactionID.MaxLines_Warning = "" - Me.txtTransactionID.MaxLines_Warning_Label = Nothing - Me.txtTransactionID.Name = "txtTransactionID" - Me.txtTransactionID.Size = New System.Drawing.Size(85, 20) - Me.txtTransactionID.TabIndex = 115 - Me.txtTransactionID.Text = "1001723285" - Me.txtTransactionID.TextAlign = System.Windows.Forms.HorizontalAlignment.Center - ' - 'cbxRMC - ' - Me.cbxRMC._allowedValuesFreiText = Nothing - Me.cbxRMC._allowFreiText = False - Me.cbxRMC._value = "" - Me.cbxRMC.FormattingEnabled = True - Me.cbxRMC.Location = New System.Drawing.Point(241, 168) - Me.cbxRMC.Name = "cbxRMC" - Me.cbxRMC.Size = New System.Drawing.Size(80, 21) - Me.cbxRMC.TabIndex = 90 - ' - 'txtTBLNr - ' - Me.txtTBLNr._DateTimeOnly = False - Me.txtTBLNr._numbersOnly = True - Me.txtTBLNr._numbersOnlyKommastellen = "" - Me.txtTBLNr._numbersOnlyTrennzeichen = False - Me.txtTBLNr._Prozent = False - Me.txtTBLNr._ShortDateNew = False - Me.txtTBLNr._ShortDateOnly = False - Me.txtTBLNr._TimeOnly = False - Me.txtTBLNr._TimeOnly_Seconds = False - Me.txtTBLNr._value = "" - Me.txtTBLNr._Waehrung = False - Me.txtTBLNr._WaehrungZeichen = True - Me.txtTBLNr.ForeColor = System.Drawing.Color.Red - Me.txtTBLNr.Location = New System.Drawing.Point(165, 246) - Me.txtTBLNr.MaxLineLength = -1 - Me.txtTBLNr.MaxLines_Warning = "" - Me.txtTBLNr.MaxLines_Warning_Label = Nothing - Me.txtTBLNr.Name = "txtTBLNr" - Me.txtTBLNr.ReadOnly = True - Me.txtTBLNr.Size = New System.Drawing.Size(53, 20) - Me.txtTBLNr.TabIndex = 79 - ' - 'txtTWLNr - ' - Me.txtTWLNr._DateTimeOnly = False - Me.txtTWLNr._numbersOnly = True - Me.txtTWLNr._numbersOnlyKommastellen = "" - Me.txtTWLNr._numbersOnlyTrennzeichen = False - Me.txtTWLNr._Prozent = False - Me.txtTWLNr._ShortDateNew = False - Me.txtTWLNr._ShortDateOnly = False - Me.txtTWLNr._TimeOnly = False - Me.txtTWLNr._TimeOnly_Seconds = False - Me.txtTWLNr._value = "" - Me.txtTWLNr._Waehrung = False - Me.txtTWLNr._WaehrungZeichen = True - Me.txtTWLNr.ForeColor = System.Drawing.Color.Red - Me.txtTWLNr.Location = New System.Drawing.Point(165, 218) - Me.txtTWLNr.MaxLineLength = -1 - Me.txtTWLNr.MaxLines_Warning = "" - Me.txtTWLNr.MaxLines_Warning_Label = Nothing - Me.txtTWLNr.Name = "txtTWLNr" - Me.txtTWLNr.ReadOnly = True - Me.txtTWLNr.Size = New System.Drawing.Size(53, 20) - Me.txtTWLNr.TabIndex = 78 - ' - 'MyTextBox1 - ' - Me.MyTextBox1._DateTimeOnly = False - Me.MyTextBox1._numbersOnly = True - Me.MyTextBox1._numbersOnlyKommastellen = "" - Me.MyTextBox1._numbersOnlyTrennzeichen = True - Me.MyTextBox1._Prozent = False - Me.MyTextBox1._ShortDateNew = False - Me.MyTextBox1._ShortDateOnly = False - Me.MyTextBox1._TimeOnly = False - Me.MyTextBox1._TimeOnly_Seconds = False - Me.MyTextBox1._value = "100000" - Me.MyTextBox1._Waehrung = False - Me.MyTextBox1._WaehrungZeichen = True - Me.MyTextBox1.ForeColor = System.Drawing.Color.Black - Me.MyTextBox1.Location = New System.Drawing.Point(151, 132) - Me.MyTextBox1.MaxLineLength = -1 - Me.MyTextBox1.MaxLines_Warning = "" - Me.MyTextBox1.MaxLines_Warning_Label = Nothing - Me.MyTextBox1.Name = "MyTextBox1" - Me.MyTextBox1.Size = New System.Drawing.Size(53, 20) - Me.MyTextBox1.TabIndex = 11 - Me.MyTextBox1.Text = "100000" - ' 'txtGJ_UNISPED ' Me.txtGJ_UNISPED._DateTimeOnly = False @@ -3461,6 +3471,18 @@ Partial Class frmStartOptions Me.txtGJ_UNISPED.Size = New System.Drawing.Size(53, 20) Me.txtGJ_UNISPED.TabIndex = 68 ' + 'Button21 + ' + Me.Button21.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button21.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.Button21.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button21.Location = New System.Drawing.Point(581, 346) + Me.Button21.Name = "Button21" + Me.Button21.Size = New System.Drawing.Size(211, 24) + Me.Button21.TabIndex = 81 + Me.Button21.Text = "AAS Sendung 24h" + Me.Button21.UseVisualStyleBackColor = True + ' 'DataGridViewTextBoxColumn1 ' Me.DataGridViewTextBoxColumn1.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill @@ -3468,6 +3490,141 @@ Partial Class frmStartOptions Me.DataGridViewTextBoxColumn1.MinimumWidth = 8 Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1" ' + 'cbxIDSalt + ' + Me.cbxIDSalt.AutoSize = True + Me.cbxIDSalt.Checked = True + Me.cbxIDSalt.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxIDSalt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxIDSalt.Location = New System.Drawing.Point(986, 148) + Me.cbxIDSalt.Name = "cbxIDSalt" + Me.cbxIDSalt.Size = New System.Drawing.Size(44, 17) + Me.cbxIDSalt.TabIndex = 139 + Me.cbxIDSalt.Text = "IDS" + Me.cbxIDSalt.UseVisualStyleBackColor = True + ' + 'cbxIDSneu + ' + Me.cbxIDSneu.AutoSize = True + Me.cbxIDSneu.Checked = True + Me.cbxIDSneu.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxIDSneu.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxIDSneu.Location = New System.Drawing.Point(1104, 148) + Me.cbxIDSneu.Name = "cbxIDSneu" + Me.cbxIDSneu.Size = New System.Drawing.Size(44, 17) + Me.cbxIDSneu.TabIndex = 140 + Me.cbxIDSneu.Text = "IDS" + Me.cbxIDSneu.UseVisualStyleBackColor = True + ' + 'cbxUTANeu + ' + Me.cbxUTANeu.AutoSize = True + Me.cbxUTANeu.Checked = True + Me.cbxUTANeu.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxUTANeu.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxUTANeu.Location = New System.Drawing.Point(1104, 168) + Me.cbxUTANeu.Name = "cbxUTANeu" + Me.cbxUTANeu.Size = New System.Drawing.Size(48, 17) + Me.cbxUTANeu.TabIndex = 142 + Me.cbxUTANeu.Text = "UTA" + Me.cbxUTANeu.UseVisualStyleBackColor = True + ' + 'cbxUTAalt + ' + Me.cbxUTAalt.AutoSize = True + Me.cbxUTAalt.Checked = True + Me.cbxUTAalt.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxUTAalt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxUTAalt.Location = New System.Drawing.Point(986, 168) + Me.cbxUTAalt.Name = "cbxUTAalt" + Me.cbxUTAalt.Size = New System.Drawing.Size(48, 17) + Me.cbxUTAalt.TabIndex = 141 + Me.cbxUTAalt.Text = "UTA" + Me.cbxUTAalt.UseVisualStyleBackColor = True + ' + 'cbxMSEneu + ' + Me.cbxMSEneu.AutoSize = True + Me.cbxMSEneu.Checked = True + Me.cbxMSEneu.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxMSEneu.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxMSEneu.Location = New System.Drawing.Point(1104, 189) + Me.cbxMSEneu.Name = "cbxMSEneu" + Me.cbxMSEneu.Size = New System.Drawing.Size(49, 17) + Me.cbxMSEneu.TabIndex = 144 + Me.cbxMSEneu.Text = "MSE" + Me.cbxMSEneu.UseVisualStyleBackColor = True + ' + 'cbxMSEalt + ' + Me.cbxMSEalt.AutoSize = True + Me.cbxMSEalt.Checked = True + Me.cbxMSEalt.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxMSEalt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxMSEalt.Location = New System.Drawing.Point(986, 189) + Me.cbxMSEalt.Name = "cbxMSEalt" + Me.cbxMSEalt.Size = New System.Drawing.Size(49, 17) + Me.cbxMSEalt.TabIndex = 143 + Me.cbxMSEalt.Text = "MSE" + Me.cbxMSEalt.UseVisualStyleBackColor = True + ' + 'Label44 + ' + Me.Label44.AutoSize = True + Me.Label44.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label44.ForeColor = System.Drawing.Color.Red + Me.Label44.Location = New System.Drawing.Point(983, 42) + Me.Label44.Name = "Label44" + Me.Label44.Size = New System.Drawing.Size(204, 13) + Me.Label44.TabIndex = 145 + Me.Label44.Text = "USTVA-Summen berechnen (MDM)" + ' + 'Label45 + ' + Me.Label45.AutoSize = True + Me.Label45.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label45.Location = New System.Drawing.Point(983, 123) + Me.Label45.Name = "Label45" + Me.Label45.Size = New System.Drawing.Size(103, 13) + Me.Label45.TabIndex = 146 + Me.Label45.Text = "Schnittstellen Alt" + ' + 'Label46 + ' + Me.Label46.AutoSize = True + Me.Label46.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label46.Location = New System.Drawing.Point(1101, 123) + Me.Label46.Name = "Label46" + Me.Label46.Size = New System.Drawing.Size(111, 13) + Me.Label46.TabIndex = 147 + Me.Label46.Text = "Schnittstellen Neu" + ' + 'cbxPlose + ' + Me.cbxPlose.AutoSize = True + Me.cbxPlose.Checked = True + Me.cbxPlose.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxPlose.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxPlose.Location = New System.Drawing.Point(1104, 212) + Me.cbxPlose.Name = "cbxPlose" + Me.cbxPlose.Size = New System.Drawing.Size(52, 17) + Me.cbxPlose.TabIndex = 148 + Me.cbxPlose.Text = "Plose" + Me.cbxPlose.UseVisualStyleBackColor = True + ' + 'cbxITalt + ' + Me.cbxITalt.AutoSize = True + Me.cbxITalt.Checked = True + Me.cbxITalt.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxITalt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxITalt.Location = New System.Drawing.Point(986, 212) + Me.cbxITalt.Name = "cbxITalt" + Me.cbxITalt.Size = New System.Drawing.Size(36, 17) + Me.cbxITalt.TabIndex = 149 + Me.cbxITalt.Text = "IT" + Me.cbxITalt.UseVisualStyleBackColor = True + ' 'frmStartOptions ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -3509,6 +3666,7 @@ Partial Class frmStartOptions Me.TabPage2.PerformLayout() CType(Me.PictureBox15, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox14, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.dgvMRN, System.ComponentModel.ISupportInitialize).EndInit() Me.TabPage3.ResumeLayout(False) Me.TabPage3.PerformLayout() Me.TabPage4.ResumeLayout(False) @@ -3520,7 +3678,6 @@ Partial Class frmStartOptions CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox10, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).EndInit() - CType(Me.dgvMRN, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub @@ -3768,4 +3925,15 @@ Partial Class frmStartOptions Friend WithEvents txtMRNPrefix As TextBox Friend WithEvents txtUTAYear As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents cbxGestellungspeichern As CheckBox + Friend WithEvents Label44 As Label + Friend WithEvents cbxMSEneu As CheckBox + Friend WithEvents cbxMSEalt As CheckBox + Friend WithEvents cbxUTANeu As CheckBox + Friend WithEvents cbxUTAalt As CheckBox + Friend WithEvents cbxIDSneu As CheckBox + Friend WithEvents cbxIDSalt As CheckBox + Friend WithEvents Label46 As Label + Friend WithEvents Label45 As Label + Friend WithEvents cbxITalt As CheckBox + Friend WithEvents cbxPlose As CheckBox End Class diff --git a/initATLASAufschubkonten/frmStartOptions.resx b/initATLASAufschubkonten/frmStartOptions.resx index bcbc767..537d69f 100644 --- a/initATLASAufschubkonten/frmStartOptions.resx +++ b/initATLASAufschubkonten/frmStartOptions.resx @@ -118,30 +118,6 @@ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj - oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB - QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC - j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ - VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox - XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf - 9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe - VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh - 42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A - pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin - lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS - d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp - hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ - LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs - 8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ - NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P - ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x - WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/ - nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de - CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII= - - iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj @@ -625,6 +601,30 @@ True + + + iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj + oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB + QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC + j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ + VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox + XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf + 9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe + VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh + 42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A + pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin + lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS + d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp + hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ + LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs + 8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ + NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P + ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x + WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/ + nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de + CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII= + + iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb index b5dc524..b47959f 100644 --- a/initATLASAufschubkonten/frmStartOptions.vb +++ b/initATLASAufschubkonten/frmStartOptions.vb @@ -6,6 +6,7 @@ Imports System.Runtime.InteropServices Imports System.Text Imports System.Xml Imports com.sun.corba.se.spi.orb +Imports DocumentFormat.OpenXml.Office2010.Word Imports Microsoft.Office.Interop Imports Renci.SshNet Imports VERAG_PROG_ALLGEMEIN @@ -769,6 +770,9 @@ Public Class frmStartOptions Dim ok As Boolean = False Dim sendMail As Boolean = False Dim dt As New DataTable + + cMDMFunctionsAllgemein.setSchnittstellen(False, True, True, False, True, False, True, False) + If cMDMFunctionsAllgemein.Update_UStVASummenNeuBerechnen() Then ok = cMDMFunctionsAllgemein.UStVAKunden_SummenNeuBerechnen(,, dt, sendMail) End If @@ -1692,8 +1696,8 @@ Public Class frmStartOptions If outputDate IsNot Nothing AndAlso customerNo <> "" AndAlso invoiceNo <> "" Then - Dim idsInvoice As New cIDSInvoice(outputDate, customerNo, invoiceNo) - If Not idsInvoice.hasEntry Then idsInvoice.SAVE() + Dim idsInvoice As New cIDSInvoice(outputDate, customerNo, invoiceNo) + If Not idsInvoice.hasEntry Then idsInvoice.SAVE() Try @@ -1719,7 +1723,7 @@ Public Class frmStartOptions End If - End If + End If @@ -5279,6 +5283,8 @@ Public Class frmStartOptions Exit Sub End If + cMDMFunctionsAllgemein.setSchnittstellen(cbxPlose.Checked, cbxITalt.Checked, cbxMSEalt.Checked, cbxMSEneu.Checked, cbxIDSalt.Checked, cbxIDSneu.Checked, cbxUTAalt.Checked, cbxUTANeu.Checked) + If sender Is Button23 Then If cMDMFunctionsAllgemein.Update_UStVASummenNeuBerechnen(ad.AdressenNr) Then