Merge remote-tracking branch 'origin/dev' into dev

lihongji

2024-08-04 fb1634fb000c80a7b66d3af521c964dea9923d79

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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
Quintiq file version 2.0
#parent: #root
Method GetTotalBaseFixedCost () declarative remote as Real
{
  Description:
  [*
    Return the total base fixed cost for unit per period
    To be used by configurable columns
  *]
  TextBody:
  [*
    // Return the total base fixed cost for unit per period to be used by configurable columns
    value := 0.0;
    
    // Get the sum of costs for cost driver fixed
    traverse( this, 
              Unit.UnitAccount, 
              ua, 
              guard( ua.Account_MP().IsFinancialAccount(), false )
              and ua.CostDriver() = Translations::MP_AccountAssignmentCostDriverFixed() )
    {
      value := value + this.GetFixedBaseCost( ua, null( UnitCost ) );
    }
    
    // Get the sum of costs for cost driver staffing
    traverse( this, 
              Unit.UnitAccount, 
              ua, 
              guard( ua.Account_MP().IsFinancialAccount(), false )
              and ua.CostDriver() = Translations::MP_AccountAssignmentCostDriverStaffing() )
    {
      value := value + this.GetStaffingBaseCost( ua, null( UnitCost ) );
    }
    
    // Get the sum of costs for cost driver number of units
    traverse( this, 
              Unit.UnitAccount, 
              ua, 
              guard( ua.Account_MP().IsFinancialAccount(), false )
              and ua.CostDriver() = Translations::MP_AccountAssignmentCostDriverNrOfUnits() )
    {
      value := value + this.GetNrOfUnitsBaseCost( ua, null( UnitCost ) );
    }
    
    return value;
  *]
}