Write to a point from global script

[DavidSkilbeck]

Hi,

I was unable to write to a string point from a global script. Something I have not had to try before. Can I determine that this is possible please.

Thanks,

[DavidSkilbeck]

I Have been told, but I have not seen it work.

That, it can only be done via a server object property interface to provide access to the point's methods and properties.

I will be wanting to write to strings and boolean's.

The first attempt is a string. I noticed the value in the point does change.

The code below is by no means complete.

PointId = 7478
Set MyObj = Server.LookUpObject(PointId)
MyObj.Interface.Override 0 'Noted when changed this 0 to 1 and back again it changes value in point

Also, how do you turn the override off?

Thanks,

[AdamWoodland]

There is no Server object in global script, on a single system setup it might be obvious what the Server would be. With multiple systems defined it isn't, which is a big problem for "globalness"

If you call the global script from the alarm banner it has context, so each row of the alarm banner has a Server object, i.e. using 

AlarmBanner.SelectedAlarms(0).Server , allowing you to select multiple alarms from multiple systems and access the correct Server for each object in the array.

See the help for "Core Reference > Coding > Scripting > Common Uses for Alarm Banner Scripts" for some examples of this.

But if you call it from the script handler OnMessageReceived then I don't think there is any Server object as there is no context.

In your code do you have "On Error Resume Next" defined? My guess is an error or a VBScript Nothing is being returned so when you try and call the Override it is undefined.

[AdamWoodland]

> Also, how do you turn the override off?

There is a Release method you should call

[DavidSkilbeck]

Hi Adam,

thanks for the reply's.

I am using the below code at the beginning of the function to allow an alarm to be selected and retrieve data from that alarm.

Which seems to work ok.

Set Server = CreateObject ("Serck.ScxV6Server")
Server.Connect "Xxxxxx", "Xxxxxx", "Xxxxxx"

Set Alarm = Server.FindObject(AlarmBanner.SelectedAlarms(0).Source)

I am trying to one shot values into 10 or so points.

After being written to, the points must then be free to be changed by the operator.

Which should be allowed for by the Release method you have mentioned.

I will read through the items you have suggested.

Is what I am trying to do and the way I am looking to do it possible and the best way.

Thanks,

[DavidSkilbeck]

Hi,

the below code works.

PointId = 7478 '7503 '7478
Set MyObj = Server.LookUpObject(PointId)
MyObj.Interface.Override AlarmSeverity
'MyObj.Interface.Release

However, if I enable the Release.

The Previous Updated Value returns, which is to be expected.

Is there a way of making this not so?

The override value stays, but is allowed to be changed.

Thanks,

[BevanWeiss · Accepted solution]

Override is not the function that you are looking for...

Override substitutes the current value of the point for the Override value of the point in 'things'..

Release then removes that Override returning it to the last current value.

If you are talking about an Internal Point (and you don't appear to have mentioned either way), then you should just be able to write the value you want to the CurrentValue of the (internal) point.

e.g. MyObj.Interface.CurrentValue = myVal

[DavidSkilbeck]

Hi,

I had tried MyObj.Interface.CurrentValue = myVal again and previously and had not got it to work.

I had tried a number of combinations and had not got it to work.

However, the below does seem to work for me.
Thanks,

PointId = 7478 
	
Set MyObj = Server.LookUpObject(PointId)
	
MyObj.Interface.Override AlarmSeverity
	
MyObj.Interface.CurrentValue = AlarmSeverity
	
MyObj.Interface.Release