Quintiq file version 2.0 
 | 
#parent: Toolbar651/btnOk 
 | 
Response OnClick () id:Response_Toolbar651_btnOk_OnClick 
 | 
{ 
 | 
  #keys: '[131094.0.605194397]' 
 | 
  Body: 
 | 
  [* 
 | 
    // If applicable, inform the user that the recurrence cannot always be applied 
 | 
    // exactly as defined.  
 | 
    if( btnMonthly.Pressed() and 
 | 
        ckbMonthlyDay.Checked() ) 
 | 
    {     
 | 
      day := [Number]edtMonthlyDay.Text(); 
 | 
      if( day > 28 ) 
 | 
      { 
 | 
        MessageBox::Warning( Dialog, Translations::Pattern_Monthly_LessDays( day ), "OK" ); 
 | 
      } 
 | 
    } 
 | 
     
 | 
    // If the dialog was opened from dlgSubscription, update the data in that dialog. 
 | 
    if( not isnull( dhdlgSubscription.Data() ) ) 
 | 
    { 
 | 
      Dialog.CallbackSubscriptionDialog(); 
 | 
    } 
 | 
     
 | 
    Dialog.EndModal( 1 ); 
 | 
  *] 
 | 
  DefinitionID: 'Responsedef_GUIButtonBase_OnClick' 
 | 
  Precondition: 
 | 
  [* 
 | 
    return Dialog.ValuesOK(); 
 | 
  *] 
 | 
} 
 |