IDimSelection.SelectionSchema

Синтаксис Fore

SelectionSchema: IDimSelectionSchema;

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

SelectionSchema: Prognoz.Platform.Interop.Dimensions.IDimSelectionSchema;

Описание

Свойство SelectionSchema определяет схему отметки элементов справочника.

Пример Fore

Для выполнения примера предполагается наличие в репозитории справочника с идентификатором «D_TO», в котором создана схема отметки элементов с идентификатором «Schema_1» и экспресс-отчет с идентификатором «EXPRESS_REPORT».

Sub Main;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Eax: IEaxAnalyzer;
    DimSelection: IDimSelection;
    schema: IDimSelectionSchema;
Begin
    MB := MetabaseClass.Active;
    MObj := MB.ItemById("EXPRESS_REPORT").Edit;
    schema := MB.ItemByIdNamespace("Schema_1", MB.ItemById("D_TO").Key).Edit As IDimSelectionSchema;
    Eax := MObj As IEaxAnalyzer;
    DimSelection := Eax.Pivot.Selection.FindById("D_TO");
    DimSelection.ApplySelectionSchemaOnlyOnce := True;
   DimSelection.SelectionSchema := schema;
    Mobj.Save;
End Sub Main;

После выполнения примера при открытии справочника будет применена схема отметки элементов с идентификатором «Schema_1». В дальнейшем отметку элементов можно изменить.

Пример Fore.NET

Для выполнения примера предполагается наличие в репозитории справочника с идентификатором «D_TO», в котором создана схема отметки элементов с идентификатором «Schema_1» и экспресс-отчет с идентификатором «EXPRESS_REPORT».

Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.Express;

Public Class Program
    [STAThread]
    Public Shared Sub Main(Params: StartParams);
    Var
        MB: IMetabase;
        MObj: IMetabaseObject;
        Eax: IEaxAnalyzer;
        DimSelection: IDimSelection;
        schema: IDimSelectionSchema;
    Begin
        MB := Params.Metabase;
        MObj := MB.ItemById["EXPRESS_REPORT"].Edit();
        schema := MB.ItemByIdNamespace["Schema_1", MB.ItemById["D_TO"].Key].Edit() As IDimSelectionSchema;
        Eax := MObj As IEaxAnalyzer;
        DimSelection := Eax.Pivot.Selection.FindById("D_TO");
        DimSelection.ApplySelectionSchemaOnlyOnce := True;
        DimSelection.SelectionSchema := schema;
        Mobj.Save();
    End Sub;
End Class;

После выполнения примера при открытии справочника будет применена схема отметки элементов с идентификатором «Schema_1». В дальнейшем отметку элементов можно изменить.

См. также:

IDimSelection