Quintiq file version 2.0
#parent: ListSupplySpecification
Response OnClick () id:Response_ListSupplySpecification_MenuNewSupplySpecification_OnClick
{
  #keys: '[112884.0.287586091]'
  Body:
  [*
    // Create a new supply specification
    
    dlg := construct( DialogCreateEditSupplySpecification );
    st := dlg.NewSupplySpecification( this );
    
    ApplicationLibMacroPlanner.AutoExpandSelection( this, st );
  *]
  CanBindMultiple: false
  DefinitionID => /ListSupplySpecification/Responsedef_ListSupplySpecification_Menu_OnClick
  Initiator: 'MenuNewSupplySpecification'
  Precondition:
  [*
    return MacroPlan::HasMacroPlan( MacroPlan, feedback )
           and Unit::HasUnitAndHasPeriod( feedback, MacroPlan )
           and SupplySpecification::CanCreate( feedback, DataHolderChildUnits.Data(), DataHolderChildProducts.Data() );
  *]
  UserRequiresReadWrite: true
}