hongji.li
2023-10-17 d8f04d282d35a4b9f8244405573ddf2e6a4b5310
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
Quintiq file version 2.0
#parent: #root
Method GetBaseCostForSales (
  output Real revenue_o,
  output Real revenuewithinhorizon_o
) declarative
{
  Description: 'returns revenue from sales'
  TextBody:
  [*
    // ying ying Nov-18-2013 (created)
    
    traverse( this, LeafPISP.ProductInStockingPointInPeriod.astype( ProductInStockingPointInPeriodPlanningLeaf ), pispip )
    {
      traverse( pispip, PlanningBaseSalesDemandInPeriod, sd )
      {
        revenue := sd.BasePrice();
        revenue_o := revenue_o + revenue;
    
        if( pispip.Period_MP().IsWithinKPIHorizon() )
        {
          revenuewithinhorizon_o := revenuewithinhorizon_o + revenue;
        }
      }
    }
  *]
}