|
<< Click to Display Table of Contents >>
Event Syncing with Redundancy |
If the Sync Events with Stby Driver option on the Time / Event Settings tab is enabled, each redundant Slave DNP Driver must have 2 (two) Block Tags to receive and send events to quit.
By using a Block Tag with the B2 parameter equal to -22, users can read quit events in one Driver and by using a Block Tag with the B2 parameter equal to -23, users can write events to quit to another Driver.
In both cases, this Block Tag must have 6 (six) Elements, described next:
•Element 0: Object × 100 + Variation
•Element 1: Index
•Element 2: Class (one, two, or three)
•Element 3: Value
•Element 4: Valid timestamp (1: Valid or 0: Invalid)
•Element 5: Timestamp in 64-bit floating point format
Example of a code in Elipse E3, Elipse Power, or Elipse Water, assuming the existence of SlaveDriver1 quitting events in SlaveDriver2 and vice versa.
Sub SyncEvtsRead_OnRead() //Script in SlaveDriver1
Set EvtTag = Application.GetObject("SlaveDriver2.SyncEvtsWrite")
EvtTag.Item("Element1").Value = Item("Element1").Value
EvtTag.Item("Element2").Value = Item("Element2").Value
EvtTag.Item("Element3").Value = Item("Element3").Value
EvtTag.Item("Element4").Value = Item("Element4").Value
EvtTag.Item("Element5").Value = Item("Element5").Value
EvtTag.Item("Element6").Value = Item("Element6").Value
EvtTag.Write()
End Sub
Sub SyncEvtsRead_OnRead() //Script in SlaveDriver2
Set EvtTag = Application.GetObject("SlaveDriver1.SyncEvtsWrite")
EvtTag.Item("Element1").Value = Item("Element1").Value
EvtTag.Item("Element2").Value = Item("Element2").Value
EvtTag.Item("Element3").Value = Item("Element3").Value
EvtTag.Item("Element4").Value = Item("Element4").Value
EvtTag.Item("Element5").Value = Item("Element5").Value
EvtTag.Item("Element6").Value = Item("Element6").Value
EvtTag.Write()
End Sub