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
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method GetBaseCostForLot ( 
 |    output Real cost_o, 
 |    output Real costwithinhorizon_o 
 |  ) declarative remote 
 |  { 
 |    Description: 'Return base cost depending on lot used' 
 |    TextBody: 
 |    [* 
 |      // ju jinn Jul-30-2014 (created) 
 |       
 |      traverse( this, UnitAccountInPeriodForLot, ua ) 
 |      { 
 |        cost := ua.TotalBaseCost(); 
 |       
 |        cost_o := cost_o + cost; 
 |       
 |        if( ua.UnitPeriod().Period_MP().IsWithinKPIHorizon() ) 
 |        { 
 |          costwithinhorizon_o := costwithinhorizon_o + cost; 
 |        } 
 |      } 
 |    *] 
 |  } 
 |  
  |