IsAnd: Boolean;
The IsAnd property determines operation of union with the next condition.
If the property is set to True, union by logical "AND" is performed, otherwise - "OR".
Executing the example requires an access protocol filter with the FILTER identifier.
Add a link to the Metabase system assembly.
Sub UserProc;
Var
FilCon: IAuditFiltersContainer;
Objs: IAuditFilterObjects;
Obj: IAuditFilterObject;
Con: IAuditFilterCondition;
Fil: IAuditFilter;
Begin
FilCon := New AuditFiltersContainer.Create;
FilCon.Load;
Objs := FilCon.Filters;
Obj := Objs.FindById("FILTER").Edit;
Fil := Obj.Filter;
Con := Fil.Add;
Con.IsAnd := True;
Con.IsNot := True;
Con.IncludeSucceededOperations := False;
Con := Fil.Item(0);
Con.MinDate := DateTime.ComposeDay(2009, 1, 1);
Con.MaxDate := DateTime.Now;
Obj.Save;
FilCon.SaveToFile(FilCon.DefaultFileName);
End Sub UserProc;
After executing the example the second condition, for which the union operation with the previous condition "Union by logical AND with adding negation of a condition (NOT)" is determined, is added for a filter.
See also: