AFValues Class

<SerializableAttribute>
Public NotInheritable Class AFValues
	Inherits List(Of AFValue)

Dim instance As AFValues

[SerializableAttribute]
public ref class AFValues sealed : public List<AFValue^>

[<SealedAttribute>]
[<SerializableAttribute>]
type AFValues =  
    class
        inherit List<AFValue>
    end

' This example shows how to create a dynamic attribute and obtain
' the values of an attribute over a specified time range.

' Get the Database
Dim myPISystems As New PISystems
Dim myPISystem As PISystem = myPISystems.DefaultPISystem
Dim myDB As AFDatabase = myPISystem.Databases.DefaultDatabase

' Create the Attribute
Dim myAttribute As New AFAttribute(myDB)
myAttribute.Name = "Sinusoid"
myAttribute.Type = GetType(Double)
myAttribute.DefaultUOM = myPISystem.UOMDatabase.UOMs("m")
myAttribute.DataReferencePlugIn = AFDataReference.GetPIPointDataReference(myPISystem)
myAttribute.ConfigString = "\\%Server%\Sinusoid"

' Set the Time Range
Dim myTimeRange As New AFTimeRange()
myTimeRange.StartTime = New AFTime(DateTime.UtcNow.AddHours(-1))
myTimeRange.EndTime = AFTime.Now

' Display each Value of the Attribute during the Time Range
Dim myValues As AFValues = myAttribute.GetValues(myTimeRange, 0, Nothing)
Console.WriteLine("Number of values = {0}", myValues.Count)
Dim myValue As AFValue
For Each myValue In myValues
    Console.WriteLine("Annotated = {0}", myValue.Annotated)
    Console.WriteLine("IsGood = {0}", myValue.IsGood)
    Console.WriteLine("Questionable = {0}", myValue.Questionable)
    Console.WriteLine("Substituted = {0}", myValue.Substituted)
    Console.WriteLine("TimeStamp = {0}", myValue.Timestamp.LocalTime)
    Console.WriteLine("UOM = {0}", myValue.UOM)
    Console.WriteLine("Value = {0}", myValue.Value)
Next myValue

No code example is currently available or this language may not be supported.

No code example is currently available or this language may not be supported.