1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method Update 
 |  { 
 |    Description: 'Update history and window of unit calendar' 
 |    TextBody: 
 |    [* 
 |      macroplan := this.Unit().MacroPlan(); 
 |      now := macroplan.Time(); 
 |      commoncalendar := this.CalendarRegistry().CommonCalendar(); 
 |      windowlength :=0; 
 |      historylength :=0; 
 |       
 |      if( now.IsFinite() and macroplan.Start().IsFinite() and macroplan.End().IsFinite() ) 
 |      { 
 |        this.GetCalendarRegistry().astype( CalendarRegistry).GetCalendarWindow( windowlength, historylength );  
 |        this.Update( commoncalendar.Base(), commoncalendar.UpdateInterval() , windowlength, historylength );  
 |        
 |      } 
 |    *] 
 |  } 
 |  
  |