20200108

2020-01-08 15:01:48 +01:00
parent c860c222c7
commit e879fb6881
89 changed files with 8692 additions and 3571 deletions
--- a/Aviso/frmEintragAviso.designer.vb
+++ b/Aviso/frmEintragAviso.designer.vb
@@ -22,6 +22,7 @@ Partial Class frmEintragAviso
  'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
  <System.Diagnostics.DebuggerStepThrough()> _
  Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmEintragAviso))
        Me.btnOK = New System.Windows.Forms.Button()
        Me.Label2 = New System.Windows.Forms.Label()
@@ -74,10 +75,6 @@ Partial Class frmEintragAviso
        Me.cboGrenzstelle = New System.Windows.Forms.ComboBox()
        Me.Label15 = New System.Windows.Forms.Label()
        Me.grpAviso = New System.Windows.Forms.GroupBox()
-        Me.Label22 = New System.Windows.Forms.Label()
-        Me.txtDyRef = New System.Windows.Forms.TextBox()
-        Me.picDy = New System.Windows.Forms.PictureBox()
-        Me.lblDy = New System.Windows.Forms.Label()
        Me.kdAuftraggeber = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
        Me.kdAvisierer = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
        Me.kdFrächter = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
@@ -111,6 +108,10 @@ Partial Class frmEintragAviso
        Me.lblAtr = New System.Windows.Forms.Label()
        Me.Label17 = New System.Windows.Forms.Label()
        Me.cbxAuftraggeberfurAlleSendungen = New System.Windows.Forms.CheckBox()
+        Me.Label22 = New System.Windows.Forms.Label()
+        Me.txtDyRef = New System.Windows.Forms.TextBox()
+        Me.picDy = New System.Windows.Forms.PictureBox()
+        Me.lblDy = New System.Windows.Forms.Label()
        Me.grpAktVerzollung = New System.Windows.Forms.GroupBox()
        Me.lblSendungsanzahl = New System.Windows.Forms.Label()
        Me.cbxPosNr = New System.Windows.Forms.CheckBox()
@@ -132,13 +133,16 @@ Partial Class frmEintragAviso
        Me.cbxAktenzettelDrucken = New System.Windows.Forms.CheckBox()
        Me.cboPrinter = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.UsrCntlEintragAvisoAtilla = New AVISO.usrCntlEintragAvisoAtilla()
+        Me.dgvAnhaenge = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.columnName = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.panAdmin.SuspendLayout()
        Me.grpAviso.SuspendLayout()
-        CType(Me.picDy, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.grp.SuspendLayout()
+        CType(Me.picDy, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.grpAktVerzollung.SuspendLayout()
        Me.pnlSBG.SuspendLayout()
+        CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'btnOK
@@ -178,19 +182,19 @@ Partial Class frmEintragAviso
        '
        Me.txtInfo.AcceptsReturn = True
        Me.txtInfo.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
-        Me.txtInfo.Location = New System.Drawing.Point(9, 383)
+        Me.txtInfo.Location = New System.Drawing.Point(9, 357)
        Me.txtInfo.MaxLength = 240
        Me.txtInfo.Multiline = True
        Me.txtInfo.Name = "txtInfo"
        Me.txtInfo.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
-        Me.txtInfo.Size = New System.Drawing.Size(388, 70)
+        Me.txtInfo.Size = New System.Drawing.Size(388, 96)
        Me.txtInfo.TabIndex = 41
        '
        'Label3
        '
        Me.Label3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.Label3.AutoSize = True
-        Me.Label3.Location = New System.Drawing.Point(6, 369)
+        Me.Label3.Location = New System.Drawing.Point(6, 341)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(25, 13)
        Me.Label3.TabIndex = 40
@@ -700,9 +704,6 @@ Partial Class frmEintragAviso
        '
        'grpAviso
        '
-        Me.grpAviso.Controls.Add(Me.txtDyRef)
-        Me.grpAviso.Controls.Add(Me.picDy)
-        Me.grpAviso.Controls.Add(Me.lblDy)
        Me.grpAviso.Controls.Add(Me.kdAuftraggeber)
        Me.grpAviso.Controls.Add(Me.kdAvisierer)
        Me.grpAviso.Controls.Add(Me.kdFrächter)
@@ -759,49 +760,6 @@ Partial Class frmEintragAviso
        Me.grpAviso.TabStop = False
        Me.grpAviso.Text = "Aviso"
        '
-        'Label22
-        '
-        Me.Label22.AutoSize = True
-        Me.Label22.Cursor = System.Windows.Forms.Cursors.Hand
-        Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label22.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.Label22.Location = New System.Drawing.Point(296, 169)
-        Me.Label22.Name = "Label22"
-        Me.Label22.Size = New System.Drawing.Size(56, 13)
-        Me.Label22.TabIndex = 50
-        Me.Label22.Text = "= Avisierer"
-        '
-        'txtDyRef
-        '
-        Me.txtDyRef.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
-        Me.txtDyRef.Location = New System.Drawing.Point(24, 342)
-        Me.txtDyRef.MaxLength = 30
-        Me.txtDyRef.Name = "txtDyRef"
-        Me.txtDyRef.Size = New System.Drawing.Size(234, 20)
-        Me.txtDyRef.TabIndex = 48
-        Me.txtDyRef.Visible = False
-        '
-        'picDy
-        '
-        Me.picDy.BackgroundImage = Global.AVISO.My.Resources.Resources.dakosy_dy
-        Me.picDy.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
-        Me.picDy.Location = New System.Drawing.Point(5, 342)
-        Me.picDy.Name = "picDy"
-        Me.picDy.Size = New System.Drawing.Size(20, 20)
-        Me.picDy.TabIndex = 49
-        Me.picDy.TabStop = False
-        Me.picDy.Visible = False
-        '
-        'lblDy
-        '
-        Me.lblDy.AutoSize = True
-        Me.lblDy.Location = New System.Drawing.Point(6, 328)
-        Me.lblDy.Name = "lblDy"
-        Me.lblDy.Size = New System.Drawing.Size(109, 13)
-        Me.lblDy.TabIndex = 47
-        Me.lblDy.Text = "Dakosy-Referenz-Nr.:"
-        Me.lblDy.Visible = False
-        '
        'kdAuftraggeber
        '
        Me.kdAuftraggeber._AllowSetValue = True
@@ -1264,6 +1222,49 @@ Partial Class frmEintragAviso
        Me.cbxAuftraggeberfurAlleSendungen.Text = "= Auftraggeber (für alle Sendungen)"
        Me.cbxAuftraggeberfurAlleSendungen.UseVisualStyleBackColor = True
        '
+        'Label22
+        '
+        Me.Label22.AutoSize = True
+        Me.Label22.Cursor = System.Windows.Forms.Cursors.Hand
+        Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label22.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label22.Location = New System.Drawing.Point(296, 169)
+        Me.Label22.Name = "Label22"
+        Me.Label22.Size = New System.Drawing.Size(56, 13)
+        Me.Label22.TabIndex = 50
+        Me.Label22.Text = "= Avisierer"
+        '
+        'txtDyRef
+        '
+        Me.txtDyRef.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
+        Me.txtDyRef.Location = New System.Drawing.Point(509, 400)
+        Me.txtDyRef.MaxLength = 30
+        Me.txtDyRef.Name = "txtDyRef"
+        Me.txtDyRef.Size = New System.Drawing.Size(234, 20)
+        Me.txtDyRef.TabIndex = 48
+        Me.txtDyRef.Visible = False
+        '
+        'picDy
+        '
+        Me.picDy.BackgroundImage = Global.AVISO.My.Resources.Resources.dakosy_dy
+        Me.picDy.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.picDy.Location = New System.Drawing.Point(490, 400)
+        Me.picDy.Name = "picDy"
+        Me.picDy.Size = New System.Drawing.Size(20, 20)
+        Me.picDy.TabIndex = 49
+        Me.picDy.TabStop = False
+        Me.picDy.Visible = False
+        '
+        'lblDy
+        '
+        Me.lblDy.AutoSize = True
+        Me.lblDy.Location = New System.Drawing.Point(491, 386)
+        Me.lblDy.Name = "lblDy"
+        Me.lblDy.Size = New System.Drawing.Size(109, 13)
+        Me.lblDy.TabIndex = 47
+        Me.lblDy.Text = "Dakosy-Referenz-Nr.:"
+        Me.lblDy.Visible = False
+        '
        'grpAktVerzollung
        '
        Me.grpAktVerzollung.Controls.Add(Me.lblSendungsanzahl)
@@ -1554,6 +1555,35 @@ Partial Class frmEintragAviso
        Me.UsrCntlEintragAvisoAtilla.TabIndex = 12
        Me.UsrCntlEintragAvisoAtilla.Visible = False
        '
+        'dgvAnhaenge
+        '
+        Me.dgvAnhaenge.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvAnhaenge.AllowUserToAddRows = False
+        Me.dgvAnhaenge.AllowUserToDeleteRows = False
+        Me.dgvAnhaenge.AllowUserToResizeColumns = False
+        Me.dgvAnhaenge.AllowUserToResizeRows = False
+        Me.dgvAnhaenge.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.dgvAnhaenge.BackgroundColor = System.Drawing.Color.White
+        Me.dgvAnhaenge.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvAnhaenge.ColumnHeadersVisible = False
+        Me.dgvAnhaenge.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.columnName})
+        Me.dgvAnhaenge.Location = New System.Drawing.Point(424, 278)
+        Me.dgvAnhaenge.Name = "dgvAnhaenge"
+        Me.dgvAnhaenge.ReadOnly = True
+        Me.dgvAnhaenge.RowHeadersVisible = False
+        Me.dgvAnhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+        Me.dgvAnhaenge.Size = New System.Drawing.Size(360, 327)
+        Me.dgvAnhaenge.TabIndex = 23
+        Me.dgvAnhaenge.Visible = False
+        '
+        'columnName
+        '
+        Me.columnName.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.columnName.HeaderText = "Name"
+        Me.columnName.Name = "columnName"
+        Me.columnName.ReadOnly = True
+        '
        'frmEintragAviso
        '
        Me.AcceptButton = Me.btnOK
@@ -1561,6 +1591,10 @@ Partial Class frmEintragAviso
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.BackColor = System.Drawing.Color.White
        Me.ClientSize = New System.Drawing.Size(792, 611)
+        Me.Controls.Add(Me.txtDyRef)
+        Me.Controls.Add(Me.picDy)
+        Me.Controls.Add(Me.lblDy)
+        Me.Controls.Add(Me.dgvAnhaenge)
        Me.Controls.Add(Me.cboPrinter)
        Me.Controls.Add(Me.cbxSendungsvorlagen)
        Me.Controls.Add(Me.Button3)
@@ -1590,14 +1624,15 @@ Partial Class frmEintragAviso
        Me.panAdmin.PerformLayout()
        Me.grpAviso.ResumeLayout(False)
        Me.grpAviso.PerformLayout()
-        CType(Me.picDy, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit()
        Me.grp.ResumeLayout(False)
        Me.grp.PerformLayout()
+        CType(Me.picDy, System.ComponentModel.ISupportInitialize).EndInit()
        Me.grpAktVerzollung.ResumeLayout(False)
        Me.grpAktVerzollung.PerformLayout()
        Me.pnlSBG.ResumeLayout(False)
        Me.pnlSBG.PerformLayout()
+        CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()

@@ -1712,4 +1747,6 @@ Partial Class frmEintragAviso
    Friend WithEvents picDy As PictureBox
    Friend WithEvents lblDy As Label
    Friend WithEvents Label22 As Label
+    Friend WithEvents dgvAnhaenge As VERAG_PROG_ALLGEMEIN.MyDatagridview
+    Friend WithEvents columnName As DataGridViewTextBoxColumn
 End Class