IRdsDictionary.IsBigDictionary

Синтаксис Fore

IsBigDictionary: Boolean;

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

IsBigDictionary: boolean;

Описание

Свойство IsBigDictionary определяет, поддерживает ли справочник большое количество элементов.

True. Справочник поддерживает большое количество элементов и не поддерживает иерархий. В интерфейсе данные справочники открываются без списка элементов;
False. Справочник не поддерживает большое количество элементов.

Пример Fore

Для выполнения примера в репозитории предполагается наличие репозитория НСИ с идентификатором «RDS». Данный репозиторий должен содержать табличный справочник НСИ с идентификатором «DIC».

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

Sub UserProc;
Var
    mb: IMetabase;
    rdsKey: Integer;
    Dict: IRdsDictionary;
Begin
    mb := MetabaseClass.Active;
    rdsKey := mb.GetObjectKeyById("RDS");
    // Получаем справочник
    Dict := mb.ItemByIdNamespace("DIC", rdsKey).Edit As IRdsDictionary;
    // Указываем, что справочник поддерживает работу с большим количеством элементов
    If Not Dict.IsBigDictionary Then
        Dict.IsBigDictionary := True;
    End If;
    (Dict As IMetabaseObject).Save;
End Sub UserProc;

После выполнения примера справочник «DIC» будет поддерживать работу с большим количеством элементов.

Пример Fore.NET

Imports Prognoz.Platform.Interop.Rds;
…
Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    rdsKey: uinteger;
    Dict: IRdsDictionary;
Begin
    mb := Params.Metabase;
    rdsKey := mb.GetObjectKeyById("RDS");
    // Получаем справочник
    Dict := mb.ItemByIdNamespace["TABLE_DIC", rdsKey].Edit() As IRdsDictionary;
    // Указываем, что справочник поддерживает работу с большим количеством элементов
    If Not Dict.IsBigDictionary Then
        Dict.IsBigDictionary := True;
    End If;
    (Dict As IMetabaseObject).Save();
End Sub;