Quintiq file version 2.0 
 | 
#parent: Toolbar935/btnOk 
 | 
Response OnClick () id:Response_Toolbar935_btnOk_OnClick 
 | 
{ 
 | 
  #keys: '[131094.0.1401958597]' 
 | 
  Body: 
 | 
  [* 
 | 
    eti      := Dialog.Data().WrappedInstance().astype( LibCal_ExplicitTimeInterval ); 
 | 
    timezone := Dialog.GetCalendarTimeZone(); 
 | 
     
 | 
    startTime := datStartDate.Date().DateTime( timezone ).AddAsPeriod( timezone, durStartTimeOfDay.Duration() ); 
 | 
    endTime   := datEndDate  .Date().DateTime( timezone ).AddAsPeriod( timezone, durEndTimeOfDay  .Duration() ); 
 | 
     
 | 
    eti.Update( startTime, endTime, edtComment.Text() ); 
 | 
     
 | 
    Dialog.EndModal( 1 ); 
 | 
  *] 
 | 
  DefinitionID: 'Responsedef_GUIButtonBase_OnClick' 
 | 
  Precondition: 
 | 
  [* 
 | 
    return Dialog.ValuesDatesOK(); 
 | 
  *] 
 | 
} 
 |