Quintiq file version 2.0
|
#parent: #root
|
Method NewInventoryValueAndCost (
|
internal[GUIComponent] parent,
|
ProductInStockingPoint_MP pisp
|
) id:Method_DialogCreateEditInventoryValueAndCost_NewInventoryValueAndCost
|
{
|
#keys: '[124808.1.1923078425]'
|
Body:
|
[*
|
// New InventoryValueAndCost shadow cost
|
owner := pisp.Product_MP();
|
stockingpoint := pisp.StockingPoint_MP();
|
|
data := owner.InventoryValueAndCost( relshadow,
|
ID := MacroPlan.IDHolder().GetInventoryValueAndHoldingCostID(),
|
ProductInStockingPoint_MP := pisp,
|
StockingPoint_MP := stockingpoint,
|
ProductID := owner.ID(),
|
StockingPointID := stockingpoint.ID() );
|
|
Dialog.Data( data );
|
|
// Set default value
|
Dialog.SetDefaultValue();
|
Dialog.SetValueForStringSelections( InventoryValueAndCost::GetDefinitionName() );
|
Dialog.DataHolderProduct().Data( owner );
|
Dialog.DataHolderStockingPoint().Data( stockingpoint );
|
Dialog.SetHolders( stockingpoint.Currency_MP(), pisp.UnitOfMeasure_MP() );
|
|
result := Dialog.DoModal( parent );
|
|
if( result > 0 )
|
{
|
data.Commit();
|
}
|
*]
|
}
|
