Index: IDimIndexInstance;
The Index property returns parent.
Sub Main;
Var
MB: IMetabase;
Dimen: IDimInstance;
InstLook: IDimIndexInstanceLookup;
IndexInst: IDimIndexInstance;
s: String;
Begin
MB:=MetabaseClass.Active;
Dimen:=MB.ItemById("D_TO").Open(Null) As IDimInstance;
If Dimen.Indexes.Count<>0 Then
InstLook:=Dimen.Indexes.Item(0).CreateDimIndexLookup;
IndexInst:=InstLook.Index;
s:=IndexInst.Index.Name;
End If;
End Sub Main;
After executing the example the "s" variable contains name of the index where the search object was created.
See also: