Beschreibung:

Gibt die Anzahl der Datensätze sowie die Geburtstage der ältesten und der jüngsten enthaltenen Person zurück.

VBScript:

Dim oDataItem : Set oDataItem = cRM.ActiveView.CurrentRecordSet.CalcAggregationValues("count(*), min(""Birthday"") as Oldest, max(""Birthday"") as Youngest")

Call cRM.DialogMessageBox("Anzahl Datensätze: " & oDataItem.GetContentsValueByName("$Field1") & vbCrLf & "Geburtsjahr Ältester: " & CStr(Year(oDataItem.GetContentsValueByName("Oldest"))) & vbCrLf & "Geburtstag Jüngster: " & oDataItem.GetContentsValueByName("Youngest"), "RecordSet.CalcAggregationValues", vbOkOnly)

Set oDataItem = Nothing

C#-Script:

DataItem item = cRM.ActiveView.CurrentRecordSet.CalcAggregationValues("count(*), min(\"Birthday\") as Oldest, max(\"Birthday\") as Youngest");

cRM.DialogMessageBox("Anzahl Datensätze: " + item.GetContentsValueByName("$Field1") + System.Environment.NewLine + "Geburtsjahr Ältester: " + item.GetContentsValueByName("Oldest").ToString() + System.Environment.NewLine + "Geburtstag Jüngster: " + item.GetContentsValueByName("Youngest"), "RecordSet.CalcAggregationValues", 0);

item.Dispose();

TypeScript:

import { cRM } from "./sdk/combitCRM.SDK.WindowsClient.v13";

const recordSet = cRM.ActiveView.CurrentRecordSet;

const dataItem = recordSet.CalcAggregationValues(

    "count(*) as Counter, min(\"Birthday\") as Oldest, max(\"Birthday\") as Youngest"

);

const count = dataItem.GetContentsValueByName("Counter");

const oldestBirthday = dataItem.GetContentsValueByName("Oldest");

const youngestBirthday = dataItem.GetContentsValueByName("Youngest");

if (oldestBirthday instanceof Date) {

cRM.DialogMessageBox(

    "Anzahl Datensätze: " + count + "\r\n" +

    "Geburtsjahr Ältester: " + oldestBirthday.getFullYear() + "\r\n" +

    "Geburtstag Jüngster: " + youngestBirthday,

    "RecordSet.CalcAggregationValues",

    0

);

}

dataItem.Dispose();