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
Quintiq file version 2.0
#parent: #root
StaticMethod GetPropagationPercentile (POAStrategy strategy, Real percentage) as Number
{
  TextBody:
  [*
    counts := strategy.PlanStrategy().PropagationsCount();
    nv := NumberVector::Construct( counts );
    
    total := nv.Sum();
    
    i := 0; x := 0;
    while( x < percentage * total and i < nv.Size() )
    {
      x := x + nv.Get( i );
      i++;
    }
    
    return i - 1;
  *]
  InterfaceProperties { Accessibility: 'Module' }
}