Quintiq file version 2.0
|
#parent: #root
|
Method MPSyncLaneLegCost (
|
Boolean isoverwritemanualconfig,
|
IOLaneLegCosts iolanelegcosts
|
)
|
{
|
Description: 'Synchronization of LaneLegCost for MPSync'
|
TextBody:
|
[*
|
// Select a set of existing LaneLegCost
|
existing := selectset( this, Unit.Lane.LaneLeg.LaneLegCost, item, true );
|
updates := construct( LaneLegCosts );
|
|
// Traverse the new set of valid LaneLegCost
|
traverse( iolanelegcosts , Elements, io, io.IsValid() )
|
{
|
id := io.ID();
|
// Find existing LaneLegCost
|
objectinstance := LaneLegCost::FindLaneLegCostTypeIndex( id );
|
// Find existing Account_MP
|
account := Account_MP::FindAccountTypeIndex( io.AccountName() );
|
// Find existing LaneLeg
|
laneleg := LaneLeg::FindLaneLegTypeIndex( io.LaneID(),
|
io.OriginStockingPointID(),
|
io.DestinationStockingPointID() );
|
|
// If no existing LaneLegCost is found, and there's valid Account_MP and LaneLeg, create one
|
if( isnull( objectinstance ) )
|
{
|
if( not ( isnull( account ) or isnull( laneleg ) ) )
|
{
|
objectinstance := LaneLegCost::Create( id,
|
laneleg,
|
account,
|
io.CostDriver(),
|
io.Start(),
|
io.TimeUnit(),
|
io.LengthOfTime(),
|
io.Cost(),
|
true ).astype( LaneLegCost );
|
}
|
}
|
// Else if the LaneLegCost is not manually configured or the imported instance should overwrite manual configuration,
|
// update the existing LaneLegCost
|
else if( not objectinstance.IsManuallyConfigured() or isoverwritemanualconfig )
|
{
|
// Update LaneLegCost
|
if( not ( isnull( account ) ) )
|
{
|
objectinstance.Update( account,
|
io.CostDriver(),
|
io.Start(),
|
io.TimeUnit(),
|
io.LengthOfTime(),
|
io.Cost(),
|
true );
|
|
updates.Add( objectinstance );
|
}
|
}
|
|
if( not isnull( objectinstance ) )
|
{
|
// Extended method
|
objectinstance.CustomUpdate( io, isoverwritemanualconfig );
|
}
|
}
|
|
// Get the set of old LaneLegCost to be deleted
|
tobedeleteset := existing.Difference( updates );
|
|
// Traverse the set of LaneLegCost to be deleted
|
// Only delete LaneLegCost that is not manually configured or the imported instance should overwrite manual configuration
|
traverse( tobedeleteset, Elements, ele,
|
not ele.IsManuallyConfigured() or isoverwritemanualconfig )
|
{
|
ele.Delete();
|
}
|
*]
|
}
|
