neu

2021-06-24 23:04:15 +02:00
parent 5187fe0e71
commit 2d06d935ef
38 changed files with 6730 additions and 1088 deletions
--- a/Aviso/frmSendungsdetailsNEU.Designer.vb
+++ b/Aviso/frmSendungsdetailsNEU.Designer.vb
@@ -23,8 +23,8 @@ Partial Class frmSendungsdetailsNEU
    <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 resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSendungsdetailsNEU))
+        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()
@@ -35,8 +35,10 @@ Partial Class frmSendungsdetailsNEU
        Me.Panel4 = New System.Windows.Forms.Panel()
        Me.TabControl1 = New System.Windows.Forms.TabControl()
        Me.tbAnhang = New System.Windows.Forms.TabPage()
+        Me.btnDirektAnfuegen = New System.Windows.Forms.Button()
        Me.dgvAnhang = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
        Me.Panel19 = New System.Windows.Forms.Panel()
+        Me.btnQuckScan = New System.Windows.Forms.Button()
        Me.Panel21 = New System.Windows.Forms.Panel()
        Me.Label53 = New System.Windows.Forms.Label()
        Me.btnEORIPruef = New System.Windows.Forms.Button()
@@ -48,7 +50,6 @@ Partial Class frmSendungsdetailsNEU
        Me.btnPDFZusammenfueren = New System.Windows.Forms.Button()
        Me.btnMailVorlage = New System.Windows.Forms.Button()
        Me.btnOptionen = New System.Windows.Forms.Button()
-        Me.btnDirektAnfuegen = New System.Windows.Forms.Button()
        Me.btnImportAssi = New System.Windows.Forms.Button()
        Me.lblAnhaenge = New System.Windows.Forms.Label()
        Me.tbKundenInfo = New System.Windows.Forms.TabPage()
@@ -72,6 +73,10 @@ Partial Class frmSendungsdetailsNEU
        Me.ToolStripMenuItem20 = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolStripMenuItem18 = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolStripMenuItem19 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem21 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem22 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem23 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem24 = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolStripMenuItem12 = New System.Windows.Forms.ToolStripMenuItem()
        Me.TabPage1 = New System.Windows.Forms.TabPage()
        Me.pnlKundenZolltarif = New System.Windows.Forms.Panel()
@@ -371,6 +376,7 @@ Partial Class frmSendungsdetailsNEU
        Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.ToolStripMenuItem14 = New System.Windows.Forms.ToolStripMenuItem()
        Me.NurÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.pnl.SuspendLayout()
        Me.Panel4.SuspendLayout()
        Me.TabControl1.SuspendLayout()
@@ -471,6 +477,7 @@ Partial Class frmSendungsdetailsNEU
        '
        'tbAnhang
        '
+        Me.tbAnhang.Controls.Add(Me.btnDirektAnfuegen)
        Me.tbAnhang.Controls.Add(Me.dgvAnhang)
        Me.tbAnhang.Controls.Add(Me.Panel19)
        Me.tbAnhang.Location = New System.Drawing.Point(4, 22)
@@ -480,6 +487,21 @@ Partial Class frmSendungsdetailsNEU
        Me.tbAnhang.Text = "Anhang"
        Me.tbAnhang.UseVisualStyleBackColor = True
        '
+        'btnDirektAnfuegen
+        '
+        Me.btnDirektAnfuegen.Enabled = False
+        Me.btnDirektAnfuegen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnDirektAnfuegen.Image = CType(resources.GetObject("btnDirektAnfuegen.Image"), System.Drawing.Image)
+        Me.btnDirektAnfuegen.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnDirektAnfuegen.Location = New System.Drawing.Point(648, 75)
+        Me.btnDirektAnfuegen.Name = "btnDirektAnfuegen"
+        Me.btnDirektAnfuegen.Size = New System.Drawing.Size(142, 34)
+        Me.btnDirektAnfuegen.TabIndex = 4
+        Me.btnDirektAnfuegen.Text = "Direkt anfügen ..."
+        Me.btnDirektAnfuegen.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.btnDirektAnfuegen.UseVisualStyleBackColor = True
+        Me.btnDirektAnfuegen.Visible = False
+        '
        'dgvAnhang
        '
        Me.dgvAnhang.AKTUALISIERUNGS_INTERVALL = -1
@@ -508,11 +530,11 @@ Partial Class frmSendungsdetailsNEU
        '
        'Panel19
        '
+        Me.Panel19.Controls.Add(Me.btnQuckScan)
        Me.Panel19.Controls.Add(Me.Panel21)
        Me.Panel19.Controls.Add(Me.btnPDFZusammenfueren)
        Me.Panel19.Controls.Add(Me.btnMailVorlage)
        Me.Panel19.Controls.Add(Me.btnOptionen)
-        Me.Panel19.Controls.Add(Me.btnDirektAnfuegen)
        Me.Panel19.Controls.Add(Me.btnImportAssi)
        Me.Panel19.Controls.Add(Me.lblAnhaenge)
        Me.Panel19.Dock = System.Windows.Forms.DockStyle.Top
@@ -521,6 +543,21 @@ Partial Class frmSendungsdetailsNEU
        Me.Panel19.Size = New System.Drawing.Size(1206, 45)
        Me.Panel19.TabIndex = 0
        '
+        'btnQuckScan
+        '
+        Me.btnQuckScan.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnQuckScan.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnQuckScan.Image = CType(resources.GetObject("btnQuckScan.Image"), System.Drawing.Image)
+        Me.btnQuckScan.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnQuckScan.Location = New System.Drawing.Point(631, 5)
+        Me.btnQuckScan.Name = "btnQuckScan"
+        Me.btnQuckScan.Size = New System.Drawing.Size(107, 34)
+        Me.btnQuckScan.TabIndex = 108
+        Me.btnQuckScan.Text = "Quick-Scan"
+        Me.btnQuckScan.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.btnQuckScan.UseVisualStyleBackColor = True
+        Me.btnQuckScan.Visible = False
+        '
        'Panel21
        '
        Me.Panel21.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
@@ -655,20 +692,6 @@ Partial Class frmSendungsdetailsNEU
        Me.btnOptionen.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.btnOptionen.UseVisualStyleBackColor = True
        '
-        'btnDirektAnfuegen
-        '
-        Me.btnDirektAnfuegen.Enabled = False
-        Me.btnDirektAnfuegen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnDirektAnfuegen.Image = CType(resources.GetObject("btnDirektAnfuegen.Image"), System.Drawing.Image)
-        Me.btnDirektAnfuegen.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.btnDirektAnfuegen.Location = New System.Drawing.Point(630, 5)
-        Me.btnDirektAnfuegen.Name = "btnDirektAnfuegen"
-        Me.btnDirektAnfuegen.Size = New System.Drawing.Size(129, 34)
-        Me.btnDirektAnfuegen.TabIndex = 4
-        Me.btnDirektAnfuegen.Text = "Direkt anfügen ..."
-        Me.btnDirektAnfuegen.TextAlign = System.Drawing.ContentAlignment.MiddleRight
-        Me.btnDirektAnfuegen.UseVisualStyleBackColor = True
-        '
        'btnImportAssi
        '
        Me.btnImportAssi.FlatStyle = System.Windows.Forms.FlatStyle.Flat
@@ -800,7 +823,7 @@ Partial Class frmSendungsdetailsNEU
        '
        'MenuStrip
        '
-        Me.MenuStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem13, Me.ToolStripMenuItem7, Me.ToolStripMenuItem6, Me.ToolStripMenuItem11, Me.ToolStripMenuItem17, Me.ToolStripMenuItem12})
+        Me.MenuStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem13, Me.ToolStripMenuItem7, Me.ToolStripMenuItem6, Me.ToolStripMenuItem11, Me.ToolStripMenuItem17, Me.ToolStripMenuItem21, Me.ToolStripMenuItem12})
        Me.MenuStrip.Location = New System.Drawing.Point(0, 0)
        Me.MenuStrip.Name = "MenuStrip"
        Me.MenuStrip.Size = New System.Drawing.Size(1206, 24)
@@ -906,6 +929,40 @@ Partial Class frmSendungsdetailsNEU
        Me.ToolStripMenuItem19.Size = New System.Drawing.Size(95, 22)
        Me.ToolStripMenuItem19.Text = "T2"
        '
+        'ToolStripMenuItem21
+        '
+        Me.ToolStripMenuItem21.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem22, Me.ToolStripMenuItem23, Me.ToolStripMenuItem24})
+        Me.ToolStripMenuItem21.Image = Global.AVISO.My.Resources.Resources.plus
+        Me.ToolStripMenuItem21.Name = "ToolStripMenuItem21"
+        Me.ToolStripMenuItem21.Padding = New System.Windows.Forms.Padding(8, 0, 8, 0)
+        Me.ToolStripMenuItem21.Size = New System.Drawing.Size(71, 20)
+        Me.ToolStripMenuItem21.Text = "  MIC"
+        Me.ToolStripMenuItem21.ToolTipText = "Neue Zollanmeldung"
+        '
+        'ToolStripMenuItem22
+        '
+        Me.ToolStripMenuItem22.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1
+        Me.ToolStripMenuItem22.Name = "ToolStripMenuItem22"
+        Me.ToolStripMenuItem22.Size = New System.Drawing.Size(176, 22)
+        Me.ToolStripMenuItem22.Text = "MIC Import senden"
+        '
+        'ToolStripMenuItem23
+        '
+        Me.ToolStripMenuItem23.Font = New System.Drawing.Font("Segoe UI", 9.0!)
+        Me.ToolStripMenuItem23.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1
+        Me.ToolStripMenuItem23.Name = "ToolStripMenuItem23"
+        Me.ToolStripMenuItem23.Size = New System.Drawing.Size(176, 22)
+        Me.ToolStripMenuItem23.Text = "MIC Transit senden"
+        '
+        'ToolStripMenuItem24
+        '
+        Me.ToolStripMenuItem24.Enabled = False
+        Me.ToolStripMenuItem24.Font = New System.Drawing.Font("Segoe UI", 9.0!)
+        Me.ToolStripMenuItem24.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1
+        Me.ToolStripMenuItem24.Name = "ToolStripMenuItem24"
+        Me.ToolStripMenuItem24.Size = New System.Drawing.Size(176, 22)
+        Me.ToolStripMenuItem24.Text = "MIC Export senden"
+        '
        'ToolStripMenuItem12
        '
        Me.ToolStripMenuItem12.Image = Global.AVISO.My.Resources.Resources.android_note
@@ -4409,40 +4466,40 @@ Partial Class frmSendungsdetailsNEU
        '
        'cntxtAnh
        '
-        Me.cntxtAnh.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MarkiertePDFsDruckenToolStripMenuItem, Me.EMailAnfügenToolStripMenuItem, Me.KopierenZwischenablageToolStripMenuItem, Me.LaufzetteldruckJANEINToolStripMenuItem, Me.GestellungslisteAnfügenJANEINToolStripMenuItem})
+        Me.cntxtAnh.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MarkiertePDFsDruckenToolStripMenuItem, Me.EMailAnfügenToolStripMenuItem, Me.KopierenZwischenablageToolStripMenuItem, Me.LaufzetteldruckJANEINToolStripMenuItem, Me.GestellungslisteAnfügenJANEINToolStripMenuItem, Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem})
        Me.cntxtAnh.Name = "cntxtAnh"
-        Me.cntxtAnh.Size = New System.Drawing.Size(251, 114)
+        Me.cntxtAnh.Size = New System.Drawing.Size(286, 158)
        '
        'MarkiertePDFsDruckenToolStripMenuItem
        '
        Me.MarkiertePDFsDruckenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.pdfprint
        Me.MarkiertePDFsDruckenToolStripMenuItem.Name = "MarkiertePDFsDruckenToolStripMenuItem"
-        Me.MarkiertePDFsDruckenToolStripMenuItem.Size = New System.Drawing.Size(250, 22)
+        Me.MarkiertePDFsDruckenToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
        Me.MarkiertePDFsDruckenToolStripMenuItem.Text = "Markierte PDFs drucken"
        '
        'EMailAnfügenToolStripMenuItem
        '
        Me.EMailAnfügenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.email_big1
        Me.EMailAnfügenToolStripMenuItem.Name = "EMailAnfügenToolStripMenuItem"
-        Me.EMailAnfügenToolStripMenuItem.Size = New System.Drawing.Size(250, 22)
+        Me.EMailAnfügenToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
        Me.EMailAnfügenToolStripMenuItem.Text = "E-Mail anfügen"
        '
        'KopierenZwischenablageToolStripMenuItem
        '
        Me.KopierenZwischenablageToolStripMenuItem.Name = "KopierenZwischenablageToolStripMenuItem"
-        Me.KopierenZwischenablageToolStripMenuItem.Size = New System.Drawing.Size(250, 22)
+        Me.KopierenZwischenablageToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
        Me.KopierenZwischenablageToolStripMenuItem.Text = "Kopieren (Zwischenablage)"
        '
        'LaufzetteldruckJANEINToolStripMenuItem
        '
        Me.LaufzetteldruckJANEINToolStripMenuItem.Name = "LaufzetteldruckJANEINToolStripMenuItem"
-        Me.LaufzetteldruckJANEINToolStripMenuItem.Size = New System.Drawing.Size(250, 22)
+        Me.LaufzetteldruckJANEINToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
        Me.LaufzetteldruckJANEINToolStripMenuItem.Text = "Laufzetteldruck JA/NEIN"
        '
        'GestellungslisteAnfügenJANEINToolStripMenuItem
        '
        Me.GestellungslisteAnfügenJANEINToolStripMenuItem.Name = "GestellungslisteAnfügenJANEINToolStripMenuItem"
-        Me.GestellungslisteAnfügenJANEINToolStripMenuItem.Size = New System.Drawing.Size(250, 22)
+        Me.GestellungslisteAnfügenJANEINToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
        Me.GestellungslisteAnfügenJANEINToolStripMenuItem.Text = "Gestellungsliste anfügen JA/NEIN"
        '
        'ToolStripMenuItem3
@@ -4779,6 +4836,13 @@ Partial Class frmSendungsdetailsNEU
        Me.NurÖffnenToolStripMenuItem.Size = New System.Drawing.Size(247, 22)
        Me.NurÖffnenToolStripMenuItem.Text = "nur öffnen"
        '
+        'AbrechungFremdeGrenzeAktDruckenToolStripMenuItem
+        '
+        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.printer
+        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Name = "AbrechungFremdeGrenzeAktDruckenToolStripMenuItem"
+        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
+        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Text = "Abrechung: Fremde Grenze Akt drucken"
+        '
        'frmSendungsdetailsNEU
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!)
@@ -5214,4 +5278,10 @@ Partial Class frmSendungsdetailsNEU
    Public WithEvents txtAnzahlPos As VERAG_PROG_ALLGEMEIN.MyTextBox
    Friend WithEvents Label4 As Label
    Friend WithEvents AuftragATANAKToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents btnQuckScan As Button
+    Friend WithEvents ToolStripMenuItem21 As ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem22 As ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem23 As ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem24 As ToolStripMenuItem
+    Friend WithEvents AbrechungFremdeGrenzeAktDruckenToolStripMenuItem As ToolStripMenuItem
 End Class