Count: Integer;
The Count property returns the number of correspondences in the collection.
Executing the example requires the C:\FC_COPY.XML file that contains parameters of time series database copying as XML code. Parameters must be stored in the Root section.
Sub UserProc;
Var
Mb: IMetabase;
RubUpdateEx: ICubeMetaUpdateEx;
XmlDoc: IXMLDOMDocument3;
Element: IXmlDomElement;
DictRemapings: ICubeMetaUpdateDictionaryRemapings;
DictRemap: ICubeMetaUpdateDictionaryRemaping;
i: Integer;
Begin
Mb := MetabaseClass.Active;
RubUpdateEx := New CubeMetaUpdateClass.Create As ICubeMetaUpdateEx;
XmlDoc := New DOMDocument60.Create;
XmlDoc.load("C:\FC_COPY.XML");
Element := XmlDoc.selectSingleNode("root") As IXmlDomElement;
RubUpdateEx.LoadFromXml(Element, Mb);
DictRemapings := RubUpdateEx.DictionaryRemapings;
For i := 0 To DictRemapings.Count - 1 Do
DictRemap := DictRemapings.Item(i);
Debug.WriteLine("Source object:" + DictRemap.SourceId);
Debug.WriteLine("Consumer object:" + DictRemap.Target.Id);
Debug.WriteLine("-----------");
End For;
End Sub UserProc;
After executing the example parameters of time series database copying are loaded from the XML file. The console window displays identifiers of objects of the copied time series database and identifiers of corresponding objects of the database copy.
See also: