| Quintiq file version 2.0 | 
| #parent: ListEntityTreeInPanel | 
| Response OnClick () id:Response_ListEntityTreeInPanel_MenuNewStockingPoint_OnClick | 
| { | 
|   #keys: '[127710.1.1015000751]' | 
|   Body: | 
|   [* | 
|     // Create new stocking points | 
|     dlg := construct ( DialogCreateEditStockingPoint ); | 
|     sp := dlg.NewStockingPoint( this, null( Unit ), DataHolderSelectedGroup.Data(), GlobalParameters_MP::GetDefaultGridX(), GlobalParameters_MP::GetDefaultGridY() );  | 
|      | 
|     if( not isnull( sp ) ) | 
|     { | 
|       objects := construct( StockingPoint_MPs );  | 
|       objects.Add( sp ); | 
|       ApplicationLibMacroPlanner.ExpandNavigationSelection( objects ); | 
|     } | 
|   *] | 
|   DefinitionID => //ListUnitTree/Responsedef_ListUnitTree_Menu_OnClick | 
|   Initiator: 'MenuNewStockingPoint' | 
|   Precondition: | 
|   [* | 
|     return MacroPlan::HasMacroPlan( MacroPlan, feedback ); | 
|   *] | 
| } |