yypsybs
2023-09-09 3cb5a54def670d97301f07170fcaad213bfc54f2
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
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
}