ICubeLoader.MapInfo

Синтаксис

MapInfo: ICubeLoaderMapInfo;

Описание

Свойство MapInfo возвращает параметры связи измерений куба-приемника.

Пример

Для выполнения примера предполагается наличие загрузчика в куб с идентификатором "Cube_Load". В загрузчике установлены куб-источник и куб-приемник.

Sub Main;

Var

MB: IMetabase;

MObj: IMetabaseObject;

CubLoad: ICubeLoader;

DimsSource: ICubeModelDimensions;

Dim, Dim1: IDimensionModel;

MapInfo: ICubeLoaderMapInfo;

MapItem: ICubeLoaderMapItem;

i: Integer;

Begin

MB := MetabaseClass.Active;

MObj := MB.ItemById("Cube_Load").Edit;

CubLoad := MObj As ICubeLoader;

DimsSource := CubLoad.Source.Dimensions;

MapInfo := CubLoad.MapInfo;

For i := 0 To MapInfo.Count - 1 Do

MapItem := MapInfo.Item(i);

Dim := MapItem.Dimension;

Dim1 := DimsSource.FindById((Dim As IMetabaseObject).Id);

If Dim1 <> Null Then

MapItem.MapDimension := Dim1;

MapItem.MapIndex := Dim1.Indexes.PrimaryIndex;

MapItem.DimIndex := Dim.Indexes.PrimaryIndex;

MapItem.Method := CubeLoaderMapMethod.ByIndex;

End If;

End For;

MObj.Save;

End Sub Main;

После выполнения примера будет настроена связь между измерениями куба-приемника и измерениями куба-источника. Измерение-приемник будет искаться в списке измерений-источников, и в случае удачного поиска - устанавливается связь по индексу.

См. также:

ICubeLoader