sc/source/ui/view/tabvwshc.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include <config_mpl.h>
  21
  22 #include "scitems.hxx"
  23 #include <vcl/msgbox.hxx>
  24 #include <sfx2/childwin.hxx>
  25 #include <sfx2/dispatch.hxx>
  26
  27 #include "tabvwsh.hxx"
  28 #include "sc.hrc"
  29 #include "globstr.hrc"
  30 #include "global.hxx"
  31 #include "scmod.hxx"
  32 #include "docsh.hxx"
  33 #include "document.hxx"
  34 #include "uiitems.hxx"
  35 #include "pivot.hxx"
  36 #include "namedlg.hxx"
  37 #include "namedefdlg.hxx"
  38 #include "solvrdlg.hxx"
  39 #include "optsolver.hxx"
  40 #include "tabopdlg.hxx"
  41 #include "autoform.hxx"
  42 #include "autofmt.hxx"
  43 #include "consdlg.hxx"
  44 #include "filtdlg.hxx"
  45 #include "dbnamdlg.hxx"
  46 #include "areasdlg.hxx"
  47 #include "rangeutl.hxx"
  48 #include "crnrdlg.hxx"
  49 #include "formula.hxx"
  50 #include "formulacell.hxx"
  51 #include "acredlin.hxx"
  52 #include "highred.hxx"
  53 #include "simpref.hxx"
  54 #include "funcdesc.hxx"
  55 #include "dpobject.hxx"
  56 #include "markdata.hxx"
  57 #include "reffact.hxx"
  58 #include "condformatdlg.hxx"
  59 #include "xmlsourcedlg.hxx"
  60 #include "condformatdlgitem.hxx"
  61
  62 #include "RandomNumberGeneratorDialog.hxx"
  63 #include "SamplingDialog.hxx"
  64 #include "DescriptiveStatisticsDialog.hxx"
  65 #include "AnalysisOfVarianceDialog.hxx"
  66 #include "CorrelationDialog.hxx"
  67 #include "CovarianceDialog.hxx"
  68 #include "ExponentialSmoothingDialog.hxx"
  69 #include "MovingAverageDialog.hxx"
  70 #include "RegressionDialog.hxx"
  71 #include "TTestDialog.hxx"
  72 #include "FTestDialog.hxx"
  73 #include "ZTestDialog.hxx"
  74 #include "ChiSquareTestDialog.hxx"
  75
  76 #include "PivotLayoutDialog.hxx"
  77
  78 #include <config_orcus.h>
  79
  80 void ScTabViewShell::SetCurRefDlgId( sal_uInt16 nNew )
  81 {
  82     //  CurRefDlgId is stored in ScModule to find if a ref dialog is open,
  83     //  and in the view to identify the view that has opened the dialog
  84     nCurRefDlgId = nNew;
  85 }
  86
  87 //ugly hack to call Define Name from Manage Names
  88 void ScTabViewShell::SwitchBetweenRefDialogs(SfxModelessDialog* pDialog)
  89 {
  90    sal_uInt16 nSlotId = SC_MOD()->GetCurRefDlgId();
  91    if (nSlotId == FID_DEFINE_NAME)
  92    {
  93         mbInSwitch = true;
  94         static_cast<ScNameDlg*>(pDialog)->GetRangeNames(m_RangeMap);
  95         static_cast<ScNameDlg*>(pDialog)->Close();
  96         sal_uInt16 nId  = ScNameDefDlgWrapper::GetChildWindowId();
  97         SfxViewFrame* pViewFrm = GetViewFrame();
  98         SfxChildWindow* pWnd = pViewFrm->GetChildWindow( nId );
  99
 100         SC_MOD()->SetRefDialog( nId, pWnd == nullptr );
 101    }
 102    else if( nSlotId == FID_ADD_NAME )
 103    {
 104         static_cast<ScNameDefDlg*>(pDialog)->GetNewData(maName, maScope);
 105         static_cast<ScNameDlg*>(pDialog)->Close();
 106         sal_uInt16 nId  = ScNameDlgWrapper::GetChildWindowId();
 107         SfxViewFrame* pViewFrm = GetViewFrame();
 108         SfxChildWindow* pWnd = pViewFrm->GetChildWindow( nId );
 109
 110         SC_MOD()->SetRefDialog( nId, pWnd == nullptr );
 111    }
 112    else
 113    {
 114
 115    }
 116 }
 117
 118 VclPtr<SfxModelessDialog> ScTabViewShell::CreateRefDialog(
 119                                 SfxBindings* pB, SfxChildWindow* pCW,
 120                                 SfxChildWinInfo* pInfo,
 121                                 vcl::Window* pParent, sal_uInt16 nSlotId )
 122 {
 123     // only open dialog when called through ScModule::SetRefDialog,
 124     // so that it does not re appear for instance after a crash (#42341#).
 125
 126     if ( SC_MOD()->GetCurRefDlgId() != nSlotId )
 127         return nullptr;
 128
 129     if ( nCurRefDlgId != nSlotId )
 130     {
 131         //  the dialog has been opened in a different view
 132         //  -> lock the dispatcher for this view (modal mode)
 133
 134         GetViewData().GetDispatcher().Lock( true );    // lock is reset when closing dialog
 135         return nullptr;
 136     }
 137
 138     VclPtr<SfxModelessDialog> pResult;
 139
 140     if(pCW)
 141         pCW->SetHideNotDelete(true);
 142
 143     ScDocument* pDoc = GetViewData().GetDocument();
 144
 145     switch( nSlotId )
 146     {
 147         case FID_DEFINE_NAME:
 148         {
 149             if (!mbInSwitch)
 150             {
 151                 pResult = VclPtr<ScNameDlg>::Create( pB, pCW, pParent, &GetViewData(),
 152                                      ScAddress( GetViewData().GetCurX(),
 153                                                 GetViewData().GetCurY(),
 154                                                 GetViewData().GetTabNo() ) );
 155             }
 156             else
 157             {
 158                 pResult = VclPtr<ScNameDlg>::Create( pB, pCW, pParent, &GetViewData(),
 159                                      ScAddress( GetViewData().GetCurX(),
 160                                                 GetViewData().GetCurY(),
 161                                                 GetViewData().GetTabNo() ), &m_RangeMap);
 162                 static_cast<ScNameDlg*>(pResult.get())->SetEntry( maName, maScope);
 163                 mbInSwitch = false;
 164             }
 165         }
 166         break;
 167
 168         case FID_ADD_NAME:
 169         {
 170             if (!mbInSwitch)
 171             {
 172                 std::map<OUString, ScRangeName*> aRangeMap;
 173                 pDoc->GetRangeNameMap(aRangeMap);
 174                 pResult = VclPtr<ScNameDefDlg>::Create( pB, pCW, pParent, &GetViewData(), aRangeMap,
 175                                 ScAddress( GetViewData().GetCurX(),
 176                                             GetViewData().GetCurY(),
 177                                             GetViewData().GetTabNo() ), true );
 178             }
 179             else
 180             {
 181                 std::map<OUString, ScRangeName*> aRangeMap;
 182                 for (auto const& itr : m_RangeMap)
 183                 {
 184                     aRangeMap.insert(std::pair<OUString, ScRangeName*>(itr.first, itr.second.get()));
 185                 }
 186                 pResult = VclPtr<ScNameDefDlg>::Create( pB, pCW, pParent, &GetViewData(), aRangeMap,
 187                                 ScAddress( GetViewData().GetCurX(),
 188                                             GetViewData().GetCurY(),
 189                                             GetViewData().GetTabNo() ), false );
 190             }
 191         }
 192         break;
 193
 194         case SID_DEFINE_COLROWNAMERANGES:
 195         {
 196             pResult = VclPtr<ScColRowNameRangesDlg>::Create( pB, pCW, pParent, &GetViewData() );
 197         }
 198         break;
 199
 200         case SID_OPENDLG_CONSOLIDATE:
 201         {
 202             SfxItemSet aArgSet( GetPool(),
 203                                 SCITEM_CONSOLIDATEDATA,
 204                                 SCITEM_CONSOLIDATEDATA );
 205
 206             const ScConsolidateParam* pDlgData =
 207                             pDoc->GetConsolidateDlgData();
 208
 209             if ( !pDlgData )
 210             {
 211                 ScConsolidateParam  aConsParam;
 212                 SCCOL nStartCol, nEndCol;
 213                 SCROW nStartRow, nEndRow;
 214                 SCTAB nStartTab, nEndTab;
 215
 216                 GetViewData().GetSimpleArea( nStartCol, nStartRow, nStartTab,
 217                                               nEndCol,   nEndRow,   nEndTab );
 218
 219                 PutInOrder( nStartCol, nEndCol );
 220                 PutInOrder( nStartRow, nEndRow );
 221                 PutInOrder( nStartTab, nEndTab );
 222
 223                 aConsParam.nCol = nStartCol;
 224                 aConsParam.nRow = nStartRow;
 225                 aConsParam.nTab = nStartTab;
 226
 227                 aArgSet.Put( ScConsolidateItem( SCITEM_CONSOLIDATEDATA,
 228                                                 &aConsParam ) );
 229             }
 230             else
 231             {
 232                 aArgSet.Put( ScConsolidateItem( SCITEM_CONSOLIDATEDATA, pDlgData ) );
 233             }
 234             pResult = VclPtr<ScConsolidateDlg>::Create( pB, pCW, pParent, aArgSet );
 235         }
 236         break;
 237
 238         case SID_DEFINE_DBNAME:
 239         {
 240             // when called for an existing range, then mark
 241             GetDBData( true, SC_DB_OLD );
 242             const ScMarkData& rMark = GetViewData().GetMarkData();
 243             if ( !rMark.IsMarked() && !rMark.IsMultiMarked() )
 244                 MarkDataArea( false );
 245
 246             pResult = VclPtr<ScDbNameDlg>::Create( pB, pCW, pParent, &GetViewData() );
 247         }
 248         break;
 249
 250         case SID_SPECIAL_FILTER:
 251         {
 252             ScQueryParam    aQueryParam;
 253             SfxItemSet      aArgSet( GetPool(),
 254                                      SCITEM_QUERYDATA,
 255                                      SCITEM_QUERYDATA );
 256
 257             ScDBData* pDBData = GetDBData(false, SC_DB_MAKE, SC_DBSEL_ROW_DOWN);
 258             pDBData->ExtendDataArea(pDoc);
 259             pDBData->GetQueryParam( aQueryParam );
 260
 261             ScRange aArea;
 262             pDBData->GetArea(aArea);
 263             MarkRange(aArea, false);
 264
 265             ScQueryItem aItem( SCITEM_QUERYDATA, &GetViewData(), &aQueryParam );
 266             ScRange aAdvSource;
 267             if (pDBData->GetAdvancedQuerySource(aAdvSource))
 268                 aItem.SetAdvancedQuerySource( &aAdvSource );
 269
 270             aArgSet.Put( aItem );
 271
 272             // mark current sheet (due to RefInput in dialog)
 273             GetViewData().SetRefTabNo( GetViewData().GetTabNo() );
 274
 275             pResult = VclPtr<ScSpecialFilterDlg>::Create( pB, pCW, pParent, aArgSet );
 276         }
 277         break;
 278
 279         case SID_FILTER:
 280         {
 281
 282             ScQueryParam    aQueryParam;
 283             SfxItemSet      aArgSet( GetPool(),
 284                                      SCITEM_QUERYDATA,
 285                                      SCITEM_QUERYDATA );
 286
 287             ScDBData* pDBData = GetDBData(false, SC_DB_MAKE, SC_DBSEL_ROW_DOWN);
 288             pDBData->ExtendDataArea(pDoc);
 289             pDBData->GetQueryParam( aQueryParam );
 290
 291             ScRange aArea;
 292             pDBData->GetArea(aArea);
 293             MarkRange(aArea, false);
 294
 295             aArgSet.Put( ScQueryItem( SCITEM_QUERYDATA,
 296                                       &GetViewData(),
 297                                       &aQueryParam ) );
 298
 299             // mark current sheet (due to RefInput in dialog)
 300             GetViewData().SetRefTabNo( GetViewData().GetTabNo() );
 301
 302             pResult = VclPtr<ScFilterDlg>::Create( pB, pCW, pParent, aArgSet );
 303         }
 304         break;
 305
 306         case SID_OPENDLG_TABOP:
 307         {
 308             ScViewData&   rViewData  = GetViewData();
 309             ScRefAddress  aCurPos   ( rViewData.GetCurX(),
 310                                       rViewData.GetCurY(),
 311                                       rViewData.GetTabNo(),
 312                                       false, false, false );
 313
 314             pResult = VclPtr<ScTabOpDlg>::Create( pB, pCW, pParent, rViewData.GetDocument(), aCurPos );
 315         }
 316         break;
 317
 318         case SID_OPENDLG_SOLVE:
 319         {
 320             ScViewData& rViewData = GetViewData();
 321             ScAddress   aCurPos( rViewData.GetCurX(),
 322                                  rViewData.GetCurY(),
 323                                  rViewData.GetTabNo());
 324             pResult = VclPtr<ScSolverDlg>::Create( pB, pCW, pParent, rViewData.GetDocument(), aCurPos );
 325         }
 326         break;
 327
 328         case SID_RANDOM_NUMBER_GENERATOR_DIALOG:
 329         {
 330             pResult = VclPtr<ScRandomNumberGeneratorDialog>::Create( pB, pCW, pParent, &GetViewData() );
 331         }
 332         break;
 333
 334         case SID_SAMPLING_DIALOG:
 335         {
 336             pResult = VclPtr<ScSamplingDialog>::Create( pB, pCW, pParent, &GetViewData() );
 337         }
 338         break;
 339
 340         case SID_DESCRIPTIVE_STATISTICS_DIALOG:
 341         {
 342             pResult = VclPtr<ScDescriptiveStatisticsDialog>::Create( pB, pCW, pParent, &GetViewData() );
 343         }
 344         break;
 345
 346         case SID_ANALYSIS_OF_VARIANCE_DIALOG:
 347         {
 348             pResult = VclPtr<ScAnalysisOfVarianceDialog>::Create( pB, pCW, pParent, &GetViewData() );
 349         }
 350         break;
 351
 352         case SID_CORRELATION_DIALOG:
 353         {
 354             pResult = VclPtr<ScCorrelationDialog>::Create( pB, pCW, pParent, &GetViewData() );
 355         }
 356         break;
 357
 358         case SID_COVARIANCE_DIALOG:
 359         {
 360             pResult = VclPtr<ScCovarianceDialog>::Create( pB, pCW, pParent, &GetViewData() );
 361         }
 362         break;
 363
 364         case SID_EXPONENTIAL_SMOOTHING_DIALOG:
 365         {
 366             pResult = VclPtr<ScExponentialSmoothingDialog>::Create( pB, pCW, pParent, &GetViewData() );
 367         }
 368         break;
 369
 370         case SID_MOVING_AVERAGE_DIALOG:
 371         {
 372             pResult = VclPtr<ScMovingAverageDialog>::Create( pB, pCW, pParent, &GetViewData() );
 373         }
 374         break;
 375
 376         case SID_REGRESSION_DIALOG:
 377         {
 378             pResult = VclPtr<ScRegressionDialog>::Create( pB, pCW, pParent, &GetViewData() );
 379         }
 380         break;
 381
 382         case SID_TTEST_DIALOG:
 383         {
 384             pResult = VclPtr<ScTTestDialog>::Create( pB, pCW, pParent, &GetViewData() );
 385         }
 386         break;
 387
 388         case SID_FTEST_DIALOG:
 389         {
 390             pResult = VclPtr<ScFTestDialog>::Create( pB, pCW, pParent, &GetViewData() );
 391         }
 392         break;
 393
 394         case SID_ZTEST_DIALOG:
 395         {
 396             pResult = VclPtr<ScZTestDialog>::Create( pB, pCW, pParent, &GetViewData() );
 397         }
 398         break;
 399
 400         case SID_CHI_SQUARE_TEST_DIALOG:
 401         {
 402             pResult = VclPtr<ScChiSquareTestDialog>::Create( pB, pCW, pParent, &GetViewData() );
 403         }
 404         break;
 405
 406         case SID_OPENDLG_OPTSOLVER:
 407         {
 408             ScViewData& rViewData = GetViewData();
 409             ScAddress aCurPos( rViewData.GetCurX(), rViewData.GetCurY(), rViewData.GetTabNo());
 410             pResult = VclPtr<ScOptSolverDlg>::Create( pB, pCW, pParent, rViewData.GetDocShell(), aCurPos );
 411         }
 412         break;
 413
 414         case SID_OPENDLG_PIVOTTABLE:
 415         {
 416             // all settings must be in pDialogDPObject
 417
 418             if( pDialogDPObject )
 419             {
 420                 // Check for an existing datapilot output.
 421                 ScViewData& rViewData = GetViewData();
 422                 rViewData.SetRefTabNo( rViewData.GetTabNo() );
 423                 ScDPObject* pObj = pDoc->GetDPAtCursor(rViewData.GetCurX(), rViewData.GetCurY(), rViewData.GetTabNo());
 424                 pResult = VclPtr<ScPivotLayoutDialog>::Create(pB, pCW, pParent, &rViewData, pDialogDPObject, pObj == nullptr);
 425             }
 426         }
 427         break;
 428
 429         case SID_OPENDLG_EDIT_PRINTAREA:
 430         {
 431             pResult = VclPtr<ScPrintAreasDlg>::Create( pB, pCW, pParent );
 432         }
 433         break;
 434
 435         case SID_OPENDLG_FUNCTION:
 436         {
 437             // dialog checks, what is in the cell
 438
 439             pResult = VclPtr<ScFormulaDlg>::Create( pB, pCW, pParent, &GetViewData(),ScGlobal::GetStarCalcFunctionMgr() );
 440         }
 441         break;
 442
 443         case SID_MANAGE_XML_SOURCE:
 444         {
 445 #if ENABLE_ORCUS
 446             pResult = VclPtr<ScXMLSourceDlg>::Create(pB, pCW, pParent, pDoc);
 447 #endif
 448         }
 449         break;
 450
 451         case FID_CHG_SHOW:
 452         {
 453             // dialog checks, what is in the cell
 454
 455             pResult = VclPtr<ScHighlightChgDlg>::Create( pB, pCW, pParent, &GetViewData() );
 456         }
 457         break;
 458
 459         case WID_SIMPLE_REF:
 460         {
 461             // dialog checks, what is in the cell
 462
 463             ScViewData& rViewData = GetViewData();
 464             rViewData.SetRefTabNo( rViewData.GetTabNo() );
 465             pResult = VclPtr<ScSimpleRefDlg>::Create( pB, pCW, pParent );
 466         }
 467         break;
 468
 469         case WID_CONDFRMT_REF:
 470         {
 471             bool        bFound      = false;
 472             const ScCondFormatDlgItem* pDlgItem = nullptr;
 473             // Get the pool item stored by Conditional Format Manager Dialog.
 474             const SfxPoolItem* pItem = nullptr;
 475             sal_uInt32 nItems(GetPool().GetItemCount2( SCITEM_CONDFORMATDLGDATA ));
 476             for( sal_uInt32 nIter = 0; nIter < nItems; ++nIter )
 477             {
 478                 if( nullptr != (pItem = GetPool().GetItem2( SCITEM_CONDFORMATDLGDATA, nIter ) ) )
 479                 {
 480                     pDlgItem = static_cast<const ScCondFormatDlgItem*>(pItem);
 481                     bFound = true;
 482                     break;
 483                 }
 484             }
 485
 486             ScViewData& rViewData = GetViewData();
 487             rViewData.SetRefTabNo( rViewData.GetTabNo() );
 488
 489             pResult = VclPtr<ScCondFormatDlg>::Create( pB, pCW, pParent, &rViewData, pDlgItem );
 490
 491             // Remove the pool item stored by Conditional Format Manager Dialog.
 492             if ( bFound && pItem )
 493                 GetPool().Remove( *pItem );
 494         }
 495         break;
 496     }
 497
 498     if (pResult)
 499     {
 500         // the dialogs are always displayed with the option button collapsed,
 501         // the size has to be carried over initialize
 502         // (or store the option status !!!)
 503
 504         Size aSize = pResult->GetSizePixel();
 505         pResult->Initialize( pInfo );
 506         pResult->SetSizePixel(aSize);
 507     }
 508
 509     return pResult;
 510 }
 511
 512 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */