RPT

2025-08-14 12:47:08 +02:00
parent 801924c221
commit 2f996886a7
247 changed files with 78292 additions and 183 deletions
--- a/VERAG_PROG_ALLGEMEIN/AuditFlow/frmAuditFlow.Designer.vb
+++ b/VERAG_PROG_ALLGEMEIN/AuditFlow/frmAuditFlow.Designer.vb
@@ -73,6 +73,9 @@ Partial Class frmAuditFlow
        Me.Label13 = New System.Windows.Forms.Label()
        Me.DateTimePicker1 = New System.Windows.Forms.DateTimePicker()
        Me.btnSuche = New System.Windows.Forms.Button()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.lblAbDat = New System.Windows.Forms.Label()
+        Me.txtWartungFaelligkeitAbDat = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.cntxtOptionen.SuspendLayout()
        Me.pnlTop.SuspendLayout()
        CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -178,26 +181,29 @@ Partial Class frmAuditFlow
        Me.dgvPruefungsobjekte.Location = New System.Drawing.Point(0, 106)
        Me.dgvPruefungsobjekte.Name = "dgvPruefungsobjekte"
        Me.dgvPruefungsobjekte.RowHeadersVisible = False
-        Me.dgvPruefungsobjekte.Size = New System.Drawing.Size(960, 471)
+        Me.dgvPruefungsobjekte.Size = New System.Drawing.Size(960, 450)
        Me.dgvPruefungsobjekte.TabIndex = 7
        '
        'pnloptions
        '
        Me.pnloptions.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.pnloptions.Controls.Add(Me.lblAbDat)
+        Me.pnloptions.Controls.Add(Me.txtWartungFaelligkeitAbDat)
+        Me.pnloptions.Controls.Add(Me.Button1)
        Me.pnloptions.Controls.Add(Me.Label9)
        Me.pnloptions.Controls.Add(Me.MyTextBox2)
        Me.pnloptions.Controls.Add(Me.Button2)
        Me.pnloptions.Dock = System.Windows.Forms.DockStyle.Bottom
-        Me.pnloptions.Location = New System.Drawing.Point(0, 577)
+        Me.pnloptions.Location = New System.Drawing.Point(0, 556)
        Me.pnloptions.Name = "pnloptions"
-        Me.pnloptions.Size = New System.Drawing.Size(960, 59)
+        Me.pnloptions.Size = New System.Drawing.Size(960, 80)
        Me.pnloptions.TabIndex = 9
        '
        'Label9
        '
        Me.Label9.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Label9.AutoSize = True
-        Me.Label9.Location = New System.Drawing.Point(865, 29)
+        Me.Label9.Location = New System.Drawing.Point(865, 55)
        Me.Label9.Name = "Label9"
        Me.Label9.Size = New System.Drawing.Size(30, 13)
        Me.Label9.TabIndex = 7
@@ -220,7 +226,7 @@ Partial Class frmAuditFlow
        Me.MyTextBox2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.MyTextBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.MyTextBox2.ForeColor = System.Drawing.Color.Black
-        Me.MyTextBox2.Location = New System.Drawing.Point(897, 26)
+        Me.MyTextBox2.Location = New System.Drawing.Point(897, 52)
        Me.MyTextBox2.MaxLineLength = -1
        Me.MyTextBox2.MaxLines_Warning = ""
        Me.MyTextBox2.MaxLines_Warning_Label = Nothing
@@ -236,7 +242,7 @@ Partial Class frmAuditFlow
        Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button2.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.plus
        Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button2.Location = New System.Drawing.Point(12, 5)
+        Me.Button2.Location = New System.Drawing.Point(12, 7)
        Me.Button2.Margin = New System.Windows.Forms.Padding(0)
        Me.Button2.Name = "Button2"
        Me.Button2.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0)
@@ -369,9 +375,9 @@ Partial Class frmAuditFlow
        Me.Panel3.Controls.Add(Me.Label3)
        Me.Panel3.Controls.Add(Me.MyTextBox1)
        Me.Panel3.Dock = System.Windows.Forms.DockStyle.Bottom
-        Me.Panel3.Location = New System.Drawing.Point(0, 577)
+        Me.Panel3.Location = New System.Drawing.Point(0, 556)
        Me.Panel3.Name = "Panel3"
-        Me.Panel3.Size = New System.Drawing.Size(622, 59)
+        Me.Panel3.Size = New System.Drawing.Size(622, 80)
        Me.Panel3.TabIndex = 6
        '
        'Button9
@@ -380,7 +386,7 @@ Partial Class frmAuditFlow
        Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button9.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.plus
        Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button9.Location = New System.Drawing.Point(12, 5)
+        Me.Button9.Location = New System.Drawing.Point(12, 7)
        Me.Button9.Margin = New System.Windows.Forms.Padding(0)
        Me.Button9.Name = "Button9"
        Me.Button9.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0)
@@ -395,7 +401,7 @@ Partial Class frmAuditFlow
        Me.Button11.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Button11.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
        Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.Button11.Location = New System.Drawing.Point(531, 22)
+        Me.Button11.Location = New System.Drawing.Point(531, 43)
        Me.Button11.Name = "Button11"
        Me.Button11.Size = New System.Drawing.Size(41, 34)
        Me.Button11.TabIndex = 7
@@ -409,7 +415,7 @@ Partial Class frmAuditFlow
        Me.Button12.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Button12.ForeColor = System.Drawing.Color.Black
        Me.Button12.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button12.Location = New System.Drawing.Point(578, 22)
+        Me.Button12.Location = New System.Drawing.Point(578, 43)
        Me.Button12.Name = "Button12"
        Me.Button12.Size = New System.Drawing.Size(41, 34)
        Me.Button12.TabIndex = 8
@@ -419,7 +425,7 @@ Partial Class frmAuditFlow
        '
        Me.Label3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Label3.AutoSize = True
-        Me.Label3.Location = New System.Drawing.Point(445, 33)
+        Me.Label3.Location = New System.Drawing.Point(445, 55)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(30, 13)
        Me.Label3.TabIndex = 5
@@ -442,7 +448,7 @@ Partial Class frmAuditFlow
        Me.MyTextBox1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.MyTextBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.MyTextBox1.ForeColor = System.Drawing.Color.Black
-        Me.MyTextBox1.Location = New System.Drawing.Point(477, 30)
+        Me.MyTextBox1.Location = New System.Drawing.Point(477, 52)
        Me.MyTextBox1.MaxLineLength = -1
        Me.MyTextBox1.MaxLines_Warning = ""
        Me.MyTextBox1.MaxLines_Warning_Label = Nothing
@@ -757,6 +763,55 @@ Partial Class frmAuditFlow
        Me.btnSuche.Text = "Suche starten"
        Me.btnSuche.UseVisualStyleBackColor = True
        '
+        'Button1
+        '
+        Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button1.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.zeiterfassung_s
+        Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button1.Location = New System.Drawing.Point(583, 7)
+        Me.Button1.Margin = New System.Windows.Forms.Padding(0)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0)
+        Me.Button1.Size = New System.Drawing.Size(193, 45)
+        Me.Button1.TabIndex = 9
+        Me.Button1.Text = "Fälligkeiten berechnen"
+        Me.Button1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'lblAbDat
+        '
+        Me.lblAbDat.AutoSize = True
+        Me.lblAbDat.Location = New System.Drawing.Point(613, 55)
+        Me.lblAbDat.Name = "lblAbDat"
+        Me.lblAbDat.Size = New System.Drawing.Size(56, 13)
+        Me.lblAbDat.TabIndex = 142
+        Me.lblAbDat.Text = "ab Datum:"
+        '
+        '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(675, 52)
+        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 = 143
+        '
        'frmAuditFlow
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -838,4 +893,7 @@ Partial Class frmAuditFlow
    Friend WithEvents Label9 As Windows.Forms.Label
    Friend WithEvents MyTextBox2 As MyTextBox
    Friend WithEvents CheckBox1 As Windows.Forms.CheckBox
+    Friend WithEvents Button1 As Windows.Forms.Button
+    Friend WithEvents lblAbDat As Windows.Forms.Label
+    Friend WithEvents txtWartungFaelligkeitAbDat As MyTextBox
 End Class