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 );
  *]
}