admin
2025-01-22 7e31442f0e9b07764e9c6a9680d3d4aeba5fe1de
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
Quintiq file version 2.0
#parent: #root
StaticMethod Create (
  LibCal_Calendar owner_i,
  LibCal_Event event_i,
  Date startDate_i,
  Date endDate_i
) as LibCal_Participation
{
  TextBody:
  [*
    participation := owner_i.Participation( relnew, LibCal_LeadingParticipation,
                                            ParticipationID := [String]Key::NextPersistentKey(),
                                            Event           := event_i,
                                            StartDate       := startDate_i,
                                            EndDate         := endDate_i,
                                            IsChanged       := true );
    
    // Set the Participation as the LeadingParticipation of the Event.
    event_i.LeadingParticipation( relset, participation );
    
    // Directly calculate the StartTime and EndTime of the Participation.
    participation.CalcStartTime();
    participation.CalcEndTime();
    
    return participation;
  *]
  InterfaceProperties { Accessibility: 'Module' }
}