// This example shows how to subscribe to dataset messages and specify a filter, resolving logical parameters to physical // from an OPC-UA PubSub configuration file in binary format. The metadata obtained through the resolution is used to decode // fixed layout messages with RawData field encoding. // // In order to produce network messages for this example, run the UADemoPublisher tool. For documentation, see // https://kb.opclabs.com/UADemoPublisher_Basics . In some cases, you may have to specify the interface name to be used. // // Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . // OPC client and subscriber examples in C# on GitHub: https://github.com/OPCLabs/Examples-QuickOPC-CSharp . // Missing some example? Ask us for it on our Online Forums, https://www.opclabs.com/forum/index ! You do not have to own // a commercial license in order to use Online Forums, and we reply to every post. using System; using System.Collections.Generic; using System.Threading; using OpcLabs.EasyOpc.UA.PubSub; using OpcLabs.EasyOpc.UA.PubSub.OperationModel; namespace UASubscriberDocExamples.PubSub._EasyUASubscriber { partial class SubscribeDataSet { public static void ResolveFromFile() { // Define the PubSub resolver. We want the information be resolved from a PubSub binary configuration file that // we have. The file itself is at the root of the project, and we have specified that it has to be copied to the // project's output directory. var pubSubResolverDescriptor = UAPubSubResolverDescriptor.File("UADemoPublisher-Default.uabinary"); // Define the PubSub connection we will work with, using its logical name in the PubSub configuration. var pubSubConnectionDescriptor = new UAPubSubConnectionDescriptor { Name = "FixedLayoutConnection" }; // In some cases you may have to set the interface (network adapter) name that needs to be used, similarly to // the statement below. Your actual interface name may differ, of course. //pubSubConnectionDescriptor.ResourceAddress.InterfaceName = "Ethernet"; // Define the filter. The writer group and the dataset writer are specified using their logical names in the // PubSub configuration. The publisher Id in the filter will be taken from the logical PubSub connection. var filter = new UASubscribeDataSetFilter("FixedLayoutGroup", "SimpleWriter"); // Instantiate the subscriber object and hook events. var subscriber = new EasyUASubscriber(); subscriber.DataSetMessage += subscriber_DataSetMessage_ResolveFromFile; subscriber.ResolverAccess += subscriber_ResolverAccess_ResolveFromFile; Console.WriteLine("Subscribing..."); subscriber.SubscribeDataSet(pubSubResolverDescriptor, pubSubConnectionDescriptor, filter); Console.WriteLine("Processing dataset message events for 20 seconds..."); Thread.Sleep(20 * 1000); Console.WriteLine("Unsubscribing..."); subscriber.UnsubscribeAllDataSets(); Console.WriteLine("Waiting for 1 second..."); // Unsubscribe operation is asynchronous, messages may still come for a short while. Thread.Sleep(1 * 1000); Console.WriteLine("Finished."); } static void subscriber_DataSetMessage_ResolveFromFile(object sender, EasyUADataSetMessageEventArgs e) { // Display the dataset. if (e.Succeeded) { // An event with null DataSetData just indicates a successful connection. if (!(e.DataSetData is null)) { Console.WriteLine(); Console.WriteLine($"Dataset data: {e.DataSetData}"); foreach (KeyValuePair<string, UADataSetFieldData> pair in e.DataSetData.FieldDataDictionary) Console.WriteLine(pair); } } else { Console.WriteLine(); Console.WriteLine($"*** Failure: {e.ErrorMessageBrief}"); } } private static void subscriber_ResolverAccess_ResolveFromFile(object sender, EasyUAResolverAccessEventArgs e) { // Display resolution information. Console.WriteLine(e); } // Example output: // //Subscribing... //Processing dataset message events for 20 seconds... //[PublisherFile: UADemoPublisher-Default.uabinary] (no exception) // //Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 //[BoolToggle, False {System.Boolean}; Good] //[Int32, 3072 {System.Int32}; Good] //[Int32Fast, 894 {System.Int32}; Good] //[DateTime, 10/1/2019 12:21:14 PM {System.DateTime}; Good] // //Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 //[BoolToggle, False {System.Boolean}; Good] //[Int32, 3072 {System.Int32}; Good] //[Int32Fast, 920 {System.Int32}; Good] //[DateTime, 10/1/2019 12:21:14 PM {System.DateTime}; Good] // //Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 //[BoolToggle, False {System.Boolean}; Good] //[Int32, 3073 {System.Int32}; Good] //[Int32Fast, 1003 {System.Int32}; Good] //[DateTime, 10/1/2019 12:21:15 PM {System.DateTime}; Good] // //Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 //[BoolToggle, False {System.Boolean}; Good] //[Int32, 3073 {System.Int32}; Good] //[Int32Fast, 1074 {System.Int32}; Good] //[DateTime, 10/1/2019 12:21:15 PM {System.DateTime}; Good] // //Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 //[BoolToggle, True {System.Boolean}; Good] //[Int32, 3074 {System.Int32}; Good] //[Int32Fast, 1140 {System.Int32}; Good] //[DateTime, 10/1/2019 12:21:16 PM {System.DateTime}; Good] // //... } }
' This example shows how to subscribe to dataset messages and specify a filter, resolving logical parameters to physical ' from an OPC-UA PubSub configuration file in binary format. The metadata obtained through the resolution is used to decode ' fixed layout messages with RawData field encoding. ' ' In order to produce network messages for this example, run the UADemoPublisher tool. For documentation, see ' https://kb.opclabs.com/UADemoPublisher_Basics . In some cases, you may have to specify the interface name to be used. ' ' Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . ' OPC client and subscriber examples in VB.NET on GitHub: https://github.com/OPCLabs/Examples-QuickOPC-VBNET . ' Missing some example? Ask us for it on our Online Forums, https://www.opclabs.com/forum/index ! You do not have to own ' a commercial license in order to use Online Forums, and we reply to every post. Imports OpcLabs.EasyOpc.UA.PubSub Imports OpcLabs.EasyOpc.UA.PubSub.OperationModel Namespace PubSub._EasyUASubscriber Partial Friend Class SubscribeDataSet Public Shared Sub ResolveFromFile() ' Define the PubSub resolver. We want the information be resolved from a PubSub binary configuration file that ' we have. The file itself is at the root of the project, and we have specified that it has to be copied to the ' project's output directory. Dim pubSubResolverDescriptor = UAPubSubResolverDescriptor.File("UADemoPublisher-Default.uabinary") ' Define the PubSub connection we will work with, using its logical name in the PubSub configuration. Dim pubSubConnectionDescriptor = New UAPubSubConnectionDescriptor pubSubConnectionDescriptor.Name = "FixedLayoutConnection" ' In some cases you may have to set the interface (network adapter) name that needs to be used, similarly to ' the statement below. Your actual interface name may differ, of course. ' pubSubConnectionDescriptor.ResourceAddress.InterfaceName = "Ethernet" ' Define the filter. The writer group and the dataset writer are specified using their logical names in the ' PubSub configuration. The publisher Id in the filter will be taken from the logical PubSub connection. Dim filter = New UASubscribeDataSetFilter("FixedLayoutGroup", "SimpleWriter") ' Instantiate the subscriber object and hook events. Dim subscriber = New EasyUASubscriber() AddHandler subscriber.DataSetMessage, AddressOf subscriber_DataSetMessage_ResolveFromFile AddHandler subscriber.ResolverAccess, AddressOf subscriber_ResolverAccess_ResolveFromFile Console.WriteLine("Subscribing...") subscriber.SubscribeDataSet(pubSubResolverDescriptor, pubSubConnectionDescriptor, filter) Console.WriteLine("Processing dataset message events for 20 seconds...") Threading.Thread.Sleep(20 * 1000) Console.WriteLine("Unsubscribing...") subscriber.UnsubscribeAllDataSets() Console.WriteLine("Waiting for 1 second...") ' Unsubscribe operation is asynchronous, messages may still come for a short while. Threading.Thread.Sleep(1 * 1000) Console.WriteLine("Finished...") End Sub Private Shared Sub subscriber_DataSetMessage_ResolveFromFile(ByVal sender As Object, ByVal e As EasyUADataSetMessageEventArgs) ' Display the dataset. If e.Succeeded Then ' An event with null DataSetData just indicates a successful connection. If e.DataSetData IsNot Nothing Then Console.WriteLine() Console.WriteLine($"Dataset data: {e.DataSetData}") For Each pair As KeyValuePair(Of String, UADataSetFieldData) In e.DataSetData.FieldDataDictionary Console.WriteLine(pair) Next End If Else Console.WriteLine() Console.WriteLine($"*** Failure: {e.ErrorMessageBrief}") End If End Sub Private Shared Sub subscriber_ResolverAccess_ResolveFromFile(ByVal sender As Object, ByVal e As EasyUAResolverAccessEventArgs) ' Display resolution information. Console.WriteLine(e) End Sub End Class ' Example output ' 'Subscribing... 'Processing dataset message events for 20 seconds... ' '[PublisherFile: UADemoPublisher-Default.uabinary] (no exception) ' 'Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 '[BoolToggle, False {System.Boolean}; Good] '[Int32, 3072 {System.Int32}; Good] '[Int32Fast, 894 {System.Int32}; Good] '[DateTime, 10/1/2019 12:21:14 PM {System.DateTime}; Good] ' 'Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 '[BoolToggle, False {System.Boolean}; Good] '[Int32, 3072 {System.Int32}; Good] '[Int32Fast, 920 {System.Int32}; Good] '[DateTime, 10/1/2019 12:21:14 PM {System.DateTime}; Good] ' 'Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 '[BoolToggle, False {System.Boolean}; Good] '[Int32, 3073 {System.Int32}; Good] '[Int32Fast, 1003 {System.Int32}; Good] '[DateTime, 10/1/2019 12:21:15 PM {System.DateTime}; Good] ' 'Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 '[BoolToggle, False {System.Boolean}; Good] '[Int32, 3073 {System.Int32}; Good] '[Int32Fast, 1074 {System.Int32}; Good] '[DateTime, 10/1/2019 12:21:15 PM {System.DateTime}; Good] ' 'Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 '[BoolToggle, True {System.Boolean}; Good] '[Int32, 3074 {System.Int32}; Good] '[Int32Fast, 1140 {System.Int32}; Good] '[DateTime, 10/1/2019 12:21:16 PM {System.DateTime}; Good] '... End Namespace
// This example shows how to subscribe to dataset messages and specify a filter, resolving logical parameters to physical // from an OPC-UA PubSub configuration file in binary format. The metadata obtained through the resolution is used to decode // fixed layout messages with RawData field encoding. // // In order to produce network messages for this example, run the UADemoPublisher tool. For documentation, see // https://kb.opclabs.com/UADemoPublisher_Basics . In some cases, you may have to specify the interface name to be used. // // Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . // OPC client and subscriber examples in Object Pascal (Delphi) on GitHub: https://github.com/OPCLabs/Examples-QuickOPC-OP . // Missing some example? Ask us for it on our Online Forums, https://www.opclabs.com/forum/index ! You do not have to own // a commercial license in order to use Online Forums, and we reply to every post. type TSubscriberEventHandlers81 = class procedure OnDataSetMessage( ASender: TObject; sender: OleVariant; const eventArgs: _EasyUADataSetMessageEventArgs); procedure OnResolverAccess( ASender: TObject; sender: OleVariant; const eventArgs: _EasyUAResolverAccessEventArgs); end; class procedure SubscribeDataSet.ResolveFromFile; var SubscribeDataSetArguments: _EasyUASubscribeDataSetArguments; Subscriber: TEasyUASubscriber; SubscriberEventHandlers: TSubscriberEventHandlers81; begin SubscribeDataSetArguments := CoEasyUASubscribeDataSetArguments.Create; // Define the PubSub connection we will work with, using its logical name in the PubSub configuration. SubscribeDataSetArguments.DataSetSubscriptionDescriptor.ConnectionDescriptor.Name := 'FixedLayoutConnection'; // In some cases you may have to set the interface (network adapter) name that needs to be used, similarly to // the statement below. Your actual interface name may differ, of course. SubscribeDataSetArguments.DataSetSubscriptionDescriptor.ConnectionDescriptor.ResourceAddress.InterfaceName := 'Ethernet'; // Define the filter. The writer group and the dataset writer are specified using their logical names in the // PubSub configuration. The publisher Id in the filter will be taken from the logical PubSub connection. SubscribeDataSetArguments.DataSetSubscriptionDescriptor.Filter.WriterGroupDescriptor.Name := 'FixedLayoutGroup'; SubscribeDataSetArguments.DataSetSubscriptionDescriptor.Filter.DataSetWriterDescriptor.Name := 'SimpleWriter'; // Define the PubSub resolver. We want the information be resolved from a PubSub binary configuration file that // we have. The file itself is included alongside the script. SubscribeDataSetArguments.DataSetSubscriptionDescriptor.ResolverDescriptor.PublisherFileResourceDescriptor.UrlString := 'UADemoPublisher-Default.uabinary'; SubscribeDataSetArguments.DataSetSubscriptionDescriptor.ResolverDescriptor.ResolverKind := UAPubSubResolverKind_PublisherFile; // Instantiate the subscriber object and hook events. Subscriber := TEasyUASubscriber.Create(nil); SubscriberEventHandlers := TSubscriberEventHandlers81.Create; Subscriber.OnDataSetMessage := SubscriberEventHandlers.OnDataSetMessage; Subscriber.OnResolverAccess := SubscriberEventHandlers.OnResolverAccess; WriteLn('Subscribing...'); Subscriber.SubscribeDataSet(SubscribeDataSetArguments); WriteLn('Processing dataset message for 20 seconds...'); PumpSleep(20*1000); WriteLn('Unsubscribing...'); Subscriber.UnsubscribeAllDataSets; WriteLn('Waiting for 1 second...'); // Unsubscribe operation is asynchronous, messages may still come for a short while. PumpSleep(1*1000); WriteLn('Finished.'); FreeAndNil(Subscriber); FreeAndNil(SubscriberEventHandlers); end; procedure TSubscriberEventHandlers81.OnDataSetMessage( ASender: TObject; sender: OleVariant; const eventArgs: _EasyUADataSetMessageEventArgs); var Count: Cardinal; DictionaryEntry2: _DictionaryEntry2; Element: OleVariant; FieldDataDictionaryEnumerator: IEnumVariant; begin // Display the dataset. if eventArgs.Succeeded then begin // An event with null DataSetData just indicates a successful connection. if eventArgs.DataSetData <> nil then begin WriteLn; WriteLn('Dataset data: ', eventArgs.DataSetData.ToString); FieldDataDictionaryEnumerator := eventArgs.DataSetData.FieldDataDictionary.GetEnumerator; while (FieldDataDictionaryEnumerator.Next(1, Element, Count) = S_OK) do begin DictionaryEntry2 := IUnknown(Element) as _DictionaryEntry2; WriteLn(DictionaryEntry2.ToString); end; end; end else begin WriteLn; WriteLn('*** Failure: ', eventArgs.ErrorMessageBrief); end; end; procedure TSubscriberEventHandlers81.OnResolverAccess( ASender: TObject; sender: OleVariant; const eventArgs: _EasyUAResolverAccessEventArgs); begin // Display resolution information. WriteLn(eventArgs.ToString); end; // Example output: // //Subscribing... //Processing dataset message events for 20 seconds... //[PublisherFile: UADemoPublisher-Default.uabinary] (no exception) // //Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 //[BoolToggle, False {System.Boolean}; Good] //[Int32, 3072 {System.Int32}; Good] //[Int32Fast, 894 {System.Int32}; Good] //[DateTime, 10/1/2019 12:21:14 PM {System.DateTime}; Good] // //Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 //[BoolToggle, False {System.Boolean}; Good] //[Int32, 3072 {System.Int32}; Good] //[Int32Fast, 920 {System.Int32}; Good] //[DateTime, 10/1/2019 12:21:14 PM {System.DateTime}; Good] // //Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 //[BoolToggle, False {System.Boolean}; Good] //[Int32, 3073 {System.Int32}; Good] //[Int32Fast, 1003 {System.Int32}; Good] //[DateTime, 10/1/2019 12:21:15 PM {System.DateTime}; Good] // //Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 //[BoolToggle, False {System.Boolean}; Good] //[Int32, 3073 {System.Int32}; Good] //[Int32Fast, 1074 {System.Int32}; Good] //[DateTime, 10/1/2019 12:21:15 PM {System.DateTime}; Good] // //Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 //[BoolToggle, True {System.Boolean}; Good] //[Int32, 3074 {System.Int32}; Good] //[Int32Fast, 1140 {System.Int32}; Good] //[DateTime, 10/1/2019 12:21:16 PM {System.DateTime}; Good] // //...
Rem This example shows how to subscribe to dataset messages and specify a filter, resolving logical parameters to physical Rem from an OPC-UA PubSub configuration file in binary format. The metadata obtained through the resolution is used to decode Rem fixed layout messages with RawData field encoding. Rem Rem In order to produce network messages for this example, run the UADemoPublisher tool. For documentation, see Rem https://kb.opclabs.com/UADemoPublisher_Basics . In some cases, you may have to specify the interface name to be used. Rem Rem Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . Rem OPC client and subscriber examples in VBScript on GitHub: https://github.com/OPCLabs/Examples-QuickOPC-VBScript . Rem Missing some example? Ask us for it on our Online Forums, https://www.opclabs.com/forum/index ! You do not have to own Rem a commercial license in order to use Online Forums, and we reply to every post. Option Explicit Const UAPubSubResolverKind_PublisherFile = 3 Dim SubscribeDataSetArguments: Set SubscribeDataSetArguments = CreateObject("OpcLabs.EasyOpc.UA.PubSub.OperationModel.EasyUASubscribeDataSetArguments") ' Define the PubSub connection we will work with, using its logical name in the PubSub configuration. SubscribeDataSetArguments.DataSetSubscriptionDescriptor.ConnectionDescriptor.Name = "FixedLayoutConnection" ' In some cases you may have to set the interface (network adapter) name that needs to be used, similarly to ' the statement below. Your actual interface name may differ, of course. SubscribeDataSetArguments.DataSetSubscriptionDescriptor.ConnectionDescriptor.ResourceAddress.InterfaceName = "Ethernet" ' Define the filter. The writer group and the dataset writer are specified using their logical names in the ' PubSub configuration. The publisher Id in the filter will be taken from the logical PubSub connection. SubscribeDataSetArguments.DataSetSubscriptionDescriptor.Filter.WriterGroupDescriptor.Name = "FixedLayoutGroup" SubscribeDataSetArguments.DataSetSubscriptionDescriptor.Filter.DataSetWriterDescriptor.Name = "SimpleWriter" ' Define the PubSub resolver. We want the information be resolved from a PubSub binary configuration file that ' we have. The file itself is included alongside the script. SubscribeDataSetArguments.DataSetSubscriptionDescriptor.ResolverDescriptor.PublisherFileResourceDescriptor.UrlString = "UADemoPublisher-Default.uabinary" SubscribeDataSetArguments.DataSetSubscriptionDescriptor.ResolverDescriptor.ResolverKind = UAPubSubResolverKind_PublisherFile ' Instantiate the subscriber object and hook events. Dim Subscriber: Set Subscriber = CreateObject("OpcLabs.EasyOpc.UA.PubSub.EasyUASubscriber") WScript.ConnectObject Subscriber, "Subscriber_" WScript.Echo "Subscribing..." Subscriber.SubscribeDataSet SubscribeDataSetArguments WScript.Echo "Processing dataset message events for 20 seconds..." WScript.Sleep 20*1000 WScript.Echo "Unsubscribing..." Subscriber.UnsubscribeAllDataSets WScript.Echo "Waiting for 1 second..." ' Unsubscribe operation is asynchronous, messages may still come for a short while. WScript.Sleep 1*1000 WScript.Echo "Finished." Sub Subscriber_DataSetMessage(Sender, e) ' Display the dataset. If e.Succeeded Then ' An event with null DataSetData just indicates a successful connection. If Not (e.DataSetData Is Nothing) Then WScript.Echo WScript.Echo "Dataset data: " & e.DataSetData Dim Pair: For Each Pair in e.DataSetData.FieldDataDictionary WScript.Echo Pair Next End If Else WScript.Echo WScript.Echo "*** Failure: " & e.ErrorMessageBrief End If End Sub Sub Subscriber_ResolverAccess(Sender, e) ' Display resolution information. WScript.Echo e End Sub ' Example output: ' 'Subscribing... 'Processing dataset message events for 20 seconds... '[PublisherFile: UADemoPublisher-Default.uabinary] (no exception) ' 'Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 '[BoolToggle, False {System.Boolean}; Good] '[Int32, 3072 {System.Int32}; Good] '[Int32Fast, 894 {System.Int32}; Good] '[DateTime, 10/1/2019 12:21:14 PM {System.DateTime}; Good] ' 'Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 '[BoolToggle, False {System.Boolean}; Good] '[Int32, 3072 {System.Int32}; Good] '[Int32Fast, 920 {System.Int32}; Good] '[DateTime, 10/1/2019 12:21:14 PM {System.DateTime}; Good] ' 'Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 '[BoolToggle, False {System.Boolean}; Good] '[Int32, 3073 {System.Int32}; Good] '[Int32Fast, 1003 {System.Int32}; Good] '[DateTime, 10/1/2019 12:21:15 PM {System.DateTime}; Good] ' 'Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 '[BoolToggle, False {System.Boolean}; Good] '[Int32, 3073 {System.Int32}; Good] '[Int32Fast, 1074 {System.Int32}; Good] '[DateTime, 10/1/2019 12:21:15 PM {System.DateTime}; Good] ' 'Dataset data: Good; Data; publisher=(UInt16)30, group=101, fields: 4 '[BoolToggle, True {System.Boolean}; Good] '[Int32, 3074 {System.Int32}; Good] '[Int32Fast, 1140 {System.Int32}; Good] '[DateTime, 10/1/2019 12:21:16 PM {System.DateTime}; Good] ' '...
# This example shows how to subscribe to dataset messages and specify a filter, resolving logical parameters to physical # from an OPC-UA PubSub configuration file in binary format. The metadata obtained through the resolution is used to # decode fixed layout messages with RawData field encoding. # # In order to produce network messages for this example, run the UADemoPublisher tool. For documentation, see # https://kb.opclabs.com/UADemoPublisher_Basics . In some cases, you may have to specify the interface name to be used. # # Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . # OPC client and subscriber examples in Python on GitHub: https://github.com/OPCLabs/Examples-QuickOPC-Python . # Missing some example? Ask us for it on our Online Forums, https://www.opclabs.com/forum/index ! You do not have to own # a commercial license in order to use Online Forums, and we reply to every post. # The QuickOPC package is needed. Install it using "pip install opclabs_quickopc". import opclabs_quickopc import time # Import .NET namespaces. from OpcLabs.BaseLib import * from OpcLabs.EasyOpc.UA.PubSub import * from OpcLabs.EasyOpc.UA.PubSub.OperationModel import * def dataSetMessage(sender, e): # Display the dataset. if e.Succeeded: # An event with null DataSetData just indicates a successful connection. if e.DataSetData is not None: print('') print('Dataset data: ', e.DataSetData, sep='') for pair in e.DataSetData.FieldDataDictionary: print(pair) else: print('') print('*** Failure: ', e.ErrorMessageBrief, sep='') def resolverAccess(sender, e): # Display resolution information. print(e) # Define the PubSub resolver. We want the information be resolved from a PubSub binary configuration file that # we have. The file itself is in this script's directory. pubSubResolverDescriptor = UAPubSubResolverDescriptor.File(ResourceDescriptor('UADemoPublisher-Default.uabinary')) # Define the PubSub connection we will work with, using its logical name in the PubSub configuration. pubSubConnectionDescriptor = UAPubSubConnectionDescriptor() pubSubConnectionDescriptor.Name = 'FixedLayoutConnection' # In some cases you may have to set the interface (network adapter) name that needs to be used, similarly to # the statement below. Your actual interface name may differ, of course. #pubSubConnectionDescriptor.ResourceAddress.InterfaceName = 'Ethernet' # Define the filter. The writer group and the dataset writer are specified using their logical names in the # PubSub configuration. The publisher Id in the filter will be taken from the logical PubSub connection. filter = UASubscribeDataSetFilter( UAWriterGroupDescriptor('FixedLayoutGroup'), UADataSetWriterDescriptor('SimpleWriter')) # Instantiate the subscriber object and hook events. subscriber = EasyUASubscriber() subscriber.DataSetMessage += dataSetMessage subscriber.ResolverAccess += resolverAccess print('Subscribing...') IEasyUASubscriberExtension.SubscribeDataSet(subscriber, pubSubResolverDescriptor, pubSubConnectionDescriptor, filter) print('Processing dataset message events for 20 seconds...') time.sleep(20) print('Unsubscribing...') subscriber.UnsubscribeAllDataSets() print('Waiting for 1 second...') # Unsubscribe operation is asynchronous, messages may still come for a short while. time.sleep(1) subscriber.DataSetMessage -= dataSetMessage subscriber.ResolverAccess -= resolverAccess print('Finished.')
Copyright © 2004-2024 CODE Consulting and Development, s.r.o., Plzen. All rights reserved.
Documentation Home, Send Documentation Feedback. Technical Support