Quintiq file version 2.0
|
#parent: #root
|
Method NewDisaggregationFactor (
|
internal[GUIComponent] parent
|
) as DisaggregationFactor id:Method_DialogCreateEditDisaggregationFactor_NewDisaggregationFactor
|
{
|
#keys: '[124808.0.1994363517]'
|
Body:
|
[*
|
// New disaggregation factor
|
|
Dialog.EnableDisableComponent( false, true );
|
|
stockingpoint := null( StockingPoint_MP );
|
owner := DisaggregationFactor::GetDefaultOwner( MacroPlan, stockingpoint );
|
|
data := owner.DisaggregationFactor( relshadow, StockingPointID := stockingpoint.ID(), ProductID := owner.ID(), Start := MacroPlan.StartOfPlanning().Date() );
|
data.StockingPoint_MP( relset, stockingpoint );
|
|
Dialog.Data( data );
|
Dialog.SetDefaultValue( null( ProductInStockingPointInPeriod ) );
|
|
result := Dialog.DoModal( parent );
|
newobj := null( DisaggregationFactor );
|
|
if( result > 0 )
|
{
|
newobj := DisaggregationFactor::Create( data.Product_MP(),
|
data.StockingPoint_MP(),
|
data.Start(),
|
data.Factor(),
|
false );
|
}
|
|
return newobj;
|
*]
|
}
|
