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