Quintiq file version 2.0
#parent: #root
Method SetDefaultValue (
  StockingPointInPeriod stockingpointinperiod
) id:Method_DialogCreateEditStockingPointCapacity_SetDefaultValue
{
  #keys: '[107528.0.125967459]'
  Body:
  [*
    // Set the default value for the fields in the dialog.
    
    data := Dialog.Data();
    
    start := MacroPlan.Start().Date();
    maxcapacity := 0.0;
    
    if( not isnull( stockingpointinperiod ) )
    {
      // To inherit the value from last sp capacity while creating a new sp capacity
      stockingpointcapacity := stockingpointinperiod.StockingPointCapacity();
      start := stockingpointinperiod.Start().Date();
    
      if( not isnull( stockingpointcapacity ) )
      {
        maxcapacity := stockingpointcapacity.MaxCapacity();
      }
      else
      {
        maxcapacity := stockingpointinperiod.MaxCapacity();
      }
    }
    
    // Assigning value to Read-Only attribute will result in runtime error.
    if( isnull( data.WrappedInstance() ) )
    {
      data.Start( start );
    }
    
    data.MaxCapacity( maxcapacity );
    
    // In the case that the default stocking point cannot be found in the list of available stocking points,
    // the UOM should use the the currently selected stocking point's UOM
    // In order to set the UOM, we need to set the Dialog.Data's stocking point during initialization of the dialog
    availablestockingpoints := DataHolderChildStockingPoints.Data();
    if( not exists( availablestockingpoints, Elements, sp,
                    sp = data.StockingPoint_MP() ) )
    {
      stockingpoint := availablestockingpoints.Element( 0 );
      data.StockingPoint_MP( relset, stockingpoint );
    }
  *]
}
