IPrxDataSources.Remove

Синтаксис Fore

Remove(Index: Integer): Boolean;

Синтаксис Fore.NET

Remove(Index: integer): boolean;

Параметры

Index. Индекс источника данных.

Описание

Метод Remove осуществляет удаление источника данных по его индексу.

Комментарии

Метод возвращает True в случае удачного удаления.

Пример Fore

Для выполнения примера предполагается наличие регламентного отчета с идентификатором «REGULAR_REPORT».

Добавьте ссылки на системные сборки Metabase, Report.

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Report: IPrxReport;
    DtSources: IPrxDataSources;
Begin
    MB := MetabaseClass.Active;
    MObj := MB.ItemById("REGULAR_REPORT").Edit;
    Report := MObj As IPrxReport;
    DtSources := Report.DataSources;
    If DtSources.Remove(0) Then
        Debug.WriteLine("Remove");
        Else Debug.WriteLine("Don't remove");
    End If;
    MObj.Save;
End Sub UserProc;

После выполнения примера в окно консоли будет выведено сообщение, удалён ли выбранный источник данных.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Report: IPrxReport;
    DtSources: IPrxDataSources;
Begin
    MB := Params.Metabase;
    MObj := MB.ItemById["REGULAR_REPORT"].Edit();
    Report := MObj As IPrxReport;
    DtSources := Report.DataSources;
    If DtSources.Remove(0) Then
        System.Diagnostics.Debug.WriteLine("Remove");
        Else System.Diagnostics.Debug.WriteLine("Don't remove");
    End If;
    MObj.Save();
End Sub;

См. также:

IPrxDataSources