Creditsafe, etc.

2025-09-05 17:19:03 +02:00
parent 594c9846a5
commit 68ba370fe5
2 changed files with 282 additions and 106 deletions
--- a/initATLASAufschubkonten/frmStartOptions.Designer.vb
+++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb
@@ -277,6 +277,8 @@ Partial Class frmStartOptions
        Me.Button27 = New System.Windows.Forms.Button()
        Me.lblWartungen = New System.Windows.Forms.Label()
        Me.TabPage7 = New System.Windows.Forms.TabPage()
+        Me.lblCSPortfolio = New System.Windows.Forms.Label()
+        Me.bcxKundendatenaktCS = New System.Windows.Forms.CheckBox()
        Me.cbCheckDate = New System.Windows.Forms.CheckBox()
        Me.lblMissingCS = New System.Windows.Forms.Label()
        Me.Button28 = New System.Windows.Forms.Button()
@@ -304,6 +306,11 @@ Partial Class frmStartOptions
        Me.lklAufschubkontenATLASEZOLL = New System.Windows.Forms.LinkLabel()
        Me.lblRoutineManager = New System.Windows.Forms.Label()
        Me.Button21 = New System.Windows.Forms.Button()
+        Me.cbxTestsystemCS = New System.Windows.Forms.CheckBox()
+        Me.lbl_CS_online = New System.Windows.Forms.Label()
+        Me.lblCS_DB = New System.Windows.Forms.Label()
+        Me.cbxKundenbesonderheitenCS = New System.Windows.Forms.CheckBox()
+        Me.cbxMailsenden = New System.Windows.Forms.CheckBox()
        Me.MyTextBox3 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.txtSyskaWdhDateiname = New VERAG_PROG_ALLGEMEIN.MyTextBox()
@@ -343,7 +350,6 @@ Partial Class frmStartOptions
        Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.bcxKundendatenaktCS = New System.Windows.Forms.CheckBox()
        Me.pnl.SuspendLayout()
        CType(Me.PictureBox24, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.PictureBox23, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -3457,12 +3463,18 @@ Partial Class frmStartOptions
        '
        'TabPage7
        '
+        Me.TabPage7.Controls.Add(Me.cbxMailsenden)
+        Me.TabPage7.Controls.Add(Me.cbxKundenbesonderheitenCS)
+        Me.TabPage7.Controls.Add(Me.lblCS_DB)
+        Me.TabPage7.Controls.Add(Me.lbl_CS_online)
+        Me.TabPage7.Controls.Add(Me.cbxTestsystemCS)
+        Me.TabPage7.Controls.Add(Me.lblCSPortfolio)
        Me.TabPage7.Controls.Add(Me.bcxKundendatenaktCS)
-        Me.TabPage7.Controls.Add(Me.txtCSDate)
        Me.TabPage7.Controls.Add(Me.cbCheckDate)
        Me.TabPage7.Controls.Add(Me.lblMissingCS)
        Me.TabPage7.Controls.Add(Me.Button28)
        Me.TabPage7.Controls.Add(Me.btnCreditsaveLauf)
+        Me.TabPage7.Controls.Add(Me.txtCSDate)
        Me.TabPage7.Location = New System.Drawing.Point(4, 22)
        Me.TabPage7.Name = "TabPage7"
        Me.TabPage7.Size = New System.Drawing.Size(1219, 513)
@@ -3470,11 +3482,32 @@ Partial Class frmStartOptions
        Me.TabPage7.Text = "Creditsafe"
        Me.TabPage7.UseVisualStyleBackColor = True
        '
+        'lblCSPortfolio
+        '
+        Me.lblCSPortfolio.AutoSize = True
+        Me.lblCSPortfolio.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblCSPortfolio.Location = New System.Drawing.Point(14, 48)
+        Me.lblCSPortfolio.Name = "lblCSPortfolio"
+        Me.lblCSPortfolio.Size = New System.Drawing.Size(74, 13)
+        Me.lblCSPortfolio.TabIndex = 159
+        Me.lblCSPortfolio.Text = "im Portfolio:"
+        '
+        'bcxKundendatenaktCS
+        '
+        Me.bcxKundendatenaktCS.AutoSize = True
+        Me.bcxKundendatenaktCS.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.bcxKundendatenaktCS.Location = New System.Drawing.Point(14, 147)
+        Me.bcxKundendatenaktCS.Name = "bcxKundendatenaktCS"
+        Me.bcxKundendatenaktCS.Size = New System.Drawing.Size(150, 17)
+        Me.bcxKundendatenaktCS.TabIndex = 158
+        Me.bcxKundendatenaktCS.Text = "Kundendaten aktualsieren"
+        Me.bcxKundendatenaktCS.UseVisualStyleBackColor = True
+        '
        'cbCheckDate
        '
        Me.cbCheckDate.AutoSize = True
        Me.cbCheckDate.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.cbCheckDate.Location = New System.Drawing.Point(16, 89)
+        Me.cbCheckDate.Location = New System.Drawing.Point(14, 124)
        Me.cbCheckDate.Name = "cbCheckDate"
        Me.cbCheckDate.Size = New System.Drawing.Size(74, 17)
        Me.cbCheckDate.TabIndex = 140
@@ -3485,7 +3518,7 @@ Partial Class frmStartOptions
        '
        Me.lblMissingCS.AutoSize = True
        Me.lblMissingCS.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.lblMissingCS.Location = New System.Drawing.Point(13, 20)
+        Me.lblMissingCS.Location = New System.Drawing.Point(13, 28)
        Me.lblMissingCS.Name = "lblMissingCS"
        Me.lblMissingCS.Size = New System.Drawing.Size(214, 13)
        Me.lblMissingCS.TabIndex = 142
@@ -3496,7 +3529,7 @@ Partial Class frmStartOptions
        Me.Button28.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button28.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
        Me.Button28.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button28.Location = New System.Drawing.Point(14, 161)
+        Me.Button28.Location = New System.Drawing.Point(10, 216)
        Me.Button28.Name = "Button28"
        Me.Button28.Size = New System.Drawing.Size(131, 24)
        Me.Button28.TabIndex = 141
@@ -3508,7 +3541,7 @@ Partial Class frmStartOptions
        Me.btnCreditsaveLauf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnCreditsaveLauf.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
        Me.btnCreditsaveLauf.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.btnCreditsaveLauf.Location = New System.Drawing.Point(16, 51)
+        Me.btnCreditsaveLauf.Location = New System.Drawing.Point(16, 76)
        Me.btnCreditsaveLauf.Name = "btnCreditsaveLauf"
        Me.btnCreditsaveLauf.Size = New System.Drawing.Size(131, 24)
        Me.btnCreditsaveLauf.TabIndex = 140
@@ -3773,6 +3806,57 @@ Partial Class frmStartOptions
        Me.Button21.Text = "AAS Sendung 24h"
        Me.Button21.UseVisualStyleBackColor = True
        '
+        'cbxTestsystemCS
+        '
+        Me.cbxTestsystemCS.AutoSize = True
+        Me.cbxTestsystemCS.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cbxTestsystemCS.Location = New System.Drawing.Point(17, 6)
+        Me.cbxTestsystemCS.Name = "cbxTestsystemCS"
+        Me.cbxTestsystemCS.Size = New System.Drawing.Size(79, 17)
+        Me.cbxTestsystemCS.TabIndex = 140
+        Me.cbxTestsystemCS.Text = "Testsystem"
+        Me.cbxTestsystemCS.UseVisualStyleBackColor = True
+        '
+        'lbl_CS_online
+        '
+        Me.lbl_CS_online.AutoSize = True
+        Me.lbl_CS_online.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lbl_CS_online.Location = New System.Drawing.Point(102, 48)
+        Me.lbl_CS_online.Name = "lbl_CS_online"
+        Me.lbl_CS_online.Size = New System.Drawing.Size(0, 13)
+        Me.lbl_CS_online.TabIndex = 160
+        '
+        'lblCS_DB
+        '
+        Me.lblCS_DB.AutoSize = True
+        Me.lblCS_DB.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblCS_DB.Location = New System.Drawing.Point(152, 48)
+        Me.lblCS_DB.Name = "lblCS_DB"
+        Me.lblCS_DB.Size = New System.Drawing.Size(0, 13)
+        Me.lblCS_DB.TabIndex = 161
+        '
+        'cbxKundenbesonderheitenCS
+        '
+        Me.cbxKundenbesonderheitenCS.AutoSize = True
+        Me.cbxKundenbesonderheitenCS.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cbxKundenbesonderheitenCS.Location = New System.Drawing.Point(14, 170)
+        Me.cbxKundenbesonderheitenCS.Name = "cbxKundenbesonderheitenCS"
+        Me.cbxKundenbesonderheitenCS.Size = New System.Drawing.Size(164, 17)
+        Me.cbxKundenbesonderheitenCS.TabIndex = 162
+        Me.cbxKundenbesonderheitenCS.Text = "setze Kundenbesonderheiten"
+        Me.cbxKundenbesonderheitenCS.UseVisualStyleBackColor = True
+        '
+        'cbxMailsenden
+        '
+        Me.cbxMailsenden.AutoSize = True
+        Me.cbxMailsenden.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cbxMailsenden.Location = New System.Drawing.Point(14, 193)
+        Me.cbxMailsenden.Name = "cbxMailsenden"
+        Me.cbxMailsenden.Size = New System.Drawing.Size(83, 17)
+        Me.cbxMailsenden.TabIndex = 163
+        Me.cbxMailsenden.Text = "Mail senden"
+        Me.cbxMailsenden.UseVisualStyleBackColor = True
+        '
        'MyTextBox3
        '
        Me.MyTextBox3._DateTimeOnly = False
@@ -4528,7 +4612,7 @@ Partial Class frmStartOptions
        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(16, 135)
+        Me.txtCSDate.Location = New System.Drawing.Point(94, 121)
        Me.txtCSDate.MaxLength = 10
        Me.txtCSDate.MaxLineLength = -1
        Me.txtCSDate.MaxLines_Warning = ""
@@ -4593,17 +4677,6 @@ Partial Class frmStartOptions
        Me.DataGridViewTextBoxColumn1.MinimumWidth = 8
        Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
        '
-        'bcxKundendatenaktCS
-        '
-        Me.bcxKundendatenaktCS.AutoSize = True
-        Me.bcxKundendatenaktCS.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.bcxKundendatenaktCS.Location = New System.Drawing.Point(16, 112)
-        Me.bcxKundendatenaktCS.Name = "bcxKundendatenaktCS"
-        Me.bcxKundendatenaktCS.Size = New System.Drawing.Size(150, 17)
-        Me.bcxKundendatenaktCS.TabIndex = 158
-        Me.bcxKundendatenaktCS.Text = "Kundendaten aktualsieren"
-        Me.bcxKundendatenaktCS.UseVisualStyleBackColor = True
-        '
        'frmStartOptions
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -5002,4 +5075,10 @@ Partial Class frmStartOptions
    Friend WithEvents txtCSDate As VERAG_PROG_ALLGEMEIN.MyTextBox
    Friend WithEvents cbCheckDate As CheckBox
    Friend WithEvents bcxKundendatenaktCS As CheckBox
+    Friend WithEvents lblCSPortfolio As Label
+    Friend WithEvents cbxTestsystemCS As CheckBox
+    Friend WithEvents lblCS_DB As Label
+    Friend WithEvents lbl_CS_online As Label
+    Friend WithEvents cbxMailsenden As CheckBox
+    Friend WithEvents cbxKundenbesonderheitenCS As CheckBox
 End Class