edv/AVISO
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

merge

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-12-19 09:11:28 +01:00
parent 8924cf6151 636df85a8c
commit 12b958b6bd
5 changed files with 277 additions and 191 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Aviso/My Project/AssemblyInfo.vb
View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("4.1.9.0")>
<Assembly: AssemblyFileVersion("4.1.9.0")>
<Assembly: AssemblyVersion("4.1.8.9")>
<Assembly: AssemblyFileVersion("4.1.8.9")>

250
Aviso/frmGesamtsicherheitenNEU.Designer.vb generated
View File

@@ -22,13 +22,14 @@ Partial Class frmGesamtsicherheitenNEU
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmGesamtsicherheitenNEU))
Me.components = New System.ComponentModel.Container()
Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Me.ContextMenuStripGesSicherh = New System.Windows.Forms.ContextMenuStrip()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmGesamtsicherheitenNEU))
Me.ContextMenuStripGesSicherh = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ATBNraendernToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.MRNNRÄndernToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.Panel2 = New System.Windows.Forms.Panel()
@@ -54,7 +55,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.Label18 = New System.Windows.Forms.Label()
Me.Label17 = New System.Windows.Forms.Label()
Me.Label16 = New System.Windows.Forms.Label()
Me.ContextMenuStripPosSicherheiten = New System.Windows.Forms.ContextMenuStrip()
Me.ContextMenuStripPosSicherheiten = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ATCMRNNraendernToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.pnlSummeGes = New System.Windows.Forms.Panel()
Me.Label28 = New System.Windows.Forms.Label()
@@ -130,8 +131,8 @@ Partial Class frmGesamtsicherheitenNEU
Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.btnSave = New VERAG_PROG_ALLGEMEIN.FlatButton()
Me.btnClosePanOverlay = New VERAG_PROG_ALLGEMEIN.FlatButton()
Me.dgvGesamtsicherheit = New VERAG_PROG_ALLGEMEIN.MyDatagridview()
Me.dgvSicherheitsPos = New VERAG_PROG_ALLGEMEIN.MyDatagridview()
Me.dgvGesamtsicherheit = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.dgvSicherheitsPos = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.txtPosSicherheitsbGes = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtSicherheitsbGes = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtPosWarenwertGes = New VERAG_PROG_ALLGEMEIN.MyTextBox()
@@ -164,7 +165,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.ContextMenuStripGesSicherh.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ATBNraendernToolStripMenuItem, Me.MRNNRÄndernToolStripMenuItem, Me.LöschenToolStripMenuItem})
Me.ContextMenuStripGesSicherh.Name = "ContextMenuStrip1"
Me.ContextMenuStripGesSicherh.Size = New System.Drawing.Size(201, 92)
Me.ContextMenuStripGesSicherh.Size = New System.Drawing.Size(201, 70)
'
'ATBNraendernToolStripMenuItem
'
@@ -190,7 +191,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel2.Location = New System.Drawing.Point(0, 287)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(1444, 489)
Me.Panel2.Size = New System.Drawing.Size(1684, 489)
Me.Panel2.TabIndex = 1
'
'pnlChangeATCNr
@@ -208,7 +209,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.pnlChangeATCNr.Controls.Add(Me.txtATCaendern)
Me.pnlChangeATCNr.Controls.Add(Me.Label34)
Me.pnlChangeATCNr.Controls.Add(Me.FlatButton4)
Me.pnlChangeATCNr.Location = New System.Drawing.Point(1051, 42)
Me.pnlChangeATCNr.Location = New System.Drawing.Point(1233, 46)
Me.pnlChangeATCNr.Name = "pnlChangeATCNr"
Me.pnlChangeATCNr.Size = New System.Drawing.Size(292, 192)
Me.pnlChangeATCNr.TabIndex = 13
@@ -360,7 +361,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.panOverlay.Controls.Add(Me.Label17)
Me.panOverlay.Controls.Add(Me.Label16)
Me.panOverlay.Controls.Add(Me.btnClosePanOverlay)
Me.panOverlay.Location = New System.Drawing.Point(485, 15)
Me.panOverlay.Location = New System.Drawing.Point(615, 19)
Me.panOverlay.Name = "panOverlay"
Me.panOverlay.Size = New System.Drawing.Size(527, 297)
Me.panOverlay.TabIndex = 2
@@ -465,14 +466,14 @@ Partial Class frmGesamtsicherheitenNEU
Me.pnlSummeGes.Dock = System.Windows.Forms.DockStyle.Bottom
Me.pnlSummeGes.Location = New System.Drawing.Point(0, 457)
Me.pnlSummeGes.Name = "pnlSummeGes"
Me.pnlSummeGes.Size = New System.Drawing.Size(1444, 32)
Me.pnlSummeGes.Size = New System.Drawing.Size(1684, 32)
Me.pnlSummeGes.TabIndex = 3
'
'Label28
'
Me.Label28.AutoSize = True
Me.Label28.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label28.Location = New System.Drawing.Point(1128, 9)
Me.Label28.Location = New System.Drawing.Point(1386, 9)
Me.Label28.Name = "Label28"
Me.Label28.Size = New System.Drawing.Size(130, 13)
Me.Label28.TabIndex = 4
@@ -482,7 +483,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label29.AutoSize = True
Me.Label29.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label29.Location = New System.Drawing.Point(909, 9)
Me.Label29.Location = New System.Drawing.Point(1167, 9)
Me.Label29.Name = "Label29"
Me.Label29.Size = New System.Drawing.Size(103, 13)
Me.Label29.TabIndex = 2
@@ -490,7 +491,7 @@ Partial Class frmGesamtsicherheitenNEU
'
'txtPosAnzalPosGes
'
Me.txtPosAnzalPosGes.Location = New System.Drawing.Point(830, 6)
Me.txtPosAnzalPosGes.Location = New System.Drawing.Point(1088, 6)
Me.txtPosAnzalPosGes.Name = "txtPosAnzalPosGes"
Me.txtPosAnzalPosGes.ReadOnly = True
Me.txtPosAnzalPosGes.Size = New System.Drawing.Size(53, 20)
@@ -498,7 +499,7 @@ Partial Class frmGesamtsicherheitenNEU
'
'txtAnzalPosGes
'
Me.txtAnzalPosGes.Location = New System.Drawing.Point(93, 5)
Me.txtAnzalPosGes.Location = New System.Drawing.Point(198, 6)
Me.txtAnzalPosGes.Name = "txtAnzalPosGes"
Me.txtAnzalPosGes.ReadOnly = True
Me.txtAnzalPosGes.Size = New System.Drawing.Size(53, 20)
@@ -508,7 +509,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label27.AutoSize = True
Me.Label27.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label27.Location = New System.Drawing.Point(479, 9)
Me.Label27.Location = New System.Drawing.Point(584, 10)
Me.Label27.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(130, 13)
Me.Label27.TabIndex = 4
@@ -518,7 +519,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label22.AutoSize = True
Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label22.Location = New System.Drawing.Point(759, 9)
Me.Label22.Location = New System.Drawing.Point(1017, 9)
Me.Label22.Name = "Label22"
Me.Label22.Size = New System.Drawing.Size(63, 13)
Me.Label22.TabIndex = 0
@@ -528,7 +529,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label24.AutoSize = True
Me.Label24.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label24.Location = New System.Drawing.Point(9, 8)
Me.Label24.Location = New System.Drawing.Point(114, 9)
Me.Label24.Name = "Label24"
Me.Label24.Size = New System.Drawing.Size(63, 13)
Me.Label24.TabIndex = 0
@@ -538,7 +539,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label25.AutoSize = True
Me.Label25.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label25.Location = New System.Drawing.Point(194, 8)
Me.Label25.Location = New System.Drawing.Point(299, 9)
Me.Label25.Name = "Label25"
Me.Label25.Size = New System.Drawing.Size(103, 13)
Me.Label25.TabIndex = 2
@@ -550,7 +551,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.lblGestellungNr.AutoSize = True
Me.lblGestellungNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblGestellungNr.ForeColor = System.Drawing.Color.Honeydew
Me.lblGestellungNr.Location = New System.Drawing.Point(72, 7)
Me.lblGestellungNr.Location = New System.Drawing.Point(312, 7)
Me.lblGestellungNr.Name = "lblGestellungNr"
Me.lblGestellungNr.Size = New System.Drawing.Size(177, 24)
Me.lblGestellungNr.TabIndex = 1
@@ -559,7 +560,7 @@ Partial Class frmGesamtsicherheitenNEU
'txtPosTime
'
Me.txtPosTime.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtPosTime.Location = New System.Drawing.Point(1261, 204)
Me.txtPosTime.Location = New System.Drawing.Point(1282, 200)
Me.txtPosTime.Margin = New System.Windows.Forms.Padding(0)
Me.txtPosTime.Name = "txtPosTime"
Me.txtPosTime.Size = New System.Drawing.Size(55, 24)
@@ -568,7 +569,7 @@ Partial Class frmGesamtsicherheitenNEU
'txtSicherheitTime
'
Me.txtSicherheitTime.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtSicherheitTime.Location = New System.Drawing.Point(595, 200)
Me.txtSicherheitTime.Location = New System.Drawing.Point(594, 200)
Me.txtSicherheitTime.Margin = New System.Windows.Forms.Padding(0)
Me.txtSicherheitTime.Name = "txtSicherheitTime"
Me.txtSicherheitTime.Size = New System.Drawing.Size(55, 24)
@@ -578,7 +579,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.txtPosSicherheitsbetrag.Enabled = False
Me.txtPosSicherheitsbetrag.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtPosSicherheitsbetrag.Location = New System.Drawing.Point(1422, 204)
Me.txtPosSicherheitsbetrag.Location = New System.Drawing.Point(1443, 200)
Me.txtPosSicherheitsbetrag.Margin = New System.Windows.Forms.Padding(0)
Me.txtPosSicherheitsbetrag.Name = "txtPosSicherheitsbetrag"
Me.txtPosSicherheitsbetrag.Size = New System.Drawing.Size(104, 24)
@@ -587,7 +588,7 @@ Partial Class frmGesamtsicherheitenNEU
'txtPosWarenwert
'
Me.txtPosWarenwert.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtPosWarenwert.Location = New System.Drawing.Point(1319, 204)
Me.txtPosWarenwert.Location = New System.Drawing.Point(1340, 200)
Me.txtPosWarenwert.Margin = New System.Windows.Forms.Padding(0)
Me.txtPosWarenwert.Name = "txtPosWarenwert"
Me.txtPosWarenwert.Size = New System.Drawing.Size(100, 24)
@@ -597,7 +598,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.txtPositionenCRN.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper
Me.txtPositionenCRN.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtPositionenCRN.Location = New System.Drawing.Point(943, 204)
Me.txtPositionenCRN.Location = New System.Drawing.Point(964, 200)
Me.txtPositionenCRN.Margin = New System.Windows.Forms.Padding(0)
Me.txtPositionenCRN.Name = "txtPositionenCRN"
Me.txtPositionenCRN.Size = New System.Drawing.Size(203, 24)
@@ -607,7 +608,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.txtSicherheitSicherheitsbetrag.Enabled = False
Me.txtSicherheitSicherheitsbetrag.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtSicherheitSicherheitsbetrag.Location = New System.Drawing.Point(772, 201)
Me.txtSicherheitSicherheitsbetrag.Location = New System.Drawing.Point(772, 200)
Me.txtSicherheitSicherheitsbetrag.Margin = New System.Windows.Forms.Padding(0)
Me.txtSicherheitSicherheitsbetrag.Name = "txtSicherheitSicherheitsbetrag"
Me.txtSicherheitSicherheitsbetrag.Size = New System.Drawing.Size(90, 24)
@@ -626,7 +627,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.txtSicherheitATBNr.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper
Me.txtSicherheitATBNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtSicherheitATBNr.Location = New System.Drawing.Point(90, 200)
Me.txtSicherheitATBNr.Location = New System.Drawing.Point(60, 200)
Me.txtSicherheitATBNr.Margin = New System.Windows.Forms.Padding(0)
Me.txtSicherheitATBNr.Name = "txtSicherheitATBNr"
Me.txtSicherheitATBNr.Size = New System.Drawing.Size(165, 24)
@@ -638,7 +639,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.lblZollsatz.AutoSize = True
Me.lblZollsatz.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblZollsatz.ForeColor = System.Drawing.Color.Honeydew
Me.lblZollsatz.Location = New System.Drawing.Point(1012, 137)
Me.lblZollsatz.Location = New System.Drawing.Point(1252, 137)
Me.lblZollsatz.Name = "lblZollsatz"
Me.lblZollsatz.Size = New System.Drawing.Size(85, 16)
Me.lblZollsatz.TabIndex = 7
@@ -650,7 +651,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.lblReferenzwert.AutoSize = True
Me.lblReferenzwert.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblReferenzwert.ForeColor = System.Drawing.Color.Honeydew
Me.lblReferenzwert.Location = New System.Drawing.Point(1012, 121)
Me.lblReferenzwert.Location = New System.Drawing.Point(1252, 121)
Me.lblReferenzwert.Name = "lblReferenzwert"
Me.lblReferenzwert.Size = New System.Drawing.Size(136, 16)
Me.lblReferenzwert.TabIndex = 6
@@ -662,7 +663,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.lblSaldo.AutoSize = True
Me.lblSaldo.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblSaldo.ForeColor = System.Drawing.Color.Honeydew
Me.lblSaldo.Location = New System.Drawing.Point(1199, 105)
Me.lblSaldo.Location = New System.Drawing.Point(1439, 105)
Me.lblSaldo.Name = "lblSaldo"
Me.lblSaldo.Size = New System.Drawing.Size(147, 24)
Me.lblSaldo.TabIndex = 5
@@ -685,9 +686,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.panOben.Controls.Add(Me.lblId)
Me.panOben.Controls.Add(Me.txtZollsatzueberschreiben)
Me.panOben.Controls.Add(Me.cbxZollsatzueberschreiben)
Me.panOben.Controls.Add(Me.btnNext)
Me.panOben.Controls.Add(Me.lbloffenerSaldo)
Me.panOben.Controls.Add(Me.btnPrev)
Me.panOben.Controls.Add(Me.Label20)
Me.panOben.Controls.Add(Me.txtPosNr)
Me.panOben.Controls.Add(Me.Panel1)
@@ -733,14 +732,14 @@ Partial Class frmGesamtsicherheitenNEU
Me.panOben.Location = New System.Drawing.Point(0, 0)
Me.panOben.Margin = New System.Windows.Forms.Padding(0)
Me.panOben.Name = "panOben"
Me.panOben.Size = New System.Drawing.Size(1444, 287)
Me.panOben.Size = New System.Drawing.Size(1684, 287)
Me.panOben.TabIndex = 0
'
'Label31
'
Me.Label31.AutoSize = True
Me.Label31.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label31.Location = New System.Drawing.Point(317, 187)
Me.Label31.Location = New System.Drawing.Point(312, 187)
Me.Label31.Name = "Label31"
Me.Label31.Size = New System.Drawing.Size(79, 13)
Me.Label31.TabIndex = 57
@@ -750,17 +749,17 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.txtMRNNr.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper
Me.txtMRNNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtMRNNr.Location = New System.Drawing.Point(297, 200)
Me.txtMRNNr.Location = New System.Drawing.Point(270, 200)
Me.txtMRNNr.Margin = New System.Windows.Forms.Padding(0)
Me.txtMRNNr.Name = "txtMRNNr"
Me.txtMRNNr.Size = New System.Drawing.Size(143, 24)
Me.txtMRNNr.Size = New System.Drawing.Size(165, 24)
Me.txtMRNNr.TabIndex = 27
'
'Label19
'
Me.Label19.AutoSize = True
Me.Label19.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label19.Location = New System.Drawing.Point(440, 188)
Me.Label19.Location = New System.Drawing.Point(435, 188)
Me.Label19.Name = "Label19"
Me.Label19.Size = New System.Drawing.Size(35, 13)
Me.Label19.TabIndex = 55
@@ -769,7 +768,7 @@ Partial Class frmGesamtsicherheitenNEU
'txtSPosNr
'
Me.txtSPosNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtSPosNr.Location = New System.Drawing.Point(443, 201)
Me.txtSPosNr.Location = New System.Drawing.Point(438, 200)
Me.txtSPosNr.Margin = New System.Windows.Forms.Padding(0)
Me.txtSPosNr.Name = "txtSPosNr"
Me.txtSPosNr.Size = New System.Drawing.Size(35, 24)
@@ -780,7 +779,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.dtpSicherheitDat.CustomFormat = "''"
Me.dtpSicherheitDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.dtpSicherheitDat.Format = System.Windows.Forms.DateTimePickerFormat.Custom
Me.dtpSicherheitDat.Location = New System.Drawing.Point(483, 200)
Me.dtpSicherheitDat.Location = New System.Drawing.Point(478, 200)
Me.dtpSicherheitDat.Margin = New System.Windows.Forms.Padding(0)
Me.dtpSicherheitDat.Name = "dtpSicherheitDat"
Me.dtpSicherheitDat.Size = New System.Drawing.Size(110, 24)
@@ -791,7 +790,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.dtpPosDat.CustomFormat = "''"
Me.dtpPosDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.dtpPosDat.Format = System.Windows.Forms.DateTimePickerFormat.Custom
Me.dtpPosDat.Location = New System.Drawing.Point(1150, 204)
Me.dtpPosDat.Location = New System.Drawing.Point(1171, 200)
Me.dtpPosDat.Margin = New System.Windows.Forms.Padding(0)
Me.dtpPosDat.Name = "dtpPosDat"
Me.dtpPosDat.RightToLeft = System.Windows.Forms.RightToLeft.No
@@ -804,7 +803,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.lbloffenerWarenwert.AutoSize = True
Me.lbloffenerWarenwert.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lbloffenerWarenwert.ForeColor = System.Drawing.Color.Red
Me.lbloffenerWarenwert.Location = New System.Drawing.Point(153, 109)
Me.lbloffenerWarenwert.Location = New System.Drawing.Point(393, 109)
Me.lbloffenerWarenwert.Name = "lbloffenerWarenwert"
Me.lbloffenerWarenwert.Size = New System.Drawing.Size(204, 24)
Me.lbloffenerWarenwert.TabIndex = 51
@@ -828,7 +827,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.lblId.AutoSize = True
Me.lblId.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblId.ForeColor = System.Drawing.Color.Honeydew
Me.lblId.Location = New System.Drawing.Point(1289, 7)
Me.lblId.Location = New System.Drawing.Point(1529, 7)
Me.lblId.Name = "lblId"
Me.lblId.Size = New System.Drawing.Size(29, 24)
Me.lblId.TabIndex = 0
@@ -838,7 +837,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.cbxZollsatzueberschreiben.AutoSize = True
Me.cbxZollsatzueberschreiben.ForeColor = System.Drawing.Color.White
Me.cbxZollsatzueberschreiben.Location = New System.Drawing.Point(953, 158)
Me.cbxZollsatzueberschreiben.Location = New System.Drawing.Point(974, 154)
Me.cbxZollsatzueberschreiben.Name = "cbxZollsatzueberschreiben"
Me.cbxZollsatzueberschreiben.Size = New System.Drawing.Size(132, 17)
Me.cbxZollsatzueberschreiben.TabIndex = 9
@@ -847,13 +846,14 @@ Partial Class frmGesamtsicherheitenNEU
'
'btnNext
'
Me.btnNext.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.btnNext.BackColor = System.Drawing.Color.White
Me.btnNext.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnNext.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnNext.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnNext.Location = New System.Drawing.Point(1492, 111)
Me.btnNext.Location = New System.Drawing.Point(1628, 37)
Me.btnNext.Name = "btnNext"
Me.btnNext.Size = New System.Drawing.Size(75, 47)
Me.btnNext.Size = New System.Drawing.Size(50, 25)
Me.btnNext.TabIndex = 8
Me.btnNext.Text = ">>"
Me.btnNext.UseVisualStyleBackColor = False
@@ -864,7 +864,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.lbloffenerSaldo.AutoSize = True
Me.lbloffenerSaldo.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lbloffenerSaldo.ForeColor = System.Drawing.Color.Red
Me.lbloffenerSaldo.Location = New System.Drawing.Point(153, 137)
Me.lbloffenerSaldo.Location = New System.Drawing.Point(393, 137)
Me.lbloffenerSaldo.Name = "lbloffenerSaldo"
Me.lbloffenerSaldo.Size = New System.Drawing.Size(253, 24)
Me.lbloffenerSaldo.TabIndex = 4
@@ -876,9 +876,9 @@ Partial Class frmGesamtsicherheitenNEU
Me.btnPrev.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnPrev.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnPrev.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnPrev.Location = New System.Drawing.Point(12, 108)
Me.btnPrev.Location = New System.Drawing.Point(9, 40)
Me.btnPrev.Name = "btnPrev"
Me.btnPrev.Size = New System.Drawing.Size(75, 47)
Me.btnPrev.Size = New System.Drawing.Size(50, 22)
Me.btnPrev.TabIndex = 3
Me.btnPrev.Text = "<<"
Me.btnPrev.UseVisualStyleBackColor = False
@@ -887,7 +887,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label20.AutoSize = True
Me.Label20.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label20.Location = New System.Drawing.Point(1155, 237)
Me.Label20.Location = New System.Drawing.Point(1176, 233)
Me.Label20.Name = "Label20"
Me.Label20.Size = New System.Drawing.Size(25, 13)
Me.Label20.TabIndex = 42
@@ -897,7 +897,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.txtPosNr.Enabled = False
Me.txtPosNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtPosNr.Location = New System.Drawing.Point(1158, 250)
Me.txtPosNr.Location = New System.Drawing.Point(1179, 246)
Me.txtPosNr.Margin = New System.Windows.Forms.Padding(0)
Me.txtPosNr.Name = "txtPosNr"
Me.txtPosNr.Size = New System.Drawing.Size(37, 24)
@@ -905,6 +905,8 @@ Partial Class frmGesamtsicherheitenNEU
'
'Panel1
'
Me.Panel1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Panel1.BackColor = System.Drawing.SystemColors.ButtonHighlight
Me.Panel1.Controls.Add(Me.cbxRundPosanzeigen)
Me.Panel1.Controls.Add(Me.btnRundungsdifAusgl)
@@ -912,15 +914,17 @@ Partial Class frmGesamtsicherheitenNEU
Me.Panel1.Controls.Add(Me.cbx_offene)
Me.Panel1.Controls.Add(Me.txtSuche)
Me.Panel1.Controls.Add(Me.Label21)
Me.Panel1.Location = New System.Drawing.Point(3, 41)
Me.Panel1.Controls.Add(Me.btnPrev)
Me.Panel1.Controls.Add(Me.btnNext)
Me.Panel1.Location = New System.Drawing.Point(3, 34)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(1578, 61)
Me.Panel1.Size = New System.Drawing.Size(1681, 65)
Me.Panel1.TabIndex = 2
'
'cbxRundPosanzeigen
'
Me.cbxRundPosanzeigen.AutoSize = True
Me.cbxRundPosanzeigen.Location = New System.Drawing.Point(12, 38)
Me.cbxRundPosanzeigen.Location = New System.Drawing.Point(9, 22)
Me.cbxRundPosanzeigen.Name = "cbxRundPosanzeigen"
Me.cbxRundPosanzeigen.Size = New System.Drawing.Size(169, 17)
Me.cbxRundPosanzeigen.TabIndex = 52
@@ -929,7 +933,7 @@ Partial Class frmGesamtsicherheitenNEU
'
'btnRundungsdifAusgl
'
Me.btnRundungsdifAusgl.Location = New System.Drawing.Point(1133, 7)
Me.btnRundungsdifAusgl.Location = New System.Drawing.Point(1457, 4)
Me.btnRundungsdifAusgl.Name = "btnRundungsdifAusgl"
Me.btnRundungsdifAusgl.Size = New System.Drawing.Size(122, 42)
Me.btnRundungsdifAusgl.TabIndex = 51
@@ -938,7 +942,7 @@ Partial Class frmGesamtsicherheitenNEU
'
'btnNew
'
Me.btnNew.Location = New System.Drawing.Point(1265, 13)
Me.btnNew.Location = New System.Drawing.Point(1585, 4)
Me.btnNew.Name = "btnNew"
Me.btnNew.Size = New System.Drawing.Size(93, 30)
Me.btnNew.TabIndex = 50
@@ -948,7 +952,7 @@ Partial Class frmGesamtsicherheitenNEU
'cbx_offene
'
Me.cbx_offene.AutoSize = True
Me.cbx_offene.Location = New System.Drawing.Point(12, 19)
Me.cbx_offene.Location = New System.Drawing.Point(9, 3)
Me.cbx_offene.Name = "cbx_offene"
Me.cbx_offene.Size = New System.Drawing.Size(120, 17)
Me.cbx_offene.TabIndex = 3
@@ -958,7 +962,7 @@ Partial Class frmGesamtsicherheitenNEU
'txtSuche
'
Me.txtSuche.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtSuche.Location = New System.Drawing.Point(208, 19)
Me.txtSuche.Location = New System.Drawing.Point(255, 3)
Me.txtSuche.Margin = New System.Windows.Forms.Padding(0)
Me.txtSuche.Name = "txtSuche"
Me.txtSuche.Size = New System.Drawing.Size(243, 24)
@@ -978,7 +982,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label15.AutoSize = True
Me.Label15.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label15.Location = New System.Drawing.Point(256, 187)
Me.Label15.Location = New System.Drawing.Point(226, 187)
Me.Label15.Name = "Label15"
Me.Label15.Size = New System.Drawing.Size(25, 13)
Me.Label15.TabIndex = 14
@@ -987,7 +991,7 @@ Partial Class frmGesamtsicherheitenNEU
'txtAnzahlPos
'
Me.txtAnzahlPos.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtAnzahlPos.Location = New System.Drawing.Point(259, 200)
Me.txtAnzahlPos.Location = New System.Drawing.Point(229, 200)
Me.txtAnzahlPos.Margin = New System.Windows.Forms.Padding(0)
Me.txtAnzahlPos.Name = "txtAnzahlPos"
Me.txtAnzahlPos.Size = New System.Drawing.Size(35, 24)
@@ -1038,7 +1042,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label7.AutoSize = True
Me.Label7.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label7.Location = New System.Drawing.Point(1258, 233)
Me.Label7.Location = New System.Drawing.Point(1279, 229)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(41, 13)
Me.Label7.TabIndex = 43
@@ -1048,7 +1052,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label8.AutoSize = True
Me.Label8.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label8.Location = New System.Drawing.Point(1320, 191)
Me.Label8.Location = New System.Drawing.Point(1341, 187)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(59, 13)
Me.Label8.TabIndex = 22
@@ -1058,7 +1062,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label9.AutoSize = True
Me.Label9.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label9.Location = New System.Drawing.Point(1423, 191)
Me.Label9.Location = New System.Drawing.Point(1444, 187)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(89, 13)
Me.Label9.TabIndex = 23
@@ -1068,7 +1072,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label10.AutoSize = True
Me.Label10.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label10.Location = New System.Drawing.Point(1259, 191)
Me.Label10.Location = New System.Drawing.Point(1280, 187)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(40, 13)
Me.Label10.TabIndex = 21
@@ -1078,7 +1082,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label11.AutoSize = True
Me.Label11.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label11.Location = New System.Drawing.Point(1150, 191)
Me.Label11.Location = New System.Drawing.Point(1171, 187)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(38, 13)
Me.Label11.TabIndex = 20
@@ -1088,7 +1092,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label12.AutoSize = True
Me.Label12.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label12.Location = New System.Drawing.Point(1002, 191)
Me.Label12.Location = New System.Drawing.Point(1023, 187)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(77, 13)
Me.Label12.TabIndex = 19
@@ -1118,7 +1122,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label4.AutoSize = True
Me.Label4.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label4.Location = New System.Drawing.Point(779, 188)
Me.Label4.Location = New System.Drawing.Point(775, 187)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(89, 13)
Me.Label4.TabIndex = 18
@@ -1138,7 +1142,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label2.AutoSize = True
Me.Label2.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label2.Location = New System.Drawing.Point(481, 188)
Me.Label2.Location = New System.Drawing.Point(476, 188)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(38, 13)
Me.Label2.TabIndex = 15
@@ -1148,7 +1152,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.Label1.AutoSize = True
Me.Label1.ForeColor = System.Drawing.SystemColors.ButtonHighlight
Me.Label1.Location = New System.Drawing.Point(96, 187)
Me.Label1.Location = New System.Drawing.Point(66, 187)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(70, 13)
Me.Label1.TabIndex = 13
@@ -1157,7 +1161,7 @@ Partial Class frmGesamtsicherheitenNEU
'txtPosFreitext
'
Me.txtPosFreitext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtPosFreitext.Location = New System.Drawing.Point(1261, 246)
Me.txtPosFreitext.Location = New System.Drawing.Point(1282, 242)
Me.txtPosFreitext.Margin = New System.Windows.Forms.Padding(0)
Me.txtPosFreitext.Name = "txtPosFreitext"
Me.txtPosFreitext.Size = New System.Drawing.Size(264, 24)
@@ -1346,36 +1350,36 @@ Partial Class frmGesamtsicherheitenNEU
Me.dgvGesamtsicherheit.AKTUALISIERUNGS_INTERVALL = -1
Me.dgvGesamtsicherheit.AllowUserToAddRows = False
Me.dgvGesamtsicherheit.AllowUserToDeleteRows = False
DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvGesamtsicherheit.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle1
DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle5.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvGesamtsicherheit.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle5
Me.dgvGesamtsicherheit.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvGesamtsicherheit.ContextMenuStrip = Me.ContextMenuStripGesSicherh
DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvGesamtsicherheit.DefaultCellStyle = DataGridViewCellStyle2
DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle6.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle6.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvGesamtsicherheit.DefaultCellStyle = DataGridViewCellStyle6
Me.dgvGesamtsicherheit.Dock = System.Windows.Forms.DockStyle.Left
Me.dgvGesamtsicherheit.Location = New System.Drawing.Point(0, 0)
Me.dgvGesamtsicherheit.Name = "dgvGesamtsicherheit"
Me.dgvGesamtsicherheit.ReadOnly = True
DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvGesamtsicherheit.RowHeadersDefaultCellStyle = DataGridViewCellStyle3
DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle7.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle7.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvGesamtsicherheit.RowHeadersDefaultCellStyle = DataGridViewCellStyle7
Me.dgvGesamtsicherheit.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
Me.dgvGesamtsicherheit.Size = New System.Drawing.Size(922, 457)
Me.dgvGesamtsicherheit.TabIndex = 0
@@ -1385,26 +1389,26 @@ Partial Class frmGesamtsicherheitenNEU
Me.dgvSicherheitsPos.AKTUALISIERUNGS_INTERVALL = -1
Me.dgvSicherheitsPos.AllowUserToAddRows = False
Me.dgvSicherheitsPos.AllowUserToDeleteRows = False
DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvSicherheitsPos.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle4
DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvSicherheitsPos.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle1
Me.dgvSicherheitsPos.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvSicherheitsPos.ContextMenuStrip = Me.ContextMenuStripPosSicherheiten
DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle5.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvSicherheitsPos.DefaultCellStyle = DataGridViewCellStyle5
DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvSicherheitsPos.DefaultCellStyle = DataGridViewCellStyle2
Me.dgvSicherheitsPos.Dock = System.Windows.Forms.DockStyle.Right
Me.dgvSicherheitsPos.Location = New System.Drawing.Point(688, 0)
Me.dgvSicherheitsPos.Location = New System.Drawing.Point(928, 0)
Me.dgvSicherheitsPos.Name = "dgvSicherheitsPos"
Me.dgvSicherheitsPos.ReadOnly = True
Me.dgvSicherheitsPos.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
@@ -1426,7 +1430,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.txtPosSicherheitsbGes._Waehrung = True
Me.txtPosSicherheitsbGes._WaehrungZeichen = True
Me.txtPosSicherheitsbGes.ForeColor = System.Drawing.Color.Black
Me.txtPosSicherheitsbGes.Location = New System.Drawing.Point(1272, 6)
Me.txtPosSicherheitsbGes.Location = New System.Drawing.Point(1530, 6)
Me.txtPosSicherheitsbGes.MaxLineLength = -1
Me.txtPosSicherheitsbGes.MaxLines_Warning = ""
Me.txtPosSicherheitsbGes.MaxLines_Warning_Label = Nothing
@@ -1450,7 +1454,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.txtSicherheitsbGes._Waehrung = True
Me.txtSicherheitsbGes._WaehrungZeichen = True
Me.txtSicherheitsbGes.ForeColor = System.Drawing.Color.Black
Me.txtSicherheitsbGes.Location = New System.Drawing.Point(615, 5)
Me.txtSicherheitsbGes.Location = New System.Drawing.Point(720, 6)
Me.txtSicherheitsbGes.MaxLineLength = -1
Me.txtSicherheitsbGes.MaxLines_Warning = ""
Me.txtSicherheitsbGes.MaxLines_Warning_Label = Nothing
@@ -1474,7 +1478,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.txtPosWarenwertGes._Waehrung = True
Me.txtPosWarenwertGes._WaehrungZeichen = True
Me.txtPosWarenwertGes.ForeColor = System.Drawing.Color.Black
Me.txtPosWarenwertGes.Location = New System.Drawing.Point(1018, 6)
Me.txtPosWarenwertGes.Location = New System.Drawing.Point(1276, 6)
Me.txtPosWarenwertGes.MaxLineLength = -1
Me.txtPosWarenwertGes.MaxLines_Warning = ""
Me.txtPosWarenwertGes.MaxLines_Warning_Label = Nothing
@@ -1498,7 +1502,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.txtWarenwertGes._Waehrung = True
Me.txtWarenwertGes._WaehrungZeichen = True
Me.txtWarenwertGes.ForeColor = System.Drawing.Color.Black
Me.txtWarenwertGes.Location = New System.Drawing.Point(326, 6)
Me.txtWarenwertGes.Location = New System.Drawing.Point(431, 7)
Me.txtWarenwertGes.MaxLineLength = -1
Me.txtWarenwertGes.MaxLines_Warning = ""
Me.txtWarenwertGes.MaxLines_Warning_Label = Nothing
@@ -1523,7 +1527,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.txtSicherheitDat._WaehrungZeichen = True
Me.txtSicherheitDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtSicherheitDat.ForeColor = System.Drawing.Color.Black
Me.txtSicherheitDat.Location = New System.Drawing.Point(483, 200)
Me.txtSicherheitDat.Location = New System.Drawing.Point(478, 200)
Me.txtSicherheitDat.MaxLength = 10
Me.txtSicherheitDat.MaxLineLength = -1
Me.txtSicherheitDat.MaxLines_Warning = ""
@@ -1549,7 +1553,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.txtPosDat._WaehrungZeichen = True
Me.txtPosDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtPosDat.ForeColor = System.Drawing.Color.Black
Me.txtPosDat.Location = New System.Drawing.Point(1148, 204)
Me.txtPosDat.Location = New System.Drawing.Point(1169, 200)
Me.txtPosDat.MaxLength = 10
Me.txtPosDat.MaxLineLength = -1
Me.txtPosDat.MaxLines_Warning = ""
@@ -1590,7 +1594,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.txtZollsatzueberschreiben._WaehrungZeichen = True
Me.txtZollsatzueberschreiben.Enabled = False
Me.txtZollsatzueberschreiben.ForeColor = System.Drawing.Color.Black
Me.txtZollsatzueberschreiben.Location = New System.Drawing.Point(1091, 156)
Me.txtZollsatzueberschreiben.Location = New System.Drawing.Point(1112, 152)
Me.txtZollsatzueberschreiben.MaxLineLength = -1
Me.txtZollsatzueberschreiben.MaxLines_Warning = ""
Me.txtZollsatzueberschreiben.MaxLines_Warning_Label = Nothing
@@ -1607,7 +1611,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.btnDeletePos.FlatAppearance.BorderSize = 0
Me.btnDeletePos.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnDeletePos.ForeColor = System.Drawing.Color.Black
Me.btnDeletePos.Location = New System.Drawing.Point(1540, 164)
Me.btnDeletePos.Location = New System.Drawing.Point(1561, 160)
Me.btnDeletePos.Name = "btnDeletePos"
Me.btnDeletePos.Size = New System.Drawing.Size(24, 24)
Me.btnDeletePos.TabIndex = 24
@@ -1639,7 +1643,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.btnUpdatePos.FlatAppearance.BorderSize = 0
Me.btnUpdatePos.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnUpdatePos.ForeColor = System.Drawing.Color.Black
Me.btnUpdatePos.Location = New System.Drawing.Point(1540, 245)
Me.btnUpdatePos.Location = New System.Drawing.Point(1561, 241)
Me.btnUpdatePos.Name = "btnUpdatePos"
Me.btnUpdatePos.Size = New System.Drawing.Size(24, 24)
Me.btnUpdatePos.TabIndex = 49
@@ -1671,7 +1675,7 @@ Partial Class frmGesamtsicherheitenNEU
Me.btnAddPos.FlatAppearance.BorderSize = 0
Me.btnAddPos.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnAddPos.ForeColor = System.Drawing.Color.Black
Me.btnAddPos.Location = New System.Drawing.Point(1540, 203)
Me.btnAddPos.Location = New System.Drawing.Point(1561, 199)
Me.btnAddPos.Name = "btnAddPos"
Me.btnAddPos.Size = New System.Drawing.Size(24, 24)
Me.btnAddPos.TabIndex = 39
@@ -1702,7 +1706,7 @@ Partial Class frmGesamtsicherheitenNEU
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1444, 776)
Me.ClientSize = New System.Drawing.Size(1684, 776)
Me.Controls.Add(Me.Panel2)
Me.Controls.Add(Me.panOben)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)

86
Aviso/frmGesamtsicherheitenNEU.resx
View File

@@ -120,52 +120,10 @@
<metadata name="ContextMenuStripGesSicherh.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="FlatButton4.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAHJSURBVEhLvZUxaxVBFIWfRm0STBNQkRQnYI5/IH8g
RSxioWnFxk6CWvgXEkljJwgRFKtY2FmmsBFrQUzszQHRBCshKObJwCwsZ+6+2fCMxdecmXM/2H1732A4
HA7+J0XQIOK0Z/+CImgQMS3igufjUgQJEVdFPBfxqa9UxKnce+FnbYpAxBURb0UMM72k6RWI2Mydl37e
4KVJEU9F/GoJq1IRl0Q8EvG91QmlXvxsoqpUxGURW8H9UOrl5pF0UUhFrIn4GdxteNMpzAM2glIhzT+Q
VyL+BHcajkTsjxQeQ/okyJ0DEStVYU9pGuZZmy8i7ok430vYU9rFrohrPq8qHEO6mhaBz+olzNLXwdCI
bRHLo/ZwEUSIeBgMj3jgXacITDQv4pmIH8HwiD3/Tp0iaMnOZZkPrVEsh6pQxIyIdduNx6FTWgQiZvMG
8SHOhyCrSiPhYxGHwQDnTo9PJkkv1oRecj6KuC1iKt+vSVUT3gpKDd9E3Ag6XdL0v/p+pDAPuBmUv4q4
77uxIt0RsVAVBtL0Lpb8jtOS/s5bZ1HEmfadomQDGuldP+siS9+JmPOzRBE46Z2JOOv5KERcFzHheaII
TpoiOGn+Arb2yxeUX28vAAAAAElFTkSuQmCC
</value>
</data>
<data name="FlatButton2.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAHJSURBVEhLvZUxaxVBFIWfRm0STBNQkRQnYI5/IH8g
RSxioWnFxk6CWvgXEkljJwgRFKtY2FmmsBFrQUzszQHRBCshKObJwCwsZ+6+2fCMxdecmXM/2H1732A4
HA7+J0XQIOK0Z/+CImgQMS3igufjUgQJEVdFPBfxqa9UxKnce+FnbYpAxBURb0UMM72k6RWI2Mydl37e
4KVJEU9F/GoJq1IRl0Q8EvG91QmlXvxsoqpUxGURW8H9UOrl5pF0UUhFrIn4GdxteNMpzAM2glIhzT+Q
VyL+BHcajkTsjxQeQ/okyJ0DEStVYU9pGuZZmy8i7ok430vYU9rFrohrPq8qHEO6mhaBz+olzNLXwdCI
bRHLo/ZwEUSIeBgMj3jgXacITDQv4pmIH8HwiD3/Tp0iaMnOZZkPrVEsh6pQxIyIdduNx6FTWgQiZvMG
8SHOhyCrSiPhYxGHwQDnTo9PJkkv1oRecj6KuC1iKt+vSVUT3gpKDd9E3Ag6XdL0v/p+pDAPuBmUv4q4
77uxIt0RsVAVBtL0Lpb8jtOS/s5bZ1HEmfadomQDGuldP+siS9+JmPOzRBE46Z2JOOv5KERcFzHheaII
TpoiOGn+Arb2yxeUX28vAAAAAElFTkSuQmCC
</value>
</data>
<data name="btnClosePanOverlay.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAHJSURBVEhLvZUxaxVBFIWfRm0STBNQkRQnYI5/IH8g
RSxioWnFxk6CWvgXEkljJwgRFKtY2FmmsBFrQUzszQHRBCshKObJwCwsZ+6+2fCMxdecmXM/2H1732A4
HA7+J0XQIOK0Z/+CImgQMS3igufjUgQJEVdFPBfxqa9UxKnce+FnbYpAxBURb0UMM72k6RWI2Mydl37e
4KVJEU9F/GoJq1IRl0Q8EvG91QmlXvxsoqpUxGURW8H9UOrl5pF0UUhFrIn4GdxteNMpzAM2glIhzT+Q
VyL+BHcajkTsjxQeQ/okyJ0DEStVYU9pGuZZmy8i7ok430vYU9rFrohrPq8qHEO6mhaBz+olzNLXwdCI
bRHLo/ZwEUSIeBgMj3jgXacITDQv4pmIH8HwiD3/Tp0iaMnOZZkPrVEsh6pQxIyIdduNx6FTWgQiZvMG
8SHOhyCrSiPhYxGHwQDnTo9PJkkv1oRecj6KuC1iKt+vSVUT3gpKDd9E3Ag6XdL0v/p+pDAPuBmUv4q4
77uxIt0RsVAVBtL0Lpb8jtOS/s5bZ1HEmfadomQDGuldP+siS9+JmPOzRBE46Z2JOOv5KERcFzHheaII
TpoiOGn+Arb2yxeUX28vAAAAAElFTkSuQmCC
</value>
</data>
<metadata name="ContextMenuStripPosSicherheiten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>268, 15</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="btnDeletePos.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
@@ -322,6 +280,48 @@
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAABVSURBVEhL7c0xDgAgCENR738Ar4uDi7bEECMsdngO
BPzNzFolGmSbTw+zA9wlCnowouBGQQ9GroN4nELB5/4KRtEnC9wlCnowouBGQQ9G7oKVaJBtAF0U0pEO
zULyAAAAAElFTkSuQmCC
</value>
</data>
<data name="FlatButton4.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAHJSURBVEhLvZUxaxVBFIWfRm0STBNQkRQnYI5/IH8g
RSxioWnFxk6CWvgXEkljJwgRFKtY2FmmsBFrQUzszQHRBCshKObJwCwsZ+6+2fCMxdecmXM/2H1732A4
HA7+J0XQIOK0Z/+CImgQMS3igufjUgQJEVdFPBfxqa9UxKnce+FnbYpAxBURb0UMM72k6RWI2Mydl37e
4KVJEU9F/GoJq1IRl0Q8EvG91QmlXvxsoqpUxGURW8H9UOrl5pF0UUhFrIn4GdxteNMpzAM2glIhzT+Q
VyL+BHcajkTsjxQeQ/okyJ0DEStVYU9pGuZZmy8i7ok430vYU9rFrohrPq8qHEO6mhaBz+olzNLXwdCI
bRHLo/ZwEUSIeBgMj3jgXacITDQv4pmIH8HwiD3/Tp0iaMnOZZkPrVEsh6pQxIyIdduNx6FTWgQiZvMG
8SHOhyCrSiPhYxGHwQDnTo9PJkkv1oRecj6KuC1iKt+vSVUT3gpKDd9E3Ag6XdL0v/p+pDAPuBmUv4q4
77uxIt0RsVAVBtL0Lpb8jtOS/s5bZ1HEmfadomQDGuldP+siS9+JmPOzRBE46Z2JOOv5KERcFzHheaII
TpoiOGn+Arb2yxeUX28vAAAAAElFTkSuQmCC
</value>
</data>
<data name="FlatButton2.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAHJSURBVEhLvZUxaxVBFIWfRm0STBNQkRQnYI5/IH8g
RSxioWnFxk6CWvgXEkljJwgRFKtY2FmmsBFrQUzszQHRBCshKObJwCwsZ+6+2fCMxdecmXM/2H1732A4
HA7+J0XQIOK0Z/+CImgQMS3igufjUgQJEVdFPBfxqa9UxKnce+FnbYpAxBURb0UMM72k6RWI2Mydl37e
4KVJEU9F/GoJq1IRl0Q8EvG91QmlXvxsoqpUxGURW8H9UOrl5pF0UUhFrIn4GdxteNMpzAM2glIhzT+Q
VyL+BHcajkTsjxQeQ/okyJ0DEStVYU9pGuZZmy8i7ok430vYU9rFrohrPq8qHEO6mhaBz+olzNLXwdCI
bRHLo/ZwEUSIeBgMj3jgXacITDQv4pmIH8HwiD3/Tp0iaMnOZZkPrVEsh6pQxIyIdduNx6FTWgQiZvMG
8SHOhyCrSiPhYxGHwQDnTo9PJkkv1oRecj6KuC1iKt+vSVUT3gpKDd9E3Ag6XdL0v/p+pDAPuBmUv4q4
77uxIt0RsVAVBtL0Lpb8jtOS/s5bZ1HEmfadomQDGuldP+siS9+JmPOzRBE46Z2JOOv5KERcFzHheaII
TpoiOGn+Arb2yxeUX28vAAAAAElFTkSuQmCC
</value>
</data>
<data name="btnClosePanOverlay.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAHJSURBVEhLvZUxaxVBFIWfRm0STBNQkRQnYI5/IH8g
RSxioWnFxk6CWvgXEkljJwgRFKtY2FmmsBFrQUzszQHRBCshKObJwCwsZ+6+2fCMxdecmXM/2H1732A4
HA7+J0XQIOK0Z/+CImgQMS3igufjUgQJEVdFPBfxqa9UxKnce+FnbYpAxBURb0UMM72k6RWI2Mydl37e
4KVJEU9F/GoJq1IRl0Q8EvG91QmlXvxsoqpUxGURW8H9UOrl5pF0UUhFrIn4GdxteNMpzAM2glIhzT+Q
VyL+BHcajkTsjxQeQ/okyJ0DEStVYU9pGuZZmy8i7ok430vYU9rFrohrPq8qHEO6mhaBz+olzNLXwdCI
bRHLo/ZwEUSIeBgMj3jgXacITDQv4pmIH8HwiD3/Tp0iaMnOZZkPrVEsh6pQxIyIdduNx6FTWgQiZvMG
8SHOhyCrSiPhYxGHwQDnTo9PJkkv1oRecj6KuC1iKt+vSVUT3gpKDd9E3Ag6XdL0v/p+pDAPuBmUv4q4
77uxIt0RsVAVBtL0Lpb8jtOS/s5bZ1HEmfadomQDGuldP+siS9+JmPOzRBE46Z2JOOv5KERcFzHheaII
TpoiOGn+Arb2yxeUX28vAAAAAElFTkSuQmCC
</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">

82
Aviso/frmGesamtsicherheitenNEU.vb
View File

@@ -169,6 +169,7 @@ Public Class frmGesamtsicherheitenNEU
.Columns("gs_posSubNr").HeaderText = "SPos"
.Columns("gs_posSubNr").Width = 35
.Columns("gs_ATBNr").Width = 130
.Columns("gs_MRNNr").Width = 130
.Columns("gs_atr").HeaderText = "ATR"
.Columns("gs_atr").Visible = True
.Columns("gs_atr").Width = 35
@@ -182,10 +183,10 @@ Public Class frmGesamtsicherheitenNEU
Else
.Columns("gs_ATBNr").HeaderText = "T1 MRN"
End If
.Columns("gs_MRNNr").Width = 150
.Columns("gs_ATBNr").Width = 150
End Select
Label1.Text = .Columns("gs_ATBNr").HeaderText
changeLabel(currentGesSichRef.brgakto_gs_ATR)
.Columns("gs_posNr").Width = 35
@@ -713,7 +714,14 @@ Public Class frmGesamtsicherheitenNEU
Case Else
With OPEN
.gs_posNr = getLatestPosNr(gessicherheitID, txtSicherheitATBNr.Text) + 1
.gs_posSubNr = getLatestSubPosNr(gessicherheitID, txtMRNNr.Text) + 1
If .gs_MRNNr <> "" Then
.gs_posSubNr = getLatestSubPosNr(gessicherheitID, txtSicherheitATBNr.Text, txtMRNNr.Text) + 1
Else
.gs_posSubNr = Nothing
End If
End With
attachPosNrToExistingATB = True
indexGsId = OPEN.SAVEOBJECT()
@@ -776,7 +784,11 @@ Public Class frmGesamtsicherheitenNEU
.gs_gsNr = gessicherheitID
.gs_ATBNr = ""
.gs_MRNNr = ""
.gs_posSubNr = Me.getLatestSubPosNr(currentSicherheit.gs_gsNr, currentSicherheit.gs_MRNNr) + 1
If .gs_MRNNr <> "" Then
.gs_posSubNr = Me.getLatestSubPosNr(currentSicherheit.gs_gsNr, currentSicherheit.gs_ATBNr, currentSicherheit.gs_MRNNr) + 1
Else
.gs_posSubNr = Nothing
End If
.gs_posNr = Me.getLatestPosNr(currentSicherheit.gs_gsNr, currentSicherheit.gs_ATBNr) + 1
.gs_datum = DateTimeString2DateTimeKonvertinator(txtPosDat.Text, txtPosTime.Text)
.gs_warenwert = 0
@@ -1002,7 +1014,11 @@ Public Class frmGesamtsicherheitenNEU
.gs_ATBNr = txtSicherheitATBNr.Text
.gs_MRNNr = txtMRNNr.Text
.gs_posNr = Integer.Parse(setNullToZero(txtAnzahlPos.Text))
.gs_posSubNr = IIf(Integer.Parse(setNullToZero(txtSPosNr.Text)) <> 0, Integer.Parse(setNullToZero(txtSPosNr.Text)), Me.getLatestSubPosNr(currentSicherheit.gs_gsNr, currentSicherheit.gs_MRNNr) + 1)
If .gs_MRNNr <> "" Then
.gs_posSubNr = IIf(Integer.Parse(setNullToZero(txtSPosNr.Text)) <> 0, Integer.Parse(setNullToZero(txtSPosNr.Text)), Me.getLatestSubPosNr(currentSicherheit.gs_gsNr, currentSicherheit.gs_ATBNr, currentSicherheit.gs_MRNNr) + 1)
Else
.gs_posSubNr = Nothing
End If
.gs_datum = DateTimeString2DateTimeKonvertinator(txtSicherheitDat.Text, txtSicherheitTime.Text)
.gs_warenwert = Double.Parse(txtSicherheitWarenwert.Text)
.gs_sicherheitsbetrag = Double.Parse(txtSicherheitSicherheitsbetrag.Text)
@@ -1100,8 +1116,10 @@ Public Class frmGesamtsicherheitenNEU
Dim posNr = currentSicherheit.gs_posNr
Dim ATBNr = currentSicherheit.gs_ATBNr
Dim gsNr = currentSicherheit.gs_gsNr
Dim subPosNr = currentSicherheit.gs_posSubNr
currentSicherheit.Delete()
rearangePosNr(gsNr, ATBNr, posNr)
'rearangeSubPosNr(gsNr, ATBNr, posNr, subPosNr)
btnUpdateSicherheit.Visible = False
btnAddSicherheit.Visible = True
btnDeleteSicherheit.Visible = False
@@ -1191,9 +1209,9 @@ Public Class frmGesamtsicherheitenNEU
End Function
Private Function getLatestSubPosNr(gs_gsnr As Integer, gs_MRNNr As String) As Integer
Private Function getLatestSubPosNr(gs_gsnr As Integer, gs_ATBNr As String, gs_MRNNr As String) As Integer
Dim posNr As Integer = 0
Dim sqlq As String = "Select MAX([gs_posSubNr]) As MaxPosNr from [tblGesamtsicherheit] where gs_gsnr = " & gs_gsnr & " And gs_MRNNr = '" & gs_MRNNr & "'"
Dim sqlq As String = "Select MAX([gs_posSubNr]) As MaxPosNr from [tblGesamtsicherheit] where gs_gsnr = " & gs_gsnr & " And gs_MRNNr is not null and gs_MRNNr = '" & gs_MRNNr & "' And gs_ATBNR = '" & gs_ATBNr & "'"
Dim dt As New DataTable
dt = SQL.loadDgvBySql(sqlq, "AVISO", 100, True)
@@ -1245,7 +1263,7 @@ Public Class frmGesamtsicherheitenNEU
' Return False
'End If
If (offenerSicherheitsbetrag < 0 Or offenerSicherheitsbetrag < offenerSicherheitsbetragPos) Then
If (offenerSicherheitsbetrag <0 Or offenerSicherheitsbetrag <offenerSicherheitsbetragPos) Then
If vbYes = MsgBox("Der Warenwert der Positionen übersteigt den Warenwert der Gestellung!" & vbCrLf & "Trotzdem speichen?", vbYesNo) Then
Return True
Else
@@ -1619,7 +1637,7 @@ Public Class frmGesamtsicherheitenNEU
If posNr = -1 Or posNr = 1 Then Exit Sub
Dim sqlq As String = "select [gs_gsId], [gs_posNr] from [tblGesamtsicherheit] where gs_gsnr = " & gsNr & " AND gs_ATBNR = '" & ATBNr & "' AND gs_posNr > '" & posNr & "'"
Dim sqlq As String = "select [gs_gsId], [gs_posNr] from [tblGesamtsicherheit] where gs_gsnr = " & gsNr & " AND gs_ATBNR = '" & ATBNr & "' AND gs_posNr >= " & posNr
Dim dt As New DataTable
dt = SQL.loadDgvBySql(sqlq, "AVISO", 100, True)
@@ -1627,10 +1645,39 @@ Public Class frmGesamtsicherheitenNEU
For i As Integer = 0 To dt.Rows.Count - 1
'MsgBox("gs_gsId: " & dt.Rows(i).Item("gs_gsId").ToString & " " & "gs_posNr: " & dt.Rows(i).Item("gs_posNr").ToString)
Dim sicherheit = New cSicherheiten(dt.Rows(i).Item("gs_gsId"), dt.Rows(i).Item("gs_posNr"))
Dim currentPos = sicherheit.gs_posNr
If sicherheit.gs_posSubNr IsNot Nothing Then
rearangeSubPosNr(gsNr, ATBNr, currentPos, sicherheit.gs_posSubNr)
End If
sicherheit.gs_posNr = currentPos - 1
sicherheit.UPDATEWithNewPosNr(True)
Next
End Sub
Private Sub rearangeSubPosNr(gsNr As Integer, ATBNr As String, posNr As Integer, subposNr As Integer)
If subposNr = -1 Or subposNr = 1 Then Exit Sub
'Dim sqlq As String = "select [gs_gsId], [gs_posNr] ,[gs_posSubNr] from [tblGesamtsicherheit] where gs_gsnr = " & gsNr & " AND gs_ATBNR = '" & ATBNr & "' AND gs_posNr >= " & posNr & " AND gs_posSubNr >= " & subposNr
Dim sqlq As String = "select [gs_gsId], [gs_posNr] ,[gs_posSubNr] from [tblGesamtsicherheit] where gs_gsnr = " & gsNr & " AND gs_ATBNR = '" & ATBNr & "' AND gs_posSubNr >= " & subposNr
Dim dt As New DataTable
dt = SQL.loadDgvBySql(sqlq, "AVISO", 100, True)
If (dt.Rows.Count = 0) Then Exit Sub
For i As Integer = 0 To dt.Rows.Count - 1
Dim sicherheit = New cSicherheiten(dt.Rows(i).Item("gs_gsId"), dt.Rows(i).Item("gs_posNr"), dt.Rows(i).Item("gs_posSubNr"))
Dim currentPos = sicherheit.gs_posSubNr
sicherheit.gs_posSubNr = currentPos - 1
sicherheit.UPDATEWithNewPosNr()
Next
@@ -1911,7 +1958,7 @@ Public Class frmGesamtsicherheitenNEU
Private Sub changeLabel(Optional isATR As Boolean = True)
If Standort = "Verag GmbH" Then
Label1.Text = "Reg-Nr."
'Label1.Text = "Reg-Nr."
If isATR Then
Label12.Text = "Reg-Nr. / MRN"
@@ -1923,10 +1970,10 @@ Public Class frmGesamtsicherheitenNEU
ElseIf Standort = "VERAG AG" Then
Label12.Text = "T1 CRN"
Label1.Text = "T1 MRN"
'Label1.Text = "T1 MRN"
Else
Label12.Text = "EZA / T1 CRN"
Label1.Text = "T1 MRN"
'Label1.Text = "T1 MRN"
End If
End Sub
@@ -1943,7 +1990,13 @@ Public Class frmGesamtsicherheitenNEU
.gs_ATBNr = "Korrekt. Rundungsdiff. " & gessicherheitID
.gs_MRNNr = ""
.gs_posNr = Me.getLatestPosNr(currentSicherheit.gs_gsNr, currentSicherheit.gs_ATBNr) + 1
.gs_posSubNr = Me.getLatestSubPosNr(currentSicherheit.gs_gsNr, currentSicherheit.gs_MRNNr) + 1
If .gs_MRNNr <> "" Then
.gs_posSubNr = Me.getLatestSubPosNr(currentSicherheit.gs_gsNr, currentSicherheit.gs_ATBNr, currentSicherheit.gs_MRNNr) + 1
Else
.gs_posSubNr = Nothing
End If
.gs_datum = DateTime.Now
.gs_warenwert = 0
.gs_sicherheitsbetrag = 0
@@ -2102,9 +2155,12 @@ Public Class frmGesamtsicherheitenNEU
Dim posNr = currentSicherheit.gs_posNr
Dim ATBNr = currentSicherheit.gs_ATBNr
Dim gsNr = currentSicherheit.gs_gsNr
Dim subPosNr = currentSicherheit.gs_posSubNr
If currentSicherheit.hasEntry Then
currentSicherheit.Delete()
rearangePosNr(gsNr, ATBNr, posNr)
' If subPosNr IsNot Nothing Then rearangeSubPosNr(gsNr, ATBNr, posNr, subPosNr)
End If

46
Aviso/frmSendungsdetailsNEU.vb
View File

@@ -674,7 +674,12 @@ Public Class frmSendungsdetailsNEU
AddHandler txtAvisierer.PropertyChanged, Sub()
lblErr_AvisiererKdNr.Visible = False
cntlAvisierer_Abf.Visible = checkOfferteExistFromAbfArt(txtAvisierer.KdNr_value, cboAbfertigungsart._value)
If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("CHECK_SND_AbfertigungsartOffert") Then
cntlAvisierer_Abf.Visible = checkOfferteExistFromAbfArt(txtAvisierer.KdNr_value, cboAbfertigungsart._value)
Else
cntlAvisierer_Abf.Visible = True
End If
btnAvisierer.BackgroundImage = IIf(txtAvisierer.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)
SENDUNG_LIST(CURRENT_INDEX).tblSnd_Avisierer = txtAvisierer.Text
@@ -693,7 +698,12 @@ Public Class frmSendungsdetailsNEU
End Sub
AddHandler txtFrachtfuehrer.PropertyChanged, Sub()
cntlFrachtf_Abf.Visible = checkOfferteExistFromAbfArt(txtFrachtfuehrer.KdNr_value, cboAbfertigungsart._value)
If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("CHECK_SND_AbfertigungsartOffert") Then
cntlFrachtf_Abf.Visible = checkOfferteExistFromAbfArt(txtFrachtfuehrer.KdNr_value, cboAbfertigungsart._value)
Else
cntlFrachtf_Abf.Visible = True
End If
lblErr_FraechterKdNr.Visible = False
btnFrachtfuehrer.BackgroundImage = IIf(txtFrachtfuehrer.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)
@@ -715,7 +725,12 @@ Public Class frmSendungsdetailsNEU
txtEmpfaenger.initKdBox(Me, txtEmpfaengerKdNr)
AddHandler txtEmpfaenger.PropertyChanged, Sub()
lblErr_EmpfKdNr.Visible = False
cntlEmpf_Abf.Visible = checkOfferteExistFromAbfArt(txtEmpfaenger.KdNr_value, cboAbfertigungsart._value)
If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("CHECK_SND_AbfertigungsartOffert") Then
cntlEmpf_Abf.Visible = checkOfferteExistFromAbfArt(txtEmpfaenger.KdNr_value, cboAbfertigungsart._value)
Else
cntlEmpf_Abf.Visible = True
End If
FlatButton1.BackgroundImage = IIf(txtEmpfaenger.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)
SENDUNG_LIST(CURRENT_INDEX).tblSnd_Empfaenger = txtEmpfaenger.Text
@@ -736,7 +751,12 @@ Public Class frmSendungsdetailsNEU
initWarnKd_AndKdInfo(txtEmpfaenger, picWarnEmpfaenger)
End Sub
AddHandler txtAbsender.PropertyChanged, Sub()
cntlAbsender_Abf.Visible = checkOfferteExistFromAbfArt(txtAbsender.KdNr_value, cboAbfertigungsart._value)
If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("CHECK_SND_AbfertigungsartOffert") Then
cntlAbsender_Abf.Visible = checkOfferteExistFromAbfArt(txtAbsender.KdNr_value, cboAbfertigungsart._value)
Else
cntlAbsender_Abf.Visible = True
End If
FlatButton4.BackgroundImage = IIf(txtAbsender.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)
SENDUNG_LIST(CURRENT_INDEX).tblSnd_Absender = txtAbsender.Text
SENDUNG_LIST(CURRENT_INDEX).tblSnd_AbsenderKdNr = txtAbsender.KdNr
@@ -750,7 +770,13 @@ Public Class frmSendungsdetailsNEU
AddHandler txtAuftraggeber.PropertyChanged, Sub()
Try
cntlAuftr_Abf.Visible = checkOfferteExistFromAbfArt(txtAuftraggeber.KdNr_value, cboAbfertigungsart._value)
If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("CHECK_SND_AbfertigungsartOffert") Then
cntlAuftr_Abf.Visible = checkOfferteExistFromAbfArt(txtAuftraggeber.KdNr_value, cboAbfertigungsart._value)
Else
cntlAuftr_Abf.Visible = True
End If
SENDUNG_LIST(CURRENT_INDEX).tblSnd_Auftraggeber = txtAuftraggeber.Text
SENDUNG_LIST(CURRENT_INDEX).tblSnd_AuftraggeberKdNr = txtAuftraggeber.KdNr
FlatButton3.BackgroundImage = IIf(txtAuftraggeber.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)
@@ -7675,8 +7701,8 @@ Public Class frmSendungsdetailsNEU
For Each s As cSendungen In SENDUNG_LIST
'nur Betrag EUR
If s.tblSnd_Vorpapier = vorpT1 Then
If s.tblSnd_WarenwertWaehrung = "EUR" AndAlso s.tblSnd_Warenwert > 0 AndAlso s.FilialenNr = SENDUNG_LIST(CURRENT_INDEX).FilialenNr Then
calcWarenwerte += s.tblSnd_Warenwert
If s.tblSnd_WarenwertWaehrung = "EUR" AndAlso s.FilialenNr = SENDUNG_LIST(CURRENT_INDEX).FilialenNr Then
If Not s.tblSnd_Abfertigungsart_ID = 44 Then calcWarenwerte += s.tblSnd_Warenwert
Else
MsgBox("Bei Sendung " & s.AbfertigungsNr & " ist der Warenwert nicht in EUR angegeben!")
Exit Sub
@@ -7686,14 +7712,14 @@ Public Class frmSendungsdetailsNEU
Next
If SENDUNG_LIST(CURRENT_INDEX).tblSnd_Warenwert Is Nothing Then
SENDUNG_LIST(CURRENT_INDEX).tblSnd_Warenwert = Math.Round(calcWarenwerte, 2)
If txtWarenwert.Text = "" OrElse txtWarenwert.Text = "0,00" Then
txtWarenwert.Text = Math.Round(calcWarenwerte, 2)
SAVE_ME()
End If
If IsNumeric(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Warenwert) AndAlso Math.Round(calcWarenwerte, 2) <> Math.Round(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Warenwert, 2) Then
If IsNumeric(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Warenwert) AndAlso SENDUNG_LIST(CURRENT_INDEX).tblSnd_Warenwert <> 0 AndAlso Math.Round(calcWarenwerte, 2) <> Math.Round(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Warenwert, 2) Then
MsgBox("Warenwert für Gestellung stimmt nicht überein!" & vbNewLine & "Berechnerter Warenwert: " & Math.Round(calcWarenwerte, 2) & vbNewLine & "Eingetragener Warenwert: " & Math.Round(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Warenwert, 2), MsgBoxStyle.Critical)
Else