diff --git a/Aviso/frmHauptfenster.Designer.vb b/Aviso/frmHauptfenster.Designer.vb
index 9e4530e..87fb814 100644
--- a/Aviso/frmHauptfenster.Designer.vb
+++ b/Aviso/frmHauptfenster.Designer.vb
@@ -24,15 +24,15 @@ Partial Class frmHauptfenster
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmHauptfenster))
+ 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()
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 DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle9 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()
Me.mnuInfo = New System.Windows.Forms.ToolStripMenuItem()
Me.conÜbernehmen = New System.Windows.Forms.ToolStripMenuItem()
Me.conMenuAviso = New System.Windows.Forms.ContextMenuStrip(Me.components)
@@ -141,6 +141,7 @@ Partial Class frmHauptfenster
Me.WarenorteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.DatevBuchungsexportToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.APIToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+ Me.FIBUSachkontenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.StatistikToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.LKWBerichtToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.StatistikADMINToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
@@ -238,6 +239,7 @@ Partial Class frmHauptfenster
Me.lblFimaAviso = New System.Windows.Forms.Label()
Me.Button11 = New System.Windows.Forms.Button()
Me.btnMAVerzeichnis = New System.Windows.Forms.Button()
+ Me.btnMitarbeiterKonto = New VERAG_PROG_ALLGEMEIN.FlatButton()
Me.Button9 = New System.Windows.Forms.Button()
Me.Button2 = New System.Windows.Forms.Button()
Me.Button5 = New System.Windows.Forms.Button()
@@ -285,16 +287,20 @@ Partial Class frmHauptfenster
Me.cntxtAtilla = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ToolStripMenuItem17 = New System.Windows.Forms.ToolStripMenuItem()
Me.SplitContainer3 = New System.Windows.Forms.SplitContainer()
+ Me.UsrCntlBenachrichtigungen1 = New AVISO.usrCntlBenachrichtigungen()
Me.pnl = New System.Windows.Forms.Panel()
Me.Button10 = New System.Windows.Forms.Button()
+ Me.gridMyAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.Panel6 = New System.Windows.Forms.Panel()
Me.cbx_My_Brexit = New System.Windows.Forms.CheckBox()
Me.btnColor = New System.Windows.Forms.Button()
Me.lblMeineAviso = New System.Windows.Forms.Label()
+ Me.cboMy_Grenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.lblMySnd_Grenzstelle = New System.Windows.Forms.Label()
Me.cbx_My_LKW = New System.Windows.Forms.CheckBox()
Me.cboMy_QS = New System.Windows.Forms.CheckBox()
Me.cboMy_VB = New System.Windows.Forms.CheckBox()
+ Me.cboMyAvisoAnzeige = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.lblMySND_Anzeige = New System.Windows.Forms.Label()
Me.lblAkte = New System.Windows.Forms.Label()
Me.btnClose = New System.Windows.Forms.Button()
@@ -315,16 +321,22 @@ Partial Class frmHauptfenster
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
Me.pnlDetailsLinks = New System.Windows.Forms.Panel()
Me.splitMain = New System.Windows.Forms.SplitContainer()
+ Me.gridAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.Panel1 = New System.Windows.Forms.Panel()
+ Me.txtBestimmungszollstelle = New VERAG_PROG_ALLGEMEIN.MySearchBox()
Me.Label10 = New System.Windows.Forms.Label()
+ Me.cboImEx = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label21 = New System.Windows.Forms.Label()
Me.cbxCluster = New System.Windows.Forms.CheckBox()
+ Me.cboTeams = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.lblErweitereSuche = New System.Windows.Forms.LinkLabel()
Me.Label16 = New System.Windows.Forms.Label()
Me.Label8 = New System.Windows.Forms.Label()
Me.lblEintraege = New System.Windows.Forms.Label()
+ Me.cboGrenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label4 = New System.Windows.Forms.Label()
Me.pnlTime = New System.Windows.Forms.Panel()
+ Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.pnlSearch = New System.Windows.Forms.Panel()
Me.lblAbsender = New System.Windows.Forms.Label()
Me.txtAbsender = New System.Windows.Forms.TextBox()
@@ -345,6 +357,7 @@ Partial Class frmHauptfenster
Me.Button4 = New System.Windows.Forms.Button()
Me.lblErwEmpfänger = New System.Windows.Forms.Label()
Me.txtEmpfänger = New System.Windows.Forms.TextBox()
+ Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtAbfertigungsnummer = New System.Windows.Forms.TextBox()
Me.lblErwFilialePos = New System.Windows.Forms.Label()
Me.lblErwAuftraggeber = New System.Windows.Forms.Label()
@@ -381,20 +394,9 @@ Partial Class frmHauptfenster
Me.cntVerag = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ZertifikateToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.HomepageToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
- Me.FIBUSachkontenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem()
- Me.gridAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
- Me.txtBestimmungszollstelle = New VERAG_PROG_ALLGEMEIN.MySearchBox()
- Me.cboImEx = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.cboTeams = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.cboGrenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.UsrCntlBenachrichtigungen1 = New AVISO.usrCntlBenachrichtigungen()
- Me.gridMyAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
- Me.cboMy_Grenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.cboMyAvisoAnzeige = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.btnMitarbeiterKonto = New VERAG_PROG_ALLGEMEIN.FlatButton()
+ Me.EMAILToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+ Me.FTPToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.conMenuAviso.SuspendLayout()
Me.MenuStrip1.SuspendLayout()
Me.pnlDetailsRechts.SuspendLayout()
@@ -414,6 +416,7 @@ Partial Class frmHauptfenster
Me.SplitContainer3.Panel2.SuspendLayout()
Me.SplitContainer3.SuspendLayout()
Me.pnl.SuspendLayout()
+ CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Panel6.SuspendLayout()
Me.tbcntrAviso.SuspendLayout()
CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -425,6 +428,7 @@ Partial Class frmHauptfenster
Me.splitMain.Panel1.SuspendLayout()
Me.splitMain.Panel2.SuspendLayout()
Me.splitMain.SuspendLayout()
+ CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Panel1.SuspendLayout()
Me.pnlTime.SuspendLayout()
Me.pnlSearch.SuspendLayout()
@@ -434,8 +438,6 @@ Partial Class frmHauptfenster
Me.Panel3.SuspendLayout()
Me.Panel4.SuspendLayout()
Me.cntVerag.SuspendLayout()
- CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'mnuInfo
@@ -1106,6 +1108,7 @@ Partial Class frmHauptfenster
'
'DatevBuchungsexportToolStripMenuItem
'
+ Me.DatevBuchungsexportToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EMAILToolStripMenuItem, Me.FTPToolStripMenuItem})
Me.DatevBuchungsexportToolStripMenuItem.Name = "DatevBuchungsexportToolStripMenuItem"
Me.DatevBuchungsexportToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.DatevBuchungsexportToolStripMenuItem.Text = "Datev Buchungsexport"
@@ -1117,6 +1120,12 @@ Partial Class frmHauptfenster
Me.APIToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.APIToolStripMenuItem.Text = "API"
'
+ 'FIBUSachkontenToolStripMenuItem
+ '
+ Me.FIBUSachkontenToolStripMenuItem.Name = "FIBUSachkontenToolStripMenuItem"
+ Me.FIBUSachkontenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
+ Me.FIBUSachkontenToolStripMenuItem.Text = "FIBU Sachkonten"
+ '
'StatistikToolStripMenuItem
'
Me.StatistikToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.LKWBerichtToolStripMenuItem, Me.StatistikADMINToolStripMenuItem, Me.ToolStripSeparator8, Me.BürgschafrtsbuchungenFremdToolStripMenuItem, Me.LKWEingetroffenNachToolStripMenuItem, Me.ToolStripSeparator7, Me.SDLAuswertungenToolStripMenuItem, Me.SDLAuswertungenToolStripMenuItem1})
@@ -1815,6 +1824,24 @@ Partial Class frmHauptfenster
Me.btnMAVerzeichnis.UseVisualStyleBackColor = True
Me.btnMAVerzeichnis.Visible = False
'
+ 'btnMitarbeiterKonto
+ '
+ Me.btnMitarbeiterKonto.allowBorder = False
+ Me.btnMitarbeiterKonto.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.btnMitarbeiterKonto.BackColor = System.Drawing.Color.White
+ Me.btnMitarbeiterKonto.FlatAppearance.BorderSize = 0
+ Me.btnMitarbeiterKonto.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.btnMitarbeiterKonto.ForeColor = System.Drawing.Color.Black
+ Me.btnMitarbeiterKonto.Image = Global.AVISO.My.Resources.Resources.mitarbeiter_s
+ Me.btnMitarbeiterKonto.ImageAlign = System.Drawing.ContentAlignment.TopCenter
+ Me.btnMitarbeiterKonto.Location = New System.Drawing.Point(1109, -6)
+ Me.btnMitarbeiterKonto.Name = "btnMitarbeiterKonto"
+ Me.btnMitarbeiterKonto.Size = New System.Drawing.Size(137, 61)
+ Me.btnMitarbeiterKonto.TabIndex = 86
+ Me.btnMitarbeiterKonto.Text = "Andreas Luxbauer"
+ Me.btnMitarbeiterKonto.TextAlign = System.Drawing.ContentAlignment.BottomCenter
+ Me.btnMitarbeiterKonto.UseVisualStyleBackColor = False
+ '
'Button9
'
Me.Button9.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
@@ -2440,6 +2467,15 @@ Partial Class frmHauptfenster
Me.SplitContainer3.SplitterDistance = 158
Me.SplitContainer3.TabIndex = 3
'
+ 'UsrCntlBenachrichtigungen1
+ '
+ Me.UsrCntlBenachrichtigungen1.Dock = System.Windows.Forms.DockStyle.Fill
+ Me.UsrCntlBenachrichtigungen1.Location = New System.Drawing.Point(0, 0)
+ Me.UsrCntlBenachrichtigungen1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.UsrCntlBenachrichtigungen1.Name = "UsrCntlBenachrichtigungen1"
+ Me.UsrCntlBenachrichtigungen1.Size = New System.Drawing.Size(158, 300)
+ Me.UsrCntlBenachrichtigungen1.TabIndex = 0
+ '
'pnl
'
Me.pnl.Controls.Add(Me.Button10)
@@ -2465,6 +2501,50 @@ Partial Class frmHauptfenster
Me.Button10.Text = "<"
Me.Button10.UseVisualStyleBackColor = False
'
+ 'gridMyAviso
+ '
+ Me.gridMyAviso.AKTUALISIERUNGS_INTERVALL = -1
+ Me.gridMyAviso.AllowUserToAddRows = False
+ Me.gridMyAviso.AllowUserToDeleteRows = False
+ Me.gridMyAviso.AllowUserToOrderColumns = True
+ Me.gridMyAviso.AllowUserToResizeRows = False
+ DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
+ Me.gridMyAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
+ Me.gridMyAviso.BackgroundColor = System.Drawing.Color.White
+ DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+ DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Control
+ DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
+ DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText
+ DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
+ DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+ DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+ Me.gridMyAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
+ Me.gridMyAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+ DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+ DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window
+ DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.ControlText
+ DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
+ DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+ DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+ Me.gridMyAviso.DefaultCellStyle = DataGridViewCellStyle3
+ Me.gridMyAviso.Dock = System.Windows.Forms.DockStyle.Fill
+ Me.gridMyAviso.Location = New System.Drawing.Point(0, 21)
+ Me.gridMyAviso.Name = "gridMyAviso"
+ Me.gridMyAviso.ReadOnly = True
+ DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+ DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
+ DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, 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.gridMyAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle4
+ Me.gridMyAviso.RowHeadersVisible = False
+ Me.gridMyAviso.RowHeadersWidth = 62
+ Me.gridMyAviso.Size = New System.Drawing.Size(488, 279)
+ Me.gridMyAviso.TabIndex = 0
+ '
'Panel6
'
Me.Panel6.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
@@ -2520,6 +2600,23 @@ Partial Class frmHauptfenster
Me.lblMeineAviso.TabIndex = 0
Me.lblMeineAviso.Text = "Meine Sendungen:"
'
+ 'cboMy_Grenzstelle
+ '
+ Me.cboMy_Grenzstelle._allowedValuesFreiText = Nothing
+ Me.cboMy_Grenzstelle._allowFreiText = False
+ Me.cboMy_Grenzstelle._value = ""
+ Me.cboMy_Grenzstelle.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.cboMy_Grenzstelle.BackColor = System.Drawing.Color.WhiteSmoke
+ Me.cboMy_Grenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+ Me.cboMy_Grenzstelle.DropDownWidth = 120
+ Me.cboMy_Grenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.cboMy_Grenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+ Me.cboMy_Grenzstelle.FormattingEnabled = True
+ Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(113, 1)
+ Me.cboMy_Grenzstelle.Name = "cboMy_Grenzstelle"
+ Me.cboMy_Grenzstelle.Size = New System.Drawing.Size(64, 21)
+ Me.cboMy_Grenzstelle.TabIndex = 26
+ '
'lblMySnd_Grenzstelle
'
Me.lblMySnd_Grenzstelle.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
@@ -2571,6 +2668,22 @@ Partial Class frmHauptfenster
Me.cboMy_VB.ThreeState = True
Me.cboMy_VB.UseVisualStyleBackColor = True
'
+ 'cboMyAvisoAnzeige
+ '
+ Me.cboMyAvisoAnzeige._allowedValuesFreiText = Nothing
+ Me.cboMyAvisoAnzeige._allowFreiText = False
+ Me.cboMyAvisoAnzeige._value = ""
+ Me.cboMyAvisoAnzeige.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.cboMyAvisoAnzeige.BackColor = System.Drawing.Color.WhiteSmoke
+ Me.cboMyAvisoAnzeige.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+ Me.cboMyAvisoAnzeige.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.cboMyAvisoAnzeige.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+ Me.cboMyAvisoAnzeige.FormattingEnabled = True
+ Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(232, 1)
+ Me.cboMyAvisoAnzeige.Name = "cboMyAvisoAnzeige"
+ Me.cboMyAvisoAnzeige.Size = New System.Drawing.Size(127, 21)
+ Me.cboMyAvisoAnzeige.TabIndex = 21
+ '
'lblMySND_Anzeige
'
Me.lblMySND_Anzeige.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
@@ -2833,6 +2946,60 @@ Partial Class frmHauptfenster
Me.splitMain.SplitterDistance = 287
Me.splitMain.TabIndex = 0
'
+ 'gridAviso
+ '
+ Me.gridAviso.AKTUALISIERUNGS_INTERVALL = -1
+ Me.gridAviso.AllowUserToAddRows = False
+ Me.gridAviso.AllowUserToDeleteRows = False
+ Me.gridAviso.AllowUserToResizeRows = False
+ DataGridViewCellStyle5.BackColor = System.Drawing.Color.Azure
+ DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+ Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle5
+ Me.gridAviso.BackgroundColor = System.Drawing.Color.DarkGray
+ Me.gridAviso.ClipboardCopyMode = System.Windows.Forms.DataGridViewClipboardCopyMode.Disable
+ DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+ DataGridViewCellStyle6.BackColor = System.Drawing.Color.LightBlue
+ DataGridViewCellStyle6.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ DataGridViewCellStyle6.ForeColor = System.Drawing.SystemColors.WindowText
+ DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight
+ DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+ DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+ Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle6
+ Me.gridAviso.ColumnHeadersHeight = 25
+ Me.gridAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
+ DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+ DataGridViewCellStyle7.BackColor = System.Drawing.SystemColors.Window
+ 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.ControlText
+ DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight
+ DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+ DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+ Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle7
+ Me.gridAviso.Dock = System.Windows.Forms.DockStyle.Fill
+ Me.gridAviso.Location = New System.Drawing.Point(0, 248)
+ Me.gridAviso.MultiSelect = False
+ Me.gridAviso.Name = "gridAviso"
+ Me.gridAviso.ReadOnly = True
+ DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+ DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Control
+ DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.WindowText
+ DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
+ DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+ DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+ Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle8
+ Me.gridAviso.RowHeadersVisible = False
+ Me.gridAviso.RowHeadersWidth = 62
+ Me.gridAviso.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
+ DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+ Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle9
+ Me.gridAviso.RowTemplate.ReadOnly = True
+ Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
+ Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+ Me.gridAviso.Size = New System.Drawing.Size(815, 39)
+ Me.gridAviso.TabIndex = 1
+ Me.gridAviso.TabStop = False
+ '
'Panel1
'
Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
@@ -2866,6 +3033,32 @@ Partial Class frmHauptfenster
Me.Panel1.Size = New System.Drawing.Size(815, 248)
Me.Panel1.TabIndex = 2
'
+ 'txtBestimmungszollstelle
+ '
+ Me.txtBestimmungszollstelle._allowFreitext = False
+ Me.txtBestimmungszollstelle._AllowSetValue = False
+ Me.txtBestimmungszollstelle._allowSpaceAsSplitter = False
+ Me.txtBestimmungszollstelle._autoSizeGross = False
+ Me.txtBestimmungszollstelle._hideIfListEmpty = True
+ Me.txtBestimmungszollstelle._value = Nothing
+ Me.txtBestimmungszollstelle.conn_art = "FMZOLL"
+ Me.txtBestimmungszollstelle.dgvpos = "LEFT"
+ Me.txtBestimmungszollstelle.DISPLAY_PARAM = Nothing
+ Me.txtBestimmungszollstelle.INVISIBLE_COLUMNS = Nothing
+ Me.txtBestimmungszollstelle.key_visible = False
+ Me.txtBestimmungszollstelle.KEYPARAM = Nothing
+ Me.txtBestimmungszollstelle.Location = New System.Drawing.Point(379, 55)
+ Me.txtBestimmungszollstelle.MaxLength = 50
+ Me.txtBestimmungszollstelle.Name = "txtBestimmungszollstelle"
+ Me.txtBestimmungszollstelle.searchActive = True
+ Me.txtBestimmungszollstelle.Size = New System.Drawing.Size(211, 20)
+ Me.txtBestimmungszollstelle.SQL_ORDER_BY = Nothing
+ Me.txtBestimmungszollstelle.SQL_SELECT = Nothing
+ Me.txtBestimmungszollstelle.SQL_WHERE = Nothing
+ Me.txtBestimmungszollstelle.SQL_WhereParamList = Nothing
+ Me.txtBestimmungszollstelle.TabIndex = 25
+ Me.txtBestimmungszollstelle.usrcntl = Nothing
+ '
'Label10
'
Me.Label10.AutoSize = True
@@ -2876,6 +3069,22 @@ Partial Class frmHauptfenster
Me.Label10.TabIndex = 26
Me.Label10.Text = "Zollamt:"
'
+ 'cboImEx
+ '
+ Me.cboImEx._allowedValuesFreiText = Nothing
+ Me.cboImEx._allowFreiText = False
+ Me.cboImEx._value = ""
+ Me.cboImEx.BackColor = System.Drawing.Color.WhiteSmoke
+ Me.cboImEx.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+ Me.cboImEx.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.cboImEx.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboImEx.FormattingEnabled = True
+ Me.cboImEx.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD"})
+ Me.cboImEx.Location = New System.Drawing.Point(828, 3)
+ Me.cboImEx.Name = "cboImEx"
+ Me.cboImEx.Size = New System.Drawing.Size(78, 24)
+ Me.cboImEx.TabIndex = 24
+ '
'Label21
'
Me.Label21.AutoSize = True
@@ -2899,6 +3108,22 @@ Partial Class frmHauptfenster
Me.cbxCluster.Text = "Firmenverbund"
Me.cbxCluster.UseVisualStyleBackColor = True
'
+ 'cboTeams
+ '
+ Me.cboTeams._allowedValuesFreiText = Nothing
+ Me.cboTeams._allowFreiText = False
+ Me.cboTeams._value = ""
+ Me.cboTeams.BackColor = System.Drawing.Color.WhiteSmoke
+ Me.cboTeams.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+ Me.cboTeams.DropDownWidth = 200
+ Me.cboTeams.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.cboTeams.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboTeams.FormattingEnabled = True
+ Me.cboTeams.Location = New System.Drawing.Point(379, 3)
+ Me.cboTeams.Name = "cboTeams"
+ Me.cboTeams.Size = New System.Drawing.Size(107, 24)
+ Me.cboTeams.TabIndex = 19
+ '
'lblErweitereSuche
'
Me.lblErweitereSuche.AutoSize = True
@@ -2944,6 +3169,23 @@ Partial Class frmHauptfenster
Me.lblEintraege.Text = "0 Einträge"
Me.lblEintraege.TextAlign = System.Drawing.ContentAlignment.TopRight
'
+ 'cboGrenzstelle
+ '
+ Me.cboGrenzstelle._allowedValuesFreiText = Nothing
+ Me.cboGrenzstelle._allowFreiText = False
+ Me.cboGrenzstelle._value = ""
+ Me.cboGrenzstelle.BackColor = System.Drawing.Color.WhiteSmoke
+ Me.cboGrenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+ Me.cboGrenzstelle.DropDownWidth = 200
+ Me.cboGrenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.cboGrenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboGrenzstelle.FormattingEnabled = True
+ Me.cboGrenzstelle.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD", "NEU", "AMB", "???"})
+ Me.cboGrenzstelle.Location = New System.Drawing.Point(379, 30)
+ Me.cboGrenzstelle.Name = "cboGrenzstelle"
+ Me.cboGrenzstelle.Size = New System.Drawing.Size(107, 24)
+ Me.cboGrenzstelle.TabIndex = 13
+ '
'Label4
'
Me.Label4.AutoSize = True
@@ -2971,6 +3213,22 @@ Partial Class frmHauptfenster
Me.pnlTime.Size = New System.Drawing.Size(437, 57)
Me.pnlTime.TabIndex = 12
'
+ 'MyComboBox1
+ '
+ Me.MyComboBox1._allowedValuesFreiText = Nothing
+ Me.MyComboBox1._allowFreiText = False
+ Me.MyComboBox1._value = ""
+ Me.MyComboBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.MyComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.MyComboBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+ Me.MyComboBox1.ForeColor = System.Drawing.Color.White
+ Me.MyComboBox1.FormattingEnabled = True
+ Me.MyComboBox1.Location = New System.Drawing.Point(46, 1)
+ Me.MyComboBox1.MaxLength = 4
+ Me.MyComboBox1.Name = "MyComboBox1"
+ Me.MyComboBox1.Size = New System.Drawing.Size(98, 21)
+ Me.MyComboBox1.TabIndex = 7
+ '
'pnlSearch
'
Me.pnlSearch.Controls.Add(Me.lblAbsender)
@@ -3199,6 +3457,20 @@ Partial Class frmHauptfenster
Me.txtEmpfänger.Size = New System.Drawing.Size(236, 23)
Me.txtEmpfänger.TabIndex = 3
'
+ 'cboFiliale
+ '
+ Me.cboFiliale._allowedValuesFreiText = Nothing
+ Me.cboFiliale._allowFreiText = False
+ Me.cboFiliale._value = ""
+ Me.cboFiliale.DropDownWidth = 300
+ Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboFiliale.FormattingEnabled = True
+ Me.cboFiliale.Location = New System.Drawing.Point(389, 13)
+ Me.cboFiliale.MaxLength = 4
+ Me.cboFiliale.Name = "cboFiliale"
+ Me.cboFiliale.Size = New System.Drawing.Size(70, 24)
+ Me.cboFiliale.TabIndex = 3
+ '
'txtAbfertigungsnummer
'
Me.txtAbfertigungsnummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -3483,12 +3755,6 @@ Partial Class frmHauptfenster
Me.HomepageToolStripMenuItem.Size = New System.Drawing.Size(133, 22)
Me.HomepageToolStripMenuItem.Text = "Homepage"
'
- 'FIBUSachkontenToolStripMenuItem
- '
- Me.FIBUSachkontenToolStripMenuItem.Name = "FIBUSachkontenToolStripMenuItem"
- Me.FIBUSachkontenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
- Me.FIBUSachkontenToolStripMenuItem.Text = "FIBU Sachkonten"
- '
'UsrCntlTestsystem1
'
Me.UsrCntlTestsystem1.BackColor = System.Drawing.Color.White
@@ -3500,268 +3766,17 @@ Partial Class frmHauptfenster
Me.UsrCntlTestsystem1.Size = New System.Drawing.Size(152, 28)
Me.UsrCntlTestsystem1.TabIndex = 8
'
- 'gridAviso
+ 'EMAILToolStripMenuItem
'
- Me.gridAviso.AKTUALISIERUNGS_INTERVALL = -1
- Me.gridAviso.AllowUserToAddRows = False
- Me.gridAviso.AllowUserToDeleteRows = False
- Me.gridAviso.AllowUserToResizeRows = False
- DataGridViewCellStyle5.BackColor = System.Drawing.Color.Azure
- DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
- Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle5
- Me.gridAviso.BackgroundColor = System.Drawing.Color.DarkGray
- Me.gridAviso.ClipboardCopyMode = System.Windows.Forms.DataGridViewClipboardCopyMode.Disable
- DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
- DataGridViewCellStyle6.BackColor = System.Drawing.Color.LightBlue
- DataGridViewCellStyle6.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- DataGridViewCellStyle6.ForeColor = System.Drawing.SystemColors.WindowText
- DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight
- DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
- DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
- Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle6
- Me.gridAviso.ColumnHeadersHeight = 25
- Me.gridAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
- DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
- DataGridViewCellStyle7.BackColor = System.Drawing.SystemColors.Window
- 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.ControlText
- DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight
- DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText
- DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
- Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle7
- Me.gridAviso.Dock = System.Windows.Forms.DockStyle.Fill
- Me.gridAviso.Location = New System.Drawing.Point(0, 248)
- Me.gridAviso.MultiSelect = False
- Me.gridAviso.Name = "gridAviso"
- Me.gridAviso.ReadOnly = True
- DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
- DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Control
- DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.WindowText
- DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
- DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
- DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
- Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle8
- Me.gridAviso.RowHeadersVisible = False
- Me.gridAviso.RowHeadersWidth = 62
- Me.gridAviso.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
- DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
- Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle9
- Me.gridAviso.RowTemplate.ReadOnly = True
- Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
- Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
- Me.gridAviso.Size = New System.Drawing.Size(815, 39)
- Me.gridAviso.TabIndex = 1
- Me.gridAviso.TabStop = False
+ Me.EMAILToolStripMenuItem.Name = "EMAILToolStripMenuItem"
+ Me.EMAILToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+ Me.EMAILToolStripMenuItem.Text = "E-MAIL"
'
- 'txtBestimmungszollstelle
+ 'FTPToolStripMenuItem
'
- Me.txtBestimmungszollstelle._allowFreitext = False
- Me.txtBestimmungszollstelle._AllowSetValue = False
- Me.txtBestimmungszollstelle._allowSpaceAsSplitter = False
- Me.txtBestimmungszollstelle._autoSizeGross = False
- Me.txtBestimmungszollstelle._hideIfListEmpty = True
- Me.txtBestimmungszollstelle._value = Nothing
- Me.txtBestimmungszollstelle.conn_art = "FMZOLL"
- Me.txtBestimmungszollstelle.dgvpos = "LEFT"
- Me.txtBestimmungszollstelle.DISPLAY_PARAM = Nothing
- Me.txtBestimmungszollstelle.INVISIBLE_COLUMNS = Nothing
- Me.txtBestimmungszollstelle.key_visible = False
- Me.txtBestimmungszollstelle.KEYPARAM = Nothing
- Me.txtBestimmungszollstelle.Location = New System.Drawing.Point(379, 55)
- Me.txtBestimmungszollstelle.MaxLength = 50
- Me.txtBestimmungszollstelle.Name = "txtBestimmungszollstelle"
- Me.txtBestimmungszollstelle.searchActive = True
- Me.txtBestimmungszollstelle.Size = New System.Drawing.Size(211, 20)
- Me.txtBestimmungszollstelle.SQL_ORDER_BY = Nothing
- Me.txtBestimmungszollstelle.SQL_SELECT = Nothing
- Me.txtBestimmungszollstelle.SQL_WHERE = Nothing
- Me.txtBestimmungszollstelle.SQL_WhereParamList = Nothing
- Me.txtBestimmungszollstelle.TabIndex = 25
- Me.txtBestimmungszollstelle.usrcntl = Nothing
- '
- 'cboImEx
- '
- Me.cboImEx._allowedValuesFreiText = Nothing
- Me.cboImEx._allowFreiText = False
- Me.cboImEx._value = ""
- Me.cboImEx.BackColor = System.Drawing.Color.WhiteSmoke
- Me.cboImEx.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cboImEx.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.cboImEx.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboImEx.FormattingEnabled = True
- Me.cboImEx.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD"})
- Me.cboImEx.Location = New System.Drawing.Point(828, 3)
- Me.cboImEx.Name = "cboImEx"
- Me.cboImEx.Size = New System.Drawing.Size(78, 24)
- Me.cboImEx.TabIndex = 24
- '
- 'cboTeams
- '
- Me.cboTeams._allowedValuesFreiText = Nothing
- Me.cboTeams._allowFreiText = False
- Me.cboTeams._value = ""
- Me.cboTeams.BackColor = System.Drawing.Color.WhiteSmoke
- Me.cboTeams.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cboTeams.DropDownWidth = 200
- Me.cboTeams.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.cboTeams.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboTeams.FormattingEnabled = True
- Me.cboTeams.Location = New System.Drawing.Point(379, 3)
- Me.cboTeams.Name = "cboTeams"
- Me.cboTeams.Size = New System.Drawing.Size(107, 24)
- Me.cboTeams.TabIndex = 19
- '
- 'cboGrenzstelle
- '
- Me.cboGrenzstelle._allowedValuesFreiText = Nothing
- Me.cboGrenzstelle._allowFreiText = False
- Me.cboGrenzstelle._value = ""
- Me.cboGrenzstelle.BackColor = System.Drawing.Color.WhiteSmoke
- Me.cboGrenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cboGrenzstelle.DropDownWidth = 200
- Me.cboGrenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.cboGrenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboGrenzstelle.FormattingEnabled = True
- Me.cboGrenzstelle.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD", "NEU", "AMB", "???"})
- Me.cboGrenzstelle.Location = New System.Drawing.Point(379, 30)
- Me.cboGrenzstelle.Name = "cboGrenzstelle"
- Me.cboGrenzstelle.Size = New System.Drawing.Size(107, 24)
- Me.cboGrenzstelle.TabIndex = 13
- '
- 'MyComboBox1
- '
- Me.MyComboBox1._allowedValuesFreiText = Nothing
- Me.MyComboBox1._allowFreiText = False
- Me.MyComboBox1._value = ""
- Me.MyComboBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
- Me.MyComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.MyComboBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
- Me.MyComboBox1.ForeColor = System.Drawing.Color.White
- Me.MyComboBox1.FormattingEnabled = True
- Me.MyComboBox1.Location = New System.Drawing.Point(46, 1)
- Me.MyComboBox1.MaxLength = 4
- Me.MyComboBox1.Name = "MyComboBox1"
- Me.MyComboBox1.Size = New System.Drawing.Size(98, 21)
- Me.MyComboBox1.TabIndex = 7
- '
- 'cboFiliale
- '
- Me.cboFiliale._allowedValuesFreiText = Nothing
- Me.cboFiliale._allowFreiText = False
- Me.cboFiliale._value = ""
- Me.cboFiliale.DropDownWidth = 300
- Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboFiliale.FormattingEnabled = True
- Me.cboFiliale.Location = New System.Drawing.Point(389, 13)
- Me.cboFiliale.MaxLength = 4
- Me.cboFiliale.Name = "cboFiliale"
- Me.cboFiliale.Size = New System.Drawing.Size(70, 24)
- Me.cboFiliale.TabIndex = 3
- '
- 'UsrCntlBenachrichtigungen1
- '
- Me.UsrCntlBenachrichtigungen1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.UsrCntlBenachrichtigungen1.Location = New System.Drawing.Point(0, 0)
- Me.UsrCntlBenachrichtigungen1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
- Me.UsrCntlBenachrichtigungen1.Name = "UsrCntlBenachrichtigungen1"
- Me.UsrCntlBenachrichtigungen1.Size = New System.Drawing.Size(158, 300)
- Me.UsrCntlBenachrichtigungen1.TabIndex = 0
- '
- 'gridMyAviso
- '
- Me.gridMyAviso.AKTUALISIERUNGS_INTERVALL = -1
- Me.gridMyAviso.AllowUserToAddRows = False
- Me.gridMyAviso.AllowUserToDeleteRows = False
- Me.gridMyAviso.AllowUserToOrderColumns = True
- Me.gridMyAviso.AllowUserToResizeRows = False
- DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
- Me.gridMyAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
- Me.gridMyAviso.BackgroundColor = System.Drawing.Color.White
- DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
- DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Control
- DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
- DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText
- DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
- DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
- DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
- Me.gridMyAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
- Me.gridMyAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
- DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
- DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window
- DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.ControlText
- DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
- DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
- DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
- Me.gridMyAviso.DefaultCellStyle = DataGridViewCellStyle3
- Me.gridMyAviso.Dock = System.Windows.Forms.DockStyle.Fill
- Me.gridMyAviso.Location = New System.Drawing.Point(0, 21)
- Me.gridMyAviso.Name = "gridMyAviso"
- Me.gridMyAviso.ReadOnly = True
- DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
- DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
- DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, 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.gridMyAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle4
- Me.gridMyAviso.RowHeadersVisible = False
- Me.gridMyAviso.RowHeadersWidth = 62
- Me.gridMyAviso.Size = New System.Drawing.Size(488, 279)
- Me.gridMyAviso.TabIndex = 0
- '
- 'cboMy_Grenzstelle
- '
- Me.cboMy_Grenzstelle._allowedValuesFreiText = Nothing
- Me.cboMy_Grenzstelle._allowFreiText = False
- Me.cboMy_Grenzstelle._value = ""
- Me.cboMy_Grenzstelle.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
- Me.cboMy_Grenzstelle.BackColor = System.Drawing.Color.WhiteSmoke
- Me.cboMy_Grenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cboMy_Grenzstelle.DropDownWidth = 120
- Me.cboMy_Grenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.cboMy_Grenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
- Me.cboMy_Grenzstelle.FormattingEnabled = True
- Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(113, 1)
- Me.cboMy_Grenzstelle.Name = "cboMy_Grenzstelle"
- Me.cboMy_Grenzstelle.Size = New System.Drawing.Size(64, 21)
- Me.cboMy_Grenzstelle.TabIndex = 26
- '
- 'cboMyAvisoAnzeige
- '
- Me.cboMyAvisoAnzeige._allowedValuesFreiText = Nothing
- Me.cboMyAvisoAnzeige._allowFreiText = False
- Me.cboMyAvisoAnzeige._value = ""
- Me.cboMyAvisoAnzeige.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
- Me.cboMyAvisoAnzeige.BackColor = System.Drawing.Color.WhiteSmoke
- Me.cboMyAvisoAnzeige.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cboMyAvisoAnzeige.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.cboMyAvisoAnzeige.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
- Me.cboMyAvisoAnzeige.FormattingEnabled = True
- Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(232, 1)
- Me.cboMyAvisoAnzeige.Name = "cboMyAvisoAnzeige"
- Me.cboMyAvisoAnzeige.Size = New System.Drawing.Size(127, 21)
- Me.cboMyAvisoAnzeige.TabIndex = 21
- '
- 'btnMitarbeiterKonto
- '
- Me.btnMitarbeiterKonto.allowBorder = False
- Me.btnMitarbeiterKonto.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
- Me.btnMitarbeiterKonto.BackColor = System.Drawing.Color.White
- Me.btnMitarbeiterKonto.FlatAppearance.BorderSize = 0
- Me.btnMitarbeiterKonto.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.btnMitarbeiterKonto.ForeColor = System.Drawing.Color.Black
- Me.btnMitarbeiterKonto.Image = Global.AVISO.My.Resources.Resources.mitarbeiter_s
- Me.btnMitarbeiterKonto.ImageAlign = System.Drawing.ContentAlignment.TopCenter
- Me.btnMitarbeiterKonto.Location = New System.Drawing.Point(1109, -6)
- Me.btnMitarbeiterKonto.Name = "btnMitarbeiterKonto"
- Me.btnMitarbeiterKonto.Size = New System.Drawing.Size(137, 61)
- Me.btnMitarbeiterKonto.TabIndex = 86
- Me.btnMitarbeiterKonto.Text = "Andreas Luxbauer"
- Me.btnMitarbeiterKonto.TextAlign = System.Drawing.ContentAlignment.BottomCenter
- Me.btnMitarbeiterKonto.UseVisualStyleBackColor = False
+ Me.FTPToolStripMenuItem.Name = "FTPToolStripMenuItem"
+ Me.FTPToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+ Me.FTPToolStripMenuItem.Text = "FTP"
'
'frmHauptfenster
'
@@ -3803,6 +3818,7 @@ Partial Class frmHauptfenster
CType(Me.SplitContainer3, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainer3.ResumeLayout(False)
Me.pnl.ResumeLayout(False)
+ CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).EndInit()
Me.Panel6.ResumeLayout(False)
Me.Panel6.PerformLayout()
Me.tbcntrAviso.ResumeLayout(False)
@@ -3817,6 +3833,7 @@ Partial Class frmHauptfenster
Me.splitMain.Panel2.ResumeLayout(False)
CType(Me.splitMain, System.ComponentModel.ISupportInitialize).EndInit()
Me.splitMain.ResumeLayout(False)
+ CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).EndInit()
Me.Panel1.ResumeLayout(False)
Me.Panel1.PerformLayout()
Me.pnlTime.ResumeLayout(False)
@@ -3830,8 +3847,6 @@ Partial Class frmHauptfenster
Me.Panel3.PerformLayout()
Me.Panel4.ResumeLayout(False)
Me.cntVerag.ResumeLayout(False)
- CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
@@ -4198,4 +4213,6 @@ Partial Class frmHauptfenster
Friend WithEvents AnhangsartenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents MailvorlagenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents FIBUSachkontenToolStripMenuItem As ToolStripMenuItem
+ Friend WithEvents EMAILToolStripMenuItem As ToolStripMenuItem
+ Friend WithEvents FTPToolStripMenuItem As ToolStripMenuItem
End Class
diff --git a/Aviso/frmHauptfenster.vb b/Aviso/frmHauptfenster.vb
index 0a26cde..52c3688 100644
--- a/Aviso/frmHauptfenster.vb
+++ b/Aviso/frmHauptfenster.vb
@@ -4583,43 +4583,58 @@ Public Class frmHauptfenster
Me.Cursor = Cursors.Default
End Sub
- Private Sub DatevBuchungsexportToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DatevBuchungsexportToolStripMenuItem.Click
+ Private Sub DatevBuchungsexportToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles EMAILToolStripMenuItem.Click, FTPToolStripMenuItem.Click
Try
+
Dim Pathlist As New List(Of String)
- If VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, False, True, True,, Pathlist, False) Then
- MsgBox("Buchungen wurden erfolgreich exportiert!")
- Else
- MsgBox("Es wurden keine Buchungen exportiert!")
- Exit Sub
- End If
+ Select Case sender.name
+ Case "EMAILToolStripMenuItem"
- Dim outl As New Outlook.Application
- Dim Mail As Microsoft.Office.Interop.Outlook.MailItem
- Mail = outl.CreateItem(0)
+ If VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, False, True, True,, Pathlist, False) Then
+ MsgBox("Buchungen wurden erfolgreich exportiert!")
+ Else
+ MsgBox("Es wurden keine Buchungen exportiert!")
+ Exit Sub
+ End If
- Mail.To = "T.Wesolowski@hkt-tax.de"
- Mail.CC = "C.Tuendermann@hkt-tax.de;D.Horneber@hkt-tax.de;IO@ambarlog.de"
+ Dim outl As New Outlook.Application
+ Dim Mail As Microsoft.Office.Interop.Outlook.MailItem
+ Mail = outl.CreateItem(0)
- Dim TextHTML = ""
- TextHTML &= "Sehr geehrte Damen und Herren,
im Anhang befinden sich die Exportdaten für die Buchhaltung!"
- TextHTML &= "
"
- TextHTML &= "
"
- TextHTML &= "Mit freundlichen Grüßen
"
- TextHTML &= VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME & "
"
- TextHTML &= "
"
- TextHTML &= cFakturierung.getSignature("DE", 24, True, True)
+ Mail.To = "T.Wesolowski@hkt-tax.de"
+ Mail.CC = "C.Tuendermann@hkt-tax.de;D.Horneber@hkt-tax.de;IO@ambarlog.de"
- Mail.HTMLBody = "