Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Method EditCalendar () derived id:Method_LibCal_dlgCreateEditCalendar_EditCalendar 
 | 
{ 
 | 
  #keys: '[892.10.2103052]' 
 | 
  BaseType: 'Method_dlgCreateEditCalendar_EditCalendar' 
 | 
  Body: 
 | 
  [* 
 | 
    retVal := -1; 
 | 
     
 | 
    if( calendar.istype( LibCal_Calendar ) ) 
 | 
    { 
 | 
      this.Data( calendar.astype( LibCal_Calendar ) ); 
 | 
      this.Title( "Edit calendar '" + calendar.astype( LibCal_Calendar ).CalendarID() + "'" ); 
 | 
     
 | 
      // Also set the data of the DetailPanel. 
 | 
      dpCalendarSettings.Data( calendar.astype( LibCal_Calendar ) ); 
 | 
      dpCalendarSettings.InitializeBase(); 
 | 
       
 | 
      retVal := this.DoModal( parent ); 
 | 
    } 
 | 
    else 
 | 
    { 
 | 
      MessageBox::Error( parent, "Calendar is not a subtype of LibCal_Calendar.", "OK" );  
 | 
    } 
 | 
     
 | 
    return retVal; 
 | 
  *] 
 | 
} 
 |