IPrxDataIsland.DataSourceTotalsDefined

Синтаксис Fore

DataSourceTotalsDefined: Boolean;

Синтаксис Fore.NET

DataSourceTotalsDefined: Boolean;

Описание

Свойство DataSourceTotalsDefined определяет, включена ли агрегация в источнике данных среза.

Комментарии

Возвращает True, если в источнике данных среза есть агрегация, настроенная непосредственно для факта куба (серверная агрегация). Если данной агрегации в кубе нет, то свойство возвращает False.

Пример Fore

Для выполнения примера предполагается наличие формы с кнопкой с наименованием «Button1», наличие регламентного отчета с идентификатором «REPORT», который содержит область данных. Добавьте ссылки на системные сборки: Metabase, Report, Ui. Пример является обработчиком события кнопки «Button1».

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    DI: IPrxDataIsland;
Begin
    MB := MetabaseClass.Active;
    MObj := MB.ItemById(
"REPORT").Bind;
    DI := (MObj 
As IPrxReport).DataIslands.Item(0);
    
// Выводим на экран сообщение со значением свойства.
    If DI.DataSourceTotalsDefined Then
        WinApplication.InformationBox(
"В источнике данных настроена агрегация", self As IWin32Window);    
    
Else
        WinApplication.InformationBox(
"В источнике данных не настроена агрегация", self As IWin32Window); 
    
End If;
End Sub
 Button1OnClick; 

После выполнения примера при нажатии на кнопку на экран будет выведено сообщение с информацией об агрегации в источнике данных среза первой области данных регламентного отчета «REPORT».

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Ui;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    DI: IPrxDataIsland;
    WA : WinApplicationClass = New WinApplicationClassClass();
Begin
    MB := Self.Metabase;
    MObj := MB.ItemById["REPORT"].Bind();
    DI := (MObj As IPrxReport).DataIslands.Item[0];
    // Выводим на экран сообщение со значением свойства.
    If DI.DataSourceTotalsDefined Then
        WA.InformationBox("В источнике данных среза настроена агрегация"New IWin32WindowForeAdapter(Self));
    Else
        WA.InformationBox("В источнике данных среза не настроена агрегация"New IWin32WindowForeAdapter(Self));
    End If;
End Sub;

См. также:

IPrxDataIsland