Quintiq file version 2.0
#parent: ListLane
Response OnClick () id:Response_ListLane_MenuNewLane_OnClick
{
  #keys: '[110704.0.462434657]'
  Body:
  [*
    // Create a new lane
    dlg := construct( DialogCreateEditLane );
    
    owner := Lane::GetDefaultOwner( MacroPlan, DataHolderHighlight.Data() );
    lane := dlg.NewLane( this, owner, CheckBoxFilterUnit.Checked() );
    
    ApplicationLibMacroPlanner.AutoExpandSelection( this, lane );
  *]
  CanBindMultiple: false
  DefinitionID => /ListLane/Responsedef_ListLane_Menu_OnClick
  Initiator: 'MenuNewLane'
  Precondition:
  [*
    return Lane::CanCreate( feedback, MacroPlan ) 
           and ( not CheckBoxFilterUnit.Checked()  // only check against nav selection when the list is filtered by unit
                 or Lane::CanCreate( feedback, DataHolderChildUnits.Data() ) );
  *]
  UserRequiresReadWrite: true
}
