ResultRubricator: IRubricator;
Свойство ResultRubricator возвращает созданную копию базы данных временных рядов.
Для выполнения примера предполагается наличие в репозитории базы данных временных рядов с идентификатором «FC».
Sub Main;
Var
mb: IMetabase;
RubUpdateEx: ICubeMetaUpdateEx;
Rub: IRubricator;
Progress: IMetabaseUpdateProgress;
CrInfo: IMetabaseObjectCreateInfo;
s: String;
RubRes: IMetabaseObject;
Begin
mb := MetabaseClass.Active;
RubUpdateEx := New CubeMetaUpdateClass.Create As ICubeMetaUpdateEx;
Rub := mb.ItemById("FC").Bind As IRubricator;
RubUpdateEx.Rubricator := Rub;
RubUpdateEx.Metabase := Mb;
CrInfo := RubUpdateEx.CreateInfo;
CrInfo.Parent := mb.Root;
s := Mb.GenerateId("FC_COPY");
CrInfo.Id := s;
CrInfo.Name := s;
RubUpdateEx.CopyData := True;
RubUpdateEx.CopyExtraObjects := True;
RubUpdateEx.RdsDatabase := Rub.Database;
RubUpdateEx.Apply(Progress);
RubRes := RubUpdateEx.ResultRubricator As IMetabaseObject;
Debug.WriteLine(RubRes.Key);
End Sub Main;
После выполнения примера в корневую папку репозитория будет среплицирована база данных временных рядов «FC». Идентификатор копии - «FC_COPY». В окно консоли будет выведен ключ копии.
См. также: