IRubricatorFormulasLookup.WhereKind

Синтаксис Fore

WhereKind: RubricatorFormulaDataKind;

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

WhereKind: Prognoz.Platform.Interop.Cubes.RubricatorFormulaDataKind;

Описание

Свойство WhereKind определяет вид искомой формулы.

Комментарии

Вид формулы определяется значением IRubricatorFormulaData.Kind.

Пример Fore

Для выполнения примера в репозитории должна присутствовать база данных временных рядов с идентификатором «FC_COMM». Также добавьте ссылки на системные сборки «Metabase», «Cubes».

Sub UserProc;
Var
    mb: IMetabase;
    Rub: IMetabaseObject;
    RubInst: IRubricatorInstance;
    ForLoo: IRubricatorFormulasLookup;
    formulaData: IRubricatorFormulaData;
Begin
    mb := MetabaseClass.Active;
    Rub := mb.ItemById("FC_COMM").Edit;
    RubInst := Rub.Open(Null) As IRubricatorInstance;
    ForLoo := RubInst.CreateFormulasLookup;
    ForLoo.WhereKind := RubricatorFormulaDataKind.Params;
    formulaData := ForLoo.LookupData;
    If formulaData <> Null
        Then Debug.WriteLine("Формула найдена. Ключ родителя: " + formulaData.ParentKey.ToString);
        Else Debug.WriteLine("Формула не найдена");
    End If;
End Sub UserProc;

После выполнения примера будет создан объект, осуществляющий поиск в базе данных временных рядов параметров формулы. Если параметры будут найдены, то в окно консоли будет выведен ключ родительской формулы.

Пример Fore.NET

Для выполнения примера в репозитории должна присутствовать базы данных временных рядов с идентификатором «FC_COMM».

Imports Prognoz.Platform.Interop.Cubes;
Imports Prognoz.Platform.Interop.Rds;
…
Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    Rub: IMetabaseObject;
    RubInst: IRubricatorInstance;
    ForLoo: IRubricatorFormulasLookup;
    formulaData: IRubricatorFormulaData;
    s: String;
Begin
    mb := Params.Metabase;
    Rub := mb.ItemById["FC_COMM"].Edit();
    RubInst := Rub.Open(Null) As IRubricatorInstance;
    ForLoo := RubInst.CreateFormulasLookup();
    ForLoo.WhereKind := RubricatorFormulaDataKind.rufodakiParams;
    formulaData := ForLoo.LookupData(DictionaryGetDataOptions.dgdoNone);
    If formulaData <> Null
        Then
            s := formulaData.ParentKey.ToString();
        Else
            s := ("Формула не найдена");
    End If;
End Sub;

После выполнения примера будет создан объект, осуществляющий поиск в базе данных временных рядов параметров формулы. Если параметры будут найдены, то в переменной «s» будет сохранен ключ родительской формулы.

См. также:

IRubricatorFormulasLookup