UU20TextAlarmNotify
U = User(Funzioni per applicazioni specifiche)
U = Funzioni generiche
La funzione UU20TextAlarmNotify viene utilizzata per eseguire un push di un allarme o warning in un buffer di tipo FIFO. Alla funzione occorre passare come parametri il codice dell'allarme, due parametri generici,l'array dove l'allarme verrà inserito e un array contenente una stringa in formato ASCII.
Questa funzione deve essere affiancata, in un applicativo qcl, al task feature ALARM
IMPLEMENTAZIONE
UU20AlarmNotify (AlarmNum, AlarmPar1, AlarmPar2, AlMBox, AlString)
Parametri:
| IN/OUT | TIPO VARIABILE | NOME DI ESEMPIO | DIM | |
|---|---|---|---|---|
| IN | CONST GLOBAL | AlarmNum | L | Codice dell'allarme |
| IN | CONST GLOBAL | AlarmPar1 | L | Parametro generico 1 dell'allarme |
| IN | CONST GLOBAL | AlarmPar2 | L | Parametro generico 2 dell'allarme |
| IN | ARRGBL | AlMBox | L | Array dove verrà inserito l'allarme |
| IN | ARRGBL | AlString | B | Array con la stringa in formato ASCII |
Esempio
; THIS FUNCTION WORKS WITH FEATURE TASK "ALARMS" ;--------------------------------------------- ; Example ;--------------------------------------------- CONST STRING_ELEM 8 ALARM_01 1 ; Alarm 01 value GLOBAL AlarmNum L ; Alarm number AlarmPar1 L ; Alarm parameter 1 AlarmPar2 L ; Alarm parameter 2 AlString01 L AlString02 L Alarm_01 L ; Alarm 01 occurs Alarm_01_Par_01 L ; Alarm 01 parameter 1 Alarm_01_Par_02 L ; Alarm 01 parameter 2 Alarm_01_String L ; Alarm 01 string Alarm_02_String L ; Alarm 02 string Index L Errcode F ARRGBL AlString B STRING_ELEM BEGIN MAIN: ;-- Check generic alarm IF Alarm_01 AlarmNum = ALARM_01 AlarmPar1 = Alarm_01_Par_01 AlarmPar2 = Alarm_01_Par_02 AlString01 = Alarm_01_String AlString02 = Alarm_02_String CALL SET_STRING UU20TextAlarmNotify(AlarmNum, AlarmPar1, AlarmPar2, ALARMS.AlMBox, AlString) ENDIF WAIT 1 JUMP MAIN END SUB SET_STRING Index = 1 VR10UWrToAsc (AlString02, Index, AlString, Errcode) Index = 5 VR10UWrToAsc (AlString01, Index, AlString, Errcode) ENDSUB