Dimensions > Dimensions Assembly Interfaces > IStandardDimIndex > IStandardDimIndex.Unique

IStandardDimIndex.Unique

Syntax

Unique: Boolean;

Description

The Unique property determines whether the index is unique.

Example

Sub UserProc;
Var
    MB: IMetabase;
    Dim: IStandardDimension;
    DimInds: IStandardDimIndexes;
    DimIndex: IStandardDimIndex;
    s: String;
Begin
    MB:=MetabaseClass.Active;
    Dim:=MB.ItemById("TAB_DIM").Bind As IStandardDimension;
    DimInds:=Dim.Indexes;
    If DimInds.Count<>0 Then
        DimIndex:=DimInds.Item(0);
        If DimIndex.Unique Then
            s:="Unique";
        Else
            s:="Not unique";
        End If;
    End If;
End Sub UserProc;

After executing the example the "s" variable shows Unique if the first dictionary index is a unique one. Table dictionary identifier: TAB_DIM.