Quintiq file version 2.0
#parent: ListEntityTreeInPanel
Response OnClick (
  Unit selection
) id:Response_ListEntityTreeInPanel_MenuNewStockingPoint_OnClick_316
{
  #keys: '[133968.0.223171607]'
  Body:
  [*
    // Create new child stocking points
    dlg := construct ( DialogCreateEditStockingPoint );
    sp := dlg.NewStockingPoint( this, selection, DataHolderSelectedGroup.Data(), GlobalParameters_MP::GetDefaultGridX(), GlobalParameters_MP::GetDefaultGridY() );
    
    if( not isnull( sp ) )
    {
      objects := construct( StockingPoint_MPs ); 
      objects.Add( sp );
      ApplicationLibMacroPlanner.ExpandNavigationSelection( objects );
    }
  *]
  CanBindMultiple: false
  DefinitionID => //ListUnitTree/Responsedef_ListUnitTree_Menu_OnClick
  Initiator: 'MenuNewStockingPoint'
}
