MS

2020-03-16 14:25:10 +01:00 · 2020-03-16 14:25:10 +01:00 · 6ac60fac92
commit 6ac60fac92
parent b8cfb26e0b
5 changed files with 352 additions and 340 deletions
--- a/Project/AssemblyInfo.vb
+++ b/Project/AssemblyInfo.vb
@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 

-<Assembly: AssemblyVersion("2.1.0.0")>
+<Assembly: AssemblyVersion("2.1.0.1")>
 <Assembly: AssemblyFileVersion("1.0.0.0")> 
--- a/app/DD_PM_WINDREAM/frmFormDesigner.vb
+++ b/app/DD_PM_WINDREAM/frmFormDesigner.vb
@ -285,11 +285,6 @@ Public Class frmFormDesigner
        Mouse_IsPressed = True

        CurrentControl = Nothing
-        Try
-            TBPM_PROFILE_CONTROLSBindingSource.Clear()
-        Catch ex As Exception
-            LOGGER.Error(ex)
-        End Try
    End Sub

    Private Sub DragDropButtons_MouseMove(sender As Object, e As MouseEventArgs) Handles btnlabel.MouseMove, btntextbox.MouseMove, btndtp.MouseMove, btnVektor.MouseMove, btnTabelle.MouseMove, btnCheckbox.MouseMove, btnLine.MouseMove, btnButton.MouseMove
--- a/app/DD_PM_WINDREAM/frmInvDashboard.Designer.vb
+++ b/app/DD_PM_WINDREAM/frmInvDashboard.Designer.vb
@ -147,12 +147,50 @@ Partial Class frmInvDashboard
        Me.colAnzahl = New DevExpress.XtraGrid.Columns.TileViewColumn()
        Me.colNettoSumme = New DevExpress.XtraGrid.Columns.TileViewColumn()
        Me.CommandBarGalleryDropDown1 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components)
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
+        Me.CreateBarBaseItem1 = New DevExpress.XtraCharts.UI.CreateBarBaseItem()
+        Me.CreateLineBaseItem1 = New DevExpress.XtraCharts.UI.CreateLineBaseItem()
        Me.CommandBarGalleryDropDown2 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components)
+        Me.CreatePieBaseItem1 = New DevExpress.XtraCharts.UI.CreatePieBaseItem()
        Me.CommandBarGalleryDropDown3 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components)
+        Me.CreateRotatedBarBaseItem1 = New DevExpress.XtraCharts.UI.CreateRotatedBarBaseItem()
        Me.CommandBarGalleryDropDown4 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components)
+        Me.CreateAreaBaseItem1 = New DevExpress.XtraCharts.UI.CreateAreaBaseItem()
        Me.CommandBarGalleryDropDown5 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components)
+        Me.CreateOtherSeriesTypesBaseItem1 = New DevExpress.XtraCharts.UI.CreateOtherSeriesTypesBaseItem()
        Me.CommandBarGalleryDropDown6 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components)
+        Me.ChangePaletteGalleryBaseItem1 = New DevExpress.XtraCharts.UI.ChangePaletteGalleryBaseItem()
        Me.CommandBarGalleryDropDown7 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components)
+        Me.ChangeAppearanceGalleryBaseItem1 = New DevExpress.XtraCharts.UI.ChangeAppearanceGalleryBaseItem()
+        Me.RunDesignerChartItem1 = New DevExpress.XtraCharts.UI.RunDesignerChartItem()
+        Me.SaveAsTemplateChartItem1 = New DevExpress.XtraCharts.UI.SaveAsTemplateChartItem()
+        Me.LoadTemplateChartItem1 = New DevExpress.XtraCharts.UI.LoadTemplateChartItem()
+        Me.PrintPreviewChartItem1 = New DevExpress.XtraCharts.UI.PrintPreviewChartItem()
+        Me.PrintChartItem1 = New DevExpress.XtraCharts.UI.PrintChartItem()
+        Me.CreateExportBaseItem1 = New DevExpress.XtraCharts.UI.CreateExportBaseItem()
+        Me.ExportToPDFChartItem1 = New DevExpress.XtraCharts.UI.ExportToPDFChartItem()
+        Me.ExportToHTMLChartItem1 = New DevExpress.XtraCharts.UI.ExportToHTMLChartItem()
+        Me.ExportToMHTChartItem1 = New DevExpress.XtraCharts.UI.ExportToMHTChartItem()
+        Me.ExportToXLSChartItem1 = New DevExpress.XtraCharts.UI.ExportToXLSChartItem()
+        Me.ExportToXLSXChartItem1 = New DevExpress.XtraCharts.UI.ExportToXLSXChartItem()
+        Me.ExportToRTFChartItem1 = New DevExpress.XtraCharts.UI.ExportToRTFChartItem()
+        Me.CreateExportToImageBaseItem1 = New DevExpress.XtraCharts.UI.CreateExportToImageBaseItem()
+        Me.ExportToBMPChartItem1 = New DevExpress.XtraCharts.UI.ExportToBMPChartItem()
+        Me.ExportToGIFChartItem1 = New DevExpress.XtraCharts.UI.ExportToGIFChartItem()
+        Me.ExportToJPEGChartItem1 = New DevExpress.XtraCharts.UI.ExportToJPEGChartItem()
+        Me.ExportToPNGChartItem1 = New DevExpress.XtraCharts.UI.ExportToPNGChartItem()
+        Me.ExportToTIFFChartItem1 = New DevExpress.XtraCharts.UI.ExportToTIFFChartItem()
+        Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem6 = New DevExpress.XtraBars.BarButtonItem()
+        Me.ChartRibbonPageCategory1 = New DevExpress.XtraCharts.UI.ChartRibbonPageCategory()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPage3 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
@ -188,45 +226,8 @@ Partial Class frmInvDashboard
        Me.ChartTypeRibbonPageGroup1 = New DevExpress.XtraCharts.UI.ChartTypeRibbonPageGroup()
        Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl()
        Me.Panel2 = New System.Windows.Forms.Panel()
-        Me.ChartRibbonPageCategory1 = New DevExpress.XtraCharts.UI.ChartRibbonPageCategory()
-        Me.RibbonPage3 = New DevExpress.XtraBars.Ribbon.RibbonPage()
-        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
-        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
-        Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
-        Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
-        Me.CreateBarBaseItem1 = New DevExpress.XtraCharts.UI.CreateBarBaseItem()
-        Me.CreateLineBaseItem1 = New DevExpress.XtraCharts.UI.CreateLineBaseItem()
-        Me.CreatePieBaseItem1 = New DevExpress.XtraCharts.UI.CreatePieBaseItem()
-        Me.CreateRotatedBarBaseItem1 = New DevExpress.XtraCharts.UI.CreateRotatedBarBaseItem()
-        Me.CreateAreaBaseItem1 = New DevExpress.XtraCharts.UI.CreateAreaBaseItem()
-        Me.CreateOtherSeriesTypesBaseItem1 = New DevExpress.XtraCharts.UI.CreateOtherSeriesTypesBaseItem()
-        Me.ChangePaletteGalleryBaseItem1 = New DevExpress.XtraCharts.UI.ChangePaletteGalleryBaseItem()
-        Me.ChangeAppearanceGalleryBaseItem1 = New DevExpress.XtraCharts.UI.ChangeAppearanceGalleryBaseItem()
-        Me.RunDesignerChartItem1 = New DevExpress.XtraCharts.UI.RunDesignerChartItem()
-        Me.SaveAsTemplateChartItem1 = New DevExpress.XtraCharts.UI.SaveAsTemplateChartItem()
-        Me.LoadTemplateChartItem1 = New DevExpress.XtraCharts.UI.LoadTemplateChartItem()
-        Me.PrintPreviewChartItem1 = New DevExpress.XtraCharts.UI.PrintPreviewChartItem()
-        Me.PrintChartItem1 = New DevExpress.XtraCharts.UI.PrintChartItem()
-        Me.CreateExportBaseItem1 = New DevExpress.XtraCharts.UI.CreateExportBaseItem()
-        Me.ExportToPDFChartItem1 = New DevExpress.XtraCharts.UI.ExportToPDFChartItem()
-        Me.ExportToHTMLChartItem1 = New DevExpress.XtraCharts.UI.ExportToHTMLChartItem()
-        Me.ExportToMHTChartItem1 = New DevExpress.XtraCharts.UI.ExportToMHTChartItem()
-        Me.ExportToXLSChartItem1 = New DevExpress.XtraCharts.UI.ExportToXLSChartItem()
-        Me.ExportToXLSXChartItem1 = New DevExpress.XtraCharts.UI.ExportToXLSXChartItem()
-        Me.ExportToRTFChartItem1 = New DevExpress.XtraCharts.UI.ExportToRTFChartItem()
-        Me.ExportToBMPChartItem1 = New DevExpress.XtraCharts.UI.ExportToBMPChartItem()
-        Me.ExportToGIFChartItem1 = New DevExpress.XtraCharts.UI.ExportToGIFChartItem()
-        Me.ExportToJPEGChartItem1 = New DevExpress.XtraCharts.UI.ExportToJPEGChartItem()
-        Me.ExportToPNGChartItem1 = New DevExpress.XtraCharts.UI.ExportToPNGChartItem()
-        Me.ExportToTIFFChartItem1 = New DevExpress.XtraCharts.UI.ExportToTIFFChartItem()
-        Me.CreateExportToImageBaseItem1 = New DevExpress.XtraCharts.UI.CreateExportToImageBaseItem()
-        Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
-        Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem()
-        Me.BarButtonItem6 = New DevExpress.XtraBars.BarButtonItem()
-        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
        CType(Me.CommandBarGalleryDropDown1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.CommandBarGalleryDropDown2, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.CommandBarGalleryDropDown3, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.CommandBarGalleryDropDown4, System.ComponentModel.ISupportInitialize).BeginInit()
@ -260,7 +261,6 @@ Partial Class frmInvDashboard
        CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SplitContainerControl1.SuspendLayout()
        Me.Panel2.SuspendLayout()
-        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'colTitle
@ -446,6 +446,58 @@ Partial Class frmInvDashboard
        Me.CommandBarGalleryDropDown1.Name = "CommandBarGalleryDropDown1"
        Me.CommandBarGalleryDropDown1.Ribbon = Me.RibbonControl1
        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.CreateBarBaseItem1, Me.CreateLineBaseItem1, Me.CreatePieBaseItem1, Me.CreateRotatedBarBaseItem1, Me.CreateAreaBaseItem1, Me.CreateOtherSeriesTypesBaseItem1, Me.ChangePaletteGalleryBaseItem1, Me.ChangeAppearanceGalleryBaseItem1, Me.RunDesignerChartItem1, Me.SaveAsTemplateChartItem1, Me.LoadTemplateChartItem1, Me.PrintPreviewChartItem1, Me.PrintChartItem1, Me.CreateExportBaseItem1, Me.ExportToPDFChartItem1, Me.ExportToHTMLChartItem1, Me.ExportToMHTChartItem1, Me.ExportToXLSChartItem1, Me.ExportToXLSXChartItem1, Me.ExportToRTFChartItem1, Me.ExportToBMPChartItem1, Me.ExportToGIFChartItem1, Me.ExportToJPEGChartItem1, Me.ExportToPNGChartItem1, Me.ExportToTIFFChartItem1, Me.CreateExportToImageBaseItem1, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 33
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.ChartRibbonPageCategory1})
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPage3})
+        Me.RibbonControl1.Size = New System.Drawing.Size(1124, 146)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        '
+        'BarButtonItem1
+        '
+        Me.BarButtonItem1.Caption = "Export als PDF"
+        Me.BarButtonItem1.Hint = "Export den ausgewählten Chart als PDF"
+        Me.BarButtonItem1.Id = 1
+        Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        '
+        'BarButtonItem2
+        '
+        Me.BarButtonItem2.Caption = "Export als Bild"
+        Me.BarButtonItem2.Hint = "Exportiert den ausgewählten Chart als Bild"
+        Me.BarButtonItem2.Id = 2
+        Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem2.Name = "BarButtonItem2"
+        '
+        'BarButtonItem3
+        '
+        Me.BarButtonItem3.Caption = "Export Verteilung als PDF"
+        Me.BarButtonItem3.Hint = "Exportiert das Dashboard als PDF"
+        Me.BarButtonItem3.Id = 3
+        Me.BarButtonItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem3.Name = "BarButtonItem3"
+        '
+        'CreateBarBaseItem1
+        '
+        Me.CreateBarBaseItem1.Caption = "Spalte"
+        Me.CreateBarBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown1
+        Me.CreateBarBaseItem1.Enabled = False
+        Me.CreateBarBaseItem1.Id = 4
+        Me.CreateBarBaseItem1.Name = "CreateBarBaseItem1"
+        '
+        'CreateLineBaseItem1
+        '
+        Me.CreateLineBaseItem1.Caption = "Linie"
+        Me.CreateLineBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown2
+        Me.CreateLineBaseItem1.Enabled = False
+        Me.CreateLineBaseItem1.Id = 5
+        Me.CreateLineBaseItem1.Name = "CreateLineBaseItem1"
+        '
        'CommandBarGalleryDropDown2
        '
        '
@ -511,6 +563,14 @@ Partial Class frmInvDashboard
        Me.CommandBarGalleryDropDown2.Name = "CommandBarGalleryDropDown2"
        Me.CommandBarGalleryDropDown2.Ribbon = Me.RibbonControl1
        '
+        'CreatePieBaseItem1
+        '
+        Me.CreatePieBaseItem1.Caption = "Torte"
+        Me.CreatePieBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown3
+        Me.CreatePieBaseItem1.Enabled = False
+        Me.CreatePieBaseItem1.Id = 6
+        Me.CreatePieBaseItem1.Name = "CreatePieBaseItem1"
+        '
        'CommandBarGalleryDropDown3
        '
        '
@ -552,6 +612,14 @@ Partial Class frmInvDashboard
        Me.CommandBarGalleryDropDown3.Name = "CommandBarGalleryDropDown3"
        Me.CommandBarGalleryDropDown3.Ribbon = Me.RibbonControl1
        '
+        'CreateRotatedBarBaseItem1
+        '
+        Me.CreateRotatedBarBaseItem1.Caption = "Balken"
+        Me.CreateRotatedBarBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown4
+        Me.CreateRotatedBarBaseItem1.Enabled = False
+        Me.CreateRotatedBarBaseItem1.Id = 7
+        Me.CreateRotatedBarBaseItem1.Name = "CreateRotatedBarBaseItem1"
+        '
        'CommandBarGalleryDropDown4
        '
        '
@ -595,6 +663,14 @@ Partial Class frmInvDashboard
        Me.CommandBarGalleryDropDown4.Name = "CommandBarGalleryDropDown4"
        Me.CommandBarGalleryDropDown4.Ribbon = Me.RibbonControl1
        '
+        'CreateAreaBaseItem1
+        '
+        Me.CreateAreaBaseItem1.Caption = "Fläche"
+        Me.CreateAreaBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown5
+        Me.CreateAreaBaseItem1.Enabled = False
+        Me.CreateAreaBaseItem1.Id = 8
+        Me.CreateAreaBaseItem1.Name = "CreateAreaBaseItem1"
+        '
        'CommandBarGalleryDropDown5
        '
        '
@ -691,6 +767,14 @@ Partial Class frmInvDashboard
        Me.CommandBarGalleryDropDown5.Name = "CommandBarGalleryDropDown5"
        Me.CommandBarGalleryDropDown5.Ribbon = Me.RibbonControl1
        '
+        'CreateOtherSeriesTypesBaseItem1
+        '
+        Me.CreateOtherSeriesTypesBaseItem1.Caption = "Sonstiges Charts"
+        Me.CreateOtherSeriesTypesBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown6
+        Me.CreateOtherSeriesTypesBaseItem1.Enabled = False
+        Me.CreateOtherSeriesTypesBaseItem1.Id = 9
+        Me.CreateOtherSeriesTypesBaseItem1.Name = "CreateOtherSeriesTypesBaseItem1"
+        '
        'CommandBarGalleryDropDown6
        '
        '
@ -814,6 +898,14 @@ Partial Class frmInvDashboard
        Me.CommandBarGalleryDropDown6.Name = "CommandBarGalleryDropDown6"
        Me.CommandBarGalleryDropDown6.Ribbon = Me.RibbonControl1
        '
+        'ChangePaletteGalleryBaseItem1
+        '
+        Me.ChangePaletteGalleryBaseItem1.Caption = "Palette"
+        Me.ChangePaletteGalleryBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown7
+        Me.ChangePaletteGalleryBaseItem1.Enabled = False
+        Me.ChangePaletteGalleryBaseItem1.Id = 10
+        Me.ChangePaletteGalleryBaseItem1.Name = "ChangePaletteGalleryBaseItem1"
+        '
        'CommandBarGalleryDropDown7
        '
        '
@ -855,6 +947,201 @@ Partial Class frmInvDashboard
        Me.CommandBarGalleryDropDown7.Name = "CommandBarGalleryDropDown7"
        Me.CommandBarGalleryDropDown7.Ribbon = Me.RibbonControl1
        '
+        'ChangeAppearanceGalleryBaseItem1
+        '
+        Me.ChangeAppearanceGalleryBaseItem1.Enabled = False
+        '
+        '
+        '
+        Me.ChangeAppearanceGalleryBaseItem1.Gallery.ColumnCount = 7
+        Me.ChangeAppearanceGalleryBaseItem1.Gallery.ImageSize = New System.Drawing.Size(80, 50)
+        Me.ChangeAppearanceGalleryBaseItem1.Gallery.RowCount = 4
+        Me.ChangeAppearanceGalleryBaseItem1.Id = 11
+        Me.ChangeAppearanceGalleryBaseItem1.Name = "ChangeAppearanceGalleryBaseItem1"
+        '
+        'RunDesignerChartItem1
+        '
+        Me.RunDesignerChartItem1.Caption = "Führen Sie den Diagrammassistenten..."
+        Me.RunDesignerChartItem1.Enabled = False
+        Me.RunDesignerChartItem1.Id = 12
+        Me.RunDesignerChartItem1.Name = "RunDesignerChartItem1"
+        '
+        'SaveAsTemplateChartItem1
+        '
+        Me.SaveAsTemplateChartItem1.Caption = "Als Vorlage speichern"
+        Me.SaveAsTemplateChartItem1.Enabled = False
+        Me.SaveAsTemplateChartItem1.Id = 13
+        Me.SaveAsTemplateChartItem1.Name = "SaveAsTemplateChartItem1"
+        '
+        'LoadTemplateChartItem1
+        '
+        Me.LoadTemplateChartItem1.Caption = "Laden" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Vorlage"
+        Me.LoadTemplateChartItem1.Enabled = False
+        Me.LoadTemplateChartItem1.Id = 14
+        Me.LoadTemplateChartItem1.Name = "LoadTemplateChartItem1"
+        '
+        'PrintPreviewChartItem1
+        '
+        Me.PrintPreviewChartItem1.Caption = "Druckvorschau"
+        Me.PrintPreviewChartItem1.Enabled = False
+        Me.PrintPreviewChartItem1.Id = 15
+        Me.PrintPreviewChartItem1.Name = "PrintPreviewChartItem1"
+        '
+        'PrintChartItem1
+        '
+        Me.PrintChartItem1.Caption = "Drucken"
+        Me.PrintChartItem1.Enabled = False
+        Me.PrintChartItem1.Id = 16
+        Me.PrintChartItem1.Name = "PrintChartItem1"
+        '
+        'CreateExportBaseItem1
+        '
+        Me.CreateExportBaseItem1.Caption = "Exportieren"
+        Me.CreateExportBaseItem1.Enabled = False
+        Me.CreateExportBaseItem1.Id = 17
+        Me.CreateExportBaseItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToPDFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToHTMLChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToMHTChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToXLSChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToXLSXChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToRTFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.CreateExportToImageBaseItem1)})
+        Me.CreateExportBaseItem1.MenuDrawMode = DevExpress.XtraBars.MenuDrawMode.SmallImagesText
+        Me.CreateExportBaseItem1.Name = "CreateExportBaseItem1"
+        Me.CreateExportBaseItem1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionInMenu
+        '
+        'ExportToPDFChartItem1
+        '
+        Me.ExportToPDFChartItem1.Caption = "In PDF exportieren"
+        Me.ExportToPDFChartItem1.Enabled = False
+        Me.ExportToPDFChartItem1.Id = 18
+        Me.ExportToPDFChartItem1.Name = "ExportToPDFChartItem1"
+        '
+        'ExportToHTMLChartItem1
+        '
+        Me.ExportToHTMLChartItem1.Caption = "Export in HTML"
+        Me.ExportToHTMLChartItem1.Enabled = False
+        Me.ExportToHTMLChartItem1.Id = 19
+        Me.ExportToHTMLChartItem1.Name = "ExportToHTMLChartItem1"
+        '
+        'ExportToMHTChartItem1
+        '
+        Me.ExportToMHTChartItem1.Caption = "Exportieren in MHT"
+        Me.ExportToMHTChartItem1.Enabled = False
+        Me.ExportToMHTChartItem1.Id = 20
+        Me.ExportToMHTChartItem1.Name = "ExportToMHTChartItem1"
+        '
+        'ExportToXLSChartItem1
+        '
+        Me.ExportToXLSChartItem1.Caption = "Export in XLS"
+        Me.ExportToXLSChartItem1.Enabled = False
+        Me.ExportToXLSChartItem1.Id = 21
+        Me.ExportToXLSChartItem1.Name = "ExportToXLSChartItem1"
+        '
+        'ExportToXLSXChartItem1
+        '
+        Me.ExportToXLSXChartItem1.Caption = "Exportieren in XLSX"
+        Me.ExportToXLSXChartItem1.Enabled = False
+        Me.ExportToXLSXChartItem1.Id = 22
+        Me.ExportToXLSXChartItem1.Name = "ExportToXLSXChartItem1"
+        '
+        'ExportToRTFChartItem1
+        '
+        Me.ExportToRTFChartItem1.Caption = "Export in RTF"
+        Me.ExportToRTFChartItem1.Enabled = False
+        Me.ExportToRTFChartItem1.Id = 23
+        Me.ExportToRTFChartItem1.Name = "ExportToRTFChartItem1"
+        '
+        'CreateExportToImageBaseItem1
+        '
+        Me.CreateExportToImageBaseItem1.Caption = "Bild exportieren"
+        Me.CreateExportToImageBaseItem1.Enabled = False
+        Me.CreateExportToImageBaseItem1.Id = 29
+        Me.CreateExportToImageBaseItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToBMPChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToGIFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToJPEGChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToPNGChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToTIFFChartItem1)})
+        Me.CreateExportToImageBaseItem1.MenuDrawMode = DevExpress.XtraBars.MenuDrawMode.SmallImagesText
+        Me.CreateExportToImageBaseItem1.Name = "CreateExportToImageBaseItem1"
+        '
+        'ExportToBMPChartItem1
+        '
+        Me.ExportToBMPChartItem1.Caption = "BMP"
+        Me.ExportToBMPChartItem1.Enabled = False
+        Me.ExportToBMPChartItem1.Id = 24
+        Me.ExportToBMPChartItem1.Name = "ExportToBMPChartItem1"
+        '
+        'ExportToGIFChartItem1
+        '
+        Me.ExportToGIFChartItem1.Caption = "GIF"
+        Me.ExportToGIFChartItem1.Enabled = False
+        Me.ExportToGIFChartItem1.Id = 25
+        Me.ExportToGIFChartItem1.Name = "ExportToGIFChartItem1"
+        '
+        'ExportToJPEGChartItem1
+        '
+        Me.ExportToJPEGChartItem1.Caption = "JPEG"
+        Me.ExportToJPEGChartItem1.Enabled = False
+        Me.ExportToJPEGChartItem1.Id = 26
+        Me.ExportToJPEGChartItem1.Name = "ExportToJPEGChartItem1"
+        '
+        'ExportToPNGChartItem1
+        '
+        Me.ExportToPNGChartItem1.Caption = "PNG"
+        Me.ExportToPNGChartItem1.Enabled = False
+        Me.ExportToPNGChartItem1.Id = 27
+        Me.ExportToPNGChartItem1.Name = "ExportToPNGChartItem1"
+        '
+        'ExportToTIFFChartItem1
+        '
+        Me.ExportToTIFFChartItem1.Caption = "TIFF"
+        Me.ExportToTIFFChartItem1.Enabled = False
+        Me.ExportToTIFFChartItem1.Id = 28
+        Me.ExportToTIFFChartItem1.Name = "ExportToTIFFChartItem1"
+        '
+        'BarButtonItem4
+        '
+        Me.BarButtonItem4.Caption = "Export Top Kreditoren als xlsx"
+        Me.BarButtonItem4.Id = 30
+        Me.BarButtonItem4.ImageOptions.Image = CType(resources.GetObject("BarButtonItem4.ImageOptions.Image"), System.Drawing.Image)
+        Me.BarButtonItem4.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImage"), System.Drawing.Image)
+        Me.BarButtonItem4.Name = "BarButtonItem4"
+        '
+        'BarButtonItem5
+        '
+        Me.BarButtonItem5.Caption = "Export Top Kreditoren als pdf"
+        Me.BarButtonItem5.Id = 31
+        Me.BarButtonItem5.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem5.Name = "BarButtonItem5"
+        '
+        'BarButtonItem6
+        '
+        Me.BarButtonItem6.Caption = "BarButtonItem6"
+        Me.BarButtonItem6.Id = 32
+        Me.BarButtonItem6.Name = "BarButtonItem6"
+        '
+        'ChartRibbonPageCategory1
+        '
+        Me.ChartRibbonPageCategory1.Control = Nothing
+        Me.ChartRibbonPageCategory1.Name = "ChartRibbonPageCategory1"
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "Funktionen"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "Funktionen - Charts"
+        '
+        'RibbonPageGroup2
+        '
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem3)
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem4)
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem5)
+        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        Me.RibbonPageGroup2.Text = "Dashboard"
+        '
+        'RibbonPage3
+        '
+        Me.RibbonPage3.Name = "RibbonPage3"
+        Me.RibbonPage3.Text = "RibbonPage3"
+        '
        'RibbonStatusBar1
        '
        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 745)
@ -1214,293 +1501,6 @@ Partial Class frmInvDashboard
        Me.Panel2.Size = New System.Drawing.Size(1124, 135)
        Me.Panel2.TabIndex = 12
        '
-        'ChartRibbonPageCategory1
-        '
-        Me.ChartRibbonPageCategory1.Control = Nothing
-        Me.ChartRibbonPageCategory1.Name = "ChartRibbonPageCategory1"
-        '
-        'RibbonPage3
-        '
-        Me.RibbonPage3.Name = "RibbonPage3"
-        Me.RibbonPage3.Text = "RibbonPage3"
-        '
-        'RibbonPage1
-        '
-        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
-        Me.RibbonPage1.Name = "RibbonPage1"
-        Me.RibbonPage1.Text = "Funktionen"
-        '
-        'RibbonPageGroup2
-        '
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem3)
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem4)
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem5)
-        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
-        Me.RibbonPageGroup2.Text = "Dashboard"
-        '
-        'RibbonPageGroup1
-        '
-        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
-        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
-        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
-        Me.RibbonPageGroup1.Text = "Funktionen - Charts"
-        '
-        'BarButtonItem1
-        '
-        Me.BarButtonItem1.Caption = "Export als PDF"
-        Me.BarButtonItem1.Hint = "Export den ausgewählten Chart als PDF"
-        Me.BarButtonItem1.Id = 1
-        Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
-        Me.BarButtonItem1.Name = "BarButtonItem1"
-        '
-        'BarButtonItem2
-        '
-        Me.BarButtonItem2.Caption = "Export als Bild"
-        Me.BarButtonItem2.Hint = "Exportiert den ausgewählten Chart als Bild"
-        Me.BarButtonItem2.Id = 2
-        Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
-        Me.BarButtonItem2.Name = "BarButtonItem2"
-        '
-        'BarButtonItem3
-        '
-        Me.BarButtonItem3.Caption = "Export Verteilung als PDF"
-        Me.BarButtonItem3.Hint = "Exportiert das Dashboard als PDF"
-        Me.BarButtonItem3.Id = 3
-        Me.BarButtonItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
-        Me.BarButtonItem3.Name = "BarButtonItem3"
-        '
-        'CreateBarBaseItem1
-        '
-        Me.CreateBarBaseItem1.Caption = "Spalte"
-        Me.CreateBarBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown1
-        Me.CreateBarBaseItem1.Enabled = False
-        Me.CreateBarBaseItem1.Id = 4
-        Me.CreateBarBaseItem1.Name = "CreateBarBaseItem1"
-        '
-        'CreateLineBaseItem1
-        '
-        Me.CreateLineBaseItem1.Caption = "Linie"
-        Me.CreateLineBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown2
-        Me.CreateLineBaseItem1.Enabled = False
-        Me.CreateLineBaseItem1.Id = 5
-        Me.CreateLineBaseItem1.Name = "CreateLineBaseItem1"
-        '
-        'CreatePieBaseItem1
-        '
-        Me.CreatePieBaseItem1.Caption = "Torte"
-        Me.CreatePieBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown3
-        Me.CreatePieBaseItem1.Enabled = False
-        Me.CreatePieBaseItem1.Id = 6
-        Me.CreatePieBaseItem1.Name = "CreatePieBaseItem1"
-        '
-        'CreateRotatedBarBaseItem1
-        '
-        Me.CreateRotatedBarBaseItem1.Caption = "Balken"
-        Me.CreateRotatedBarBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown4
-        Me.CreateRotatedBarBaseItem1.Enabled = False
-        Me.CreateRotatedBarBaseItem1.Id = 7
-        Me.CreateRotatedBarBaseItem1.Name = "CreateRotatedBarBaseItem1"
-        '
-        'CreateAreaBaseItem1
-        '
-        Me.CreateAreaBaseItem1.Caption = "Fläche"
-        Me.CreateAreaBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown5
-        Me.CreateAreaBaseItem1.Enabled = False
-        Me.CreateAreaBaseItem1.Id = 8
-        Me.CreateAreaBaseItem1.Name = "CreateAreaBaseItem1"
-        '
-        'CreateOtherSeriesTypesBaseItem1
-        '
-        Me.CreateOtherSeriesTypesBaseItem1.Caption = "Sonstiges Charts"
-        Me.CreateOtherSeriesTypesBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown6
-        Me.CreateOtherSeriesTypesBaseItem1.Enabled = False
-        Me.CreateOtherSeriesTypesBaseItem1.Id = 9
-        Me.CreateOtherSeriesTypesBaseItem1.Name = "CreateOtherSeriesTypesBaseItem1"
-        '
-        'ChangePaletteGalleryBaseItem1
-        '
-        Me.ChangePaletteGalleryBaseItem1.Caption = "Palette"
-        Me.ChangePaletteGalleryBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown7
-        Me.ChangePaletteGalleryBaseItem1.Enabled = False
-        Me.ChangePaletteGalleryBaseItem1.Id = 10
-        Me.ChangePaletteGalleryBaseItem1.Name = "ChangePaletteGalleryBaseItem1"
-        '
-        'ChangeAppearanceGalleryBaseItem1
-        '
-        Me.ChangeAppearanceGalleryBaseItem1.Enabled = False
-        '
-        '
-        '
-        Me.ChangeAppearanceGalleryBaseItem1.Gallery.ColumnCount = 7
-        Me.ChangeAppearanceGalleryBaseItem1.Gallery.ImageSize = New System.Drawing.Size(80, 50)
-        Me.ChangeAppearanceGalleryBaseItem1.Gallery.RowCount = 4
-        Me.ChangeAppearanceGalleryBaseItem1.Id = 11
-        Me.ChangeAppearanceGalleryBaseItem1.Name = "ChangeAppearanceGalleryBaseItem1"
-        '
-        'RunDesignerChartItem1
-        '
-        Me.RunDesignerChartItem1.Caption = "Führen Sie den Diagrammassistenten..."
-        Me.RunDesignerChartItem1.Enabled = False
-        Me.RunDesignerChartItem1.Id = 12
-        Me.RunDesignerChartItem1.Name = "RunDesignerChartItem1"
-        '
-        'SaveAsTemplateChartItem1
-        '
-        Me.SaveAsTemplateChartItem1.Caption = "Als Vorlage speichern"
-        Me.SaveAsTemplateChartItem1.Enabled = False
-        Me.SaveAsTemplateChartItem1.Id = 13
-        Me.SaveAsTemplateChartItem1.Name = "SaveAsTemplateChartItem1"
-        '
-        'LoadTemplateChartItem1
-        '
-        Me.LoadTemplateChartItem1.Caption = "Laden" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Vorlage"
-        Me.LoadTemplateChartItem1.Enabled = False
-        Me.LoadTemplateChartItem1.Id = 14
-        Me.LoadTemplateChartItem1.Name = "LoadTemplateChartItem1"
-        '
-        'PrintPreviewChartItem1
-        '
-        Me.PrintPreviewChartItem1.Caption = "Druckvorschau"
-        Me.PrintPreviewChartItem1.Enabled = False
-        Me.PrintPreviewChartItem1.Id = 15
-        Me.PrintPreviewChartItem1.Name = "PrintPreviewChartItem1"
-        '
-        'PrintChartItem1
-        '
-        Me.PrintChartItem1.Caption = "Drucken"
-        Me.PrintChartItem1.Enabled = False
-        Me.PrintChartItem1.Id = 16
-        Me.PrintChartItem1.Name = "PrintChartItem1"
-        '
-        'CreateExportBaseItem1
-        '
-        Me.CreateExportBaseItem1.Caption = "Exportieren"
-        Me.CreateExportBaseItem1.Enabled = False
-        Me.CreateExportBaseItem1.Id = 17
-        Me.CreateExportBaseItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToPDFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToHTMLChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToMHTChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToXLSChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToXLSXChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToRTFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.CreateExportToImageBaseItem1)})
-        Me.CreateExportBaseItem1.MenuDrawMode = DevExpress.XtraBars.MenuDrawMode.SmallImagesText
-        Me.CreateExportBaseItem1.Name = "CreateExportBaseItem1"
-        Me.CreateExportBaseItem1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionInMenu
-        '
-        'ExportToPDFChartItem1
-        '
-        Me.ExportToPDFChartItem1.Caption = "In PDF exportieren"
-        Me.ExportToPDFChartItem1.Enabled = False
-        Me.ExportToPDFChartItem1.Id = 18
-        Me.ExportToPDFChartItem1.Name = "ExportToPDFChartItem1"
-        '
-        'ExportToHTMLChartItem1
-        '
-        Me.ExportToHTMLChartItem1.Caption = "Export in HTML"
-        Me.ExportToHTMLChartItem1.Enabled = False
-        Me.ExportToHTMLChartItem1.Id = 19
-        Me.ExportToHTMLChartItem1.Name = "ExportToHTMLChartItem1"
-        '
-        'ExportToMHTChartItem1
-        '
-        Me.ExportToMHTChartItem1.Caption = "Exportieren in MHT"
-        Me.ExportToMHTChartItem1.Enabled = False
-        Me.ExportToMHTChartItem1.Id = 20
-        Me.ExportToMHTChartItem1.Name = "ExportToMHTChartItem1"
-        '
-        'ExportToXLSChartItem1
-        '
-        Me.ExportToXLSChartItem1.Caption = "Export in XLS"
-        Me.ExportToXLSChartItem1.Enabled = False
-        Me.ExportToXLSChartItem1.Id = 21
-        Me.ExportToXLSChartItem1.Name = "ExportToXLSChartItem1"
-        '
-        'ExportToXLSXChartItem1
-        '
-        Me.ExportToXLSXChartItem1.Caption = "Exportieren in XLSX"
-        Me.ExportToXLSXChartItem1.Enabled = False
-        Me.ExportToXLSXChartItem1.Id = 22
-        Me.ExportToXLSXChartItem1.Name = "ExportToXLSXChartItem1"
-        '
-        'ExportToRTFChartItem1
-        '
-        Me.ExportToRTFChartItem1.Caption = "Export in RTF"
-        Me.ExportToRTFChartItem1.Enabled = False
-        Me.ExportToRTFChartItem1.Id = 23
-        Me.ExportToRTFChartItem1.Name = "ExportToRTFChartItem1"
-        '
-        'ExportToBMPChartItem1
-        '
-        Me.ExportToBMPChartItem1.Caption = "BMP"
-        Me.ExportToBMPChartItem1.Enabled = False
-        Me.ExportToBMPChartItem1.Id = 24
-        Me.ExportToBMPChartItem1.Name = "ExportToBMPChartItem1"
-        '
-        'ExportToGIFChartItem1
-        '
-        Me.ExportToGIFChartItem1.Caption = "GIF"
-        Me.ExportToGIFChartItem1.Enabled = False
-        Me.ExportToGIFChartItem1.Id = 25
-        Me.ExportToGIFChartItem1.Name = "ExportToGIFChartItem1"
-        '
-        'ExportToJPEGChartItem1
-        '
-        Me.ExportToJPEGChartItem1.Caption = "JPEG"
-        Me.ExportToJPEGChartItem1.Enabled = False
-        Me.ExportToJPEGChartItem1.Id = 26
-        Me.ExportToJPEGChartItem1.Name = "ExportToJPEGChartItem1"
-        '
-        'ExportToPNGChartItem1
-        '
-        Me.ExportToPNGChartItem1.Caption = "PNG"
-        Me.ExportToPNGChartItem1.Enabled = False
-        Me.ExportToPNGChartItem1.Id = 27
-        Me.ExportToPNGChartItem1.Name = "ExportToPNGChartItem1"
-        '
-        'ExportToTIFFChartItem1
-        '
-        Me.ExportToTIFFChartItem1.Caption = "TIFF"
-        Me.ExportToTIFFChartItem1.Enabled = False
-        Me.ExportToTIFFChartItem1.Id = 28
-        Me.ExportToTIFFChartItem1.Name = "ExportToTIFFChartItem1"
-        '
-        'CreateExportToImageBaseItem1
-        '
-        Me.CreateExportToImageBaseItem1.Caption = "Bild exportieren"
-        Me.CreateExportToImageBaseItem1.Enabled = False
-        Me.CreateExportToImageBaseItem1.Id = 29
-        Me.CreateExportToImageBaseItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToBMPChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToGIFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToJPEGChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToPNGChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToTIFFChartItem1)})
-        Me.CreateExportToImageBaseItem1.MenuDrawMode = DevExpress.XtraBars.MenuDrawMode.SmallImagesText
-        Me.CreateExportToImageBaseItem1.Name = "CreateExportToImageBaseItem1"
-        '
-        'BarButtonItem4
-        '
-        Me.BarButtonItem4.Caption = "Export Top Kreditoren als xlsx"
-        Me.BarButtonItem4.Id = 30
-        Me.BarButtonItem4.ImageOptions.Image = CType(resources.GetObject("BarButtonItem4.ImageOptions.Image"), System.Drawing.Image)
-        Me.BarButtonItem4.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImage"), System.Drawing.Image)
-        Me.BarButtonItem4.Name = "BarButtonItem4"
-        '
-        'BarButtonItem5
-        '
-        Me.BarButtonItem5.Caption = "Export Top Kreditoren als pdf"
-        Me.BarButtonItem5.Id = 31
-        Me.BarButtonItem5.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
-        Me.BarButtonItem5.Name = "BarButtonItem5"
-        '
-        'BarButtonItem6
-        '
-        Me.BarButtonItem6.Caption = "BarButtonItem6"
-        Me.BarButtonItem6.Id = 32
-        Me.BarButtonItem6.Name = "BarButtonItem6"
-        '
-        'RibbonControl1
-        '
-        Me.RibbonControl1.ExpandCollapseItem.Id = 0
-        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.CreateBarBaseItem1, Me.CreateLineBaseItem1, Me.CreatePieBaseItem1, Me.CreateRotatedBarBaseItem1, Me.CreateAreaBaseItem1, Me.CreateOtherSeriesTypesBaseItem1, Me.ChangePaletteGalleryBaseItem1, Me.ChangeAppearanceGalleryBaseItem1, Me.RunDesignerChartItem1, Me.SaveAsTemplateChartItem1, Me.LoadTemplateChartItem1, Me.PrintPreviewChartItem1, Me.PrintChartItem1, Me.CreateExportBaseItem1, Me.ExportToPDFChartItem1, Me.ExportToHTMLChartItem1, Me.ExportToMHTChartItem1, Me.ExportToXLSChartItem1, Me.ExportToXLSXChartItem1, Me.ExportToRTFChartItem1, Me.ExportToBMPChartItem1, Me.ExportToGIFChartItem1, Me.ExportToJPEGChartItem1, Me.ExportToPNGChartItem1, Me.ExportToTIFFChartItem1, Me.CreateExportToImageBaseItem1, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6})
-        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
-        Me.RibbonControl1.MaxItemId = 33
-        Me.RibbonControl1.Name = "RibbonControl1"
-        Me.RibbonControl1.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.ChartRibbonPageCategory1})
-        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPage3})
-        Me.RibbonControl1.Size = New System.Drawing.Size(1124, 146)
-        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
-        '
        'frmInvDashboard
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@ -1514,6 +1514,7 @@ Partial Class frmInvDashboard
        Me.StatusBar = Me.RibbonStatusBar1
        Me.Text = "Invoice Dashboard"
        CType(Me.CommandBarGalleryDropDown1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.CommandBarGalleryDropDown2, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.CommandBarGalleryDropDown3, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.CommandBarGalleryDropDown4, System.ComponentModel.ISupportInitialize).EndInit()
@ -1548,7 +1549,6 @@ Partial Class frmInvDashboard
        Me.SplitContainerControl1.ResumeLayout(False)
        Me.Panel2.ResumeLayout(False)
        Me.Panel2.PerformLayout()
-        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()

--- a/app/DD_PM_WINDREAM/frmInvDashboard.vb
+++ b/app/DD_PM_WINDREAM/frmInvDashboard.vb
@ -37,7 +37,7 @@ Public Class frmInvDashboard
            Else
                SplitContainerDashboard.Visible = False
                RibbonPageGroup1.Visible = False
-                SplitContainerControl1.Collapsed = True
+                SplitContainerControl1.Collapsed = False
                LOGGER.Debug($"ChartCreating...No chart-Configuration!! BASEDATA_DT_CHARTS = 0")
                Exit Sub
            End If
@ -298,6 +298,9 @@ Public Class frmInvDashboard
    Private Sub GridControl1_Click(sender As Object, e As EventArgs) Handles GridControl1.Click
        RibbonPageGroup1.Enabled = False
        RibbonPageGroup2.Enabled = True
+        BarButtonItem3.Enabled = True
+        BarButtonItem4.Enabled = False
+        BarButtonItem5.Enabled = False
    End Sub

    Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick
@ -320,4 +323,12 @@ Public Class frmInvDashboard
            GridView1.ExportToPdf(SaveFileDialog1.FileName)
        End If
    End Sub
+
+    Private Sub GridControl2_Click(sender As Object, e As EventArgs) Handles GridControl2.Click
+        RibbonPageGroup1.Enabled = False
+        RibbonPageGroup2.Enabled = True
+        BarButtonItem3.Enabled = False
+        BarButtonItem4.Enabled = True
+        BarButtonItem5.Enabled = True
+    End Sub
 End Class
--- a/app/DD_PM_WINDREAM/frmValidator.vb
+++ b/app/DD_PM_WINDREAM/frmValidator.vb
@ -1837,11 +1837,15 @@ Public Class frmValidator

    End Function
    Sub Load_IDB_DOC_DATA()
-        Dim oSQl As String = IDB_DOC_DATA_SQL
-        oSQl = oSQl.Replace("@DOC_GUID", CURRENT_DOC_GUID)
-        oSQl = oSQl.Replace("@DOC_ID", CURRENT_DOC_ID)
-        oSQl = oSQl.Replace("@DocID", CURRENT_DOC_ID)
-        IDB_DT_DOC_DATA = ClassDatabase.Return_Datatable(oSQl)
+        Try
+            Dim oSQl As String = IDB_DOC_DATA_SQL
+            oSQl = oSQl.Replace("@DOC_GUID", CURRENT_DOC_GUID)
+            oSQl = oSQl.Replace("@DOC_ID", CURRENT_DOC_ID)
+            oSQl = oSQl.Replace("@DocID", CURRENT_DOC_ID)
+            IDB_DT_DOC_DATA = ClassDatabase.Return_Datatable(oSQl)
+        Catch ex As Exception
+            LOGGER.Error(ex)
+        End Try
    End Sub


@ -3860,7 +3864,9 @@ Public Class frmValidator

    End Sub
    Sub Reload_Controls(SingleAttribute As String)
-        Load_IDB_DOC_DATA()
+        If IDB_ACTIVE = True Then
+            Load_IDB_DOC_DATA()
+        End If
        FillIndexValues(False)

    End Sub