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 );
  *]
}