IValidationCrossDatabaseMappings.SetDefault

Синтаксис Fore

SetDefault;

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

SetDefault();

Описание

Метод SetDefault устанавливает привязки атрибутов по умолчанию.

Комментарии

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

Пример Fore

Для выполнения примера в репозитории предполагается наличие базы данных временных рядов с идентификатором «TSDB», содержащей правило валидации типа «Сравнение между базами данных» с идентификатором «VALID_CROSSDATABASE».

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

Sub UserProc;
Var
    mb: IMetabase;
    TSDBKey: Integer;
    ValidFilter: IValidationFilter;
    CrossDb: IValidationCrossDatabase;
    AttrMappings: IValidationCrossDatabaseMappings;
Begin
    mb := MetabaseClass.Active;
    TSDBKey := mb.GetObjectKeyById("TSDB");
    ValidFilter := mb.ItemByIdNamespace("VALID_CROSSDATABASE", TSDBKey).Edit As IValidationFilter;
    CrossDb := ValidFilter.Details As IValidationCrossDatabase;
    AttrMappings := CrossDb.Mappings;
    AttrMappings.SetDefault;
    (ValidFilter As IMetabaseObject).Save;
End Sub UserProc;

В результате выполнения примера в правиле валидации «VALID_CROSSDATABASE» будут установлены привязки атрибутов по умолчанию.

Пример Fore.NET

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

Imports Prognoz.Platform.Interop.Ms;
…
Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    TSDBKey: uinteger;
    ValidFilter: IValidationFilter;
    CrossDb: IValidationCrossDatabase;
    AttrMappings: IValidationCrossDatabaseMappings;
Begin
    mb := Params.Metabase;
    TSDBKey := mb.GetObjectKeyById("TSDB");
    ValidFilter := mb.ItemByIdNamespace["VALID_CROSSDATABASE", TSDBKey].Edit() As IValidationFilter;
    CrossDb := ValidFilter.Details As IValidationCrossDatabase;
    AttrMappings := CrossDb.Mappings;
    AttrMappings.SetDefault();
    (ValidFilter As IMetabaseObject).Save();
End Sub;

См. также:

IValidationCrossDatabaseMappings