DataSource: IPrxDataSource;
The DataSource property returns a parent object.
Sub Main;
Var
MB: IMetabase;
Report: IPrxReport;
DIs: IPrxDataIslands;
DI: IPrxDataIsland;
DTSource: IPrxDataSource;
Begin
MB := MetabaseClass.Active;
Report := MB.ItemById("Report").Bind As IPrxReport;
DIs := Report.DataIslands;
DI := DIs.Item(0);
DTSource := DI.Slice.Slices.DataSource;
End Sub Main;
After executing the example the DTSource variable will contain the data source that contains the slice used as the base for the first data area of the regular report.
See also: