diff --git a/UID/Mitarbeiter/usrCntlMitarbeiter.Designer.vb b/UID/Mitarbeiter/usrCntlMitarbeiter.Designer.vb
index 42efc49..6f27ba4 100644
--- a/UID/Mitarbeiter/usrCntlMitarbeiter.Designer.vb
+++ b/UID/Mitarbeiter/usrCntlMitarbeiter.Designer.vb
@@ -59,6 +59,7 @@ Partial Class usrCntlMitarbeiter
Me.UserKopierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.BerechtigungenSetzenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
+ Me.Button7 = New System.Windows.Forms.Button()
Me.Panel2.SuspendLayout()
Me.TabControl1.SuspendLayout()
Me.TabPage1.SuspendLayout()
@@ -93,6 +94,7 @@ Partial Class usrCntlMitarbeiter
'
'Panel2
'
+ Me.Panel2.Controls.Add(Me.Button7)
Me.Panel2.Controls.Add(Me.Button9)
Me.Panel2.Controls.Add(Me.Button6)
Me.Panel2.Controls.Add(Me.Button5)
@@ -452,6 +454,15 @@ Partial Class usrCntlMitarbeiter
Me.ContextMenuStrip2.Name = "ContextMenuStrip2"
Me.ContextMenuStrip2.Size = New System.Drawing.Size(61, 4)
'
+ 'Button7
+ '
+ Me.Button7.Location = New System.Drawing.Point(9, 325)
+ Me.Button7.Name = "Button7"
+ Me.Button7.Size = New System.Drawing.Size(75, 34)
+ Me.Button7.TabIndex = 22
+ Me.Button7.Text = "Check"
+ Me.Button7.UseVisualStyleBackColor = True
+ '
'usrCntlMitarbeiter
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -523,4 +534,5 @@ Partial Class usrCntlMitarbeiter
Friend WithEvents ContextMenuStrip2 As ContextMenuStrip
Friend WithEvents cbxZE As CheckBox
Friend WithEvents cbxDakosy As CheckBox
+ Friend WithEvents Button7 As Button
End Class
diff --git a/UID/Mitarbeiter/usrCntlMitarbeiter.vb b/UID/Mitarbeiter/usrCntlMitarbeiter.vb
index 7091476..c19b8e8 100644
--- a/UID/Mitarbeiter/usrCntlMitarbeiter.vb
+++ b/UID/Mitarbeiter/usrCntlMitarbeiter.vb
@@ -1,6 +1,7 @@
Imports System.ComponentModel
Imports System.Net
Imports System.Text
+Imports Mysqlx.XDevAPI.CRUD
Imports VERAG_PROG_ALLGEMEIN
@@ -55,6 +56,12 @@ Public Class usrCntlMitarbeiter
End If
End If
+ If TabControl1.SelectedIndex = 7 Then
+ Button7.Visible = True
+ Else
+ Button7.Visible = False
+ End If
+
End Sub
Public Sub showVERAGATILLA(firma)
@@ -215,7 +222,12 @@ Public Class usrCntlMitarbeiter
Else
Dim timas As New cTimasAPI("timas")
timas.getEmployeeList(dt)
- dgvTimasNew.DataSource = dt
+
+ Dim dt_onlyActive As New DataTable
+ dt_onlyActive = dt.Select("[Ausweis-Nr] <> 0 and Vorname <> '' and Nachname <> ''").CopyToDataTable
+ dgvTimasNew.DataSource = dt_onlyActive
+
+ ' MsgBox("ALLE:" & dt.Rows.Count & vbNewLine & "AKIVE:" & dt_onlyActive.Rows.Count)
End If
With dgvTimasNew
@@ -886,5 +898,99 @@ Public Class usrCntlMitarbeiter
Tabelle_anzeigen()
End Sub
+ Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
+ If dgvTimasNew.Rows.Count = 0 Then Exit Sub
+
+ Try
+
+
+ Dim dt_Accounts As New DataTable
+ dt_Accounts.Columns.Add("accountid", GetType(Integer))
+
+ Dim ROW_ACC As DataRow = dt_Accounts.NewRow
+ ROW_ACC("accountid") = "993" 'Auszahlungen ÜS!
+ dt_Accounts.Rows.Add(ROW_ACC)
+
+ 'Dim ROW_ACC1 As DataRow = dt_Accounts.NewRow
+ 'ROW_ACC1("accountid") = "1598" 'Auszahlungen ÜS!
+ 'dt_Accounts.Rows.Add(ROW_ACC1)
+
+ 'Dim ROW_ACC2 As DataRow = dt_Accounts.NewRow
+ 'ROW_ACC2("accountid") = "1235" 'Auszahlungen ÜS!
+ 'dt_Accounts.Rows.Add(ROW_ACC2)
+
+
+ Dim dt_Employee As New DataTable
+ dt_Employee.Columns.Add("employeeId", GetType(Integer))
+ dt_Employee.Columns.Add("Vorname", GetType(String))
+ dt_Employee.Columns.Add("Nachname", GetType(String))
+
+ Dim dt_result As New DataTable
+
+ Dim dateStart As New Date("2025", "01", "01")
+ Dim dateEnd = Today()
+
+ For Each r As DataGridViewRow In dgvTimasNew.Rows
+ Dim ROW As DataRow = dt_Employee.NewRow
+ ROW("employeeId") = r.Cells("Id").Value
+ ROW("Vorname") = r.Cells("Vorname").Value
+ ROW("Nachname") = r.Cells("Nachname").Value
+ dt_Employee.Rows.Add(ROW)
+ Next
+
+
+
+ Dim timas As New cTimasAPI("timas")
+ timas.getTimeAccounts(dateStart, dateEnd, 0, dt_Accounts, dt_result, dt_Employee)
+
+ If dt_result.Rows.Count > 0 Then
+
+
+ Dim dt_falschAusbezahlt As New DataTable
+
+ dt_falschAusbezahlt = dt_result.Select("multiplier = '-'", "date").CopyToDataTable
+
+ If dt_falschAusbezahlt.Rows.Count = 0 Then
+ MsgBox("keine falsch ausbezahlten Überstunden vorhanden!" & vbNewLine & "Es wird nur geprüft, ob die ausbezahlten Überstunden NICHT negativ sind!")
+ Exit Sub
+ Else
+
+ ' VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dt_falschAusbezahlt,,,,,,,, True)
+
+ Dim query = From fa In dt_falschAusbezahlt.AsEnumerable()
+ Join emp In dt_Employee.AsEnumerable() On fa.Field(Of Integer)("employeeId") Equals emp.Field(Of Integer)("employeeId")
+ Select result = fa.ItemArray.Concat({emp.Field(Of String)("Vorname"), emp.Field(Of String)("Nachname")}).ToArray()
+
+ ' Neue Tabelle erstellen (Struktur erweitern)
+ Dim dt_merged As New DataTable
+
+ ' Alte Spalten übernehmen
+ For Each col As DataColumn In dt_falschAusbezahlt.Columns
+ dt_merged.Columns.Add(col.ColumnName, col.DataType)
+ Next
+
+ ' Neue Spalten hinzufügen
+ dt_merged.Columns.Add("Vorname", GetType(String))
+ dt_merged.Columns.Add("Nachname", GetType(String))
+
+ ' Daten einfügen
+ For Each row In query
+ dt_merged.Rows.Add(row)
+ Next
+
+ If dt_merged.Rows.Count > 0 Then
+ VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dt_merged,,,,,,,, True)
+ End If
+ End If
+
+
+ End If
+
+ Catch ex As Exception
+
+ End Try
+
+
+ End Sub
End Class
diff --git a/initATLASAufschubkonten/frmStartOptions.Designer.vb b/initATLASAufschubkonten/frmStartOptions.Designer.vb
index c228c71..cf02fe9 100644
--- a/initATLASAufschubkonten/frmStartOptions.Designer.vb
+++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb
@@ -25,6 +25,7 @@ Partial Class frmStartOptions
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmStartOptions))
Me.pnl = New System.Windows.Forms.Panel()
+ Me.Button32 = New System.Windows.Forms.Button()
Me.btnEZOLL_1month = New System.Windows.Forms.Button()
Me.btnEZOLL_7days = New System.Windows.Forms.Button()
Me.cbxEZOLLUNISPED = New System.Windows.Forms.CheckBox()
@@ -41,6 +42,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()
@@ -57,16 +59,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()
@@ -75,6 +81,7 @@ 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.tbcntr = New System.Windows.Forms.TabControl()
@@ -84,6 +91,7 @@ Partial Class frmStartOptions
Me.LinkLabel68 = New System.Windows.Forms.LinkLabel()
Me.PictureBox26 = New System.Windows.Forms.PictureBox()
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()
@@ -153,7 +161,21 @@ 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.Button31 = New System.Windows.Forms.Button()
+ Me.Label56 = New System.Windows.Forms.Label()
+ Me.MyTextBox5 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.Button29 = New System.Windows.Forms.Button()
+ Me.Label55 = New System.Windows.Forms.Label()
Me.btnTesttc = New System.Windows.Forms.Button()
Me.cboTCAPI_Call = New System.Windows.Forms.Button()
Me.Label50cboTCAPI_ = New System.Windows.Forms.Label()
@@ -183,10 +205,17 @@ Partial Class frmStartOptions
Me.cbxTCAnhEinlesen = New System.Windows.Forms.CheckBox()
Me.cboTCAPI_Files = New System.Windows.Forms.Button()
Me.cbxTCVB_Versand = New System.Windows.Forms.CheckBox()
+ Me.cboTCAPI_Firma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.MyTextBox06 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.txtCheckATEZMRN = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.datTranscodeBis = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.datTranscodeVon = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.TabPage4 = New System.Windows.Forms.TabPage()
Me.TabControl1 = New System.Windows.Forms.TabControl()
Me.Asfinag = New System.Windows.Forms.TabPage()
Me.Label28 = New System.Windows.Forms.Label()
+ Me.txtTWLNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.txtTBLNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Label24 = New System.Windows.Forms.Label()
Me.LinkLabel44 = New System.Windows.Forms.LinkLabel()
Me.LinkLabel43 = New System.Windows.Forms.LinkLabel()
@@ -217,6 +246,7 @@ Partial Class frmStartOptions
Me.IDS_RE = New System.Windows.Forms.LinkLabel()
Me.cbxIDSUmbenenen = New System.Windows.Forms.CheckBox()
Me.TextBox3 = New System.Windows.Forms.TextBox()
+ Me.txtIDSYear = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.MSE = New System.Windows.Forms.TabPage()
Me.LinkLabel25 = New System.Windows.Forms.LinkLabel()
Me.Label61 = New System.Windows.Forms.Label()
@@ -243,6 +273,10 @@ Partial Class frmStartOptions
Me.Label42 = New System.Windows.Forms.Label()
Me.cbxOnlyBilledTransactions = New System.Windows.Forms.CheckBox()
Me.cbxUploadDA = New System.Windows.Forms.CheckBox()
+ Me.txtTransactionID = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.cbxMSEBatchNr = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.txtBatchNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.txtBatchNrofTransaction = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.RMC = New System.Windows.Forms.TabPage()
Me.Label58 = New System.Windows.Forms.Label()
Me.lblOriginalRechnungRMC = New System.Windows.Forms.Label()
@@ -253,6 +287,7 @@ Partial Class frmStartOptions
Me.RMC_import = New System.Windows.Forms.LinkLabel()
Me.cbxDateienlöschenRMC = New System.Windows.Forms.CheckBox()
Me.TextBox2 = New System.Windows.Forms.TextBox()
+ Me.cbxRMC = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.UTA = New System.Windows.Forms.TabPage()
Me.lblOriginalRechnungUTA = New System.Windows.Forms.Label()
Me.Label65 = New System.Windows.Forms.Label()
@@ -266,6 +301,8 @@ Partial Class frmStartOptions
Me.TextBox1 = New System.Windows.Forms.TextBox()
Me.UTA_Laender = New System.Windows.Forms.LinkLabel()
Me.lblUTAPDFvollst = New System.Windows.Forms.LinkLabel()
+ Me.txtUTAYear = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.txtUTADate = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.PLOSE = New System.Windows.Forms.TabPage()
Me.lblOriginalRechnungPLOSE = New System.Windows.Forms.Label()
Me.Label63 = New System.Windows.Forms.Label()
@@ -279,6 +316,8 @@ Partial Class frmStartOptions
Me.LinkLabel24 = New System.Windows.Forms.LinkLabel()
Me.LinkLabel23 = New System.Windows.Forms.LinkLabel()
Me.PlosePdfRE = New System.Windows.Forms.LinkLabel()
+ Me.txtPloseJahr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.txtPLoseKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.TabPage5 = New System.Windows.Forms.TabPage()
Me.btnCheckPDF_USTVA = New System.Windows.Forms.Button()
Me.cbxPloseNeu = New System.Windows.Forms.CheckBox()
@@ -298,10 +337,12 @@ Partial Class frmStartOptions
Me.cbxMSEalt = New System.Windows.Forms.CheckBox()
Me.cbxUTAalt = New System.Windows.Forms.CheckBox()
Me.cbxUTANeu = New System.Windows.Forms.CheckBox()
+ Me.txtKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.TabPage8 = New System.Windows.Forms.TabPage()
Me.PictureBox27 = New System.Windows.Forms.PictureBox()
Me.Label60 = New System.Windows.Forms.Label()
Me.dtp_MDM_Einarbeitung = New System.Windows.Forms.DateTimePicker()
+ Me.dgv_MDMEinarbeitung = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.KN8_DESTAT = New System.Windows.Forms.LinkLabel()
Me.Button24 = New System.Windows.Forms.Button()
Me.cbxTestFTP = New System.Windows.Forms.CheckBox()
@@ -311,6 +352,7 @@ Partial Class frmStartOptions
Me.lblAbDat = New System.Windows.Forms.Label()
Me.Button27 = New System.Windows.Forms.Button()
Me.lblWartungen = New System.Windows.Forms.Label()
+ Me.txtWartungFaelligkeitAbDat = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.TabPage7 = New System.Windows.Forms.TabPage()
Me.cbxEventtriggered = New System.Windows.Forms.CheckBox()
Me.Label50 = New System.Windows.Forms.Label()
@@ -328,11 +370,13 @@ Partial Class frmStartOptions
Me.lblMissingCS = New System.Windows.Forms.Label()
Me.Button28 = New System.Windows.Forms.Button()
Me.btnCreditsaveLauf = New System.Windows.Forms.Button()
+ Me.txtCSDate = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.CheckBox1 = New System.Windows.Forms.CheckBox()
Me.cbxBu = New System.Windows.Forms.CheckBox()
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()
@@ -348,52 +392,10 @@ 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.Label55 = New System.Windows.Forms.Label()
- Me.Button29 = New System.Windows.Forms.Button()
- Me.Label56 = New System.Windows.Forms.Label()
- 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.MyTextBox5 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.cboTCAPI_Firma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.MyTextBox06 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.txtCheckATEZMRN = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.datTranscodeBis = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.datTranscodeVon = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.txtTWLNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.txtTBLNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.txtIDSYear = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.txtTransactionID = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.cbxMSEBatchNr = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.txtBatchNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.txtBatchNrofTransaction = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.cbxRMC = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.txtUTAYear = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.txtUTADate = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.txtPloseJahr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.txtPLoseKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.txtKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.dgv_MDMEinarbeitung = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
- Me.txtWartungFaelligkeitAbDat = New VERAG_PROG_ALLGEMEIN.MyTextBox()
- Me.txtCSDate = 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.Button31 = New System.Windows.Forms.Button()
+ Me.cbxZugferdAufDeveloper = New System.Windows.Forms.CheckBox()
Me.pnl.SuspendLayout()
CType(Me.pbEmailscheck, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox24, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -420,6 +422,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.Panel1.SuspendLayout()
Me.TabPage4.SuspendLayout()
@@ -437,20 +440,21 @@ Partial Class frmStartOptions
CType(Me.PictureBox25, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPage8.SuspendLayout()
CType(Me.PictureBox27, System.ComponentModel.ISupportInitialize).BeginInit()
+ CType(Me.dgv_MDMEinarbeitung, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPage6.SuspendLayout()
Me.TabPage7.SuspendLayout()
CType(Me.PictureBox12, System.ComponentModel.ISupportInitialize).BeginInit()
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()
- CType(Me.dgv_MDMEinarbeitung, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'pnl
'
Me.pnl.BackColor = System.Drawing.Color.White
Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+ Me.pnl.Controls.Add(Me.cbxZugferdAufDeveloper)
+ Me.pnl.Controls.Add(Me.Button32)
Me.pnl.Controls.Add(Me.btnEZOLL_1month)
Me.pnl.Controls.Add(Me.btnEZOLL_7days)
Me.pnl.Controls.Add(Me.cbxEZOLLUNISPED)
@@ -538,6 +542,18 @@ Partial Class frmStartOptions
Me.pnl.Size = New System.Drawing.Size(1229, 946)
Me.pnl.TabIndex = 0
'
+ 'Button32
+ '
+ Me.Button32.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.Button32.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.Button32.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+ Me.Button32.Location = New System.Drawing.Point(996, 269)
+ Me.Button32.Name = "Button32"
+ Me.Button32.Size = New System.Drawing.Size(103, 40)
+ Me.Button32.TabIndex = 148
+ Me.Button32.Text = "ZuGFerD-Check"
+ Me.Button32.UseVisualStyleBackColor = True
+ '
'btnEZOLL_1month
'
Me.btnEZOLL_1month.FlatStyle = System.Windows.Forms.FlatStyle.Flat
@@ -714,6 +730,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, 232)
+ 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
@@ -892,6 +931,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, 176)
+ 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
@@ -938,6 +1000,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
@@ -962,6 +1048,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(425, 207)
+ 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
@@ -1010,6 +1120,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
@@ -1102,6 +1223,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, 300)
+ Me.cboBMDUnispedFirma.Name = "cboBMDUnispedFirma"
+ Me.cboBMDUnispedFirma.Size = New System.Drawing.Size(124, 21)
+ Me.cboBMDUnispedFirma.TabIndex = 42
+ '
'CheckBox4
'
Me.CheckBox4.AutoSize = True
@@ -1256,6 +1388,30 @@ Partial Class frmStartOptions
Me.cbxGestellungspeichern.Text = "SAVE VW"
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
@@ -2050,6 +2206,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.Button31)
@@ -2095,6 +2410,74 @@ Partial Class frmStartOptions
Me.TabPage3.Text = "Partner-Systeme"
Me.TabPage3.UseVisualStyleBackColor = True
'
+ 'Button31
+ '
+ Me.Button31.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.Button31.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.Button31.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+ Me.Button31.Location = New System.Drawing.Point(14, 358)
+ Me.Button31.Name = "Button31"
+ Me.Button31.Size = New System.Drawing.Size(123, 24)
+ Me.Button31.TabIndex = 161
+ Me.Button31.Text = "Status Updaten"
+ Me.Button31.UseVisualStyleBackColor = True
+ '
+ 'Label56
+ '
+ Me.Label56.AutoSize = True
+ Me.Label56.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
+ Me.Label56.Location = New System.Drawing.Point(144, 334)
+ Me.Label56.Name = "Label56"
+ Me.Label56.Size = New System.Drawing.Size(22, 13)
+ Me.Label56.TabIndex = 160
+ Me.Label56.Text = "ab:"
+ '
+ 'MyTextBox5
+ '
+ Me.MyTextBox5._DateTimeOnly = False
+ Me.MyTextBox5._numbersOnly = False
+ Me.MyTextBox5._numbersOnlyKommastellen = ""
+ Me.MyTextBox5._numbersOnlyTrennzeichen = True
+ Me.MyTextBox5._Prozent = False
+ Me.MyTextBox5._ShortDateNew = True
+ Me.MyTextBox5._ShortDateOnly = False
+ Me.MyTextBox5._TimeOnly = False
+ Me.MyTextBox5._TimeOnly_Seconds = False
+ Me.MyTextBox5._value = ""
+ Me.MyTextBox5._Waehrung = False
+ Me.MyTextBox5._WaehrungZeichen = True
+ Me.MyTextBox5.ForeColor = System.Drawing.Color.Black
+ Me.MyTextBox5.Location = New System.Drawing.Point(169, 331)
+ Me.MyTextBox5.MaxLength = 10
+ Me.MyTextBox5.MaxLineLength = -1
+ Me.MyTextBox5.MaxLines_Warning = ""
+ Me.MyTextBox5.MaxLines_Warning_Label = Nothing
+ Me.MyTextBox5.Name = "MyTextBox5"
+ Me.MyTextBox5.Size = New System.Drawing.Size(87, 20)
+ Me.MyTextBox5.TabIndex = 159
+ '
+ 'Button29
+ '
+ Me.Button29.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.Button29.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.Button29.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+ Me.Button29.Location = New System.Drawing.Point(14, 328)
+ Me.Button29.Name = "Button29"
+ Me.Button29.Size = New System.Drawing.Size(123, 24)
+ Me.Button29.TabIndex = 158
+ Me.Button29.Text = "NCTS Einlesen"
+ Me.Button29.UseVisualStyleBackColor = True
+ '
+ 'Label55
+ '
+ Me.Label55.AutoSize = True
+ Me.Label55.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label55.Location = New System.Drawing.Point(13, 309)
+ Me.Label55.Name = "Label55"
+ Me.Label55.Size = New System.Drawing.Size(96, 13)
+ Me.Label55.TabIndex = 157
+ Me.Label55.Text = "MODALTRANS:"
+ '
'btnTesttc
'
Me.btnTesttc.FlatStyle = System.Windows.Forms.FlatStyle.Flat
@@ -2414,6 +2797,116 @@ Partial Class frmStartOptions
Me.cbxTCVB_Versand.Text = "ZB Versand"
Me.cbxTCVB_Versand.UseVisualStyleBackColor = True
'
+ 'cboTCAPI_Firma
+ '
+ Me.cboTCAPI_Firma._allowedValuesFreiText = Nothing
+ Me.cboTCAPI_Firma._allowFreiText = False
+ Me.cboTCAPI_Firma._value = ""
+ Me.cboTCAPI_Firma.FormattingEnabled = True
+ Me.cboTCAPI_Firma.Items.AddRange(New Object() {"ALLE", "ATILLA", "IMEX", "DURMAZ"})
+ Me.cboTCAPI_Firma.Location = New System.Drawing.Point(570, 381)
+ Me.cboTCAPI_Firma.Name = "cboTCAPI_Firma"
+ Me.cboTCAPI_Firma.Size = New System.Drawing.Size(88, 21)
+ Me.cboTCAPI_Firma.TabIndex = 152
+ Me.cboTCAPI_Firma.Text = "ALLE"
+ '
+ 'MyTextBox06
+ '
+ Me.MyTextBox06._DateTimeOnly = False
+ Me.MyTextBox06._numbersOnly = False
+ Me.MyTextBox06._numbersOnlyKommastellen = ""
+ Me.MyTextBox06._numbersOnlyTrennzeichen = False
+ Me.MyTextBox06._Prozent = False
+ Me.MyTextBox06._ShortDateNew = False
+ Me.MyTextBox06._ShortDateOnly = False
+ Me.MyTextBox06._TimeOnly = False
+ Me.MyTextBox06._TimeOnly_Seconds = False
+ Me.MyTextBox06._value = "200"
+ Me.MyTextBox06._Waehrung = False
+ Me.MyTextBox06._WaehrungZeichen = False
+ Me.MyTextBox06.ForeColor = System.Drawing.Color.Black
+ Me.MyTextBox06.Location = New System.Drawing.Point(583, 302)
+ Me.MyTextBox06.MaxLength = 18
+ Me.MyTextBox06.MaxLineLength = -1
+ Me.MyTextBox06.MaxLines_Warning = ""
+ Me.MyTextBox06.MaxLines_Warning_Label = Nothing
+ Me.MyTextBox06.Name = "MyTextBox06"
+ Me.MyTextBox06.Size = New System.Drawing.Size(150, 20)
+ Me.MyTextBox06.TabIndex = 148
+ Me.MyTextBox06.Text = "200"
+ '
+ 'txtCheckATEZMRN
+ '
+ Me.txtCheckATEZMRN._DateTimeOnly = False
+ Me.txtCheckATEZMRN._numbersOnly = False
+ Me.txtCheckATEZMRN._numbersOnlyKommastellen = ""
+ Me.txtCheckATEZMRN._numbersOnlyTrennzeichen = False
+ Me.txtCheckATEZMRN._Prozent = False
+ Me.txtCheckATEZMRN._ShortDateNew = False
+ Me.txtCheckATEZMRN._ShortDateOnly = False
+ Me.txtCheckATEZMRN._TimeOnly = False
+ Me.txtCheckATEZMRN._TimeOnly_Seconds = False
+ Me.txtCheckATEZMRN._value = ""
+ Me.txtCheckATEZMRN._Waehrung = False
+ Me.txtCheckATEZMRN._WaehrungZeichen = False
+ Me.txtCheckATEZMRN.ForeColor = System.Drawing.Color.Black
+ Me.txtCheckATEZMRN.Location = New System.Drawing.Point(548, 272)
+ Me.txtCheckATEZMRN.MaxLength = 18
+ Me.txtCheckATEZMRN.MaxLineLength = -1
+ Me.txtCheckATEZMRN.MaxLines_Warning = ""
+ Me.txtCheckATEZMRN.MaxLines_Warning_Label = Nothing
+ Me.txtCheckATEZMRN.Name = "txtCheckATEZMRN"
+ Me.txtCheckATEZMRN.Size = New System.Drawing.Size(185, 20)
+ Me.txtCheckATEZMRN.TabIndex = 139
+ '
+ 'datTranscodeBis
+ '
+ Me.datTranscodeBis._DateTimeOnly = False
+ Me.datTranscodeBis._numbersOnly = False
+ Me.datTranscodeBis._numbersOnlyKommastellen = ""
+ Me.datTranscodeBis._numbersOnlyTrennzeichen = True
+ Me.datTranscodeBis._Prozent = False
+ Me.datTranscodeBis._ShortDateNew = True
+ Me.datTranscodeBis._ShortDateOnly = False
+ Me.datTranscodeBis._TimeOnly = False
+ Me.datTranscodeBis._TimeOnly_Seconds = False
+ Me.datTranscodeBis._value = ""
+ Me.datTranscodeBis._Waehrung = False
+ Me.datTranscodeBis._WaehrungZeichen = True
+ Me.datTranscodeBis.ForeColor = System.Drawing.Color.Black
+ Me.datTranscodeBis.Location = New System.Drawing.Point(646, 245)
+ Me.datTranscodeBis.MaxLength = 10
+ Me.datTranscodeBis.MaxLineLength = -1
+ Me.datTranscodeBis.MaxLines_Warning = ""
+ Me.datTranscodeBis.MaxLines_Warning_Label = Nothing
+ Me.datTranscodeBis.Name = "datTranscodeBis"
+ Me.datTranscodeBis.Size = New System.Drawing.Size(87, 20)
+ Me.datTranscodeBis.TabIndex = 143
+ '
+ 'datTranscodeVon
+ '
+ Me.datTranscodeVon._DateTimeOnly = False
+ Me.datTranscodeVon._numbersOnly = False
+ Me.datTranscodeVon._numbersOnlyKommastellen = ""
+ Me.datTranscodeVon._numbersOnlyTrennzeichen = True
+ Me.datTranscodeVon._Prozent = False
+ Me.datTranscodeVon._ShortDateNew = True
+ Me.datTranscodeVon._ShortDateOnly = False
+ Me.datTranscodeVon._TimeOnly = False
+ Me.datTranscodeVon._TimeOnly_Seconds = False
+ Me.datTranscodeVon._value = ""
+ Me.datTranscodeVon._Waehrung = False
+ Me.datTranscodeVon._WaehrungZeichen = True
+ Me.datTranscodeVon.ForeColor = System.Drawing.Color.Black
+ Me.datTranscodeVon.Location = New System.Drawing.Point(548, 245)
+ Me.datTranscodeVon.MaxLength = 10
+ Me.datTranscodeVon.MaxLineLength = -1
+ Me.datTranscodeVon.MaxLines_Warning = ""
+ Me.datTranscodeVon.MaxLines_Warning_Label = Nothing
+ Me.datTranscodeVon.Name = "datTranscodeVon"
+ Me.datTranscodeVon.Size = New System.Drawing.Size(87, 20)
+ Me.datTranscodeVon.TabIndex = 142
+ '
'TabPage4
'
Me.TabPage4.Controls.Add(Me.TabControl1)
@@ -2482,6 +2975,54 @@ Partial Class frmStartOptions
Me.Label28.TabIndex = 81
Me.Label28.Text = "ASFINAG"
'
+ '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(168, 152)
+ 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
+ '
+ '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(168, 180)
+ 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
+ '
'Label24
'
Me.Label24.AutoSize = True
@@ -2818,6 +3359,32 @@ Partial Class frmStartOptions
Me.TextBox3.TabIndex = 154
Me.TextBox3.Text = "Dateien nach Import von FTP umbenennen"
'
+ 'txtIDSYear
+ '
+ Me.txtIDSYear._DateTimeOnly = False
+ Me.txtIDSYear._numbersOnly = True
+ Me.txtIDSYear._numbersOnlyKommastellen = ""
+ Me.txtIDSYear._numbersOnlyTrennzeichen = False
+ Me.txtIDSYear._Prozent = False
+ Me.txtIDSYear._ShortDateNew = False
+ Me.txtIDSYear._ShortDateOnly = False
+ Me.txtIDSYear._TimeOnly = False
+ Me.txtIDSYear._TimeOnly_Seconds = False
+ Me.txtIDSYear._value = ""
+ Me.txtIDSYear._Waehrung = False
+ Me.txtIDSYear._WaehrungZeichen = True
+ Me.txtIDSYear.BackColor = System.Drawing.SystemColors.Window
+ Me.txtIDSYear.ForeColor = System.Drawing.Color.Red
+ Me.txtIDSYear.Location = New System.Drawing.Point(12, 61)
+ Me.txtIDSYear.MaxLength = 10
+ Me.txtIDSYear.MaxLineLength = -1
+ Me.txtIDSYear.MaxLines_Warning = ""
+ Me.txtIDSYear.MaxLines_Warning_Label = Nothing
+ Me.txtIDSYear.Name = "txtIDSYear"
+ Me.txtIDSYear.Size = New System.Drawing.Size(66, 20)
+ Me.txtIDSYear.TabIndex = 155
+ Me.txtIDSYear.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
+ '
'MSE
'
Me.MSE.Controls.Add(Me.LinkLabel25)
@@ -3116,6 +3683,98 @@ Partial Class frmStartOptions
Me.cbxUploadDA.Text = "PDF ins DS"
Me.cbxUploadDA.UseVisualStyleBackColor = True
'
+ '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(41, 207)
+ 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
+ '
+ '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(30, 156)
+ Me.cbxMSEBatchNr.Name = "cbxMSEBatchNr"
+ Me.cbxMSEBatchNr.Size = New System.Drawing.Size(44, 21)
+ Me.cbxMSEBatchNr.TabIndex = 122
+ '
+ '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(81, 156)
+ 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
+ '
+ '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(177, 207)
+ 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
+ '
'RMC
'
Me.RMC.Controls.Add(Me.Label58)
@@ -3229,6 +3888,17 @@ Partial Class frmStartOptions
Me.TextBox2.TabIndex = 101
Me.TextBox2.Text = "Dateien nach Import von FTP löschen"
'
+ 'cbxRMC
+ '
+ Me.cbxRMC._allowedValuesFreiText = Nothing
+ Me.cbxRMC._allowFreiText = False
+ Me.cbxRMC._value = ""
+ Me.cbxRMC.FormattingEnabled = True
+ Me.cbxRMC.Location = New System.Drawing.Point(13, 115)
+ Me.cbxRMC.Name = "cbxRMC"
+ Me.cbxRMC.Size = New System.Drawing.Size(80, 21)
+ Me.cbxRMC.TabIndex = 90
+ '
'UTA
'
Me.UTA.Controls.Add(Me.lblOriginalRechnungUTA)
@@ -3379,6 +4049,58 @@ Partial Class frmStartOptions
Me.lblUTAPDFvollst.TabStop = True
Me.lblUTAPDFvollst.Text = "PDF Daten vollständig"
'
+ '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(58, 113)
+ 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
+ '
+ 'txtUTADate
+ '
+ Me.txtUTADate._DateTimeOnly = False
+ Me.txtUTADate._numbersOnly = False
+ Me.txtUTADate._numbersOnlyKommastellen = ""
+ Me.txtUTADate._numbersOnlyTrennzeichen = False
+ Me.txtUTADate._Prozent = False
+ Me.txtUTADate._ShortDateNew = False
+ Me.txtUTADate._ShortDateOnly = True
+ Me.txtUTADate._TimeOnly = False
+ Me.txtUTADate._TimeOnly_Seconds = False
+ Me.txtUTADate._value = ""
+ Me.txtUTADate._Waehrung = False
+ Me.txtUTADate._WaehrungZeichen = True
+ Me.txtUTADate.BackColor = System.Drawing.SystemColors.Window
+ Me.txtUTADate.ForeColor = System.Drawing.Color.Red
+ Me.txtUTADate.Location = New System.Drawing.Point(17, 215)
+ Me.txtUTADate.MaxLength = 10
+ Me.txtUTADate.MaxLineLength = -1
+ Me.txtUTADate.MaxLines_Warning = ""
+ Me.txtUTADate.MaxLines_Warning_Label = Nothing
+ Me.txtUTADate.Name = "txtUTADate"
+ Me.txtUTADate.Size = New System.Drawing.Size(66, 20)
+ Me.txtUTADate.TabIndex = 156
+ Me.txtUTADate.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
+ '
'PLOSE
'
Me.PLOSE.Controls.Add(Me.lblOriginalRechnungPLOSE)
@@ -3528,6 +4250,58 @@ Partial Class frmStartOptions
Me.PlosePdfRE.TabStop = True
Me.PlosePdfRE.Text = "PDF mit RE verknüpfen"
'
+ 'txtPloseJahr
+ '
+ Me.txtPloseJahr._DateTimeOnly = False
+ Me.txtPloseJahr._numbersOnly = True
+ Me.txtPloseJahr._numbersOnlyKommastellen = ""
+ Me.txtPloseJahr._numbersOnlyTrennzeichen = False
+ Me.txtPloseJahr._Prozent = False
+ Me.txtPloseJahr._ShortDateNew = False
+ Me.txtPloseJahr._ShortDateOnly = False
+ Me.txtPloseJahr._TimeOnly = False
+ Me.txtPloseJahr._TimeOnly_Seconds = False
+ Me.txtPloseJahr._value = ""
+ Me.txtPloseJahr._Waehrung = False
+ Me.txtPloseJahr._WaehrungZeichen = False
+ Me.txtPloseJahr.BackColor = System.Drawing.SystemColors.Window
+ Me.txtPloseJahr.ForeColor = System.Drawing.Color.Red
+ Me.txtPloseJahr.Location = New System.Drawing.Point(83, 146)
+ Me.txtPloseJahr.MaxLength = 10
+ Me.txtPloseJahr.MaxLineLength = -1
+ Me.txtPloseJahr.MaxLines_Warning = ""
+ Me.txtPloseJahr.MaxLines_Warning_Label = Nothing
+ Me.txtPloseJahr.Name = "txtPloseJahr"
+ Me.txtPloseJahr.Size = New System.Drawing.Size(66, 20)
+ Me.txtPloseJahr.TabIndex = 158
+ Me.txtPloseJahr.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
+ '
+ 'txtPLoseKdNr
+ '
+ Me.txtPLoseKdNr._DateTimeOnly = False
+ Me.txtPLoseKdNr._numbersOnly = True
+ Me.txtPLoseKdNr._numbersOnlyKommastellen = ""
+ Me.txtPLoseKdNr._numbersOnlyTrennzeichen = False
+ Me.txtPLoseKdNr._Prozent = False
+ Me.txtPLoseKdNr._ShortDateNew = False
+ Me.txtPLoseKdNr._ShortDateOnly = False
+ Me.txtPLoseKdNr._TimeOnly = False
+ Me.txtPLoseKdNr._TimeOnly_Seconds = False
+ Me.txtPLoseKdNr._value = ""
+ Me.txtPLoseKdNr._Waehrung = False
+ Me.txtPLoseKdNr._WaehrungZeichen = False
+ Me.txtPLoseKdNr.BackColor = System.Drawing.SystemColors.Window
+ Me.txtPLoseKdNr.ForeColor = System.Drawing.Color.Red
+ Me.txtPLoseKdNr.Location = New System.Drawing.Point(83, 169)
+ Me.txtPLoseKdNr.MaxLength = 10
+ Me.txtPLoseKdNr.MaxLineLength = -1
+ Me.txtPLoseKdNr.MaxLines_Warning = ""
+ Me.txtPLoseKdNr.MaxLines_Warning_Label = Nothing
+ Me.txtPLoseKdNr.Name = "txtPLoseKdNr"
+ Me.txtPLoseKdNr.Size = New System.Drawing.Size(66, 20)
+ Me.txtPLoseKdNr.TabIndex = 162
+ Me.txtPLoseKdNr.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
+ '
'TabPage5
'
Me.TabPage5.Controls.Add(Me.btnCheckPDF_USTVA)
@@ -3774,6 +4548,30 @@ Partial Class frmStartOptions
Me.cbxUTANeu.Text = "UTA"
Me.cbxUTANeu.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(77, 69)
+ 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
+ '
'TabPage8
'
Me.TabPage8.Controls.Add(Me.PictureBox27)
@@ -3817,6 +4615,15 @@ Partial Class frmStartOptions
Me.dtp_MDM_Einarbeitung.Size = New System.Drawing.Size(77, 20)
Me.dtp_MDM_Einarbeitung.TabIndex = 1
'
+ 'dgv_MDMEinarbeitung
+ '
+ Me.dgv_MDMEinarbeitung.AKTUALISIERUNGS_INTERVALL = -1
+ Me.dgv_MDMEinarbeitung.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+ Me.dgv_MDMEinarbeitung.Location = New System.Drawing.Point(13, 35)
+ Me.dgv_MDMEinarbeitung.Name = "dgv_MDMEinarbeitung"
+ Me.dgv_MDMEinarbeitung.Size = New System.Drawing.Size(458, 170)
+ Me.dgv_MDMEinarbeitung.TabIndex = 0
+ '
'KN8_DESTAT
'
Me.KN8_DESTAT.AutoSize = True
@@ -3921,6 +4728,30 @@ Partial Class frmStartOptions
Me.lblWartungen.TabIndex = 15
Me.lblWartungen.Text = "Wartungen"
'
+ 'txtWartungFaelligkeitAbDat
+ '
+ Me.txtWartungFaelligkeitAbDat._DateTimeOnly = False
+ Me.txtWartungFaelligkeitAbDat._numbersOnly = False
+ Me.txtWartungFaelligkeitAbDat._numbersOnlyKommastellen = ""
+ Me.txtWartungFaelligkeitAbDat._numbersOnlyTrennzeichen = True
+ Me.txtWartungFaelligkeitAbDat._Prozent = False
+ Me.txtWartungFaelligkeitAbDat._ShortDateNew = True
+ Me.txtWartungFaelligkeitAbDat._ShortDateOnly = False
+ Me.txtWartungFaelligkeitAbDat._TimeOnly = False
+ Me.txtWartungFaelligkeitAbDat._TimeOnly_Seconds = False
+ Me.txtWartungFaelligkeitAbDat._value = ""
+ Me.txtWartungFaelligkeitAbDat._Waehrung = False
+ Me.txtWartungFaelligkeitAbDat._WaehrungZeichen = True
+ Me.txtWartungFaelligkeitAbDat.ForeColor = System.Drawing.Color.Red
+ Me.txtWartungFaelligkeitAbDat.Location = New System.Drawing.Point(75, 76)
+ Me.txtWartungFaelligkeitAbDat.MaxLength = 10
+ Me.txtWartungFaelligkeitAbDat.MaxLineLength = -1
+ Me.txtWartungFaelligkeitAbDat.MaxLines_Warning = ""
+ Me.txtWartungFaelligkeitAbDat.MaxLines_Warning_Label = Nothing
+ Me.txtWartungFaelligkeitAbDat.Name = "txtWartungFaelligkeitAbDat"
+ Me.txtWartungFaelligkeitAbDat.Size = New System.Drawing.Size(101, 20)
+ Me.txtWartungFaelligkeitAbDat.TabIndex = 141
+ '
'TabPage7
'
Me.TabPage7.Controls.Add(Me.cbxEventtriggered)
@@ -4129,6 +4960,33 @@ Partial Class frmStartOptions
Me.btnCreditsaveLauf.Text = "CS Portfolio-Upload"
Me.btnCreditsaveLauf.UseVisualStyleBackColor = True
'
+ 'txtCSDate
+ '
+ Me.txtCSDate._DateTimeOnly = False
+ Me.txtCSDate._numbersOnly = False
+ Me.txtCSDate._numbersOnlyKommastellen = ""
+ Me.txtCSDate._numbersOnlyTrennzeichen = False
+ Me.txtCSDate._Prozent = False
+ Me.txtCSDate._ShortDateNew = False
+ Me.txtCSDate._ShortDateOnly = True
+ Me.txtCSDate._TimeOnly = False
+ Me.txtCSDate._TimeOnly_Seconds = False
+ Me.txtCSDate._value = ""
+ Me.txtCSDate._Waehrung = False
+ Me.txtCSDate._WaehrungZeichen = True
+ Me.txtCSDate.BackColor = System.Drawing.SystemColors.Window
+ Me.txtCSDate.Enabled = False
+ Me.txtCSDate.ForeColor = System.Drawing.Color.Red
+ Me.txtCSDate.Location = New System.Drawing.Point(96, 174)
+ Me.txtCSDate.MaxLength = 10
+ Me.txtCSDate.MaxLineLength = -1
+ Me.txtCSDate.MaxLines_Warning = ""
+ Me.txtCSDate.MaxLines_Warning_Label = Nothing
+ Me.txtCSDate.Name = "txtCSDate"
+ Me.txtCSDate.Size = New System.Drawing.Size(66, 20)
+ Me.txtCSDate.TabIndex = 157
+ Me.txtCSDate.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
+ '
'CheckBox1
'
Me.CheckBox1.AutoSize = True
@@ -4186,6 +5044,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, 156)
+ 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)
@@ -4354,872 +5236,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
- '
- 'Label55
- '
- Me.Label55.AutoSize = True
- Me.Label55.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label55.Location = New System.Drawing.Point(13, 309)
- Me.Label55.Name = "Label55"
- Me.Label55.Size = New System.Drawing.Size(96, 13)
- Me.Label55.TabIndex = 157
- Me.Label55.Text = "MODALTRANS:"
- '
- 'Button29
- '
- Me.Button29.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.Button29.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
- Me.Button29.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.Button29.Location = New System.Drawing.Point(14, 328)
- Me.Button29.Name = "Button29"
- Me.Button29.Size = New System.Drawing.Size(123, 24)
- Me.Button29.TabIndex = 158
- Me.Button29.Text = "NCTS Einlesen"
- Me.Button29.UseVisualStyleBackColor = True
- '
- 'Label56
- '
- Me.Label56.AutoSize = True
- Me.Label56.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
- Me.Label56.Location = New System.Drawing.Point(144, 334)
- Me.Label56.Name = "Label56"
- Me.Label56.Size = New System.Drawing.Size(22, 13)
- Me.Label56.TabIndex = 160
- Me.Label56.Text = "ab:"
- '
- '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, 232)
- 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, 176)
- 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(425, 207)
- 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, 300)
- 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
- '
- 'MyTextBox5
- '
- Me.MyTextBox5._DateTimeOnly = False
- Me.MyTextBox5._numbersOnly = False
- Me.MyTextBox5._numbersOnlyKommastellen = ""
- Me.MyTextBox5._numbersOnlyTrennzeichen = True
- Me.MyTextBox5._Prozent = False
- Me.MyTextBox5._ShortDateNew = True
- Me.MyTextBox5._ShortDateOnly = False
- Me.MyTextBox5._TimeOnly = False
- Me.MyTextBox5._TimeOnly_Seconds = False
- Me.MyTextBox5._value = ""
- Me.MyTextBox5._Waehrung = False
- Me.MyTextBox5._WaehrungZeichen = True
- Me.MyTextBox5.ForeColor = System.Drawing.Color.Black
- Me.MyTextBox5.Location = New System.Drawing.Point(169, 331)
- Me.MyTextBox5.MaxLength = 10
- Me.MyTextBox5.MaxLineLength = -1
- Me.MyTextBox5.MaxLines_Warning = ""
- Me.MyTextBox5.MaxLines_Warning_Label = Nothing
- Me.MyTextBox5.Name = "MyTextBox5"
- Me.MyTextBox5.Size = New System.Drawing.Size(87, 20)
- Me.MyTextBox5.TabIndex = 159
- '
- 'cboTCAPI_Firma
- '
- Me.cboTCAPI_Firma._allowedValuesFreiText = Nothing
- Me.cboTCAPI_Firma._allowFreiText = False
- Me.cboTCAPI_Firma._value = ""
- Me.cboTCAPI_Firma.FormattingEnabled = True
- Me.cboTCAPI_Firma.Items.AddRange(New Object() {"ALLE", "ATILLA", "IMEX", "DURMAZ"})
- Me.cboTCAPI_Firma.Location = New System.Drawing.Point(570, 381)
- Me.cboTCAPI_Firma.Name = "cboTCAPI_Firma"
- Me.cboTCAPI_Firma.Size = New System.Drawing.Size(88, 21)
- Me.cboTCAPI_Firma.TabIndex = 152
- Me.cboTCAPI_Firma.Text = "ALLE"
- '
- 'MyTextBox06
- '
- Me.MyTextBox06._DateTimeOnly = False
- Me.MyTextBox06._numbersOnly = False
- Me.MyTextBox06._numbersOnlyKommastellen = ""
- Me.MyTextBox06._numbersOnlyTrennzeichen = False
- Me.MyTextBox06._Prozent = False
- Me.MyTextBox06._ShortDateNew = False
- Me.MyTextBox06._ShortDateOnly = False
- Me.MyTextBox06._TimeOnly = False
- Me.MyTextBox06._TimeOnly_Seconds = False
- Me.MyTextBox06._value = "200"
- Me.MyTextBox06._Waehrung = False
- Me.MyTextBox06._WaehrungZeichen = False
- Me.MyTextBox06.ForeColor = System.Drawing.Color.Black
- Me.MyTextBox06.Location = New System.Drawing.Point(583, 302)
- Me.MyTextBox06.MaxLength = 18
- Me.MyTextBox06.MaxLineLength = -1
- Me.MyTextBox06.MaxLines_Warning = ""
- Me.MyTextBox06.MaxLines_Warning_Label = Nothing
- Me.MyTextBox06.Name = "MyTextBox06"
- Me.MyTextBox06.Size = New System.Drawing.Size(150, 20)
- Me.MyTextBox06.TabIndex = 148
- Me.MyTextBox06.Text = "200"
- '
- 'txtCheckATEZMRN
- '
- Me.txtCheckATEZMRN._DateTimeOnly = False
- Me.txtCheckATEZMRN._numbersOnly = False
- Me.txtCheckATEZMRN._numbersOnlyKommastellen = ""
- Me.txtCheckATEZMRN._numbersOnlyTrennzeichen = False
- Me.txtCheckATEZMRN._Prozent = False
- Me.txtCheckATEZMRN._ShortDateNew = False
- Me.txtCheckATEZMRN._ShortDateOnly = False
- Me.txtCheckATEZMRN._TimeOnly = False
- Me.txtCheckATEZMRN._TimeOnly_Seconds = False
- Me.txtCheckATEZMRN._value = ""
- Me.txtCheckATEZMRN._Waehrung = False
- Me.txtCheckATEZMRN._WaehrungZeichen = False
- Me.txtCheckATEZMRN.ForeColor = System.Drawing.Color.Black
- Me.txtCheckATEZMRN.Location = New System.Drawing.Point(548, 272)
- Me.txtCheckATEZMRN.MaxLength = 18
- Me.txtCheckATEZMRN.MaxLineLength = -1
- Me.txtCheckATEZMRN.MaxLines_Warning = ""
- Me.txtCheckATEZMRN.MaxLines_Warning_Label = Nothing
- Me.txtCheckATEZMRN.Name = "txtCheckATEZMRN"
- Me.txtCheckATEZMRN.Size = New System.Drawing.Size(185, 20)
- Me.txtCheckATEZMRN.TabIndex = 139
- '
- 'datTranscodeBis
- '
- Me.datTranscodeBis._DateTimeOnly = False
- Me.datTranscodeBis._numbersOnly = False
- Me.datTranscodeBis._numbersOnlyKommastellen = ""
- Me.datTranscodeBis._numbersOnlyTrennzeichen = True
- Me.datTranscodeBis._Prozent = False
- Me.datTranscodeBis._ShortDateNew = True
- Me.datTranscodeBis._ShortDateOnly = False
- Me.datTranscodeBis._TimeOnly = False
- Me.datTranscodeBis._TimeOnly_Seconds = False
- Me.datTranscodeBis._value = ""
- Me.datTranscodeBis._Waehrung = False
- Me.datTranscodeBis._WaehrungZeichen = True
- Me.datTranscodeBis.ForeColor = System.Drawing.Color.Black
- Me.datTranscodeBis.Location = New System.Drawing.Point(646, 245)
- Me.datTranscodeBis.MaxLength = 10
- Me.datTranscodeBis.MaxLineLength = -1
- Me.datTranscodeBis.MaxLines_Warning = ""
- Me.datTranscodeBis.MaxLines_Warning_Label = Nothing
- Me.datTranscodeBis.Name = "datTranscodeBis"
- Me.datTranscodeBis.Size = New System.Drawing.Size(87, 20)
- Me.datTranscodeBis.TabIndex = 143
- '
- 'datTranscodeVon
- '
- Me.datTranscodeVon._DateTimeOnly = False
- Me.datTranscodeVon._numbersOnly = False
- Me.datTranscodeVon._numbersOnlyKommastellen = ""
- Me.datTranscodeVon._numbersOnlyTrennzeichen = True
- Me.datTranscodeVon._Prozent = False
- Me.datTranscodeVon._ShortDateNew = True
- Me.datTranscodeVon._ShortDateOnly = False
- Me.datTranscodeVon._TimeOnly = False
- Me.datTranscodeVon._TimeOnly_Seconds = False
- Me.datTranscodeVon._value = ""
- Me.datTranscodeVon._Waehrung = False
- Me.datTranscodeVon._WaehrungZeichen = True
- Me.datTranscodeVon.ForeColor = System.Drawing.Color.Black
- Me.datTranscodeVon.Location = New System.Drawing.Point(548, 245)
- Me.datTranscodeVon.MaxLength = 10
- Me.datTranscodeVon.MaxLineLength = -1
- Me.datTranscodeVon.MaxLines_Warning = ""
- Me.datTranscodeVon.MaxLines_Warning_Label = Nothing
- Me.datTranscodeVon.Name = "datTranscodeVon"
- Me.datTranscodeVon.Size = New System.Drawing.Size(87, 20)
- Me.datTranscodeVon.TabIndex = 142
- '
- '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(168, 152)
- 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
- '
- '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(168, 180)
- 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
- '
- 'txtIDSYear
- '
- Me.txtIDSYear._DateTimeOnly = False
- Me.txtIDSYear._numbersOnly = True
- Me.txtIDSYear._numbersOnlyKommastellen = ""
- Me.txtIDSYear._numbersOnlyTrennzeichen = False
- Me.txtIDSYear._Prozent = False
- Me.txtIDSYear._ShortDateNew = False
- Me.txtIDSYear._ShortDateOnly = False
- Me.txtIDSYear._TimeOnly = False
- Me.txtIDSYear._TimeOnly_Seconds = False
- Me.txtIDSYear._value = ""
- Me.txtIDSYear._Waehrung = False
- Me.txtIDSYear._WaehrungZeichen = True
- Me.txtIDSYear.BackColor = System.Drawing.SystemColors.Window
- Me.txtIDSYear.ForeColor = System.Drawing.Color.Red
- Me.txtIDSYear.Location = New System.Drawing.Point(12, 61)
- Me.txtIDSYear.MaxLength = 10
- Me.txtIDSYear.MaxLineLength = -1
- Me.txtIDSYear.MaxLines_Warning = ""
- Me.txtIDSYear.MaxLines_Warning_Label = Nothing
- Me.txtIDSYear.Name = "txtIDSYear"
- Me.txtIDSYear.Size = New System.Drawing.Size(66, 20)
- Me.txtIDSYear.TabIndex = 155
- Me.txtIDSYear.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
- '
- '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(41, 207)
- 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
- '
- '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(30, 156)
- Me.cbxMSEBatchNr.Name = "cbxMSEBatchNr"
- Me.cbxMSEBatchNr.Size = New System.Drawing.Size(44, 21)
- Me.cbxMSEBatchNr.TabIndex = 122
- '
- '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(81, 156)
- 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
- '
- '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(177, 207)
- 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
- '
- 'cbxRMC
- '
- Me.cbxRMC._allowedValuesFreiText = Nothing
- Me.cbxRMC._allowFreiText = False
- Me.cbxRMC._value = ""
- Me.cbxRMC.FormattingEnabled = True
- Me.cbxRMC.Location = New System.Drawing.Point(13, 115)
- Me.cbxRMC.Name = "cbxRMC"
- Me.cbxRMC.Size = New System.Drawing.Size(80, 21)
- Me.cbxRMC.TabIndex = 90
- '
- '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(58, 113)
- 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
- '
- 'txtUTADate
- '
- Me.txtUTADate._DateTimeOnly = False
- Me.txtUTADate._numbersOnly = False
- Me.txtUTADate._numbersOnlyKommastellen = ""
- Me.txtUTADate._numbersOnlyTrennzeichen = False
- Me.txtUTADate._Prozent = False
- Me.txtUTADate._ShortDateNew = False
- Me.txtUTADate._ShortDateOnly = True
- Me.txtUTADate._TimeOnly = False
- Me.txtUTADate._TimeOnly_Seconds = False
- Me.txtUTADate._value = ""
- Me.txtUTADate._Waehrung = False
- Me.txtUTADate._WaehrungZeichen = True
- Me.txtUTADate.BackColor = System.Drawing.SystemColors.Window
- Me.txtUTADate.ForeColor = System.Drawing.Color.Red
- Me.txtUTADate.Location = New System.Drawing.Point(17, 215)
- Me.txtUTADate.MaxLength = 10
- Me.txtUTADate.MaxLineLength = -1
- Me.txtUTADate.MaxLines_Warning = ""
- Me.txtUTADate.MaxLines_Warning_Label = Nothing
- Me.txtUTADate.Name = "txtUTADate"
- Me.txtUTADate.Size = New System.Drawing.Size(66, 20)
- Me.txtUTADate.TabIndex = 156
- Me.txtUTADate.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
- '
- 'txtPloseJahr
- '
- Me.txtPloseJahr._DateTimeOnly = False
- Me.txtPloseJahr._numbersOnly = True
- Me.txtPloseJahr._numbersOnlyKommastellen = ""
- Me.txtPloseJahr._numbersOnlyTrennzeichen = False
- Me.txtPloseJahr._Prozent = False
- Me.txtPloseJahr._ShortDateNew = False
- Me.txtPloseJahr._ShortDateOnly = False
- Me.txtPloseJahr._TimeOnly = False
- Me.txtPloseJahr._TimeOnly_Seconds = False
- Me.txtPloseJahr._value = ""
- Me.txtPloseJahr._Waehrung = False
- Me.txtPloseJahr._WaehrungZeichen = False
- Me.txtPloseJahr.BackColor = System.Drawing.SystemColors.Window
- Me.txtPloseJahr.ForeColor = System.Drawing.Color.Red
- Me.txtPloseJahr.Location = New System.Drawing.Point(83, 146)
- Me.txtPloseJahr.MaxLength = 10
- Me.txtPloseJahr.MaxLineLength = -1
- Me.txtPloseJahr.MaxLines_Warning = ""
- Me.txtPloseJahr.MaxLines_Warning_Label = Nothing
- Me.txtPloseJahr.Name = "txtPloseJahr"
- Me.txtPloseJahr.Size = New System.Drawing.Size(66, 20)
- Me.txtPloseJahr.TabIndex = 158
- Me.txtPloseJahr.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
- '
- 'txtPLoseKdNr
- '
- Me.txtPLoseKdNr._DateTimeOnly = False
- Me.txtPLoseKdNr._numbersOnly = True
- Me.txtPLoseKdNr._numbersOnlyKommastellen = ""
- Me.txtPLoseKdNr._numbersOnlyTrennzeichen = False
- Me.txtPLoseKdNr._Prozent = False
- Me.txtPLoseKdNr._ShortDateNew = False
- Me.txtPLoseKdNr._ShortDateOnly = False
- Me.txtPLoseKdNr._TimeOnly = False
- Me.txtPLoseKdNr._TimeOnly_Seconds = False
- Me.txtPLoseKdNr._value = ""
- Me.txtPLoseKdNr._Waehrung = False
- Me.txtPLoseKdNr._WaehrungZeichen = False
- Me.txtPLoseKdNr.BackColor = System.Drawing.SystemColors.Window
- Me.txtPLoseKdNr.ForeColor = System.Drawing.Color.Red
- Me.txtPLoseKdNr.Location = New System.Drawing.Point(83, 169)
- Me.txtPLoseKdNr.MaxLength = 10
- Me.txtPLoseKdNr.MaxLineLength = -1
- Me.txtPLoseKdNr.MaxLines_Warning = ""
- Me.txtPLoseKdNr.MaxLines_Warning_Label = Nothing
- Me.txtPLoseKdNr.Name = "txtPLoseKdNr"
- Me.txtPLoseKdNr.Size = New System.Drawing.Size(66, 20)
- Me.txtPLoseKdNr.TabIndex = 162
- Me.txtPLoseKdNr.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
- '
- '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(77, 69)
- 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
- '
- 'dgv_MDMEinarbeitung
- '
- Me.dgv_MDMEinarbeitung.AKTUALISIERUNGS_INTERVALL = -1
- Me.dgv_MDMEinarbeitung.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
- Me.dgv_MDMEinarbeitung.Location = New System.Drawing.Point(13, 35)
- Me.dgv_MDMEinarbeitung.Name = "dgv_MDMEinarbeitung"
- Me.dgv_MDMEinarbeitung.Size = New System.Drawing.Size(458, 170)
- Me.dgv_MDMEinarbeitung.TabIndex = 0
- '
- 'txtWartungFaelligkeitAbDat
- '
- Me.txtWartungFaelligkeitAbDat._DateTimeOnly = False
- Me.txtWartungFaelligkeitAbDat._numbersOnly = False
- Me.txtWartungFaelligkeitAbDat._numbersOnlyKommastellen = ""
- Me.txtWartungFaelligkeitAbDat._numbersOnlyTrennzeichen = True
- Me.txtWartungFaelligkeitAbDat._Prozent = False
- Me.txtWartungFaelligkeitAbDat._ShortDateNew = True
- Me.txtWartungFaelligkeitAbDat._ShortDateOnly = False
- Me.txtWartungFaelligkeitAbDat._TimeOnly = False
- Me.txtWartungFaelligkeitAbDat._TimeOnly_Seconds = False
- Me.txtWartungFaelligkeitAbDat._value = ""
- Me.txtWartungFaelligkeitAbDat._Waehrung = False
- Me.txtWartungFaelligkeitAbDat._WaehrungZeichen = True
- Me.txtWartungFaelligkeitAbDat.ForeColor = System.Drawing.Color.Red
- Me.txtWartungFaelligkeitAbDat.Location = New System.Drawing.Point(75, 76)
- Me.txtWartungFaelligkeitAbDat.MaxLength = 10
- Me.txtWartungFaelligkeitAbDat.MaxLineLength = -1
- Me.txtWartungFaelligkeitAbDat.MaxLines_Warning = ""
- Me.txtWartungFaelligkeitAbDat.MaxLines_Warning_Label = Nothing
- Me.txtWartungFaelligkeitAbDat.Name = "txtWartungFaelligkeitAbDat"
- Me.txtWartungFaelligkeitAbDat.Size = New System.Drawing.Size(101, 20)
- Me.txtWartungFaelligkeitAbDat.TabIndex = 141
- '
- 'txtCSDate
- '
- Me.txtCSDate._DateTimeOnly = False
- Me.txtCSDate._numbersOnly = False
- Me.txtCSDate._numbersOnlyKommastellen = ""
- Me.txtCSDate._numbersOnlyTrennzeichen = False
- Me.txtCSDate._Prozent = False
- Me.txtCSDate._ShortDateNew = False
- Me.txtCSDate._ShortDateOnly = True
- Me.txtCSDate._TimeOnly = False
- Me.txtCSDate._TimeOnly_Seconds = False
- Me.txtCSDate._value = ""
- Me.txtCSDate._Waehrung = False
- Me.txtCSDate._WaehrungZeichen = True
- Me.txtCSDate.BackColor = System.Drawing.SystemColors.Window
- Me.txtCSDate.Enabled = False
- Me.txtCSDate.ForeColor = System.Drawing.Color.Red
- Me.txtCSDate.Location = New System.Drawing.Point(96, 174)
- Me.txtCSDate.MaxLength = 10
- Me.txtCSDate.MaxLineLength = -1
- Me.txtCSDate.MaxLines_Warning = ""
- Me.txtCSDate.MaxLines_Warning_Label = Nothing
- Me.txtCSDate.Name = "txtCSDate"
- Me.txtCSDate.Size = New System.Drawing.Size(66, 20)
- Me.txtCSDate.TabIndex = 157
- Me.txtCSDate.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
- '
- '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, 156)
- 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
@@ -5244,6 +5260,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
@@ -5251,17 +5279,15 @@ Partial Class frmStartOptions
Me.DataGridViewTextBoxColumn1.MinimumWidth = 8
Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
'
- 'Button31
+ 'cbxZugferdAufDeveloper
'
- Me.Button31.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.Button31.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
- Me.Button31.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.Button31.Location = New System.Drawing.Point(14, 358)
- Me.Button31.Name = "Button31"
- Me.Button31.Size = New System.Drawing.Size(123, 24)
- Me.Button31.TabIndex = 161
- Me.Button31.Text = "Status Updaten"
- Me.Button31.UseVisualStyleBackColor = True
+ Me.cbxZugferdAufDeveloper.AutoSize = True
+ Me.cbxZugferdAufDeveloper.Location = New System.Drawing.Point(996, 246)
+ Me.cbxZugferdAufDeveloper.Name = "cbxZugferdAufDeveloper"
+ Me.cbxZugferdAufDeveloper.Size = New System.Drawing.Size(74, 17)
+ Me.cbxZugferdAufDeveloper.TabIndex = 149
+ Me.cbxZugferdAufDeveloper.Text = "UNISPED"
+ Me.cbxZugferdAufDeveloper.UseVisualStyleBackColor = True
'
'frmStartOptions
'
@@ -5305,6 +5331,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.Panel1.ResumeLayout(False)
@@ -5333,6 +5360,7 @@ Partial Class frmStartOptions
Me.TabPage8.ResumeLayout(False)
Me.TabPage8.PerformLayout()
CType(Me.PictureBox27, System.ComponentModel.ISupportInitialize).EndInit()
+ CType(Me.dgv_MDMEinarbeitung, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPage6.ResumeLayout(False)
Me.TabPage6.PerformLayout()
Me.TabPage7.ResumeLayout(False)
@@ -5341,8 +5369,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()
- CType(Me.dgv_MDMEinarbeitung, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
@@ -5716,4 +5742,6 @@ Partial Class frmStartOptions
Friend WithEvents Label56 As Label
Friend WithEvents MyTextBox5 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents Button31 As Button
+ Friend WithEvents Button32 As Button
+ Friend WithEvents cbxZugferdAufDeveloper As CheckBox
End Class
diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb
index c551f11..5b58440 100644
--- a/initATLASAufschubkonten/frmStartOptions.vb
+++ b/initATLASAufschubkonten/frmStartOptions.vb
@@ -6,6 +6,7 @@ Imports System.Security.Cryptography.X509Certificates
Imports System.Text
Imports System.Threading
Imports System.Xml
+Imports iTextSharp.text
Imports javax
Imports MDM_Worker
Imports Renci.SshNet
@@ -3512,7 +3513,7 @@ Public Class frmStartOptions
' Datei hochladen
Using fileStream As New FileStream(localFilePath, FileMode.Open)
- sftpClient.UploadFile(fileStream, remoteDirectory & Path.GetFileName(localFilePath))
+ sftpClient.UploadFile(fileStream, remoteDirectory & System.IO.Path.GetFileName(localFilePath))
End Using
Console.WriteLine("Datei erfolgreich hochgeladen!")
@@ -8132,4 +8133,335 @@ repeatRequest:
End Sub
-End Class
\ No newline at end of file
+
+
+ Private Function checkZugferd(sendNotificationEmails As Boolean) As Boolean
+
+ VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
+
+ Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+
+ 'aktuell verwendet Verag360 kein Zugferd und Sammelrechnung 6 geht aktuell noch nicht...
+
+ Dim dt As DataTable = SQL.loadDgvBySql("SELECT RK_ID, dsId, Firma_ID, RechnungsNr FROM [Rechnungsausgang] where RK_ID = 2923288 ", "FMZOLL", 100, False)
+
+ Dim sumTotal_IMEX As Integer = 0
+ Dim sumTotal_VERAG As Integer = 0
+ Dim sumTotal_CS As Integer = 0
+ Dim sumTotal_US As Integer = 0
+ Dim sumTotal_AMBAR As Integer = 0
+ Dim sumTotal_ATILLA As Integer = 0
+ Dim sumTotal_360 As Integer = 0
+
+ Dim sumvalid_IMEX As Integer = 0
+ Dim sumvalid_VERAG As Integer = 0
+ Dim sumvalid_CS As Integer = 0
+ Dim sumvalid_US As Integer = 0
+ Dim sumvalid_AMBAR As Integer = 0
+ Dim sumvalid_ATILLA As Integer = 0
+ Dim sumvalid_360 As Integer = 0
+
+ Dim sumInvalid_IMEX As Integer = 0
+ Dim sumInvalid_VERAG As Integer = 0
+ Dim sumInvalid_CS As Integer = 0
+ Dim sumInvalid_US As Integer = 0
+ Dim sumInvalid_AMBAR As Integer = 0
+ Dim sumInvalid_ATILLA As Integer = 0
+ Dim sumInvalid_360 As Integer = 0
+
+ Dim sumInvalid_Total As Integer = 0
+ Dim sumvalid_Total As Integer = 0
+ Dim sumTotal_Total As Integer = 0
+
+ Dim dtVerag As DataTable = dt.Clone()
+ Dim dtIMEX As DataTable = dt.Clone()
+ Dim dtAMBAR As DataTable = dt.Clone()
+ Dim dtUNISPED As DataTable = dt.Clone()
+ Dim dtCS As DataTable = dt.Clone()
+ Dim dtATILLA As DataTable = dt.Clone()
+ Dim dt360 As DataTable = dt.Clone()
+
+
+
+
+ For Each row In dt.Rows
+
+ Dim rkObj As Object = row("RK_ID")
+ Dim dsObj As Object = row("dsId")
+
+ If rkObj IsNot DBNull.Value AndAlso dsObj IsNot DBNull.Value Then
+
+ Dim rkId As Integer
+ Dim dsId As Integer
+
+ If Integer.TryParse(rkObj.ToString(), rkId) AndAlso
+ Integer.TryParse(dsObj.ToString(), dsId) AndAlso
+ dsId > 0 Then
+
+ Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER(dsId)
+ Dim Path As String = DS.GET_TOP1_PATH()
+ If Path <> "" And System.IO.File.Exists(Path) Then
+
+ Try
+
+ Dim psi As New ProcessStartInfo()
+
+ 'psi.FileName = "C:\Program Files\Eclipse Adoptium\jre-11.0.28.6-hotspot\bin\java.exe"
+ 'psi.Arguments = "-jar ""C:\Users\d.breimaier\Downloads\Mustang-CLI-2.21.0.jar"" --no-notices --action validate --source " & Path & ""
+
+ Dim Paramslist As New cParameterList(VERAG_PROG_ALLGEMEIN.cAllgemein.PROGID)
+ psi.FileName = Paramslist.GET_PARAMETER_VALUE("ZUGFeRD_Check_Pfad_JAVA")
+ psi.Arguments = Paramslist.GET_PARAMETER_VALUE("ZUGFeRD_Check_Pfad_CMD") & Path
+
+
+ 'psi.FileName = "C:\Program Files (x86)\Java\jre1.8.0_491\bin\java.exe"
+ 'psi.Arguments = "-jar ""C:\Verag\Mustang-CLI-2.21.0.jar"" --no-notices --action validate --source " & Path & ""
+
+
+ psi.RedirectStandardOutput = True
+ psi.RedirectStandardError = True
+ psi.UseShellExecute = False
+ psi.CreateNoWindow = True
+
+ Using p As Process = Process.Start(psi)
+ Dim output = p.StandardOutput.ReadToEnd()
+ Dim err = p.StandardError.ReadToEnd()
+ p.WaitForExit()
+
+ If output <> "" Then
+ Dim tmpPath_Report = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath("MUSTANG-REPORT_" & rkObj, ".pdf", , False)
+ Dim PruefungOK = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.CreateValidationPdf(output, Path, rkId, tmpPath_Report)
+ If tmpPath_Report <> "" Then
+ 'Process.Start(tmpPath_Report)
+
+ Dim fileInfo_ZP As New FileInfo(tmpPath_Report)
+ Dim ZUGF_DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "ZUGFERD", Now().Year, "", "", fileInfo_ZP.Name, -1, False)
+ ZUGF_DS.uploadDataToDATENSERVER(tmpPath_Report, fileInfo_ZP.Name, fileInfo_ZP.Extension,,,, True)
+ SQL.doSQL("Update [Rechnungsausgang] SET zugferdcheck_datetime=getDate(),zugferdcheck = " & IIf(PruefungOK, "1", "0") & ", zugferdcheck_daid = " & ZUGF_DS.da_id & " where RK_ID = " & rkId, "FMZOLL")
+
+
+ Select Case row("Firma_ID")
+ Case 11
+ sumTotal_CS += 1
+ If PruefungOK Then
+ sumvalid_CS += 1
+ Else
+ sumInvalid_CS += 1
+
+ dtCS.ImportRow(row)
+ End If
+ Case 24
+ sumTotal_AMBAR += 1
+
+ If PruefungOK Then
+ sumvalid_AMBAR += 1
+ Else
+ sumInvalid_AMBAR += 1
+ dtAMBAR.ImportRow(row)
+ End If
+
+ Case 21, 22, 23
+ sumTotal_US += 1
+ If PruefungOK Then
+ sumvalid_US += 1
+ Else
+ sumInvalid_US += 1
+ dtUNISPED.ImportRow(row)
+ End If
+
+ Case 20
+ sumTotal_IMEX += 1
+ If PruefungOK Then
+ sumvalid_IMEX += 1
+ Else
+ sumInvalid_IMEX += 1
+ dtIMEX.ImportRow(row)
+ End If
+
+ Case 19
+ sumTotal_360 += 1
+ If PruefungOK Then
+ sumvalid_360 += 1
+ Else
+ sumInvalid_360 += 1
+ dt360.ImportRow(row)
+ End If
+
+ Case 7
+ sumTotal_ATILLA += 1
+ If PruefungOK Then
+ sumvalid_ATILLA += 1
+ Else
+ sumInvalid_ATILLA += 1
+ dtATILLA.ImportRow(row)
+ End If
+ Case Else
+ sumTotal_VERAG += 1
+ If PruefungOK Then
+ sumvalid_VERAG += 1
+ Else
+ sumInvalid_VERAG += 1
+ dtVerag.ImportRow(row)
+ End If
+
+
+ End Select
+
+ End If
+ End If
+
+
+ End Using
+
+ Catch ex As Exception
+ VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
+ Return False
+ End Try
+
+ End If
+
+ End If
+
+ End If
+
+ Next
+
+
+ If dt.Rows.Count > 0 Then
+
+ If Not sendNotificationEmails Then
+ 'VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dt,,,,, True,,, True)
+ Else
+
+
+ Dim Betreff = "ZUGFeRD-CHECK"
+
+ 'hier ungültigen Prüfungen pro Firma
+
+ If dtVerag.Rows.Count > 0 Then
+ Dim empfaneger = cMitarbeiter.GetEMailRecipientForEmailNotification("ZUGFERD-Check")
+ If empfaneger <> "" Then
+ Dim path = VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dtVerag,,,,, False,,, True)
+ Dim anhenge As New List(Of String)
+ anhenge.Add(path)
+ VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail(empfaneger, IIf(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, "TEST-", "") & Betreff & " VERAG", createMailTextZugferd(sumTotal_VERAG, sumvalid_VERAG, sumInvalid_VERAG, "VERAG"),, True, False,,, anhenge)
+ End If
+ End If
+
+ If dtIMEX.Rows.Count > 0 Then
+ Dim empfaneger = cMitarbeiter.GetEMailRecipientForEmailNotification("ZUGFERD-Check")
+ If empfaneger <> "" Then
+ Dim path = VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dtIMEX,,,,, False,,, True)
+ Dim anhenge As New List(Of String)
+ anhenge.Add(path)
+ VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail(empfaneger, IIf(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, "TEST-", "") & Betreff & " IMEX", createMailTextZugferd(sumTotal_IMEX, sumvalid_IMEX, sumInvalid_IMEX, "IMEX"),, True, False,,, anhenge)
+ End If
+ End If
+
+ If dtAMBAR.Rows.Count > 0 Then
+ Dim empfaneger = cMitarbeiter.GetEMailRecipientForEmailNotification("ZUGFERD-Check")
+ If empfaneger <> "" Then
+ Dim path = VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dtAMBAR,,,,, False,,, True)
+ Dim anhenge As New List(Of String)
+ anhenge.Add(path)
+ VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail(empfaneger, IIf(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, "TEST-", "") & Betreff & " AMBAR", createMailTextZugferd(sumTotal_AMBAR, sumvalid_AMBAR, sumInvalid_AMBAR, "AMBAR"),, True, False,,, anhenge)
+ End If
+ End If
+
+ If dtUNISPED.Rows.Count > 0 Then
+ Dim empfaneger = cMitarbeiter.GetEMailRecipientForEmailNotification("ZUGFERD-Check")
+ If empfaneger <> "" Then
+ Dim path = VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dtUNISPED,,,,, False,,, True)
+ Dim anhenge As New List(Of String)
+ anhenge.Add(path)
+ VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail(empfaneger, IIf(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, "TEST-", "") & Betreff & " UNISPED", createMailTextZugferd(sumTotal_US, sumvalid_US, sumInvalid_US, "UNISPED"),, True, False,,, anhenge)
+ End If
+ End If
+
+ If dtATILLA.Rows.Count > 0 Then
+ Dim empfaneger = cMitarbeiter.GetEMailRecipientForEmailNotification("ZUGFERD-Check")
+ If empfaneger <> "" Then
+ Dim path = VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dtATILLA,,,,, False,,, True)
+ Dim anhenge As New List(Of String)
+ anhenge.Add(path)
+ VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail(empfaneger, IIf(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, "TEST-", "") & Betreff & " ATILLA", createMailTextZugferd(sumTotal_ATILLA, sumvalid_ATILLA, sumInvalid_ATILLA, "ATILLA"),, True, False,,, anhenge)
+ End If
+ End If
+
+ If dt360.Rows.Count > 0 Then
+ Dim empfaneger = cMitarbeiter.GetEMailRecipientForEmailNotification("ZUGFERD-Check")
+ If empfaneger <> "" Then
+ Dim path = VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dt360,,,,, False,,, True)
+ Dim anhenge As New List(Of String)
+ anhenge.Add(path)
+ VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail(empfaneger, IIf(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, "TEST-", "") & Betreff & " VERAG 360", createMailTextZugferd(sumTotal_360, sumvalid_360, sumInvalid_360, "VERAG 360"),, True, False,,, anhenge)
+ End If
+ End If
+
+ If dtCS.Rows.Count > 0 Then
+ Dim empfaneger = cMitarbeiter.GetEMailRecipientForEmailNotification("ZUGFERD-Check")
+ If empfaneger <> "" Then
+ Dim path = VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dtCS,,,,, False,,, True)
+ Dim anhenge As New List(Of String)
+ anhenge.Add(path)
+ VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail(empfaneger, IIf(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, "TEST-", "") & Betreff & "VERAG CS", createMailTextZugferd(sumTotal_CS, sumvalid_CS, sumInvalid_CS, "VERAG CS"),, True, False,,, anhenge)
+ End If
+ End If
+
+
+ 'hier alle Prüfungen
+
+ Dim empfanegerALL = cMitarbeiter.GetEMailRecipientForEmailNotification("ZUGFERD-Check")
+ If empfanegerALL <> "" Then
+
+ sumTotal_Total = sumTotal_VERAG + sumTotal_ATILLA + sumTotal_AMBAR + sumTotal_360 + sumTotal_CS + sumTotal_IMEX + sumTotal_US
+ sumInvalid_Total = sumInvalid_VERAG + sumInvalid_ATILLA + sumInvalid_AMBAR + sumInvalid_360 + sumInvalid_CS + sumInvalid_IMEX + sumInvalid_US
+ sumvalid_Total = sumvalid_VERAG + sumvalid_ATILLA + sumvalid_AMBAR + sumvalid_360 + sumvalid_CS + sumvalid_IMEX + sumvalid_US
+
+ VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail(empfanegerALL, IIf(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, "TEST-", "") & Betreff & " ALL", createMailTextZugferd(sumTotal_Total, sumvalid_Total, sumInvalid_Total, "ALL"),, True, False)
+ End If
+
+ End If
+
+ End If
+
+
+
+
+ Return True
+
+
+ End Function
+
+ Private Function createMailTextZugferd(total As Integer, valid As Integer, invalid As Integer, Firma As String) As String
+
+ Dim MailText = "Auflistung der gültigen/ungültigen ZUGFeRD-Prüfungen vom " & Now.ToShortDateString & " für " & Firma & "
"
+ MailText &= "
| Gültig | Ungültig | Gesamt |
| " & valid & " | " + MailText &= "" & invalid & " | " + MailText &= "" & total & " | " + MailText &= "