20200108

2020-01-08 15:01:48 +01:00
parent c860c222c7
commit e879fb6881
89 changed files with 8692 additions and 3571 deletions
--- a/Aviso/usrCntlSND_Handling.Designer.vb
+++ b/Aviso/usrCntlSND_Handling.Designer.vb
@@ -23,27 +23,31 @@ Partial Class usrCntlSND_Handling
    <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.pnlT1 = New System.Windows.Forms.Panel()
        Me.Label2 = New System.Windows.Forms.Label()
-        Me.MyDatagridview1 = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
-        Me.clmnArt = New System.Windows.Forms.DataGridViewComboBoxColumn()
-        Me.Nr = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.txtATCMRNFremd = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.Label1 = New System.Windows.Forms.Label()
        Me.txtATAold = New VERAG_PROG_ALLGEMEIN.MyTextBox()
-        Me.Label3 = New System.Windows.Forms.Label()
+        Me.MyDatagridview1 = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.clmnArt = New System.Windows.Forms.DataGridViewComboBoxColumn()
+        Me.clmnATA = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.clmnColli = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.clmnGewicht = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.lkl = New System.Windows.Forms.LinkLabel()
        Me.pnlT1.SuspendLayout()
        CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'pnlT1
        '
-        Me.pnlT1.Controls.Add(Me.Label3)
+        Me.pnlT1.Controls.Add(Me.lkl)
        Me.pnlT1.Controls.Add(Me.Label2)
-        Me.pnlT1.Controls.Add(Me.MyDatagridview1)
        Me.pnlT1.Controls.Add(Me.txtATCMRNFremd)
        Me.pnlT1.Controls.Add(Me.Label1)
        Me.pnlT1.Controls.Add(Me.txtATAold)
+        Me.pnlT1.Controls.Add(Me.MyDatagridview1)
        Me.pnlT1.Location = New System.Drawing.Point(0, 0)
        Me.pnlT1.Name = "pnlT1"
        Me.pnlT1.Size = New System.Drawing.Size(549, 92)
@@ -53,44 +57,11 @@ Partial Class usrCntlSND_Handling
        '
        Me.Label2.AutoSize = True
        Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label2.Location = New System.Drawing.Point(410, 9)
+        Me.Label2.Location = New System.Drawing.Point(343, 74)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(58, 13)
        Me.Label2.TabIndex = 36
        Me.Label2.Text = "0 Handling"
-        Me.Label2.Visible = False
-        '
-        'MyDatagridview1
-        '
-        Me.MyDatagridview1.AKTUALISIERUNGS_INTERVALL = -1
-        Me.MyDatagridview1.AllowUserToResizeColumns = False
-        Me.MyDatagridview1.AllowUserToResizeRows = False
-        Me.MyDatagridview1.BackgroundColor = System.Drawing.SystemColors.Control
-        Me.MyDatagridview1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.MyDatagridview1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnArt, Me.Nr})
-        Me.MyDatagridview1.Location = New System.Drawing.Point(397, 25)
-        Me.MyDatagridview1.Name = "MyDatagridview1"
-        Me.MyDatagridview1.RowHeadersWidth = 25
-        Me.MyDatagridview1.Size = New System.Drawing.Size(148, 64)
-        Me.MyDatagridview1.TabIndex = 35
-        Me.MyDatagridview1.Visible = False
-        '
-        'clmnArt
-        '
-        Me.clmnArt.DisplayStyle = System.Windows.Forms.DataGridViewComboBoxDisplayStyle.ComboBox
-        Me.clmnArt.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.clmnArt.HeaderText = "Art"
-        Me.clmnArt.Items.AddRange(New Object() {"ATA", "MRN", "CRN"})
-        Me.clmnArt.Name = "clmnArt"
-        Me.clmnArt.Resizable = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.clmnArt.SortMode = System.Windows.Forms.DataGridViewColumnSortMode.Automatic
-        Me.clmnArt.Width = 60
-        '
-        'Nr
-        '
-        Me.Nr.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
-        Me.Nr.HeaderText = "ATA/CRN/MRN"
-        Me.Nr.Name = "Nr"
        '
        'txtATCMRNFremd
        '
@@ -105,20 +76,20 @@ Partial Class usrCntlSND_Handling
        Me.txtATCMRNFremd._Waehrung = False
        Me.txtATCMRNFremd._WaehrungZeichen = True
        Me.txtATCMRNFremd.ForeColor = System.Drawing.Color.Black
-        Me.txtATCMRNFremd.Location = New System.Drawing.Point(146, 47)
+        Me.txtATCMRNFremd.Location = New System.Drawing.Point(343, 16)
        Me.txtATCMRNFremd.MaxLength = 500
        Me.txtATCMRNFremd.MaxLineLength = -1
        Me.txtATCMRNFremd.MaxLines_Warning = ""
        Me.txtATCMRNFremd.MaxLines_Warning_Label = Nothing
        Me.txtATCMRNFremd.Name = "txtATCMRNFremd"
-        Me.txtATCMRNFremd.Size = New System.Drawing.Size(245, 20)
+        Me.txtATCMRNFremd.Size = New System.Drawing.Size(203, 20)
        Me.txtATCMRNFremd.TabIndex = 34
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label1.Location = New System.Drawing.Point(44, 50)
+        Me.Label1.Location = New System.Drawing.Point(340, 2)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(96, 13)
        Me.Label1.TabIndex = 33
@@ -137,24 +108,77 @@ Partial Class usrCntlSND_Handling
        Me.txtATAold._Waehrung = False
        Me.txtATAold._WaehrungZeichen = True
        Me.txtATAold.ForeColor = System.Drawing.Color.Black
-        Me.txtATAold.Location = New System.Drawing.Point(146, 21)
+        Me.txtATAold.Location = New System.Drawing.Point(442, 47)
        Me.txtATAold.MaxLength = 500
        Me.txtATAold.MaxLineLength = -1
        Me.txtATAold.MaxLines_Warning = ""
        Me.txtATAold.MaxLines_Warning_Label = Nothing
        Me.txtATAold.Name = "txtATAold"
-        Me.txtATAold.Size = New System.Drawing.Size(245, 20)
+        Me.txtATAold.Size = New System.Drawing.Size(46, 20)
        Me.txtATAold.TabIndex = 32
+        Me.txtATAold.Visible = False
        '
-        'Label3
+        'MyDatagridview1
        '
-        Me.Label3.AutoSize = True
-        Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label3.Location = New System.Drawing.Point(44, 24)
-        Me.Label3.Name = "Label3"
-        Me.Label3.Size = New System.Drawing.Size(48, 13)
-        Me.Label3.TabIndex = 37
-        Me.Label3.Text = "ATA-Nr.:"
+        Me.MyDatagridview1.AKTUALISIERUNGS_INTERVALL = -1
+        Me.MyDatagridview1.AllowUserToResizeColumns = False
+        Me.MyDatagridview1.AllowUserToResizeRows = False
+        Me.MyDatagridview1.BackgroundColor = System.Drawing.SystemColors.Control
+        Me.MyDatagridview1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.MyDatagridview1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnArt, Me.clmnATA, Me.clmnColli, Me.clmnGewicht})
+        Me.MyDatagridview1.Location = New System.Drawing.Point(3, 0)
+        Me.MyDatagridview1.Name = "MyDatagridview1"
+        Me.MyDatagridview1.RowHeadersWidth = 25
+        Me.MyDatagridview1.Size = New System.Drawing.Size(334, 90)
+        Me.MyDatagridview1.TabIndex = 35
+        '
+        'clmnArt
+        '
+        Me.clmnArt.DisplayStyle = System.Windows.Forms.DataGridViewComboBoxDisplayStyle.ComboBox
+        Me.clmnArt.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.clmnArt.HeaderText = "Art"
+        Me.clmnArt.Items.AddRange(New Object() {"ATA", "MRN", "CRN"})
+        Me.clmnArt.Name = "clmnArt"
+        Me.clmnArt.Resizable = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.clmnArt.SortMode = System.Windows.Forms.DataGridViewColumnSortMode.Automatic
+        Me.clmnArt.Visible = False
+        Me.clmnArt.Width = 60
+        '
+        'clmnATA
+        '
+        Me.clmnATA.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.clmnATA.HeaderText = "ATA/CRN/MRN"
+        Me.clmnATA.Name = "clmnATA"
+        '
+        'clmnColli
+        '
+        DataGridViewCellStyle1.Format = "N0"
+        DataGridViewCellStyle1.NullValue = Nothing
+        Me.clmnColli.DefaultCellStyle = DataGridViewCellStyle1
+        Me.clmnColli.HeaderText = "Colli"
+        Me.clmnColli.Name = "clmnColli"
+        Me.clmnColli.Width = 50
+        '
+        'clmnGewicht
+        '
+        DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.TopRight
+        DataGridViewCellStyle2.Format = "N1"
+        DataGridViewCellStyle2.NullValue = Nothing
+        Me.clmnGewicht.DefaultCellStyle = DataGridViewCellStyle2
+        Me.clmnGewicht.HeaderText = "Gewicht"
+        Me.clmnGewicht.Name = "clmnGewicht"
+        Me.clmnGewicht.Width = 80
+        '
+        'lkl
+        '
+        Me.lkl.AutoSize = True
+        Me.lkl.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.lkl.Location = New System.Drawing.Point(442, 74)
+        Me.lkl.Name = "lkl"
+        Me.lkl.Size = New System.Drawing.Size(102, 13)
+        Me.lkl.TabIndex = 37
+        Me.lkl.TabStop = True
+        Me.lkl.Text = "Summen übertragen"
        '
        'usrCntlSND_Handling
        '
@@ -176,6 +200,8 @@ Partial Class usrCntlSND_Handling
    Friend WithEvents MyDatagridview1 As VERAG_PROG_ALLGEMEIN.MyDatagridview
    Friend WithEvents Label2 As Label
    Friend WithEvents clmnArt As DataGridViewComboBoxColumn
-    Friend WithEvents Nr As DataGridViewTextBoxColumn
-    Friend WithEvents Label3 As Label
+    Friend WithEvents clmnATA As DataGridViewTextBoxColumn
+    Friend WithEvents clmnColli As DataGridViewTextBoxColumn
+    Friend WithEvents clmnGewicht As DataGridViewTextBoxColumn
+    Friend WithEvents lkl As LinkLabel
 End Class