Quintiq file version 2.0
#parent: #root
Method CopyExternalSupply (
  InventorySupply selection,
  internal[GUIComponent] parent
) id:Method_DialogCreateEditInventorySupply_CopyExternalSupply
{
  #keys: '[136682.2.308003510]'
  Body:
  [*
    // Copy supply specification
    id := MacroPlan.IDHolder().GetInventorySupplyID();
    data := shadow( selection );
    data.ResetWrapped();
    data.ID( id );
    Dialog.Data( data );
    Dialog.EnableDisableComponent( false);
    
    
    result := this.DoModal( parent );
    
    
     if ( result > 0 )
    {                                                                                                            
      //if manufactured date is restricted, default it to date of inv supply
      data.ManufacturedDate( this.GetManufacturedDateWithUIRestriction( data.ManufacturedDate(), data.Date() ) );
      data.Commit();
    }
  *]
}