Quintiq file version 2.0 
 | 
#parent: ListShiftPattern 
 | 
Response OnClick () id:Response_ListShiftPattern_MenuNewShiftPattern_OnClick 
 | 
{ 
 | 
  #keys: '[11660.0.14184898]' 
 | 
  Body: 
 | 
  [* 
 | 
    // Create a new ShiftPattern 
 | 
    dlg := construct( DialogCreateEditShiftPattern ); 
 | 
    shiftpattern := dlg.NewShiftPattern( this ); 
 | 
     
 | 
    ApplicationLibMacroPlanner.AutoExpandSelection( this, shiftpattern ); 
 | 
  *] 
 | 
  DefinitionID => /ListShiftPattern/Responsedef_ListShiftPattern_Menu_OnClick 
 | 
  Initiator: 'MenuNewShiftPattern' 
 | 
  Precondition: 
 | 
  [* 
 | 
    return MacroPlan::HasMacroPlan( MacroPlan, feedback ); 
 | 
  *] 
 | 
} 
 |