Vollmacht Finanzamt

This commit is contained in:
2024-08-09 14:47:01 +02:00
parent 5da132a257
commit f27c628f15
7 changed files with 1026 additions and 19 deletions

View File

@@ -22,7 +22,6 @@ Partial Class frmKundenUebersichtZOLL
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
@@ -30,13 +29,13 @@ Partial Class frmKundenUebersichtZOLL
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 resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmKundenUebersichtZOLL))
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip()
Me.KopierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.tabZolltarife = New System.Windows.Forms.TabPage()
Me.pnlZollTarife = New System.Windows.Forms.Panel()
Me.tabKundendaten = New System.Windows.Forms.TabPage()
Me.usrcntlKundenuebersicht = New SDL.usrCntlKundenuebersicht()
Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip()
Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
Me.tbcntrKundenDaten = New System.Windows.Forms.TabControl()
Me.TabPage1 = New System.Windows.Forms.TabPage()
@@ -84,10 +83,10 @@ Partial Class frmKundenUebersichtZOLL
Me.btnSpeichern = New System.Windows.Forms.Button()
Me.Label35 = New System.Windows.Forms.Label()
Me.tbRechnungen = New System.Windows.Forms.TabPage()
Me.dgvRg = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.MyPanel1 = New VERAG_PROG_ALLGEMEIN.MyPanel(Me.components)
Me.dgvRg = New VERAG_PROG_ALLGEMEIN.MyDatagridview()
Me.MyPanel1 = New VERAG_PROG_ALLGEMEIN.MyPanel()
Me.btnRgPdf = New System.Windows.Forms.Button()
Me.ctxtRg = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ctxtRg = New System.Windows.Forms.ContextMenuStrip()
Me.DateiHochladenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.btnMonat = New System.Windows.Forms.Button()
Me.Button10 = New System.Windows.Forms.Button()
@@ -97,7 +96,7 @@ Partial Class frmKundenUebersichtZOLL
Me.tbFiskaluebersicht = New System.Windows.Forms.TabPage()
Me.UsrcntlFiskaluebersicht1 = New SDL.usrcntlFiskaluebersicht()
Me.tbCBAM = New System.Windows.Forms.TabPage()
Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.MenuStripKunden = New System.Windows.Forms.MenuStrip()
Me.mnueKunden = New System.Windows.Forms.ToolStripMenuItem()
@@ -144,8 +143,8 @@ Partial Class frmKundenUebersichtZOLL
Me.pic = New System.Windows.Forms.PictureBox()
Me.KdSearchBox1 = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
Me.rtbInfo = New System.Windows.Forms.RichTextBox()
Me.tmrFiskal = New System.Windows.Forms.Timer(Me.components)
Me.ContextMenuStrip3 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.tmrFiskal = New System.Windows.Forms.Timer()
Me.ContextMenuStrip3 = New System.Windows.Forms.ContextMenuStrip()
Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem()
Me.ÄndernToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.HochladenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
@@ -153,6 +152,7 @@ Partial Class frmKundenUebersichtZOLL
Me.PDFLöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.VollmachtFinanzamtToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ContextMenuStrip1.SuspendLayout()
Me.tabZolltarife.SuspendLayout()
Me.tabKundendaten.SuspendLayout()
@@ -1144,7 +1144,7 @@ Partial Class frmKundenUebersichtZOLL
'
'ToolStripMenuItem4
'
Me.ToolStripMenuItem4.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.toolStrVM_de, Me.ZollvollmachtDEFiskalToolStripMenuItem, Me.ToolStripMenuItem6, Me.ToolStripMenuItem8, Me.ZollvollmachtATEVToolStripMenuItem})
Me.ToolStripMenuItem4.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.toolStrVM_de, Me.ZollvollmachtDEFiskalToolStripMenuItem, Me.ToolStripMenuItem6, Me.ToolStripMenuItem8, Me.ZollvollmachtATEVToolStripMenuItem, Me.VollmachtFinanzamtToolStripMenuItem})
Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4"
Me.ToolStripMenuItem4.Size = New System.Drawing.Size(242, 22)
Me.ToolStripMenuItem4.Text = "Vollmachten"
@@ -1512,6 +1512,12 @@ Partial Class frmKundenUebersichtZOLL
Me.DataGridViewTextBoxColumn2.HeaderText = "KundenNr"
Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
'
'VollmachtFinanzamtToolStripMenuItem
'
Me.VollmachtFinanzamtToolStripMenuItem.Name = "VollmachtFinanzamtToolStripMenuItem"
Me.VollmachtFinanzamtToolStripMenuItem.Size = New System.Drawing.Size(204, 22)
Me.VollmachtFinanzamtToolStripMenuItem.Text = "Vollmacht Finanzamt"
'
'frmKundenUebersichtZOLL
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -1685,4 +1691,5 @@ Partial Class frmKundenUebersichtZOLL
Friend WithEvents mnueCBAM As ToolStripMenuItem
Friend WithEvents EinfuhrverbotToolStripMenuItem As ToolStripMenuItem
Friend WithEvents TOBBKdNrÄndernToolStripMenuItem As ToolStripMenuItem
Friend WithEvents VollmachtFinanzamtToolStripMenuItem As ToolStripMenuItem
End Class

View File

@@ -1465,6 +1465,10 @@ Public Class frmKundenUebersichtZOLL
Dim f As New frmKundenTOBBKdNr(kdNr)
f.ShowDialog(Me)
End Sub
Private Sub VollmachtFinanzamtToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles VollmachtFinanzamtToolStripMenuItem.Click
SDL.FormularManagerNEU.OPEN_FORM(SDL.FormularManagerArten.Vollmacht_FA, kdNr, {})
End Sub
End Class