Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Method GetCalendarWindow ( 
 | 
  output Number windowlength_o, 
 | 
  output Number historylength_o 
 | 
) declarative 
 | 
{ 
 | 
  Description: 'Retrieve calendars window and history' 
 | 
  TextBody: 
 | 
  [* 
 | 
    macroplan := this.MacroPlan(); 
 | 
    now := macroplan.Time(); 
 | 
     
 | 
    if( now.IsFinite() and macroplan.Start().IsFinite() and macroplan.End().IsFinite() ) 
 | 
    { 
 | 
      start := minvalue( macroplan.Start(), now ) 
 | 
      end := maxvalue( macroplan.End(), now ); 
 | 
     
 | 
      historylength_o := maxvalue( 0, ( now - start ).Days() ); 
 | 
      windowlength_o := maxvalue( 1, ( end - start ).Days() + 1 ); 
 | 
    } 
 | 
  *] 
 | 
} 
 |