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
30
31
Quintiq file version 2.0
#parent: #root
Function CalcTotalCapacity
{
  TextBody:
  [*
    value := Duration::Zero();
    
    if( this.IsPlanning() or this.IsBase() )
    {
      planningup := ifexpr( this.IsPlanning(), 
                            this,                                                  // Case 1: planning UnitPeriod
                            this.PlanningUP().astype( UnitPeriodTransportBase ) ); // Case 2: base, non planning UnitPeriod: disaggregate value from planning UnitPeriod
      
      if( not isnull( planningup ) )
      {
        // Extend capacity if load has been increased
        load := maxvalue( planningup.MaximumLoadPercentage() / 100, 1.0 );    
        planningvalue := planningup.Period_MP().Duration() * planningup.NrOfOpen() * load;
        value := this.PlanningSystemRatio() * planningvalue;
      }  
    }
    else
    {
      // Case 3: aggregated UnitPeriod: aggregate values from base
      value := sum( this.GetChildrenOfPeriodDimension(), Elements.astype( UnitPeriodTransportBase ), e, e.TotalCapacity() );
    }
    
    this.TotalCapacity( value );
  *]
}