KVIT, BLOCK, UNBLOCK actions

[_retInt := ] KVIT alarmObjIdent

[_retInt := ] BLOCK alarmObjIdent[, userObjIdent]

[_retInt := ] UNBLOCK alarmObjIdent[, userObjIdent]

_retInt	out	Identifier of the Int type - action success.
alarmObjIdent	in	Reference to an Alarm type object, or to an object, which can generate a process alarm.
userObjIdent	in	Reference to an User.

The actions allows to control the alarm states of the D2000 system objects.

• KVIT            - alarm acknowledgement
• BLOCK         - alarm blocking or muting for user, if parameter userObjIdent is given
• UNBLOCK   - alarm unblocking or unmuting for user, if parameter userObjIdent is given

Every action may be executed in two ways:

• Synchronously - notation with an assignment. Action waits for the execution of the given command. Action return code may get one of the following values:
  • _ERR_TRANS_ABORT
  • _ERR_TRANS_ERROR
  • _ERR_TRANS_IGNORED
  • _ERR_NO_ERROR 
• Asynchronously - notation without any assignment. Action will require the system to execute the given command and the script continues executing another actions.

BEGIN INT _stav _stav := BLOCK alarm IF _stav = _ERR_NO_ERROR THEN MESSAGE "alarm has been blocked" ON srvskol1v.HIP _stav := KVIT alarm ;attempt to acknowledge a blocked alarm IF _stav = _ERR_NO_ERROR THEN MESSAGE "alarm has been acknowledged" ON srvskol1v.HIP ;cannot be executed ELSE MESSAGE "alarm cannot be acknowledged, it is blocked" ON srvskol1v.HIP ENDIF ELSE MESSAGE "failed to block an alarm" ON srvskol1v.HIP ENDIF END