Creating an Array

[Cayouettem@bowater.com]

I’m writing a function script and I was wondering how i could create an array. I am going to return that array to be plotted. Here is the code below; the variable ‘F’ should be the array for each sample taken by the variable ‘A WI soularr(v)’.

thanks,

Mathieu

CODE:
[code]
Dim F,G,H
Dim c
c = 0
For Each Value c In ‘A WI soularr(v)’ do
If (‘A WI soularr(v)’.Y[c] < 23) Then
F = 1
Else
F=0
End
End

return F
[/code]

[Bernhard Kantz]

Initialize the result variable F with the [b]# operator[/b] which multiplies a value by a given number. The [b]NumberOfValues[/b] function determines the number of values of the result dataset.
[code]
Dim F,G,H
Dim c
c = 0
F = 0s # NumberOfValues(‘A WI soularr(v)’)

For Each Value c In ‘A WI soularr(v)’ do
If (‘A WI soularr(v)’.Y[c] < 23) Then
F[c] = 1
End
End
return F
[/code]
Support
support@weisang.com

[Bernhard Kantz]

… there is of course a much faster alternative:
[code]
Dim F
F = 0 # NumberOfValues(Signal)
F[ValuesAboveLevel(Signal, 23, EVENT_INDEX + EVENT_COMPLEMENT)] = 1
F
[/code]
This code initializes the array with zeros and then uses an indexed assignment to set the values, where the event occures, to 1.

… even less code, you need when using the Trigger function:
[code]
1 – Integer32 Trigger(Signal, 23, 23)
[/code]
support@weisang.com

[Cayouettem@bowater.com]

Tried using the faster approach because it other one was jamming my computer, but i’m getting a syntax error. Any ideas why?

Mathieu

Dim F,G,H
Dim c

c = 0

F = 0 # NumberOfValues(‘A WI soularr(v)’)
F[ValuesAboveLevel(‘A WI soularr(v)’, 23, EVENT_INDEX + EVENT_COMPLEMENT)] = 1

return F

[Cayouettem@bowater.com]

I’m writing a function script and I was wondering how i could create an array. I am going to return that array to be plotted. Here is the code below; the variable ‘F’ should be the array for each sample taken by the variable ‘A WI soularr(v)’.

thanks,

Mathieu

CODE:
[code]
Dim F,G,H
Dim c
c = 0
For Each Value c In ‘A WI soularr(v)’ do
If (‘A WI soularr(v)’.Y[c] < 23) Then F = 1 Else F=0 End End return F [/code]

[Bernhard Kantz]

Your code runs perfectly on our test machine.
Please make sure that you do not have a syntax error in ‘A WI soularr(v)’.
If your problem persists, please send us an example database to support@weisang.com along with the exact version number of your FlexPro installation 6.0.xx which you can find in ?=>About FlexPro…

support@weisang.com

[Author]

Posts