1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  StaticMethod Create ( 
 |    LibCal_Calendar owner_i, 
 |    String subject_i, 
 |    Date startDate_i, 
 |    Number nrOfDays_i 
 |  ) as LibCal_Event 
 |  { 
 |    TextBody: 
 |    [* 
 |      startTimeOfDay := Duration::Zero(); 
 |      duration       := Duration::Days( nrOfDays_i ); 
 |       
 |      event := LibCal_Event::Create( owner_i, subject_i, startDate_i, startTimeOfDay, duration ); 
 |      event.IsAllDay( true ); 
 |       
 |      return event; 
 |    *] 
 |  } 
 |  
  |