Quintiq file version 2.0
|
#parent: #root
|
MethodOverride ConvertToAccountCost
|
{
|
TextBody:
|
[*
|
lane := Lane::FindLaneTypeIndex( this.LaneID() );
|
accname := this.AccountName();
|
if( this.AccountName().FindString( "Transportation cost", 0 ) >= 0 )
|
{
|
accname := "Transportation cost";
|
}
|
acc := Account_MP::FindAccountTypeIndex( accname );
|
|
if( not isnull( lane )
|
and not isnull( acc )
|
and not exists( lane, LaneCost, uc,
|
uc.AccountName() = acc.Name()
|
and uc.CostDriver() = this.CostDriver()
|
and uc.Start() = this.Start() ) )
|
{
|
LaneCost::Create( OS::GenerateGUIDAsString(),
|
lane, acc, this.CostDriver(), this.Start(),
|
this.TimeUnit(), this.LengthOfTime(), this.Cost(), false );
|
}
|
*]
|
}
|
