Group of components that enables operators work tracking. These components also provide 10 security levels. This group consists of next objects:

TOperator,

TPasswordDialog,

TTimerPasswordDialog,

TOperatorsDialog.

 

TOperator, palette SmartSCADA System, unit Security.pas

 

    Simple component that is used to tack operator’s activity. It is linked to TAlarmHandler and TLogMsgHandler. These components write operator’s data to AlramRecorderTable and LogMsgRecorderTable.

PUBLIC VARIABLES

 

Level: integer;

Operator’s access level. Available values are from zero to nine.

 

Name : string;

Operator’s name, defined in Oper.db.

 

 

 

TPasswordDialog, palette SmartSCADA System, unit Security.pas

     Component that is used to invoke password dialog. It is linked to Oper.db. Data are taken from this database and put to properties of Operator component.

 

PROPERTIES

 

Operator: TOperator

Pointer to TOperator component that holds data about operator

 

METHODS

 

function Execute(Level: integer):boolean;

Executes password dialog and returns True or False (true if password is OK). In addition, it puts operator’s name and level to properties of operator component.

 

TTimerPasswordDialog, palette SmartSCADA System, unit Security.pas

    Special case of TPasswordDialog component. This component has possibility to be executed at setup time. It can be used to force operators change at the beginning of shift.

PROPERTIES

 

Operator: Operator

Pointer to TOperator component that holds data about operator.

 

TimesWhenShow: string

Times to execute dialog. Time input is in format HH:MM:SS. It is possible to input more than one time. Times are separated by semi column. For example: 06:00:00;14:00:00;22:00:00;

 

Level: integer

Determines required operator’s level to return true.

 

METHODS

 

Run; virtual;

Method that checks time and shows dialog. Never is called directly.

 

 

 

TOperatorsDialog, palette SmartSCADA System, unit Security.pas

 

     Component executes dialog for input new operators and for changing data in Oper.db.

 

METHODS

 

function Execute(Level: integer):boolean;

Executes dialog in case that logged operator has appropriate access level. Operator’s level has to be equal or smaller to functions parameter level. If operator, with not adequate access level, try to execute it, function returns False and dialog will not be shown.