IPivot.CalculateDataRights

Синтаксис

CalculateDataRights: Boolean;

Описание

Свойство CalculateDataRights определяет, рассчитывать ли права доступа на данные. True - рассчитывать права доступа, False - не рассчитывать права доступа. Рассчет данных

Отображение прав доступа возмжно, если в качестве источника данных отчета используется база данных временных рядов. Права доступа к диапазонам данных определяются в менеджере безопасности на вкладке «Дискреционный контроль».

Пример Fore

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента TabSheetBox и компонента UiErAnalyzer с наименованием «UiErAnalyzer1», являющегося источником данных для TabSheetBox. В «UiErAnalyzer1» должен быть загружен экспресс-отчет. Отображение пиктограмм определяет свойство ITabView.DisplayAccessRights.

Добавьте ссылки на системные сборки Pivot, Tab, Express.

Пример будет выполняться при нажатии на кнопку.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    EaxAn: IEaxAnalyzer;
    Pivot: IPivot;
    Grid: IEaxGrid;
    TabView: ITabView;
Begin
    EaxAn := UiErAnalyzer1.ErAnalyzer;
    Pivot := EaxAn.Pivot;
    Pivot.CalculateDataRights := True;
    Grid := EaxAn.Grid;
    TabView := Grid.TabSheet.View;
    TabView.DisplayAccessRights := True;
End Sub Button1OnClick;

После выполнения примера в таблице будут отображены пиктограммы, обозначающие наличие прав на доступа к данным.

Пример Fore.NET

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

Imports Prognoz.Platform.Interop.Pivot;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Tab;
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    EaxAn: EaxAnalyzer;
    Pivot: IPivot;
    Grid: IEaxGrid;
    TabView: ITabView;
Begin
    EaxAn := uiErAnalyzerNet1.ErAnalyzer.ErAnalyzer;
    Pivot := EaxAn.Pivot;
   Pivot.CalculateDataRights := True;
    Grid := EaxAn.Grid;
    TabView := Grid.TabSheet.View;
    TabView.DisplayAccessRights := True;
End Sub;

См. также:

IPivot; DisplayAccessRights;