Quintiq file version 2.0
#parent: pnlToolbar/lblExportID
Response OnTextChanged () id:Response_pnlToolbar_lblExportID_OnTextChanged
{
  #keys: '[131094.0.2122155904]'
  Body:
  [*
    // In this case, the calendar is the exportSource (instead of type ImportExport).
    exportSource := Dialog.Data();
    if( not isnull( exportSource ) )
    {
      // Only do something if the current Client has triggered the export.
      if( vhExportID.Data() <> Key::ZeroKey() and
          this.Text() = [String]vhExportID.Data() )
      {
        // Get the ExportData right away to prevent that it might be overwritten by next export-action
        // while the user is selecting a file.
        binData := exportSource.GetExportData().AsBinaryData();
    
        // Ask the user for the filename.
        fileName := Application.GetSaveFileName( LibCal_ImportExport::DEFAULT_EXPORT_FILENAME(), "xlsx", "XLSX-files" );
    
        if( fileName <> "" )
        {
          // Write the data to a file on the Client-machine.
          Application.WriteBinaryFile( fileName, binData );
    
          // Check if the file has been written succesfully.
          if( not Application.ClientFileExists( fileName ) )
          {
            LibCal_Util::Info( "something went wrong while writing file '" + fileName + "'." );
          }
        }
    
        // Reset
        vhExportID.Data( Key::ZeroKey() );
      }
    }
  *]
  CanBindMultiple: false
  DefinitionID: 'Responsedef_Label_OnTextChanged'
}