IDimIndex.Primary

Syntax

Primary: Boolean;

Description

The Primary property returns True if this index is primary.

Example

Sub UserProc;
Var
    MB: IMetabase;
    DimModel: IDimensionModel;
    Indexs: IDimIndexes;
    Index: IDimIndex;
    s: String;
Begin
    MB:=MetabaseClass.Active;
    DimModel:=MB.ItemById("D_TO").Bind As IDimensionModel;
    Indexs:=DimModel.Indexes;
    Index:=Indexs.Item(0);
    If Index.Primary Then
        s:="Primari";
    Else
        s:="Not primary";
    End If;
End Sub UserProc;

After executing the example the "s" variable shows Primary if the first dictionary index is a primary one. Repository object identifier: D_TO.