IPivotEvaluatorTotals.RowTotalName

Copy example

Sub UserProc;
Var
    MB: IMetabase;
    MBDes: IMetabaseObjectDescriptor;
    Express: IEaxAnalyzer;
    Pivot: IPivot;
    PivEv: IPivotEvaluator;
    Totals: IPivotEvaluatorTotals;
    Sum, Avg: PivotEvaluatorElementType;
Begin
    // Get repository
    MB := MetabaseClass.Active;
    // Get express report
    MBDes := MB.ItemById("EXPRESS");
    // Open express report for edit
    Express := MBDes.Edit As IEaxAnalyzer;
    // Get settings for displaying report data table
    Pivot := Express.Pivot;
    // Get settings of calculated table indicators
    PivEv := Pivot.Evaluator;
    // Get collection of table totals
    Totals := PivEv.Totals;
    Totals.ColumnTotalsEnabled := True;
    Totals.RowTotalsEnabled := True;
    // Set type of totals calculated for rows
    Sum := PivotEvaluatorElementType.Sum;
    Totals.RowTypes := Sum;
    // Set type of totals calculated for columns
    Avg := PivotEvaluatorElementType.Avg;
    Totals.ColumnTypes := Avg;
    // Set custom name for row totals
    Totals.RowTotalName(Sum) := "Sum";
    // Set custom name for column totals
    Totals.ColumnTotalName(Avg) := " Average";
    // Save changes
    (Express As IMetabaseObject).Save;
End Sub UserProc;