IValidation.Laner

Синтаксис

Laner: ILaner;

Описание

Свойство Laner определяет рабочую область базы данных временных рядов, для которой будет рассчитываться правило валидации.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента TabSheetBox и компонента UiErAnalyzer с наименованием «UiErAnalyzer1», являющегося источником данных для TabSheetBox. В «UiErAnalyzer1» должна быть загружена рабочая книга базы данных временных рядов «OBJ_RUBRICATOR». В данной базе предполагается наличие правила валидации с идентификатором «VALIDATION».

Пример будет выполняться при нажатии на кнопку.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Var

ErAn: IEaxAnalyzer;

Laner: ILaner;

mb: IMetabase;

RubrDescr: IMetabaseObjectDescriptor;

ValidDescr: IMetabaseObjectDescriptor;

Validation: IValidation;

Exceptions: IValidationExceptions;

Begin

ErAn := UiErAnalyzer1.ErAnalyzer;

Laner := ErAn.Laner;

mb := MetabaseClass.Active;

RubrDescr := mb.ItemById("OBJ_RUBRICATOR");

ValidDescr := mb.ItemByIdNamespace("VALIDATION", RubrDescr.Key);

Validation := ValidDescr.Bind As IValidation;

Validation.CalculationType := MsCalculationType.Pointwise;

Validation.Laner := Laner;

Laner.BeginUpdate;

Exceptions := Validation.Execute;

WinApplication.InformationBox("Число рядов, в которых правило '" + ValidDescr.Name + "' не выполняется: " + Exceptions.Count.ToString);

Laner.EndUpdate;

End Sub Button1OnClick;

После выполнения примера, правило валидации будет рассчитано для рабочей книги базы данных временных рядов. Число рядов, в которых правило не выполняется будет указано в информационном сообщении.

См. также:

IValidation