Item(Index: Integer): ICubeMetaUpdateAdditionalObject;
Index. Index of the collection object.
The Item property returns the object from the collection by its index.
This property ensures that the specific collection object can be accessed. The value of the Index parameter must be non-negative but it is less than the value of the ICubeMetaUpdateAdditionalObjects.Count property. Index of the first object of the collection is equal to null, index of the last object is equal to ICubeMetaUpdateAdditionalObjects.Count. - 1. Index numbering is continuous.
Executing the example requires that the repository contains a replication object with the CUBE_META_UPD identifier. Add links to the Cubes and Metabase system assemblies.
Sub UserProc;
Var
Mb: IMetabase;
Update: ICubeMetaUpdateEx;
AdditionalObjs: ICubeMetaUpdateAdditionalObjects;
i: Integer;
AddObj: ICubeMetaUpdateAdditionalObject;
Begin
Mb := MetabaseClass.Active;
Update := Mb.ItemById("CUBE_META_UPD").Bind As ICubeMetaUpdateEx;
AdditionalObjs := Update.AdditionalObjects;
For i := 0 To AdditionalObjs.Count - 1 Do
AddObj := AdditionalObjs.Item(i);
If AddObj.SourceClassId = MetabaseObjectClass.KE_CLASS_EXPRESSREPORT Then
Debug.WriteLine(Identifier: + AddObj.SourceId);
Debug.WriteLine(Key: + AddObj.SourceKey.ToString);
Debug.WriteLine("----");
End If;
End For;
End Sub UserProc;
After executing the example the console window displays identifiers and keys of express reports that are copied together with the time series database, but are not nested objects of this database.
See also: