IPrxTableIsland.TotalValues

Fore Syntax

TotalValues(GroupValues: Array): IPrxTableIslandTotalValues;

Fore.NET Syntax

TotalValues(GroupValues: Array): Prognoz.Platform.Interop.Report.IPrxTableIslandTotalValues;

Parameters

GroupValues. Group values.

Description

The TotalValues method is used to get total values of layout in relational data area.

Comments

To determine layout parameters of relational data area, use the IPrxTableIsland.Layout property.

Fore Example

Executing the example requires a regular report with the REGULAR_REPORT identifier, which contains relational data area.

Add links to the Metabase, Report system assemblies.

Sub UserProc;
Var
    MB: IMetabase;
    Report : IPrxReport;
    TabIs : IPrxTableIslands;
    TI : IPrxTableIsland;
    TV: IPrxTableIslandTotalValues;
    Valid: Boolean;
    Val: Variant;
Begin
    MB := MetabaseClass.Active;
    Report := MB.ItemById("REGULAR_REPORT").Bind As IPrxReport;
    TabIs := Report.TableIslands;
    TI := TabIs.FindById("ITEM");
    TV:= TI.TotalValues("GENDER", "AGE");
    Valid := TV.IsValid;
        If Valid = True Then
        val:= TV.TotalValue(TI.Layout.Rows(0).Cells(1).LayoutCellId);
        Debug.WriteLine(val);
    End If;
End Sub UserProc;

After executing the example the console window displays final layout values by the GENDER and AGE groups.

Fore.NET Example

The requirements and result of the Fore.NET example execution match with those in the Fore example.

Imports Prognoz.Platform.Interop.Report;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Report : IPrxReport;
    TabIs : IPrxTableIslands;
    TI : IPrxTableIsland;
    TV: IPrxTableIslandTotalValues;
    Valid: Boolean;
    Val: object;
Begin
    MB := Params.Metabase;
    Report := MB.ItemById["REGULAR_REPORT"].Bind() As IPrxReport;
    TabIs := Report.TableIslands;
    TI := TabIs.FindById("ITEM");
    TV:= TI.TotalValues("GENDER", "AGE");
    Valid := TV.IsValid;
        If Valid = True Then
        val:= TV.TotalValue(TI.Layout.Rows[0].Cells[1].LayoutCellId);
        System.Diagnostics.Debug.WriteLine(val);
    End If;
End Sub;