neu

2021-10-20 22:24:56 +02:00
parent 787491cf6b
commit 2d7bb951d2
26 changed files with 1204 additions and 415 deletions
--- a/Aviso/Auswertung/usrctlStatVERIMEX.Designer.vb
+++ b/Aviso/Auswertung/usrctlStatVERIMEX.Designer.vb
@@ -23,6 +23,7 @@ Partial Class usrctlStatVERIMEX
    <System.Diagnostics.DebuggerStepThrough()>
    Private Sub InitializeComponent()
        Me.Panel3 = New System.Windows.Forms.Panel()
+        Me.Button4 = New System.Windows.Forms.Button()
        Me.Label9 = New System.Windows.Forms.Label()
        Me.Panel4 = New System.Windows.Forms.Panel()
        Me.Button3 = New System.Windows.Forms.Button()
@@ -35,10 +36,26 @@ Partial Class usrctlStatVERIMEX
        Me.datStatVon = New System.Windows.Forms.DateTimePicker()
        Me.Button2 = New System.Windows.Forms.Button()
        Me.Button1 = New System.Windows.Forms.Button()
-        Me.Button4 = New System.Windows.Forms.Button()
+        Me.Panel1 = New System.Windows.Forms.Panel()
+        Me.btnAbfDetailbereicht = New System.Windows.Forms.Button()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Panel2 = New System.Windows.Forms.Panel()
+        Me.btnAbfAuswerten = New System.Windows.Forms.Button()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.cboAbfFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.dgvAbfertigungTR = New System.Windows.Forms.DataGridView()
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.Label5 = New System.Windows.Forms.Label()
+        Me.datAbfStatBis = New System.Windows.Forms.DateTimePicker()
+        Me.datAbfStatVon = New System.Windows.Forms.DateTimePicker()
+        Me.btnAbfBericht = New System.Windows.Forms.Button()
+        Me.btnAbfExcel = New System.Windows.Forms.Button()
        Me.Panel3.SuspendLayout()
        Me.Panel4.SuspendLayout()
        CType(Me.dgvAbklaerungTR, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.Panel1.SuspendLayout()
+        Me.Panel2.SuspendLayout()
+        CType(Me.dgvAbfertigungTR, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'Panel3
@@ -53,6 +70,16 @@ Partial Class usrctlStatVERIMEX
        Me.Panel3.Size = New System.Drawing.Size(701, 423)
        Me.Panel3.TabIndex = 0
        '
+        'Button4
+        '
+        Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button4.Location = New System.Drawing.Point(310, 389)
+        Me.Button4.Name = "Button4"
+        Me.Button4.Size = New System.Drawing.Size(135, 23)
+        Me.Button4.TabIndex = 4
+        Me.Button4.Text = "Detailbericht (Excel)"
+        Me.Button4.UseVisualStyleBackColor = True
+        '
        'Label9
        '
        Me.Label9.AutoSize = True
@@ -105,7 +132,7 @@ Partial Class usrctlStatVERIMEX
        Me.cboFirma._value = ""
        Me.cboFirma.FormattingEnabled = True
        Me.cboFirma.Location = New System.Drawing.Point(386, 11)
-        Me.cboFirma.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
+        Me.cboFirma.Margin = New System.Windows.Forms.Padding(2)
        Me.cboFirma.Name = "cboFirma"
        Me.cboFirma.Size = New System.Drawing.Size(111, 21)
        Me.cboFirma.TabIndex = 5
@@ -173,29 +200,165 @@ Partial Class usrctlStatVERIMEX
        Me.Button1.Text = "Excel"
        Me.Button1.UseVisualStyleBackColor = True
        '
-        'Button4
+        'Panel1
        '
-        Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.Button4.Location = New System.Drawing.Point(310, 389)
-        Me.Button4.Name = "Button4"
-        Me.Button4.Size = New System.Drawing.Size(135, 23)
-        Me.Button4.TabIndex = 4
-        Me.Button4.Text = "Detailbericht (Excel)"
-        Me.Button4.UseVisualStyleBackColor = True
+        Me.Panel1.Controls.Add(Me.btnAbfDetailbereicht)
+        Me.Panel1.Controls.Add(Me.Label2)
+        Me.Panel1.Controls.Add(Me.Panel2)
+        Me.Panel1.Controls.Add(Me.btnAbfBericht)
+        Me.Panel1.Controls.Add(Me.btnAbfExcel)
+        Me.Panel1.Location = New System.Drawing.Point(15, 467)
+        Me.Panel1.Name = "Panel1"
+        Me.Panel1.Size = New System.Drawing.Size(701, 423)
+        Me.Panel1.TabIndex = 5
+        '
+        'btnAbfDetailbereicht
+        '
+        Me.btnAbfDetailbereicht.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnAbfDetailbereicht.Location = New System.Drawing.Point(310, 389)
+        Me.btnAbfDetailbereicht.Name = "btnAbfDetailbereicht"
+        Me.btnAbfDetailbereicht.Size = New System.Drawing.Size(135, 23)
+        Me.btnAbfDetailbereicht.TabIndex = 4
+        Me.btnAbfDetailbereicht.Text = "Detailbericht (Excel)"
+        Me.btnAbfDetailbereicht.UseVisualStyleBackColor = True
+        '
+        'Label2
+        '
+        Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label2.Location = New System.Drawing.Point(3, 8)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(208, 13)
+        Me.Label2.TabIndex = 0
+        Me.Label2.Text = "Abfertigung TR"
+        '
+        'Panel2
+        '
+        Me.Panel2.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.Panel2.Controls.Add(Me.btnAbfAuswerten)
+        Me.Panel2.Controls.Add(Me.Label3)
+        Me.Panel2.Controls.Add(Me.cboAbfFirma)
+        Me.Panel2.Controls.Add(Me.dgvAbfertigungTR)
+        Me.Panel2.Controls.Add(Me.Label4)
+        Me.Panel2.Controls.Add(Me.Label5)
+        Me.Panel2.Controls.Add(Me.datAbfStatBis)
+        Me.Panel2.Controls.Add(Me.datAbfStatVon)
+        Me.Panel2.Location = New System.Drawing.Point(3, 24)
+        Me.Panel2.Name = "Panel2"
+        Me.Panel2.Size = New System.Drawing.Size(670, 359)
+        Me.Panel2.TabIndex = 1
+        '
+        'btnAbfAuswerten
+        '
+        Me.btnAbfAuswerten.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnAbfAuswerten.Location = New System.Drawing.Point(532, 8)
+        Me.btnAbfAuswerten.Name = "btnAbfAuswerten"
+        Me.btnAbfAuswerten.Size = New System.Drawing.Size(135, 23)
+        Me.btnAbfAuswerten.TabIndex = 6
+        Me.btnAbfAuswerten.Text = "Auswerten"
+        Me.btnAbfAuswerten.UseVisualStyleBackColor = True
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Location = New System.Drawing.Point(346, 13)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(35, 13)
+        Me.Label3.TabIndex = 0
+        Me.Label3.Text = "Firma:"
+        '
+        'cboAbfFirma
+        '
+        Me.cboAbfFirma._allowedValuesFreiText = Nothing
+        Me.cboAbfFirma._allowFreiText = False
+        Me.cboAbfFirma._value = ""
+        Me.cboAbfFirma.FormattingEnabled = True
+        Me.cboAbfFirma.Location = New System.Drawing.Point(386, 11)
+        Me.cboAbfFirma.Margin = New System.Windows.Forms.Padding(2)
+        Me.cboAbfFirma.Name = "cboAbfFirma"
+        Me.cboAbfFirma.Size = New System.Drawing.Size(111, 21)
+        Me.cboAbfFirma.TabIndex = 5
+        '
+        'dgvAbfertigungTR
+        '
+        Me.dgvAbfertigungTR.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvAbfertigungTR.Location = New System.Drawing.Point(6, 38)
+        Me.dgvAbfertigungTR.Name = "dgvAbfertigungTR"
+        Me.dgvAbfertigungTR.RowHeadersWidth = 62
+        Me.dgvAbfertigungTR.Size = New System.Drawing.Size(661, 318)
+        Me.dgvAbfertigungTR.TabIndex = 7
+        '
+        'Label4
+        '
+        Me.Label4.AutoSize = True
+        Me.Label4.Location = New System.Drawing.Point(179, 15)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(10, 13)
+        Me.Label4.TabIndex = 3
+        Me.Label4.Text = "-"
+        '
+        'Label5
+        '
+        Me.Label5.AutoSize = True
+        Me.Label5.Location = New System.Drawing.Point(3, 15)
+        Me.Label5.Name = "Label5"
+        Me.Label5.Size = New System.Drawing.Size(51, 13)
+        Me.Label5.TabIndex = 1
+        Me.Label5.Text = "Zeitraum:"
+        '
+        'datAbfStatBis
+        '
+        Me.datAbfStatBis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
+        Me.datAbfStatBis.Location = New System.Drawing.Point(194, 12)
+        Me.datAbfStatBis.Name = "datAbfStatBis"
+        Me.datAbfStatBis.Size = New System.Drawing.Size(105, 20)
+        Me.datAbfStatBis.TabIndex = 4
+        '
+        'datAbfStatVon
+        '
+        Me.datAbfStatVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
+        Me.datAbfStatVon.Location = New System.Drawing.Point(70, 12)
+        Me.datAbfStatVon.Name = "datAbfStatVon"
+        Me.datAbfStatVon.Size = New System.Drawing.Size(105, 20)
+        Me.datAbfStatVon.TabIndex = 2
+        '
+        'btnAbfBericht
+        '
+        Me.btnAbfBericht.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnAbfBericht.Location = New System.Drawing.Point(598, 389)
+        Me.btnAbfBericht.Name = "btnAbfBericht"
+        Me.btnAbfBericht.Size = New System.Drawing.Size(75, 23)
+        Me.btnAbfBericht.TabIndex = 3
+        Me.btnAbfBericht.Text = "Bericht"
+        Me.btnAbfBericht.UseVisualStyleBackColor = True
+        '
+        'btnAbfExcel
+        '
+        Me.btnAbfExcel.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnAbfExcel.Location = New System.Drawing.Point(517, 389)
+        Me.btnAbfExcel.Name = "btnAbfExcel"
+        Me.btnAbfExcel.Size = New System.Drawing.Size(75, 23)
+        Me.btnAbfExcel.TabIndex = 2
+        Me.btnAbfExcel.Text = "Excel"
+        Me.btnAbfExcel.UseVisualStyleBackColor = True
        '
        'usrctlStatVERIMEX
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.BackColor = System.Drawing.Color.White
+        Me.Controls.Add(Me.Panel1)
        Me.Controls.Add(Me.Panel3)
        Me.Name = "usrctlStatVERIMEX"
-        Me.Size = New System.Drawing.Size(844, 510)
+        Me.Size = New System.Drawing.Size(844, 927)
        Me.Panel3.ResumeLayout(False)
        Me.Panel3.PerformLayout()
        Me.Panel4.ResumeLayout(False)
        Me.Panel4.PerformLayout()
        CType(Me.dgvAbklaerungTR, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.Panel1.ResumeLayout(False)
+        Me.Panel2.ResumeLayout(False)
+        Me.Panel2.PerformLayout()
+        CType(Me.dgvAbfertigungTR, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)

    End Sub
@@ -214,4 +377,18 @@ Partial Class usrctlStatVERIMEX
    Friend WithEvents cboFirma As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents Button3 As Button
    Friend WithEvents Button4 As Button
+    Friend WithEvents Panel1 As Panel
+    Friend WithEvents btnAbfDetailbereicht As Button
+    Friend WithEvents Label2 As Label
+    Friend WithEvents Panel2 As Panel
+    Friend WithEvents btnAbfAuswerten As Button
+    Friend WithEvents Label3 As Label
+    Friend WithEvents cboAbfFirma As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents dgvAbfertigungTR As DataGridView
+    Friend WithEvents Label4 As Label
+    Friend WithEvents Label5 As Label
+    Friend WithEvents datAbfStatBis As DateTimePicker
+    Friend WithEvents datAbfStatVon As DateTimePicker
+    Friend WithEvents btnAbfBericht As Button
+    Friend WithEvents btnAbfExcel As Button
 End Class