Quintiq file version 2.0
|
#parent: #root
|
Method GetActualCostPerPeriodSpecification (
|
Period_MP period,
|
output Real totalCost
|
) remote
|
{
|
Description: 'Get the cost as per IsPlanning/IsBase/Others'
|
TextBody:
|
[*
|
if( period.IsPlanning() ) //planning period, derive calculation
|
{
|
if( this.CostDriver() = Translations::MP_AccountAssignmentCostDriverVolume() )
|
{
|
totalCost := sum( this, Lane.LaneLeg.Trip.PeriodTaskLaneLeg, ptll,
|
ptll.UnitPeriod().Period_MP() = period,
|
ptll.GetTotalBaseCostForVolume( this.UnitAccount() ) );
|
}
|
else if( this.CostDriver() = Translations::MP_AccountAssignmentCostDriverTime() )
|
{
|
totalCost := sum( this, Lane.LaneLeg.Trip.PeriodTaskLaneLeg, ptll,
|
ptll.UnitPeriod().Period_MP() = period,
|
ptll.GetTotalBaseCostForHour( this.UnitAccount() ) );
|
}
|
else if( this.CostDriver() = Translations::MP_AccountAssignmentCostDriverLot() )
|
{
|
totalCost := sum( this, Lane.LaneLeg.Trip.PeriodTaskLaneLeg, ptll,
|
ptll.UnitPeriod().Period_MP() = period,
|
ptll.GetTotalBaseCostForLot( this.UnitAccount() ) );
|
}
|
}
|
else if( period.IsBase() ) //base period, disaggregate from planning period
|
{
|
totalCost := this.GetActualCosts( period.PlanningPeriod() ) * period.PlanningSystemRatio();
|
}
|
else //non base non planning, sum from planning
|
{
|
traverse( this, Lane.LaneLeg.Trip.PeriodTaskLaneLeg, ptll, ptll.UnitPeriod().Period_MP() = period )
|
{
|
traverse( ptll.UnitPeriod().GetChildrenOfPeriodDimension(), Elements, childspip )
|
{
|
totalCost := totalCost + this.GetActualCosts( childspip.Period_MP() );
|
}
|
}
|
}
|
*]
|
}
|