Lai,Risheng
2023-11-02 30c02e0c981b16be0918483543f4b812956c45d4
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
31
32
Quintiq file version 2.0
#parent: #root
Method New (
  ProductInStockingPointInPeriod pispip
) id:Method_DialogCreateEditActualPISPIP_New
{
  #keys: '[139394.1.1044876749]'
  Body:
  [*
    // New actual pispip
    pisp := pispip.ProductInStockingPoint_MP();
    
    actualdate := pispip.End().Date() - 1;
    data := MacroPlan.Actual( relshadow,
                              ActualProductInStockingPointInPeriod,
                              ProductInStockingPoint_MP := pisp,
                              ProductID := pisp.ProductID(),
                              StockingPointID := pisp.StockingPointID(),
                              Date := actualdate,
                              ManufacturedDate := Date::MinDate() );
    if( pisp.Product_MP().HasShelfLifeOrMaturation() )
    {
      data.ManufacturedDate( actualdate );
    }
    
    DataHolderDialogData.Data( &data );
    this.SetLabels( pisp );
    this.InitializeComponents( false /*isbatchedit*/ );
                               
    ApplicationMacroPlanner.ShowFormModal( this );
  *]
}