IStandardDimIndex.Unique

Синтаксис

Unique: Boolean;

Описание

Свойство Unique определяет, является ли индекс уникальным.

Пример

Sub Main;

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 Main;

После выполнения примера в переменной «s» будет содержаться «Unique» если первый индекс справочника является уникальным. Идентификатор табличного справочника - «TAB_DIM».

См. также:

IStandardDimIndex