How to: Create Hourly Recurrence

• Apr 15, 2018
• 2 minutes to read

Note

A complete sample project is available at https://github.com/DevExpress-Examples/how-to-create-appointments-with-various-recurrence-types-in-code-t574486.

MainWindow.xaml.cs

public AppointmentItem CreateAppointmentPattern(string subj, int categoryId) {
    AppointmentItem apt = new AppointmentItem(AppointmentType.Pattern);
    apt.Start = DateTime.Today.AddHours(9);
    apt.End = apt.Start.AddMinutes(5);
    apt.Subject = subj;
    apt.LabelId = categoryId;
    return apt;
}
    // An appointment is set every 3 hours. Five occurrences.
    AppointmentItem apt1 = CreateAppointmentPattern("Every 3 hours. Five occurrences.", 1);
    apt1.RecurrenceInfo.Type = RecurrenceType.Hourly;
    apt1.RecurrenceInfo.Start = apt1.Start;
    apt1.RecurrenceInfo.Periodicity = 3;
    apt1.RecurrenceInfo.Range = RecurrenceRange.OccurrenceCount;
    apt1.RecurrenceInfo.OccurrenceCount = 5;
    scheduler.AppointmentItems.Add(apt1);

    // An appointment is set every 5 hours. Infinite (no end date).
    AppointmentItem apt2 = CreateAppointmentPattern("Every 5 hours. Infinite (no end date).", 1);
    apt2.RecurrenceInfo.Type = RecurrenceType.Hourly;
    apt2.RecurrenceInfo.Start = apt2.Start;
    apt2.RecurrenceInfo.Periodicity = 5;
    apt2.RecurrenceInfo.Range = RecurrenceRange.NoEndDate;
    scheduler.AppointmentItems.Add(apt2);

    // An appointment is set every hour. Appointment series duration is 24 hours.
    AppointmentItem apt3 = CreateAppointmentPattern("Every hour.  Series duration is 24 hours.", 1);
    apt3.RecurrenceInfo.Type = RecurrenceType.Hourly;
    apt3.RecurrenceInfo.Start = apt3.Start;
    apt3.RecurrenceInfo.Periodicity = 1;
    apt3.RecurrenceInfo.Range = RecurrenceRange.EndByDate;
    apt3.RecurrenceInfo.End = apt3.RecurrenceInfo.Start.AddHours(24);
    scheduler.AppointmentItems.Add(apt3);

MainWindow.xaml.vb

Public Function CreateAppointmentPattern(ByVal subj As String, ByVal categoryId As Integer) As AppointmentItem
    Dim apt As New AppointmentItem(AppointmentType.Pattern)
    apt.Start = Date.Today.AddHours(9)
    apt.End = apt.Start.AddMinutes(5)
    apt.Subject = subj
    apt.LabelId = categoryId
    Return apt
End Function
    ' An appointment is set every 3 hours. Five occurrences.
    Dim apt1 As AppointmentItem = CreateAppointmentPattern("Every 3 hours. Five occurrences.", 1)
    apt1.RecurrenceInfo.Type = RecurrenceType.Hourly
    apt1.RecurrenceInfo.Start = apt1.Start
    apt1.RecurrenceInfo.Periodicity = 3
    apt1.RecurrenceInfo.Range = RecurrenceRange.OccurrenceCount
    apt1.RecurrenceInfo.OccurrenceCount = 5
    scheduler.AppointmentItems.Add(apt1)

    ' An appointment is set every 5 hours. Infinite (no end date).
    Dim apt2 As AppointmentItem = CreateAppointmentPattern("Every 5 hours. Infinite (no end date).", 1)
    apt2.RecurrenceInfo.Type = RecurrenceType.Hourly
    apt2.RecurrenceInfo.Start = apt2.Start
    apt2.RecurrenceInfo.Periodicity = 5
    apt2.RecurrenceInfo.Range = RecurrenceRange.NoEndDate
    scheduler.AppointmentItems.Add(apt2)

    ' An appointment is set every hour. Appointment series duration is 24 hours.
    Dim apt3 As AppointmentItem = CreateAppointmentPattern("Every hour.  Series duration is 24 hours.", 1)
    apt3.RecurrenceInfo.Type = RecurrenceType.Hourly
    apt3.RecurrenceInfo.Start = apt3.Start
    apt3.RecurrenceInfo.Periodicity = 1
    apt3.RecurrenceInfo.Range = RecurrenceRange.EndByDate
    apt3.RecurrenceInfo.End = apt3.RecurrenceInfo.Start.AddHours(24)
    scheduler.AppointmentItems.Add(apt3)