Target: TabHyperlinkTarget;
The Target property determines how the page is loaded after clicking the hyperlink.
The following example assumes that there is the Report object with the IPrxReport type.
Sub main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Report : IPrxReport;
DI : IPrxDataIsland;
DIC : IPrxDataIslandDimensionCommon;
Drill : IPrxDimensionDrill;
DimMode : IPrxSliceDimension;
Dim : IDimensionModel;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("OBJ42729").Edit;
Report := MObj As IPrxReport;
DI := Report.DataIslands.FindById("DATAISLAND").Edit;
Dim := DI.Slice.Dimensions.FindById("D_TO").Dimension.Dimension;
DIC := DI.Properties.Dimension(Dim);
DIC.Drilled := TriState.OnOption;
Drill := DIC.Drill;
Drill.Mode := PrxDataDrillMode.Replace;
DimMode := Report.DataSources.Item(0).Slices.Item(1).Dimensions.FindById("D_TO");
Drill.Dimension := DimMode;
Drill.Index := DimMode.Dimension.Dimension.Indexes.PrimaryIndex;
Drill.Attribute := Dim.Attributes.Id;
Drill.Sheet := Null;
Drill.Action := "http://www.example.com";
Drill.ActionType:= TabHyperlinkActionType.OpenURL;
Drill.Target:= TabHyperlinkTarget.Self;
DI.Save;
MObj.Save;
End Sub main;
After executing the example clicking the hyperlink opens page in a new browser window.
See also: