Quintiq file version 2.0
|
#parent: #root
|
Method MoveQuantity (
|
NewSupply sourcenewsupply,
|
ProductInStockingPointInPeriod destinationPISPIP,
|
Real destinationquantity,
|
NewSupply destnewsupply
|
)
|
{
|
Description: 'Move quantity of supply from source PISPIP to destination PISPIP'
|
TextBody:
|
[*
|
// huat heng Sep-17-2013 (created)
|
// Update the reduction from source
|
|
destperiodtask := destnewsupply.GetPeriodTaskOperation();
|
|
if( not isnull( destperiodtask ) )
|
{
|
newquantity := sourcenewsupply.Quantity() - destinationquantity;
|
|
// there can be a very tiny rounding error of > 10 decimal
|
if( newquantity = 0 )
|
{
|
newquantity := 0.0;
|
}
|
|
sourcenewsupply.Update( newquantity );
|
|
// Update the addition in destination
|
destnewsupply.Update( destnewsupply.Quantity() + destinationquantity );
|
}
|
*]
|
}
|
