How to: Bind a WPF Dashboard to an OLAP Cube using DashboardOlapDataSource

• Jun 15, 2018
• 3 minutes to read

The following example demonstrates how to bind a dashboard to an OLAP cube using DashboardOlapDataSource.

DashboardOlapDataSource allows you to establish a connection to the OLAP cube by specifying a connection string.

Note

The complete sample project How to bind WPF dashboard to an OLAP cube using DashboardOlapDataSource is available in the DevExpress Examples repository.

C#

using DevExpress.DashboardCommon;
using DevExpress.DataAccess.ConnectionParameters;
using System.Windows;

namespace WpfDashboard_OlapDataProvider
{
    /// <summary>
    /// Interaction logic for MainWindow.xaml
    /// </summary>
    public partial class MainWindow : Window
    {
        public MainWindow()
        {
            InitializeComponent();
        }

        private void Window_Loaded(object sender, RoutedEventArgs e)
        {
            dashboardControl1.Dashboard = CreateDashboard(); ;            
        }

        private Dashboard CreateDashboard()
        {
            Dashboard dBoard = new Dashboard();

            OlapConnectionParameters olapParams = new OlapConnectionParameters();
            olapParams.ConnectionString = @"provider=MSOLAP;
                                  data source=http://demos.devexpress.com/Services/OLAP/msmdpump.dll;
                                  initial catalog=Adventure Works DW Standard Edition;
                                  cube name=Adventure Works;";

            DashboardOlapDataSource olapDataSource = new DashboardOlapDataSource(olapParams);
            dBoard.DataSources.Add(olapDataSource);

            CardDashboardItem cardItem = new CardDashboardItem();
            cardItem.DataSource = olapDataSource;
            cardItem.SeriesDimensions.Add(new Dimension("[Sales Territory].[Sales Territory Country].[Sales Territory Country]"));
            cardItem.SparklineArgument = new Dimension("[Date].[Month of Year].[Month of Year]", DateTimeGroupInterval.MonthYear);
            Card card = new Card();
            card.LayoutTemplate = new CardStretchedLayoutTemplate();
            card.ActualValue = new Measure("[Measures].[Internet Sales Amount]");
            card.TargetValue = new Measure("[Measures].[Sales Amount]");
            cardItem.Cards.Add(card);

            ChartDashboardItem chartItem = new ChartDashboardItem();
            chartItem.DataSource = olapDataSource;
            chartItem.Arguments.Add(new Dimension("[Sales Territory].[Sales Territory].[Country]"));
            chartItem.Panes.Add(new ChartPane());
            SimpleSeries salesAmountSeries = new SimpleSeries(SimpleSeriesType.Bar);
            salesAmountSeries.Value = new Measure("[Measures].[Sales Amount]");
            chartItem.Panes[0].Series.Add(salesAmountSeries);
            SimpleSeries salesInernetAmountSeries = new SimpleSeries(SimpleSeriesType.Bar);
            salesInernetAmountSeries.Value = new Measure("[Measures].[Internet Sales Amount]");
            chartItem.Panes[0].Series.Add(salesInernetAmountSeries);
            dBoard.Items.AddRange(cardItem, chartItem);

            DashboardLayoutItem cardLayoutItem = new DashboardLayoutItem(cardItem);
            DashboardLayoutItem chartLayoutItem = new DashboardLayoutItem(chartItem);
            DashboardLayoutGroup rootGroup = new DashboardLayoutGroup(DashboardLayoutGroupOrientation.Vertical, 
                50D, cardLayoutItem, chartLayoutItem);
            dBoard.LayoutRoot = rootGroup;

            return dBoard;
        }
    }
}

VB.NET

Imports DevExpress.DashboardCommon
Imports DevExpress.DataAccess.ConnectionParameters
Imports System.Windows

Namespace WpfDashboard_OlapDataProvider
    ''' <summary>
    ''' Interaction logic for MainWindow.xaml
    ''' </summary>
    Partial Public Class MainWindow
        Inherits Window

        Public Sub New()
            InitializeComponent()
        End Sub

        Private Sub Window_Loaded(ByVal sender As Object, ByVal e As RoutedEventArgs)
            dashboardControl1.Dashboard = CreateDashboard()

        End Sub

        Private Function CreateDashboard() As Dashboard
            Dim dBoard As New Dashboard()

            Dim olapParams As New OlapConnectionParameters()
            olapParams.ConnectionString = "provider=MSOLAP;
                                  data source=http://demos.devexpress.com/Services/OLAP/msmdpump.dll;
                                  initial catalog=Adventure Works DW Standard Edition;
                                  cube name=Adventure Works;"

            Dim olapDataSource As New DashboardOlapDataSource(olapParams)
            dBoard.DataSources.Add(olapDataSource)

            Dim cardItem As New CardDashboardItem()
            cardItem.DataSource = olapDataSource
            cardItem.SeriesDimensions.Add(New Dimension("[Sales Territory].[Sales Territory Country].[Sales Territory Country]"))
            cardItem.SparklineArgument = New Dimension("[Date].[Month of Year].[Month of Year]", DateTimeGroupInterval.MonthYear)
            Dim card As New Card()
            card.LayoutTemplate = New CardStretchedLayoutTemplate()
            card.ActualValue = New Measure("[Measures].[Internet Sales Amount]")
            card.TargetValue = New Measure("[Measures].[Sales Amount]")
            cardItem.Cards.Add(card)

            Dim chartItem As New ChartDashboardItem()
            chartItem.DataSource = olapDataSource
            chartItem.Arguments.Add(New Dimension("[Sales Territory].[Sales Territory].[Country]"))
            chartItem.Panes.Add(New ChartPane())
            Dim salesAmountSeries As New SimpleSeries(SimpleSeriesType.Bar)
            salesAmountSeries.Value = New Measure("[Measures].[Sales Amount]")
            chartItem.Panes(0).Series.Add(salesAmountSeries)
            Dim salesInernetAmountSeries As New SimpleSeries(SimpleSeriesType.Bar)
            salesInernetAmountSeries.Value = New Measure("[Measures].[Internet Sales Amount]")
            chartItem.Panes(0).Series.Add(salesInernetAmountSeries)
            dBoard.Items.AddRange(cardItem, chartItem)

            Dim cardLayoutItem As New DashboardLayoutItem(cardItem)
            Dim chartLayoutItem As New DashboardLayoutItem(chartItem)
            Dim rootGroup As New DashboardLayoutGroup(DashboardLayoutGroupOrientation.Vertical, 50R, cardLayoutItem, chartLayoutItem)
            dBoard.LayoutRoot = rootGroup

            Return dBoard
        End Function
    End Class
End Namespace