| Quintiq file version 2.0 | 
| #parent: ToolbarMain/LabelNewCalendarExport | 
| Response OnTextChanged () id:Response_ToolbarMain_LabelNewCalendarExport_OnTextChanged | 
| { | 
|   #keys: '[136682.2.1572674199]' | 
|   Body: | 
|   [* | 
|     //Workaround to export Calendars.xlsx | 
|     if ( this.Text() = LabelExportID.Text() ) | 
|     { | 
|       bindata := MacroPlan.CalendarImportExport().GetExportData().AsBinaryData(); | 
|       path := ScenarioManager.GetUserSetting().ImportExportPath(); | 
|        | 
|       exportpath:= path +"\" + LibCal_ImportExport::DEFAULT_EXPORT_FILENAME();  | 
|       Application.WriteBinaryFile( exportpath, bindata ); | 
|       //clean up the path | 
|       LabelExportID.Text(""); | 
|     } | 
|   *] | 
|   CanBindMultiple: false | 
|   DefinitionID: 'Responsedef_Label_OnTextChanged' | 
|   Precondition: | 
|   [* | 
|     return not isnull( MacroPlan ); | 
|   *] | 
| } |