AFAnalyses Class

Public NotInheritable Class AFAnalyses
	Inherits AFNamedCollection(Of AFAnalysis)
	Implements IAFList, IList, ICollection, IEnumerable

Dim instance As AFAnalyses

public ref class AFAnalyses sealed : public AFNamedCollection<AFAnalysis^>, 
	IAFList, IList, ICollection, IEnumerable

[<SealedAttribute>]
type AFAnalyses =  
    class
        inherit AFNamedCollection<AFAnalysis>
        interface IAFList
        interface IList
        interface ICollection
        interface IEnumerable
    end

' This example demonstrates how to create a model analysis And configure
' its analysis rule and time rule.

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

' Create an Element with an Attribute
Dim myElement As AFElement = myDB.Elements.Add("MyElement")
Dim myAttribute As AFAttribute = myElement.Attributes.Add("MyAttribute")
myAttribute.DataReferencePlugIn = AFDataReference.GetPIPointDataReference(myPISystem)
myAttribute.DataReference.ConfigString = "\\%Server%\sinusoid"

' Create an Analysis and set its Target to the Element
Dim myAnalysis As New AFAnalysis(myDB, "MyAnalysis")
myAnalysis.Description = "This is an analysis example"
myAnalysis.Target = myElement

' Set the Analysis Rule and Time Rule
myAnalysis.AnalysisRulePlugIn = myPISystem.AnalysisRulePlugIns("Imbalance")
myAnalysis.TimeRulePlugIn = myPISystem.TimeRulePlugIns("Periodic")
myAnalysis.AnalysisRule.ConfigString = "Balance=Volume;Imbalance=Volume Imbalance;UOM=US gal"
myAnalysis.TimeRule.ConfigString = "Frequency=3600"

' Display the Name, Description, and Target
Console.WriteLine("Name = {0}", myAnalysis.Name)
Console.WriteLine("Description = {0}", myAnalysis.Description)
Console.WriteLine("Target = {0}", myAnalysis.Target)

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.