IDS-Preise

2025-09-23 12:58:52 +02:00
parent b2b127c99f
commit 1df3503f8f
2 changed files with 547 additions and 90 deletions
--- a/SDL/kunden/usrCntlIDSPreise.Designer.vb
+++ b/SDL/kunden/usrCntlIDSPreise.Designer.vb
@@ -23,9 +23,8 @@ Partial Class usrCntlIDSPreise
    <System.Diagnostics.DebuggerStepThrough()>
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
-        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Me.lblIDS = New System.Windows.Forms.TextBox()
-        Me.Label11 = New System.Windows.Forms.Label()
        Me.dgvOfferteDetails = New System.Windows.Forms.DataGridView()
        Me.cntxtAddSdl = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.DToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
@@ -35,9 +34,14 @@ Partial Class usrCntlIDSPreise
        Me.cbxTypes = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.btnCloseEditMode = New VERAG_PROG_ALLGEMEIN.FlatButton()
        Me.lblEditMode = New System.Windows.Forms.Label()
+        Me.btnKunde = New System.Windows.Forms.Button()
+        Me.dgvFILTER = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.btnRW = New System.Windows.Forms.Button()
        CType(Me.dgvOfferteDetails, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.cntxtAddSdl.SuspendLayout()
        CType(Me.dgvIDS, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.dgvFILTER, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'lblIDS
@@ -53,35 +57,25 @@ Partial Class usrCntlIDSPreise
        Me.lblIDS.TabIndex = 0
        Me.lblIDS.Text = "IDS"
        '
-        'Label11
-        '
-        Me.Label11.AutoSize = True
-        Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label11.Location = New System.Drawing.Point(233, 16)
-        Me.Label11.Name = "Label11"
-        Me.Label11.Size = New System.Drawing.Size(50, 13)
-        Me.Label11.TabIndex = 2
-        Me.Label11.Text = "Details:"
-        '
        'dgvOfferteDetails
        '
        Me.dgvOfferteDetails.AllowUserToAddRows = False
        Me.dgvOfferteDetails.AllowUserToDeleteRows = False
        Me.dgvOfferteDetails.AllowUserToOrderColumns = True
        Me.dgvOfferteDetails.AllowUserToResizeRows = False
-        DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
-        Me.dgvOfferteDetails.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
+        DataGridViewCellStyle2.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
+        Me.dgvOfferteDetails.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
        Me.dgvOfferteDetails.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
            Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.dgvOfferteDetails.BackgroundColor = System.Drawing.Color.White
        Me.dgvOfferteDetails.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        Me.dgvOfferteDetails.Location = New System.Drawing.Point(235, 32)
+        Me.dgvOfferteDetails.Location = New System.Drawing.Point(235, 63)
        Me.dgvOfferteDetails.MultiSelect = False
        Me.dgvOfferteDetails.Name = "dgvOfferteDetails"
        Me.dgvOfferteDetails.RowHeadersVisible = False
        Me.dgvOfferteDetails.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
-        Me.dgvOfferteDetails.Size = New System.Drawing.Size(796, 475)
+        Me.dgvOfferteDetails.Size = New System.Drawing.Size(928, 444)
        Me.dgvOfferteDetails.TabIndex = 5
        '
        'cntxtAddSdl
@@ -103,7 +97,7 @@ Partial Class usrCntlIDSPreise
        Me.btnOfferteSpeichern.ForeColor = System.Drawing.Color.Black
        Me.btnOfferteSpeichern.Image = Global.SDL.My.Resources.Resources.save
        Me.btnOfferteSpeichern.ImageAlign = System.Drawing.ContentAlignment.TopLeft
-        Me.btnOfferteSpeichern.Location = New System.Drawing.Point(899, 514)
+        Me.btnOfferteSpeichern.Location = New System.Drawing.Point(1031, 514)
        Me.btnOfferteSpeichern.Name = "btnOfferteSpeichern"
        Me.btnOfferteSpeichern.Size = New System.Drawing.Size(132, 36)
        Me.btnOfferteSpeichern.TabIndex = 15
@@ -121,7 +115,7 @@ Partial Class usrCntlIDSPreise
        Me.btnEditIDS.FlatAppearance.BorderSize = 0
        Me.btnEditIDS.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnEditIDS.ForeColor = System.Drawing.Color.Black
-        Me.btnEditIDS.Location = New System.Drawing.Point(965, 6)
+        Me.btnEditIDS.Location = New System.Drawing.Point(1097, 4)
        Me.btnEditIDS.Name = "btnEditIDS"
        Me.btnEditIDS.Size = New System.Drawing.Size(20, 20)
        Me.btnEditIDS.TabIndex = 1
@@ -168,7 +162,7 @@ Partial Class usrCntlIDSPreise
        Me.btnCloseEditMode.FlatAppearance.BorderSize = 0
        Me.btnCloseEditMode.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnCloseEditMode.ForeColor = System.Drawing.Color.Black
-        Me.btnCloseEditMode.Location = New System.Drawing.Point(1000, 8)
+        Me.btnCloseEditMode.Location = New System.Drawing.Point(1132, 6)
        Me.btnCloseEditMode.Name = "btnCloseEditMode"
        Me.btnCloseEditMode.Size = New System.Drawing.Size(20, 20)
        Me.btnCloseEditMode.TabIndex = 31
@@ -180,39 +174,100 @@ Partial Class usrCntlIDSPreise
        Me.lblEditMode.AutoSize = True
        Me.lblEditMode.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.lblEditMode.ForeColor = System.Drawing.Color.Red
-        Me.lblEditMode.Location = New System.Drawing.Point(551, 13)
+        Me.lblEditMode.Location = New System.Drawing.Point(551, 11)
        Me.lblEditMode.Name = "lblEditMode"
        Me.lblEditMode.Size = New System.Drawing.Size(64, 13)
        Me.lblEditMode.TabIndex = 32
        Me.lblEditMode.Text = "Edit Mode"
        Me.lblEditMode.Visible = False
        '
+        'btnKunde
+        '
+        Me.btnKunde.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnKunde.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnKunde.ForeColor = System.Drawing.Color.Black
+        Me.btnKunde.ImageAlign = System.Drawing.ContentAlignment.TopLeft
+        Me.btnKunde.Location = New System.Drawing.Point(993, 4)
+        Me.btnKunde.Name = "btnKunde"
+        Me.btnKunde.Size = New System.Drawing.Size(76, 28)
+        Me.btnKunde.TabIndex = 33
+        Me.btnKunde.Tag = ""
+        Me.btnKunde.Text = "Kunde"
+        Me.btnKunde.UseVisualStyleBackColor = True
+        Me.btnKunde.Visible = False
+        '
+        'dgvFILTER
+        '
+        Me.dgvFILTER.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvFILTER.AllowUserToAddRows = False
+        Me.dgvFILTER.AllowUserToDeleteRows = False
+        Me.dgvFILTER.AllowUserToResizeColumns = False
+        Me.dgvFILTER.AllowUserToResizeRows = False
+        Me.dgvFILTER.BackgroundColor = System.Drawing.Color.White
+        Me.dgvFILTER.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.dgvFILTER.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvFILTER.ColumnHeadersVisible = False
+        Me.dgvFILTER.Location = New System.Drawing.Point(235, 35)
+        Me.dgvFILTER.Name = "dgvFILTER"
+        Me.dgvFILTER.ScrollBars = System.Windows.Forms.ScrollBars.None
+        Me.dgvFILTER.Size = New System.Drawing.Size(796, 22)
+        Me.dgvFILTER.TabIndex = 34
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label1.ForeColor = System.Drawing.Color.Red
+        Me.Label1.Location = New System.Drawing.Point(64, 15)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(11, 13)
+        Me.Label1.TabIndex = 35
+        Me.Label1.Text = "."
+        '
+        'btnRW
+        '
+        Me.btnRW.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnRW.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnRW.ForeColor = System.Drawing.Color.Black
+        Me.btnRW.ImageAlign = System.Drawing.ContentAlignment.TopLeft
+        Me.btnRW.Location = New System.Drawing.Point(911, 4)
+        Me.btnRW.Name = "btnRW"
+        Me.btnRW.Size = New System.Drawing.Size(76, 28)
+        Me.btnRW.TabIndex = 36
+        Me.btnRW.Tag = ""
+        Me.btnRW.Text = "RW"
+        Me.btnRW.UseVisualStyleBackColor = True
+        Me.btnRW.Visible = False
+        '
        'usrCntlIDSPreise
        '
        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.btnRW)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.dgvFILTER)
+        Me.Controls.Add(Me.btnKunde)
        Me.Controls.Add(Me.lblEditMode)
        Me.Controls.Add(Me.btnCloseEditMode)
        Me.Controls.Add(Me.cbxTypes)
        Me.Controls.Add(Me.dgvIDS)
        Me.Controls.Add(Me.btnOfferteSpeichern)
        Me.Controls.Add(Me.btnEditIDS)
-        Me.Controls.Add(Me.Label11)
        Me.Controls.Add(Me.lblIDS)
        Me.Controls.Add(Me.dgvOfferteDetails)
        Me.Margin = New System.Windows.Forms.Padding(2)
        Me.Name = "usrCntlIDSPreise"
-        Me.Size = New System.Drawing.Size(1041, 576)
+        Me.Size = New System.Drawing.Size(1173, 576)
        CType(Me.dgvOfferteDetails, System.ComponentModel.ISupportInitialize).EndInit()
        Me.cntxtAddSdl.ResumeLayout(False)
        CType(Me.dgvIDS, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.dgvFILTER, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents lblIDS As System.Windows.Forms.TextBox
-    Friend WithEvents Label11 As System.Windows.Forms.Label
    Friend WithEvents dgvOfferteDetails As System.Windows.Forms.DataGridView
    Friend WithEvents btnEditIDS As VERAG_PROG_ALLGEMEIN.FlatButton
    Friend WithEvents cntxtAddSdl As ContextMenuStrip
@@ -222,4 +277,8 @@ Partial Class usrCntlIDSPreise
    Friend WithEvents cbxTypes As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents btnCloseEditMode As VERAG_PROG_ALLGEMEIN.FlatButton
    Friend WithEvents lblEditMode As Label
+    Friend WithEvents btnKunde As Button
+    Friend WithEvents dgvFILTER As VERAG_PROG_ALLGEMEIN.MyDatagridview
+    Friend WithEvents Label1 As Label
+    Friend WithEvents btnRW As Button
 End Class