IPrxTableSource.TableSources

Syntax

TableSources: IPrxTableSources;

Description

The TableSources property returns the collection of relational data sources.

Example

Sub Main;

Var

MB: IMetabase;

MObj : IMetabaseObject;

Report : IPrxReport;

TSources : IPrxTableSources;

TSource : IPrxTableSource;

Count : Integer;

Begin

MB := MetabaseClass.Active;

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

Report := MObj As IPrxReport;

TSources := Report.TableSources;

TSource := TSources.Item(0);

Count := TSource.TableSources.Count;

Debug.WriteLine(Count.ToString);

MObj.Save;

End Sub Main;

After executing the example the console window displays the number of relational data sources of the regular report. Report - identifier of a regular report.