Event Syncing with Redundancy

<< 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

Was this page useful?