IScheduledTaskValidationChecker.Validation

Fore Syntax

Validation: IMetabaseObjectDescriptor

Fore.NET Syntax

Validation: Prognoz.Platform.Interop.Metabase.IMetabaseObjectDescriptor

Description

The Validation property determines the validation rule, on executing of which the task is performed.

Comments

The property is relevant if IScheduledTask.CreateChecker = ScheduledTaskCheckerType.Validation.

Fore Example

Executing the example requires:

Add links to the Metabase, Fore system assemblies.

Sub UserProc;
Var
    MB: IMetabase;
    cont: IScheduledTasksContainer;
    task: IScheduledTask;
    TChecker: IScheduledTaskChecker;
    ValidationChecker: IScheduledTaskValidationChecker;
Begin
    MB := metabaseClass.Active;
    cont := MB.ItemById("TASK_CONTAINER").Edit As IScheduledTasksContainer;
    task := cont.Tasks.Item(0).Edit As IScheduledTask;
    TChecker := task.CreateChecker(ScheduledTaskCheckerType.Validation);
    ValidationChecker := TChecker As IScheduledTaskValidationChecker;
    Debug.WriteLine("Task execution condition is set: ");
    Select Case (TChecker.Type As Integer)
        Case 0: Debug.WriteLine(" - Execute task if function is performed with result");
        Case 1: Debug.WriteLine(" - Execute task if validation rule is performed with result");
    End Select;
    ValidationChecker.Validation := MB.ItemByIdNamespace("VALIDATION", MB.ItemById("RUBRICATOR").Key).Bind;
    ValidationChecker.Condition := STValidationCheckerConditionType.Equal;
    ValidationChecker.ExceptionCount := 0;
    task.TaskChecker := TChecker;
    (task As IMetabaseObject).Save;
End Sub UserProc;

After executing the example, task execution setup conditions are set:

Fore.NET Example

The requirements and result of the Fore.NET Example execution match with those in the Fore Example. Connect the KeFore system assembly instead of the Fore system assembly.

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.KeFore;

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    cont: IScheduledTasksContainer;
    task: IScheduledTask;
    TChecker: IScheduledTaskChecker;
    ValidationChecker: IScheduledTaskValidationChecker;
Begin
    MB := Params.Metabase;
    cont := MB.ItemById["TASK_CONTAINER"].Edit() As IScheduledTasksContainer;
    task := cont.Tasks.Item[0].Edit() As IScheduledTask;
    TChecker := task.CreateChecker(ScheduledTaskCheckerType.sctValidation); 
    ValidationChecker := TChecker As IScheduledTaskValidationChecker;
    System.Diagnostics.Debug.WriteLine("Task execution condition is set: ");
    Select Case (TChecker.Type As Integer)
        Case 0: System.Diagnostics.Debug.WriteLine(" - Execute task if function is performed with result");
        Case 1: System.Diagnostics.Debug.WriteLine(" - Execute task if validation rule is performed with result");
    End Select;
    ValidationChecker.Validation := MB.ItemByIdNamespace["VALIDATION", MB.ItemById["RUBRICATOR"].Key].Bind();
    ValidationChecker.Condition := STValidationCheckerConditionType.scctEqual;
    ValidationChecker.ExceptionCount := 0;
    task.TaskChecker := TChecker;
    (task As IMetabaseObject).Save();
End Sub;

See also:

IScheduledTaskValidationChecker