Add(Attribute: IMetaAttribute);
Attribute. Добавляемый атрибут.
Метод Add осуществляет добавление атрибута в коллекцию.
Для выполнения примера предполагается наличие в репозитории базы данных временных рядов «OBJ_FC». В данной базе должен присутствовать фильтр валидации с идентификатором «OBJ_VALID_FILTER».
Sub Main;
Var
Mb: IMetabase;
RubrKey: Integer;
ValidObj: IMetabaseObject;
ValidFilter: IValidationFilter;
MissingMetaData: IValidationMissingMetaData;
ValidExecSett: IValidationExecuteSettings;
ValidExecRun: IValidationExecRun;
MetaAttrValList: IMsMetaAttributeValueList;
MetaAttrFilter: IMsMetaAttributeFilter;
Rub: IRubricator;
MetaAttr: IMetaAttribute;
ValidMetaAttrs: IValidationMetaAttributes;
Begin
Mb := MetabaseClass.Active;
RubrKey := Mb.GetObjectKeyById("OBJ_FC");
ValidObj := Mb.ItemByIdNamespace("OBJ_VALID_FILTER", RubrKey).Edit;
ValidFilter := ValidObj As IValidationFilter;
ValidFilter.Level := DimCalendarLevel.None;
ValidFilter.Kind := ValidationDetailsKind.MissingMetaData;
MissingMetaData := ValidFilter.Details As IValidationMissingMetaData;
Rub := Mb.ItemById("OBJ_FC").Bind As IRubricator;
MetaAttr := Rub.Facts.Attributes.FindById("OBT");
ValidMetaAttrs := MissingMetaData.Attributes;
ValidMetaAttrs.Add(MetaAttr);
MetaAttrValList := MissingMetaData.TargetData;
MetaAttrValList.Clear;
MetaAttrFilter := MissingMetaData.Filter;
MetaAttrFilter.Clear;
ValidObj.Save;
ValidExecSett := New ValidationExecuteSettings.Create;
ValidExecRun := ValidFilter.Execute(ValidExecSett);
End Sub Main;
После выполнения примера будет настроен фильтр валидации «Пропуски в метаданных»: при его выполнении будет проверяться наличие значения атрибута «OBT» у показателя. Данный фильтр будет выполнен, результаты выполнения сохранены в БД.
См. также: