| Quintiq file version 2.0 | 
| #parent: #root | 
| Method New () id:Method_DialogCreateEditExternalSupply_New | 
| { | 
|   #keys: '[136682.1.2082707088]' | 
|   Body: | 
|   [* | 
|     //Create New Inventory Supply | 
|      | 
|     id := MacroPlan.IDHolder().GetInventorySupplyID(); | 
|     stockingpoint := select( DataHolderStockingPoint.Data(), Elements, e, not e.IsSystem() ); | 
|     owner := select( DataHolderProduct.Data(), Elements, product, not product.IsSystem() and product.IsLeaf() ); | 
|     // directly trying to use StartOfPlanningPeriod.StartDate could give errors | 
|     // if none of the periods are used for planning. Thus, added a guard and a local variable. | 
|     startOfPlanningPeriod := MacroPlan.StartOfPlanningPeriod(); | 
|     date := guard( startOfPlanningPeriod.StartDate(), Date::MinDate() ); | 
|     min_mfgdate := date; | 
|      | 
|      | 
|     data := owner.InventorySupply( relshadow, | 
|                                    ID := id, | 
|                                    StockingPoint_MP := stockingpoint, | 
|                                    Date := date, | 
|                                    ManufacturedDate := min_mfgdate ); | 
|                                       | 
|      | 
|     DataHolderExternalSupply.Data( &data ); | 
|     pnlContent.OnUserUpdateUI( owner, stockingpoint, Form.IsBatchEdit() ); | 
|     ApplicationMacroPlanner.ShowFormModal( Form ); | 
|   *] | 
| } |