StartOpt Einarbeitung InvoicesToCustomer, fix von tc_anmeldung, etc.

2026-03-26 08:53:39 +01:00
parent c6d3fea004
commit acba79c48d
4 changed files with 281 additions and 155 deletions
--- a/DAKOSY_Worker/cImporter_TelotecToVERAG.vb
+++ b/DAKOSY_Worker/cImporter_TelotecToVERAG.vb
@@ -169,13 +169,13 @@ Public Class cImporter_TelotecToVERAG
                    For Each doc In p.DOC_CERTS
                    Try

-                        Dim dd As New cVERAG_CustomsDeclarations_Document With {
+                            Dim dd As New cVERAG_CustomsDeclarations_Document With {
                                .zaDoc_ItemId = Nothing,
                                .zaDoc_Code = ToStringSafe(doc.DocCerts_DocCd),
                                .zaDoc_Reference = ToStringSafe(doc.DocCerts_DRef),
-                                .zaDoc_Date = ToNullableDate(doc.DocCerts_IssD)
+                                .zaDoc_Date = If(doc.DocCerts_IssD IsNot Nothing, ToNullableDate(doc.DocCerts_IssD), Nothing)'ToNullableDate(doc.DocCerts_IssD)
                            }
-                        it.Documents.Add(dd)
+                            it.Documents.Add(dd)
                    Catch ex As Exception
                        cErrorHandler.ERR(ex.Message, ex.StackTrace, MethodInfo.GetCurrentMethod.Name)
                    End Try
--- a/initATLASAufschubkonten/frmStartOptions.Designer.vb
+++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb
@@ -226,7 +226,7 @@ Partial Class frmStartOptions
        Me.IDS = New System.Windows.Forms.TabPage()
        Me.lblIDS_plauscheck = New System.Windows.Forms.LinkLabel()
        Me.Label59 = New System.Windows.Forms.Label()
-        Me.Label55 = New System.Windows.Forms.Label()
+        Me.lblOriginalRechnungIDS = New System.Windows.Forms.Label()
        Me.Label54 = New System.Windows.Forms.Label()
        Me.Label53 = New System.Windows.Forms.Label()
        Me.lbl_setBackToCustomerIDS = New System.Windows.Forms.LinkLabel()
@@ -242,7 +242,9 @@ Partial Class frmStartOptions
        Me.TextBox3 = New System.Windows.Forms.TextBox()
        Me.txtIDSYear = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.MSE = New System.Windows.Forms.TabPage()
-        Me.Label56 = New System.Windows.Forms.Label()
+        Me.LinkLabel25 = New System.Windows.Forms.LinkLabel()
+        Me.Label61 = New System.Windows.Forms.Label()
+        Me.lblOriginalRechnungMSE = New System.Windows.Forms.Label()
        Me.lblBackToCustomer_MSE = New System.Windows.Forms.LinkLabel()
        Me.Label33 = New System.Windows.Forms.Label()
        Me.Label36 = New System.Windows.Forms.Label()
@@ -271,7 +273,7 @@ Partial Class frmStartOptions
        Me.txtBatchNrofTransaction = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.RMC = New System.Windows.Forms.TabPage()
        Me.Label58 = New System.Windows.Forms.Label()
-        Me.Label57 = New System.Windows.Forms.Label()
+        Me.lblOriginalRechnungRMC = New System.Windows.Forms.Label()
        Me.lblBackToCustomer_RMC = New System.Windows.Forms.LinkLabel()
        Me.LinkLabel53 = New System.Windows.Forms.LinkLabel()
        Me.Label29 = New System.Windows.Forms.Label()
@@ -382,8 +384,11 @@ Partial Class frmStartOptions
        Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.Button21 = New System.Windows.Forms.Button()
        Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.Label61 = New System.Windows.Forms.Label()
-        Me.LinkLabel25 = New System.Windows.Forms.LinkLabel()
+        Me.Label62 = New System.Windows.Forms.Label()
+        Me.Label63 = New System.Windows.Forms.Label()
+        Me.lblOriginalRechnungPLOSE = New System.Windows.Forms.Label()
+        Me.Label65 = New System.Windows.Forms.Label()
+        Me.lblOriginalRechnungUTA = New System.Windows.Forms.Label()
        Me.pnl.SuspendLayout()
        CType(Me.pbEmailscheck, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.PictureBox24, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -2959,7 +2964,7 @@ Partial Class frmStartOptions
        'Label23
        '
        Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label23.Location = New System.Drawing.Point(19, 128)
+        Me.Label23.Location = New System.Drawing.Point(19, 129)
        Me.Label23.Name = "Label23"
        Me.Label23.Size = New System.Drawing.Size(111, 19)
        Me.Label23.TabIndex = 33
@@ -3066,7 +3071,7 @@ Partial Class frmStartOptions
        '
        Me.IDS.Controls.Add(Me.lblIDS_plauscheck)
        Me.IDS.Controls.Add(Me.Label59)
-        Me.IDS.Controls.Add(Me.Label55)
+        Me.IDS.Controls.Add(Me.lblOriginalRechnungIDS)
        Me.IDS.Controls.Add(Me.Label54)
        Me.IDS.Controls.Add(Me.Label53)
        Me.IDS.Controls.Add(Me.lbl_setBackToCustomerIDS)
@@ -3093,7 +3098,7 @@ Partial Class frmStartOptions
        '
        Me.lblIDS_plauscheck.AutoSize = True
        Me.lblIDS_plauscheck.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.lblIDS_plauscheck.Location = New System.Drawing.Point(9, 251)
+        Me.lblIDS_plauscheck.Location = New System.Drawing.Point(7, 265)
        Me.lblIDS_plauscheck.Name = "lblIDS_plauscheck"
        Me.lblIDS_plauscheck.Size = New System.Drawing.Size(220, 13)
        Me.lblIDS_plauscheck.TabIndex = 176
@@ -3104,27 +3109,27 @@ Partial Class frmStartOptions
        '
        Me.Label59.AutoSize = True
        Me.Label59.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label59.Location = New System.Drawing.Point(9, 227)
+        Me.Label59.Location = New System.Drawing.Point(7, 241)
        Me.Label59.Name = "Label59"
        Me.Label59.Size = New System.Drawing.Size(118, 13)
        Me.Label59.TabIndex = 175
        Me.Label59.Text = "Plausibilitäts-Check"
        '
-        'Label55
+        'lblOriginalRechnungIDS
        '
-        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(248, 166)
-        Me.Label55.Name = "Label55"
-        Me.Label55.Size = New System.Drawing.Size(126, 13)
-        Me.Label55.TabIndex = 174
-        Me.Label55.Text = "Original-Rechnungen"
+        Me.lblOriginalRechnungIDS.AutoSize = True
+        Me.lblOriginalRechnungIDS.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblOriginalRechnungIDS.Location = New System.Drawing.Point(214, 31)
+        Me.lblOriginalRechnungIDS.Name = "lblOriginalRechnungIDS"
+        Me.lblOriginalRechnungIDS.Size = New System.Drawing.Size(126, 13)
+        Me.lblOriginalRechnungIDS.TabIndex = 174
+        Me.lblOriginalRechnungIDS.Text = "Original-Rechnungen"
        '
        'Label54
        '
        Me.Label54.AutoSize = True
        Me.Label54.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label54.Location = New System.Drawing.Point(9, 166)
+        Me.Label54.Location = New System.Drawing.Point(644, 32)
        Me.Label54.Name = "Label54"
        Me.Label54.Size = New System.Drawing.Size(213, 13)
        Me.Label54.TabIndex = 173
@@ -3134,7 +3139,7 @@ Partial Class frmStartOptions
        '
        Me.Label53.AutoSize = True
        Me.Label53.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label53.Location = New System.Drawing.Point(236, 26)
+        Me.Label53.Location = New System.Drawing.Point(6, 147)
        Me.Label53.Name = "Label53"
        Me.Label53.Size = New System.Drawing.Size(79, 13)
        Me.Label53.TabIndex = 172
@@ -3144,7 +3149,7 @@ Partial Class frmStartOptions
        '
        Me.lbl_setBackToCustomerIDS.AutoSize = True
        Me.lbl_setBackToCustomerIDS.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.lbl_setBackToCustomerIDS.Location = New System.Drawing.Point(248, 188)
+        Me.lbl_setBackToCustomerIDS.Location = New System.Drawing.Point(214, 53)
        Me.lbl_setBackToCustomerIDS.Name = "lbl_setBackToCustomerIDS"
        Me.lbl_setBackToCustomerIDS.Size = New System.Drawing.Size(123, 13)
        Me.lbl_setBackToCustomerIDS.TabIndex = 171
@@ -3155,7 +3160,7 @@ Partial Class frmStartOptions
        '
        Me.IDS_PDFmitREverkn.AutoSize = True
        Me.IDS_PDFmitREverkn.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.IDS_PDFmitREverkn.Location = New System.Drawing.Point(242, 96)
+        Me.IDS_PDFmitREverkn.Location = New System.Drawing.Point(11, 206)
        Me.IDS_PDFmitREverkn.Name = "IDS_PDFmitREverkn"
        Me.IDS_PDFmitREverkn.Size = New System.Drawing.Size(154, 13)
        Me.IDS_PDFmitREverkn.TabIndex = 170
@@ -3166,7 +3171,7 @@ Partial Class frmStartOptions
        '
        Me.IDSUpdateDAID.AutoSize = True
        Me.IDSUpdateDAID.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.IDSUpdateDAID.Location = New System.Drawing.Point(9, 188)
+        Me.IDSUpdateDAID.Location = New System.Drawing.Point(644, 54)
        Me.IDSUpdateDAID.Name = "IDSUpdateDAID"
        Me.IDSUpdateDAID.Size = New System.Drawing.Size(141, 13)
        Me.IDSUpdateDAID.TabIndex = 169
@@ -3209,7 +3214,7 @@ Partial Class frmStartOptions
        '
        Me.IDS_REDetails.AutoSize = True
        Me.IDS_REDetails.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.IDS_REDetails.Location = New System.Drawing.Point(240, 70)
+        Me.IDS_REDetails.Location = New System.Drawing.Point(11, 184)
        Me.IDS_REDetails.Name = "IDS_REDetails"
        Me.IDS_REDetails.Size = New System.Drawing.Size(176, 13)
        Me.IDS_REDetails.TabIndex = 165
@@ -3231,7 +3236,7 @@ Partial Class frmStartOptions
        '
        Me.IDS_RE.AutoSize = True
        Me.IDS_RE.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.IDS_RE.Location = New System.Drawing.Point(240, 52)
+        Me.IDS_RE.Location = New System.Drawing.Point(11, 166)
        Me.IDS_RE.Name = "IDS_RE"
        Me.IDS_RE.Size = New System.Drawing.Size(151, 13)
        Me.IDS_RE.TabIndex = 152
@@ -3290,7 +3295,7 @@ Partial Class frmStartOptions
        '
        Me.MSE.Controls.Add(Me.LinkLabel25)
        Me.MSE.Controls.Add(Me.Label61)
-        Me.MSE.Controls.Add(Me.Label56)
+        Me.MSE.Controls.Add(Me.lblOriginalRechnungMSE)
        Me.MSE.Controls.Add(Me.lblBackToCustomer_MSE)
        Me.MSE.Controls.Add(Me.Label33)
        Me.MSE.Controls.Add(Me.Label36)
@@ -3324,15 +3329,36 @@ Partial Class frmStartOptions
        Me.MSE.Text = "MSE"
        Me.MSE.UseVisualStyleBackColor = True
        '
-        'Label56
+        'LinkLabel25
        '
-        Me.Label56.AutoSize = True
-        Me.Label56.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label56.Location = New System.Drawing.Point(468, 40)
-        Me.Label56.Name = "Label56"
-        Me.Label56.Size = New System.Drawing.Size(126, 13)
-        Me.Label56.TabIndex = 173
-        Me.Label56.Text = "Original-Rechnungen"
+        Me.LinkLabel25.AutoSize = True
+        Me.LinkLabel25.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.LinkLabel25.Location = New System.Drawing.Point(275, 63)
+        Me.LinkLabel25.Name = "LinkLabel25"
+        Me.LinkLabel25.Size = New System.Drawing.Size(123, 13)
+        Me.LinkLabel25.TabIndex = 175
+        Me.LinkLabel25.TabStop = True
+        Me.LinkLabel25.Text = "Rechnungen importieren"
+        '
+        'Label61
+        '
+        Me.Label61.AutoSize = True
+        Me.Label61.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label61.Location = New System.Drawing.Point(275, 40)
+        Me.Label61.Name = "Label61"
+        Me.Label61.Size = New System.Drawing.Size(135, 13)
+        Me.Label61.TabIndex = 174
+        Me.Label61.Text = "Import PDF (alternativ)"
+        '
+        'lblOriginalRechnungMSE
+        '
+        Me.lblOriginalRechnungMSE.AutoSize = True
+        Me.lblOriginalRechnungMSE.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblOriginalRechnungMSE.Location = New System.Drawing.Point(468, 40)
+        Me.lblOriginalRechnungMSE.Name = "lblOriginalRechnungMSE"
+        Me.lblOriginalRechnungMSE.Size = New System.Drawing.Size(126, 13)
+        Me.lblOriginalRechnungMSE.TabIndex = 173
+        Me.lblOriginalRechnungMSE.Text = "Original-Rechnungen"
        '
        'lblBackToCustomer_MSE
        '
@@ -3658,7 +3684,7 @@ Partial Class frmStartOptions
        'RMC
        '
        Me.RMC.Controls.Add(Me.Label58)
-        Me.RMC.Controls.Add(Me.Label57)
+        Me.RMC.Controls.Add(Me.lblOriginalRechnungRMC)
        Me.RMC.Controls.Add(Me.lblBackToCustomer_RMC)
        Me.RMC.Controls.Add(Me.LinkLabel53)
        Me.RMC.Controls.Add(Me.Label29)
@@ -3678,27 +3704,27 @@ Partial Class frmStartOptions
        '
        Me.Label58.AutoSize = True
        Me.Label58.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label58.Location = New System.Drawing.Point(184, 39)
+        Me.Label58.Location = New System.Drawing.Point(7, 150)
        Me.Label58.Name = "Label58"
        Me.Label58.Size = New System.Drawing.Size(79, 13)
        Me.Label58.TabIndex = 175
        Me.Label58.Text = "Verarbeitung"
        '
-        'Label57
+        'lblOriginalRechnungRMC
        '
-        Me.Label57.AutoSize = True
-        Me.Label57.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label57.Location = New System.Drawing.Point(188, 97)
-        Me.Label57.Name = "Label57"
-        Me.Label57.Size = New System.Drawing.Size(126, 13)
-        Me.Label57.TabIndex = 174
-        Me.Label57.Text = "Original-Rechnungen"
+        Me.lblOriginalRechnungRMC.AutoSize = True
+        Me.lblOriginalRechnungRMC.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblOriginalRechnungRMC.Location = New System.Drawing.Point(208, 39)
+        Me.lblOriginalRechnungRMC.Name = "lblOriginalRechnungRMC"
+        Me.lblOriginalRechnungRMC.Size = New System.Drawing.Size(126, 13)
+        Me.lblOriginalRechnungRMC.TabIndex = 174
+        Me.lblOriginalRechnungRMC.Text = "Original-Rechnungen"
        '
        'lblBackToCustomer_RMC
        '
        Me.lblBackToCustomer_RMC.AutoSize = True
        Me.lblBackToCustomer_RMC.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.lblBackToCustomer_RMC.Location = New System.Drawing.Point(188, 116)
+        Me.lblBackToCustomer_RMC.Location = New System.Drawing.Point(208, 58)
        Me.lblBackToCustomer_RMC.Name = "lblBackToCustomer_RMC"
        Me.lblBackToCustomer_RMC.Size = New System.Drawing.Size(123, 13)
        Me.lblBackToCustomer_RMC.TabIndex = 172
@@ -3709,7 +3735,7 @@ Partial Class frmStartOptions
        '
        Me.LinkLabel53.AutoSize = True
        Me.LinkLabel53.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel53.Location = New System.Drawing.Point(188, 55)
+        Me.LinkLabel53.Location = New System.Drawing.Point(11, 166)
        Me.LinkLabel53.Name = "LinkLabel53"
        Me.LinkLabel53.Size = New System.Drawing.Size(119, 13)
        Me.LinkLabel53.TabIndex = 102
@@ -3781,6 +3807,8 @@ Partial Class frmStartOptions
        '
        'UTA
        '
+        Me.UTA.Controls.Add(Me.lblOriginalRechnungUTA)
+        Me.UTA.Controls.Add(Me.Label65)
        Me.UTA.Controls.Add(Me.lblBackToCustomer_UTA)
        Me.UTA.Controls.Add(Me.Label31)
        Me.UTA.Controls.Add(Me.Label34)
@@ -3804,7 +3832,7 @@ Partial Class frmStartOptions
        '
        Me.lblBackToCustomer_UTA.AutoSize = True
        Me.lblBackToCustomer_UTA.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.lblBackToCustomer_UTA.Location = New System.Drawing.Point(241, 138)
+        Me.lblBackToCustomer_UTA.Location = New System.Drawing.Point(228, 55)
        Me.lblBackToCustomer_UTA.Name = "lblBackToCustomer_UTA"
        Me.lblBackToCustomer_UTA.Size = New System.Drawing.Size(123, 13)
        Me.lblBackToCustomer_UTA.TabIndex = 172
@@ -3856,7 +3884,7 @@ Partial Class frmStartOptions
        '
        Me.UTAREPdf.AutoSize = True
        Me.UTAREPdf.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.UTAREPdf.Location = New System.Drawing.Point(314, 108)
+        Me.UTAREPdf.Location = New System.Drawing.Point(88, 240)
        Me.UTAREPdf.Name = "UTAREPdf"
        Me.UTAREPdf.Size = New System.Drawing.Size(119, 13)
        Me.UTAREPdf.TabIndex = 161
@@ -3889,7 +3917,7 @@ Partial Class frmStartOptions
        '
        Me.UTA_Laender.AutoSize = True
        Me.UTA_Laender.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.UTA_Laender.Location = New System.Drawing.Point(246, 47)
+        Me.UTA_Laender.Location = New System.Drawing.Point(13, 190)
        Me.UTA_Laender.Name = "UTA_Laender"
        Me.UTA_Laender.Size = New System.Drawing.Size(135, 13)
        Me.UTA_Laender.TabIndex = 131
@@ -3900,7 +3928,7 @@ Partial Class frmStartOptions
        '
        Me.lblUTAPDFvollst.AutoSize = True
        Me.lblUTAPDFvollst.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.lblUTAPDFvollst.Location = New System.Drawing.Point(314, 85)
+        Me.lblUTAPDFvollst.Location = New System.Drawing.Point(88, 217)
        Me.lblUTAPDFvollst.Name = "lblUTAPDFvollst"
        Me.lblUTAPDFvollst.Size = New System.Drawing.Size(113, 13)
        Me.lblUTAPDFvollst.TabIndex = 157
@@ -3949,7 +3977,7 @@ Partial Class frmStartOptions
        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(243, 83)
+        Me.txtUTADate.Location = New System.Drawing.Point(17, 215)
        Me.txtUTADate.MaxLength = 10
        Me.txtUTADate.MaxLineLength = -1
        Me.txtUTADate.MaxLines_Warning = ""
@@ -3961,6 +3989,9 @@ Partial Class frmStartOptions
        '
        'PLOSE
        '
+        Me.PLOSE.Controls.Add(Me.lblOriginalRechnungPLOSE)
+        Me.PLOSE.Controls.Add(Me.Label63)
+        Me.PLOSE.Controls.Add(Me.Label62)
        Me.PLOSE.Controls.Add(Me.lblBackToCustomer_PLOSE)
        Me.PLOSE.Controls.Add(Me.lblPlosefoppelteIMporte)
        Me.PLOSE.Controls.Add(Me.LinkLabel52)
@@ -3983,7 +4014,7 @@ Partial Class frmStartOptions
        '
        Me.lblBackToCustomer_PLOSE.AutoSize = True
        Me.lblBackToCustomer_PLOSE.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.lblBackToCustomer_PLOSE.Location = New System.Drawing.Point(13, 154)
+        Me.lblBackToCustomer_PLOSE.Location = New System.Drawing.Point(246, 61)
        Me.lblBackToCustomer_PLOSE.Name = "lblBackToCustomer_PLOSE"
        Me.lblBackToCustomer_PLOSE.Size = New System.Drawing.Size(123, 13)
        Me.lblBackToCustomer_PLOSE.TabIndex = 172
@@ -3993,7 +4024,7 @@ Partial Class frmStartOptions
        'lblPlosefoppelteIMporte
        '
        Me.lblPlosefoppelteIMporte.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.lblPlosefoppelteIMporte.Location = New System.Drawing.Point(278, 144)
+        Me.lblPlosefoppelteIMporte.Location = New System.Drawing.Point(17, 238)
        Me.lblPlosefoppelteIMporte.Name = "lblPlosefoppelteIMporte"
        Me.lblPlosefoppelteIMporte.Size = New System.Drawing.Size(132, 23)
        Me.lblPlosefoppelteIMporte.TabIndex = 169
@@ -4004,7 +4035,7 @@ Partial Class frmStartOptions
        '
        Me.LinkLabel52.AutoSize = True
        Me.LinkLabel52.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel52.Location = New System.Drawing.Point(276, 122)
+        Me.LinkLabel52.Location = New System.Drawing.Point(17, 216)
        Me.LinkLabel52.Name = "LinkLabel52"
        Me.LinkLabel52.Size = New System.Drawing.Size(151, 13)
        Me.LinkLabel52.TabIndex = 168
@@ -4026,7 +4057,7 @@ Partial Class frmStartOptions
        '
        Me.Label52.AutoSize = True
        Me.Label52.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label52.Location = New System.Drawing.Point(276, 55)
+        Me.Label52.Location = New System.Drawing.Point(17, 149)
        Me.Label52.Name = "Label52"
        Me.Label52.Size = New System.Drawing.Size(27, 13)
        Me.Label52.TabIndex = 166
@@ -4036,7 +4067,7 @@ Partial Class frmStartOptions
        '
        Me.Label51.AutoSize = True
        Me.Label51.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label51.Location = New System.Drawing.Point(273, 78)
+        Me.Label51.Location = New System.Drawing.Point(14, 172)
        Me.Label51.Name = "Label51"
        Me.Label51.Size = New System.Drawing.Size(55, 13)
        Me.Label51.TabIndex = 164
@@ -4046,7 +4077,7 @@ Partial Class frmStartOptions
        '
        Me.LinkLabel24.AutoSize = True
        Me.LinkLabel24.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel24.Location = New System.Drawing.Point(13, 56)
+        Me.LinkLabel24.Location = New System.Drawing.Point(13, 61)
        Me.LinkLabel24.Name = "LinkLabel24"
        Me.LinkLabel24.Size = New System.Drawing.Size(177, 13)
        Me.LinkLabel24.TabIndex = 124
@@ -4057,7 +4088,7 @@ Partial Class frmStartOptions
        '
        Me.LinkLabel23.AutoSize = True
        Me.LinkLabel23.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel23.Location = New System.Drawing.Point(13, 81)
+        Me.LinkLabel23.Location = New System.Drawing.Point(13, 86)
        Me.LinkLabel23.Name = "LinkLabel23"
        Me.LinkLabel23.Size = New System.Drawing.Size(180, 13)
        Me.LinkLabel23.TabIndex = 125
@@ -4068,7 +4099,7 @@ Partial Class frmStartOptions
        '
        Me.PlosePdfRE.AutoSize = True
        Me.PlosePdfRE.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.PlosePdfRE.Location = New System.Drawing.Point(276, 102)
+        Me.PlosePdfRE.Location = New System.Drawing.Point(17, 196)
        Me.PlosePdfRE.Name = "PlosePdfRE"
        Me.PlosePdfRE.Size = New System.Drawing.Size(119, 13)
        Me.PlosePdfRE.TabIndex = 159
@@ -4091,7 +4122,7 @@ Partial Class frmStartOptions
        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(342, 52)
+        Me.txtPloseJahr.Location = New System.Drawing.Point(83, 146)
        Me.txtPloseJahr.MaxLength = 10
        Me.txtPloseJahr.MaxLineLength = -1
        Me.txtPloseJahr.MaxLines_Warning = ""
@@ -4117,7 +4148,7 @@ Partial Class frmStartOptions
        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(342, 75)
+        Me.txtPLoseKdNr.Location = New System.Drawing.Point(83, 169)
        Me.txtPLoseKdNr.MaxLength = 10
        Me.txtPLoseKdNr.MaxLineLength = -1
        Me.txtPLoseKdNr.MaxLines_Warning = ""
@@ -5104,26 +5135,55 @@ Partial Class frmStartOptions
        Me.DataGridViewTextBoxColumn1.MinimumWidth = 8
        Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
        '
-        'Label61
+        'Label62
        '
-        Me.Label61.AutoSize = True
-        Me.Label61.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label61.Location = New System.Drawing.Point(275, 40)
-        Me.Label61.Name = "Label61"
-        Me.Label61.Size = New System.Drawing.Size(135, 13)
-        Me.Label61.TabIndex = 174
-        Me.Label61.Text = "Import PDF (alternativ)"
+        Me.Label62.AutoSize = True
+        Me.Label62.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label62.Location = New System.Drawing.Point(19, 124)
+        Me.Label62.Name = "Label62"
+        Me.Label62.Size = New System.Drawing.Size(79, 13)
+        Me.Label62.TabIndex = 176
+        Me.Label62.Text = "Verarbeitung"
        '
-        'LinkLabel25
+        'Label63
        '
-        Me.LinkLabel25.AutoSize = True
-        Me.LinkLabel25.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.LinkLabel25.Location = New System.Drawing.Point(275, 63)
-        Me.LinkLabel25.Name = "LinkLabel25"
-        Me.LinkLabel25.Size = New System.Drawing.Size(123, 13)
-        Me.LinkLabel25.TabIndex = 175
-        Me.LinkLabel25.TabStop = True
-        Me.LinkLabel25.Text = "Rechnungen importieren"
+        Me.Label63.AutoSize = True
+        Me.Label63.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label63.Location = New System.Drawing.Point(15, 43)
+        Me.Label63.Name = "Label63"
+        Me.Label63.Size = New System.Drawing.Size(42, 13)
+        Me.Label63.TabIndex = 177
+        Me.Label63.Text = "Import"
+        '
+        'lblOriginalRechnungPLOSE
+        '
+        Me.lblOriginalRechnungPLOSE.AutoSize = True
+        Me.lblOriginalRechnungPLOSE.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblOriginalRechnungPLOSE.Location = New System.Drawing.Point(243, 43)
+        Me.lblOriginalRechnungPLOSE.Name = "lblOriginalRechnungPLOSE"
+        Me.lblOriginalRechnungPLOSE.Size = New System.Drawing.Size(126, 13)
+        Me.lblOriginalRechnungPLOSE.TabIndex = 178
+        Me.lblOriginalRechnungPLOSE.Text = "Original-Rechnungen"
+        '
+        'Label65
+        '
+        Me.Label65.AutoSize = True
+        Me.Label65.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label65.Location = New System.Drawing.Point(13, 167)
+        Me.Label65.Name = "Label65"
+        Me.Label65.Size = New System.Drawing.Size(79, 13)
+        Me.Label65.TabIndex = 176
+        Me.Label65.Text = "Verarbeitung"
+        '
+        'lblOriginalRechnungUTA
+        '
+        Me.lblOriginalRechnungUTA.AutoSize = True
+        Me.lblOriginalRechnungUTA.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblOriginalRechnungUTA.Location = New System.Drawing.Point(228, 36)
+        Me.lblOriginalRechnungUTA.Name = "lblOriginalRechnungUTA"
+        Me.lblOriginalRechnungUTA.Size = New System.Drawing.Size(126, 13)
+        Me.lblOriginalRechnungUTA.TabIndex = 177
+        Me.lblOriginalRechnungUTA.Text = "Original-Rechnungen"
        '
        'frmStartOptions
        '
@@ -5543,12 +5603,12 @@ Partial Class frmStartOptions
    Friend WithEvents lblBackToCustomer_RMC As LinkLabel
    Friend WithEvents lblBackToCustomer_UTA As LinkLabel
    Friend WithEvents lblBackToCustomer_PLOSE As LinkLabel
-    Friend WithEvents Label55 As Label
+    Friend WithEvents lblOriginalRechnungIDS As Label
    Friend WithEvents Label54 As Label
    Friend WithEvents Label53 As Label
-    Friend WithEvents Label56 As Label
+    Friend WithEvents lblOriginalRechnungMSE As Label
    Friend WithEvents Label58 As Label
-    Friend WithEvents Label57 As Label
+    Friend WithEvents lblOriginalRechnungRMC As Label
    Friend WithEvents lblIDS_plauscheck As LinkLabel
    Friend WithEvents Label59 As Label
    Friend WithEvents pbEmailscheck As PictureBox
@@ -5568,4 +5628,9 @@ Partial Class frmStartOptions
    Friend WithEvents cbxGESTELLUNG_TESTLAUF As CheckBox
    Friend WithEvents LinkLabel25 As LinkLabel
    Friend WithEvents Label61 As Label
+    Friend WithEvents lblOriginalRechnungUTA As Label
+    Friend WithEvents Label65 As Label
+    Friend WithEvents lblOriginalRechnungPLOSE As Label
+    Friend WithEvents Label63 As Label
+    Friend WithEvents Label62 As Label
 End Class
--- a/initATLASAufschubkonten/frmStartOptions.resx
+++ b/initATLASAufschubkonten/frmStartOptions.resx
@@ -236,6 +236,78 @@
        +z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
        RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
        SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="PictureBox18.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
+        YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
+        BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
+        FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
+        Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
+        6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
+        Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
+        2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
+        j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
+        1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
+        WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
+        qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
+        LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
+        GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
+        g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
+        BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
+        cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
+        +z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
+        RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
+        SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="PictureBox19.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
+        YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
+        BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
+        FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
+        Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
+        6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
+        Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
+        2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
+        j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
+        1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
+        WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
+        qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
+        LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
+        GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
+        g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
+        BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
+        cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
+        +z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
+        RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
+        SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="PictureBox21.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
+        YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
+        BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
+        FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
+        Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
+        6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
+        Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
+        2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
+        j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
+        1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
+        WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
+        qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
+        LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
+        GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
+        g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
+        BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
+        cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
+        +z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
+        RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
+        SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="PictureBox12.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -748,78 +820,6 @@
  <metadata name="clmnMRN.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
    <value>True</value>
  </metadata>
-  <data name="PictureBox18.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
-        YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
-        BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
-        FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
-        Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
-        6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
-        Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
-        2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
-        j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
-        1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
-        WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
-        qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
-        LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
-        GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
-        g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
-        BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
-        cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
-        +z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
-        RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
-        SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
-</value>
-  </data>
-  <data name="PictureBox19.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
-        YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
-        BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
-        FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
-        Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
-        6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
-        Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
-        2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
-        j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
-        1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
-        WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
-        qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
-        LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
-        GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
-        g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
-        BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
-        cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
-        +z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
-        RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
-        SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
-</value>
-  </data>
-  <data name="PictureBox21.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
-        YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
-        BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
-        FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
-        Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
-        6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
-        Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
-        2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
-        j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
-        1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
-        WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
-        qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
-        LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
-        GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
-        g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
-        BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
-        cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
-        +z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
-        RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
-        SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
-</value>
-  </data>
  <data name="PictureBox25.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
--- a/initATLASAufschubkonten/frmStartOptions.vb
+++ b/initATLASAufschubkonten/frmStartOptions.vb
@@ -7753,4 +7753,65 @@ repeatRequest:
        Me.Visible = True
    End Sub

+    Private Sub TabControl1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TabControl1.SelectedIndexChanged
+
+
+        Select Case TabControl1.SelectedIndex
+            Case 1 'IDS
+                Dim invoice As New cIDS
+                Dim missingITC As Integer = 0
+                missingITC = invoice.countBackToCustomerNotSet(New SQL)
+                If missingITC > 0 Then
+                    lblOriginalRechnungIDS.Text &= " ITC nicht gesetzt: " & missingITC
+                Else
+                    lblOriginalRechnungIDS.Text = "Original-Rechnungen"
+                End If
+
+            Case 2 'MSE
+                Dim invoice As New cMSEAPI
+                Dim missingITC As Integer = 0
+                missingITC = invoice.countBackToCustomerNotSet(New SQL)
+                If missingITC > 0 Then
+                    lblOriginalRechnungMSE.Text &= " ITC nicht gesetzt: " & missingITC
+                Else
+                    lblOriginalRechnungMSE.Text = "Original-Rechnungen"
+
+                End If
+
+            Case 3 'RMC
+                Dim invoice As New cRMC
+                Dim missingITC As Integer = 0
+                missingITC = invoice.countBackToCustomerNotSet(New SQL)
+                If missingITC > 0 Then
+                    lblOriginalRechnungRMC.Text &= " ITC nicht gesetzt: " & missingITC
+                Else
+                    lblOriginalRechnungRMC.Text = "Original-Rechnungen"
+                End If
+
+            Case 4 'UTA
+                Dim invoice As New cUTA
+                Dim missingITC As Integer = 0
+                missingITC = invoice.countBackToCustomerNotSet(New SQL)
+                If missingITC > 0 Then
+                    lblOriginalRechnungUTA.Text &= " ITC nicht gesetzt: " & missingITC
+                Else
+                    lblOriginalRechnungUTA.Text = "Original-Rechnungen"
+                End If
+
+            Case 5 'PLOSE
+                Dim invoice As New cPLOSE_Inv_Data
+                Dim missingITC As Integer = 0
+                missingITC = invoice.countBackToCustomerNotSet(New SQL)
+                If missingITC > 0 Then
+                    lblOriginalRechnungPLOSE.Text &= " ITC nicht gesetzt: " & missingITC
+                Else
+                    lblOriginalRechnungPLOSE.Text = "Original-Rechnungen"
+                End If
+
+        End Select
+
+
+
+
+    End Sub
 End Class