yanweiyuan3
2023-08-09 588bc7829387dfc761cc25f06f77d4c81818bd10
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Quintiq file version 2.0
#parent: #root
Function CalcCO2Emission
{
  TextBody:
  [*
    // Calculate co2 emission for current unit period
    targetUoM := this.MacroPlan().DefaultCO2ProcessUoM();
    
    // period task * conversion factor * process co2 rate
    value := sum( this, PeriodTask_MP, pt, pt.Quantity() *
                                           this.Unit().UnitOfMeasure_MP().GetConversionFactor( targetUoM, null( Product_MP ) ) *
                                           pt.Process_MP().CO2Emission() );
    
    this.CO2Emission( value );
  *]
  InterfaceProperties { Accessibility: 'Module' }
}