ua.client.TdOPCUAClient.WriteNodeAttribute

Writes one Attribute of one Node.

Delphi

function WriteNodeAttribute(NodeId: string; Attribute: integer; Value: uaDataValue): uaStatuscode; overload;

C++

__fastcall uaStatuscode WriteNodeAttribute(AnsiString NodeId, int Attribute, uaDataValue Value);

Description

This method can be used to write one Attribute of one Node. It returns a uaStatuscode.

Parameter	Description
NodeId	The Node you want to write.
Attribute	Defines which attributes we want to write. For further information look also at: TuaAttributes
Value	Defines the value you want to write, see also example below (can contain Value, Servertimestamp, Sourcetimestamp and Quality).
Result	returns a uaStatuscode (look also at: uaStatusCodeToString)

Example

program Project11; {$APPTYPE CONSOLE} {$R *.res} uses ua.client, ua.datatypes, ua.buildintypes, ua.statuscodes; var OPCClient: TdOPCUAClient; WriteVal : uaDatavalue; Ret : uaStatuscode; SetVal : uaInt32; begin OPCClient := TdOPCUAClient.Create(nil); OPCClient.Url := 'opc.tcp://opcuaserver.com:48010'; SetVal := 32; WriteVal := uaDatavalue.Create; WriteVal.Value := uaVariant.Create(SetVal); // Also possible: // // WriteVal := uaDatavalue.Create(uaVariant.Create(SetVal)); // or // WriteVal := uaDatavalue.Create(bit_Int32); // also possible // WriteVal.Value.SetValue(32); // // Also possible if supported by the UA server // WriteVal.SourceTimestamp := Now; // Set Source Time // WriteVal.ServerTimestamp := Now; // Set Server Time // WriteVal.StatusCode := Statuscodes.Bad_NoCommunication; // Set Quality OPCClient.Active := true; Ret := OPCClient.WriteNodeAttribute('ns=2;s=Demo.Static.Scalar.Int32',TuaAttributes.Value, WriteVal); if not Ret.IsGood then writeln('Error write node:', Statuscodes.ToString(Ret)) else writeln('Succesfully written :-)'); WriteVal.Free; Writeln('Press Enter to exit'); Readln; OPCClient.Free; end.

Help Feedback