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 
 |  Function CalcRelativeDuration 
 |  { 
 |    TextBody: 
 |    [* 
 |      // default to 1.0 for time logic start from end and middle 
 |      value := 1.0; 
 |       
 |      end := this.End(); 
 |      periodtask := this.PeriodTask_MP(); 
 |      start := this.Start(); 
 |       
 |      if( periodtask.DependentDemandLeadTimeLogic() = Translations::MP_GlobalParameter_LeadTimeLogic_Proportional() ) 
 |      { 
 |        value := Process_MP::GetRelativeDuration( start, end , this.PeriodTask_MP().UnitPeriod().Period_MP() ); 
 |      } 
 |       
 |      this.RelativeDuration( value ); 
 |    *] 
 |  } 
 |  
  |