Quintiq file version 2.0
|
#parent: #root
|
Method CreateCost (
|
structured[Account_MP] accounts,
|
LaneLeg laneleg
|
) id:Method_DialogCreateEditLaneLeg_CreateCost
|
{
|
#keys: '[110880.4.1540402728]'
|
Body:
|
[*
|
// Create shadow lane leg cost
|
|
traverse( accounts, Elements.AccountAssignment.astype( UnitAccount ), ua,
|
AccountAssignment::IsForProcess( ua.CostDriver() ) and ua.Unit() = laneleg.Lane().Unit() )
|
{
|
if( not exists( Dialog.Data(), LaneLegCost, cost, cost.UnitAccount() = ua ) )
|
{
|
account := ua.Account_MP();
|
Dialog.Data().LaneLegCost( relnew,
|
ID := MacroPlan.IDHolder().GetLaneLegCostID(),
|
Start := MacroPlan.Start().Date(),
|
TimeUnit := account.DefaultTimeUnit(),
|
LengthOfTime := account.DefaultLengthOfTime(),
|
Cost := account.DefaultCost(),
|
UnitAccount := ua, // Need when deleting shadow cost
|
AccountAssignment := ua ); // Need when editing cost
|
}
|
}
|
*]
|
}
|
