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' }
| }
|
|