IPivotTableHeader.IsGrouppingElement

IsGrouppingElement(SlotNumber: Integer; ElementNumber: Integer): Boolean;

IsGrouppingElement(SlotNumber: integer; ElementNumber: integer): boolean;

Sub Main;
Var
    mb: IMetabase;
    Report: IEaxAnalyzer;
    Pivot: IPivot;
    TableHeader: IPivotTableHeader;
    slot,row: Integer;
Begin
    // Получаем текущий репозиторий
    mb := MetabaseClass.Active;
    // Получаем экспресс-отчет
    Report := mb.ItemById("EXPRESS_SLOT_ROW").Bind As IEaxAnalyzer;
    // Получаем объект, на основе которого строится таблица данных
    Pivot := Report.Pivot;
    // Получим свойства боковика таблицы
    TableHeader := Pivot.ObtainTable.LeftHeader;
    // Выведем индексы группировочных элементов
    Debug.WriteLine("Индексы группировочных элементов:");
    For row := 0 To TableHeader.ElementCount -1 Do
        For slot := 0 To TableHeader.SlotCount - 1 Do
            If TableHeader.IsGrouppingElement(slot,row) Then
                Debug.WriteLine(row);
            End If;
        End For;
    End For;
End Sub Main;

Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Pivot;
…
Public Shared Sub Main(Params: StartParams);
Var     
    mb: IMetabase;     
    Report: IEaxAnalyzer;     
    Pivot: IPivot;     
    TableHeader: IPivotTableHeader;
    slot,row: integer; 
Begin     
    // Получаем текущий репозиторий     
    mb := Params.Metabase;
    // Получаем экспресс-отчет     
    Report := mb.ItemById["EXPRESS_SLOT_ROW"].Bind() As IEaxAnalyzer;
    // Получаем объект, на основе которого строится таблица данных     
    Pivot := Report.Pivot;
    // Получим свойства боковика таблицы     
    TableHeader := Pivot.ObtainTable().LeftHeader;
    // Выведем индексы группировочных элементов     
    System.Diagnostics.Debug.WriteLine("Индексы группировочных элементов:");
    For row := 0 To TableHeader.ElementCount -1 Do
        For slot := 0 To TableHeader.SlotCount - 1 Do         
            If TableHeader.IsGrouppingElement[slot,row] Then
                System.Diagnostics.Debug.WriteLine(row);
            End If;     
        End For;
    End For;
End Sub;