yanweiyuan3
2023-08-09 588bc7829387dfc761cc25f06f77d4c81818bd10
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
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 );
    }
  *]
}