AFSearch.AggregateAsync Method

Public Function AggregateAsync ( 
	aggregateRequests As IEnumerable(Of AFAggregateRequest),
	cancellationToken As CancellationToken
) As Task(Of AFAggregateResultCollection)

Dim instance As AFSearch
Dim aggregateRequests As IEnumerable(Of AFAggregateRequest)
Dim cancellationToken As CancellationToken
Dim returnValue As Task(Of AFAggregateResultCollection)

returnValue = instance.AggregateAsync(aggregateRequests, 
	cancellationToken)

public:
Task<AFAggregateResultCollection^>^ AggregateAsync(
	IEnumerable<AFAggregateRequest^>^ aggregateRequests, 
	CancellationToken cancellationToken
)

member AggregateAsync : 
        aggregateRequests : IEnumerable<AFAggregateRequest> * 
        cancellationToken : CancellationToken -> Task<AFAggregateResultCollection> 

' Get the Database
Dim myPISystems As New PISystems()
Dim myPISystem As PISystem = myPISystems.DefaultPISystem
If myPISystem Is Nothing Then
    Throw New InvalidOperationException("Default PISystem was not found.")
End If
Dim myDB As AFDatabase = myPISystem.Databases(dbName)
If myDB Is Nothing Then
    Throw New InvalidOperationException("Database was not found.")
End If

' Create a search to find all the event frames created from the 'Event'
' template in the last year.
Using eventSearch As New AFEventFrameSearch(myDB, "EventFrameSearch", "Template:'Event' Start:>'t-1y'")
    eventSearch.CacheTimeout = TimeSpan.FromMinutes(10)


    ' Get several aggregates in one call
    Dim averageAndCount As AFSummaryRequest = New AFSummaryRequest("Duration", AFSummaryTypes.Average Or AFSummaryTypes.Count)
    Dim binByMonth As AFBinningRequest(Of AFTime) = averageAndCount.BinBy("StartTime", New AFTimeSpan(months:=1).GetIntervalTimes(New AFTimeRange("1-1y", "1+1mo")))
    Dim groupByElement As AFGroupingRequest(Of Object) = averageAndCount.GroupBy("Element")
    Dim overallSummaries As AFSummaryRequest = New AFSummaryRequest("Duration", AFSummaryTypes.Minimum Or AFSummaryTypes.Average Or AFSummaryTypes.Maximum)

    Dim aggregateResults As AFAggregateResultCollection = Await eventSearch.AggregateAsync(New AFAggregateRequest() {binByMonth, groupByElement, overallSummaries}, CancellationToken.None)

    Dim overallSummaryResult As AFSummaryResult = aggregateResults.GetResult(overallSummaries)
    Console.WriteLine("Minimum: {0}, Average: {1}, Maximum: {2}", overallSummaryResult.SummaryResults(AFSummaryTypes.Minimum), overallSummaryResult.SummaryResults(AFSummaryTypes.Average), overallSummaryResult.SummaryResults(AFSummaryTypes.Maximum))

    Dim binByMonthResult As AFBinnedResult(Of AFTime) = aggregateResults.GetResult(binByMonth)
    For Each bin As KeyValuePair(Of AFRange(Of AFTime), IReadOnlyDictionary(Of AFSummaryTypes, AFValue)) In binByMonthResult.BinnedResults
        Console.WriteLine("Month: {0}, Average: {1}, Count: {2}", bin.Key, bin.Value(AFSummaryTypes.Average), bin.Value(AFSummaryTypes.Count))
    Next

    Dim groupByElementResult As AFGroupedResult(Of Object) = aggregateResults.GetResult(groupByElement)
    For Each group As KeyValuePair(Of Object, IReadOnlyDictionary(Of AFSummaryTypes, AFValue)) In groupByElementResult.GroupedResults
        Console.WriteLine("Element: {0}, Average: {1}, Count: {2}", group.Key, group.Value(AFSummaryTypes.Average), group.Value(AFSummaryTypes.Count))
    Next

    Return True
End Using

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.