Report > Report Assembly Interfaces > IPrxTableSource > IPrxTableSource.TableSources

IPrxTableSource.TableSources

Syntax

Description

The TableSources property returns the collection of relational data sources.

Example

Sub UserProc;
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 UserProc;

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