IAuditFilterCondition.Station

Syntax

Station(Index: Integer): String;

Station[Index: integer]: string;

Parameters

Index. Position index. The IAuditFilterCondition.StationCount property determines number of stations.

Description

The Station property determines name of a workstation for which records of a protocol are displayed.

Example

Executing the example requires an access protocol filter with the FILTER identifier and two workstations: CONDRATEVA and BASHKIRTSEVA.

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.Item(0);
    Con.StationCount := 2;
    Con.Station(0) := "CONDRATEVA";
    Con.Station(1) := "BASHKIRTSEVA";
    Obj.Save;
    FilCon.SaveToFile(FilCon.DefaultFileName);
End Sub UserProc;
Public Shared Sub Main(Params: StartParams);
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.Item[0];
    Con.StationCount := 2;
    Con.Station[0] := "CONDRATEVA";
    Con.Station[1] := "BASHKIRTSEVA";
    Obj.Save();
    FilCon.SaveToFile(FilCon.DefaultFileName);
End Sub;

After executing this example the property of filter condition is changed: show records of access protocol only for specified workstations.

See also:

IAuditFilterCondition