Report > Report Assembly Interfaces > IPrxTableSources > IPrxTableSources.Add

IPrxTableSources.Add

Syntax

Add([Value: IDatasetModel = Null]): IPrxTableSource;

Parameters

Value - data source to be added.

Description

The Add method adds a relational data source.

Example

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Report: IPrxReport;
    TSources: IPrxTableSources;
    TSource: IPrxTableSource;
Begin
    MB := MetabaseClass.Active;
    MObj := MB.ItemById("REPORT").Edit;
    Report := MObj As IPrxReport;
    TSources := Report.TableSources;
    TSources.Clear;
    TSource := TSources.Add;
    TSource.Dataset := MetabaseClass.Active.ItemById("Table").Bind As IDatasetModel;
    MObj.Save;
End Sub UserProc

After executing the example a relational data source is added. Report - identifier of a regular report, Table - table identifier.