IPrxDocumentTables.ItemById

Синтаксис Fore

ItemById(Id: Integer): IPrxDocumentTable;

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

ItemById(Id: Integer): Prognoz.Platform.Interop.Report.IPrxDocumentTable;

Параметры

Id. Идентификатор таблицы данных.

Описание

Метод ItemById возвращает параметры таблицы данных по её идентификатору.

Комментарии

Идентификатор таблицы данных можно получить в свойстве IPrxDocumentTable.Id. Идентификаторы таблиц данных генерируются автоматически при вставке на табличный лист областей данных. Метод ItemById актуален для использования, если уже имеется какой-либо набор идентификаторов и не требуется перебирать всю коллекцию с помощью свойств Item-Count.

Пример Fore

Для выполнения примера предполагается наличие в репозитории регламентного отчета с идентификатором «Report». В отчёте создан текстовый лист с наименованием «Документ», на этом листе на базе областей данных созданы таблицы данных.

Sub UserProc;
Var
    MB: IMetabase;
    Report: IPrxReport;
    Doc: IPrxDocument;
    Tables: IPrxDocumentTables;
    Table: IPrxDocumentTable;
    i: Integer;
    IdArray: IArrayList;
Begin
    MB := MetabaseClass.Active;
    Report := MB.ItemById("Report").Bind As IPrxReport;
    Doc := Report.Sheets.FindByName("Документ"As IPrxDocument;
    Tables := Doc.DocumentTables;
    //...
    //Отбор идентификаторов таблиц данных по какому-либо признаку
    //...
    IdArray := New ArrayList.Create;
    For i := 0 To Tables.Count - 1 Do
        Table := Tables.Item(i);
        If <Условие отбора таблицы> Then
            //Сохранение идентификатора в динамический массив
            IdArray.Add(Table.Id);
        End If;
    End For;
    //...
    //Работа с отобранными таблицами данных
    //...
    For i := 0 To IdArray.Count - 1 Do
        Table := Tables.ItemById(IdArray.Item(i));
        //...
    End For;
End Sub UserProc;

Указанный пример в общем виде показывает как можно получить коллекцию таблиц данных, отобрать из них необходимые по какому-либо признаку и в дальнейшем работать с ними.

Пример Fore.NET

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

Imports Prognoz.Platform.Interop.ForeCollections;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Report: IPrxReport;
    Doc: IPrxDocument;
    Tables: IPrxDocumentTables;
    Table: IPrxDocumentTable;
    i: Integer;
    IdArray: IArrayList = New ArrayListClass();
Begin
    MB := Params.Metabase;
    Report := MB.ItemById["Report"].Bind() As IPrxReport;
    Doc := Report.Sheets.FindByName("Документ"As IPrxDocument;
    Tables := Doc.DocumentTables;
    //...
    //Отбор идентификаторов таблиц данных по какому-либо признаку
    //...
    For i := 0 To Tables.Count - 1 Do
        Table := Tables.Item[i];
        If <Условие отбора таблицы> Then
            //Сохранение идентификатора в динамический массив
            IdArray.Add(Table.Id);
        End If;
    End For;
    //...
    //Работа с отобранными таблицами данных
    //...
    For i := 0 To IdArray.Count - 1 Do
        Table := Tables.ItemById(IdArray.Item[i] As Integer);
        //...
    End For;
End Sub;

См. также:

IPrxDocumentTables