This function acknowledges alarm list specified
Public Function AcknowledgeAlarms(laAlarmInex() As Long) As Long
Parameters
In/out |
Name |
Data type |
Description |
In |
LaAlarmInex() |
Long |
Indexes of the alarm list. |
Description
This function is called when the alarm is generated on a particular event and user deletes the alarm on the view alarm/reminder window.
This call allows the User to dismiss the generated Alarms so that, the User does not receive them again in the List of Generated Alarms. Alarm is regenerated when action is performed again.
Return value
Name |
Description |
NG_SUCCESS |
In case of success |
-3 |
Cabinet not connected. |
-4 |
Invalid operation. |
Example
Private Sub Command1_Click()
Dim lAlarmIndex() As Long
Dim lRetVal As Long
On Error GoTo ErrHnd
ReDim lAlarmIndex(1)
lAlarmIndex(0) = 2
lAlarmIndex(1) = 5
lRetVal = objPan.AcknowledgeAlarms(lAlarmIndex)
If lRetVal <> 1 Then
MsgBox objPan.ErrDescription, vbInformation
Exit Sub
End If
Exit Sub
ErrHnd:
MsgBox Err.Description, vbInformation
End Sub