haorenhui
2023-10-30 6d6cc10d9e8e242661da7fd655dec155a09d676c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
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();
    }
  *]
}