Akcie KVIT, BLOCK, UNBLOCK


Deklarácia
[_retInt := ] KVIT alarmObjIdent
  
 [_retInt := ] BLOCK alarmObjIdent[, userObjIdent]
  
 [_retInt := ] UNBLOCK alarmObjIdent[, userObjIdent]
Parametre
_retIntoutIdentifikátor typu Int - úspešnosť akcie.
alarmObjIdentinOdkaz na objekt typu Alarm, alebo objekt, ktorý môže generovať procesný alarm.
userObjIdentinOdkaz na objekt typu Užívateľ.
Popis
Akcie umožňujú ovládať alarmové stavy objektov v systéme D2000.
  • KVIT - kvitovanie alarmu
  • BLOCK - blokovanie alarmu alebo stíšenie alarmu pre používateľa, ak je zadaný parameter userObjIdent
  • UNBLOCK - odblokovanie alarmu alebo zrušenie stíšenia alarmu pre používateľa, ak je zadaný parameter userObjIdent
Každá akcia má dve možnosti je vykonania:
  1. Synchrónne - zápis s priradením. Akcia čaká na vykonanie povelu. návratový kód akcie môže nadobúdať jednu z nasledujúcich hodnôt:
    • _ERR_TRANS_ABORT
    • _ERR_TRANS_ERROR
    • _ERR_TRANS_IGNORED
    • _ERR_NO_ERROR
  2. Asynchrónne - zápis bez priradenia. Akcia požiada systém o vykonanie daného povelu a skript pokračuje vykonávaním ďalších akcií.
Príklad
BEGIN
 INT _stav
 _stav := BLOCK alarm
 IF _stav = _ERR_NO_ERROR THEN
  MESSAGE "alarm bol zablokovaný" ON srvskol1v.HIP
  _stav := KVIT alarm ;pokus kvitovať zablokovaný alarm
  IF _stav = _ERR_NO_ERROR THEN
   MESSAGE "alarm bol kvitovaný" ON srvskol1v.HIP ;nemôže nastať
   ELSE
 
   MESSAGE "alarm nemôže byť kvitovaný, pretože je zablokovaný" ON srvskol1v.HIP
  ENDIF
 ELSE
   MESSAGE "alarm sa nepodarilo zablokovať" ON srvskol1v.HIP
 ENDIF
END
Napíšte komentár