sc/source/ui/view/tabvwsha.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 "scitems.hxx"
  21 #include <svl/stritem.hxx>
  22 #include <svl/whiter.hxx>
  23 #include <svl/zformat.hxx>
  24 #include <editeng/boxitem.hxx>
  25 #include <svx/numinf.hxx>
  26 #include <svl/srchitem.hxx>
  27 #include <svx/zoomslideritem.hxx>
  28 #include <sfx2/bindings.hxx>
  29 #include <sfx2/viewfrm.hxx>
  30 #include <sfx2/dispatch.hxx>
  31 #include <sfx2/request.hxx>
  32 #include <vcl/msgbox.hxx>
  33
  34 #include "global.hxx"
  35 #include "attrib.hxx"
  36 #include "patattr.hxx"
  37 #include "document.hxx"
  38 #include "formulacell.hxx"             // Input Status Edit-Zellen
  39 #include "globstr.hrc"
  40 #include "scmod.hxx"
  41 #include "inputhdl.hxx"
  42 #include "inputwin.hxx"
  43 #include "docsh.hxx"
  44 #include "viewdata.hxx"
  45 #include "appoptio.hxx"
  46 #include "sc.hrc"
  47 #include "stlpool.hxx"
  48 #include "tabvwsh.hxx"
  49 #include "dwfunctr.hxx"
  50 #include "scabstdlg.hxx"
  51 #include "compiler.hxx"
  52 #include "markdata.hxx"
  53 #include "cellvalue.hxx"
  54 #include "tokenarray.hxx"
  55
  56 sal_Bool ScTabViewShell::GetFunction( String& rFuncStr, sal_uInt16 nErrCode )
  57 {
  58     String aStr;
  59
  60     ScSubTotalFunc eFunc = (ScSubTotalFunc) SC_MOD()->GetAppOptions().GetStatusFunc();
  61     ScViewData* pViewData   = GetViewData();
  62     ScMarkData& rMark       = pViewData->GetMarkData();
  63     bool bIgnoreError = (rMark.IsMarked() || rMark.IsMultiMarked());
  64
  65     if (bIgnoreError && (eFunc == SUBTOTAL_FUNC_CNT || eFunc == SUBTOTAL_FUNC_CNT2))
  66         nErrCode = 0;
  67
  68     if (nErrCode)
  69     {
  70         rFuncStr = ScGlobal::GetLongErrorString(nErrCode);
  71         return true;
  72     }
  73
  74     sal_uInt16 nGlobStrId = 0;
  75     switch (eFunc)
  76     {
  77         case SUBTOTAL_FUNC_AVE:  nGlobStrId = STR_FUN_TEXT_AVG; break;
  78         case SUBTOTAL_FUNC_CNT:  nGlobStrId = STR_FUN_TEXT_COUNT; break;
  79         case SUBTOTAL_FUNC_CNT2: nGlobStrId = STR_FUN_TEXT_COUNT2; break;
  80         case SUBTOTAL_FUNC_MAX:  nGlobStrId = STR_FUN_TEXT_MAX; break;
  81         case SUBTOTAL_FUNC_MIN:  nGlobStrId = STR_FUN_TEXT_MIN; break;
  82         case SUBTOTAL_FUNC_SUM:  nGlobStrId = STR_FUN_TEXT_SUM; break;
  83         case SUBTOTAL_FUNC_SELECTION_COUNT: nGlobStrId = STR_FUN_TEXT_SELECTION_COUNT; break;
  84
  85         default:
  86         {
  87             // added to avoid warnings
  88         }
  89     }
  90     if (nGlobStrId)
  91     {
  92         ScDocument* pDoc        = pViewData->GetDocument();
  93         SCCOL       nPosX       = pViewData->GetCurX();
  94         SCROW       nPosY       = pViewData->GetCurY();
  95         SCTAB       nTab        = pViewData->GetTabNo();
  96
  97         aStr = ScGlobal::GetRscString(nGlobStrId);
  98         aStr += '=';
  99
 100         ScAddress aCursor( nPosX, nPosY, nTab );
 101         double nVal;
 102         if ( pDoc->GetSelectionFunction( eFunc, aCursor, rMark, nVal ) )
 103         {
 104             if ( nVal == 0.0 )
 105                 aStr += '0';
 106             else
 107             {
 108                 // Number in the standard format, the other on the cursor position
 109                 SvNumberFormatter* pFormatter = pDoc->GetFormatTable();
 110                 sal_uInt32 nNumFmt = 0;
 111                 if ( eFunc != SUBTOTAL_FUNC_CNT && eFunc != SUBTOTAL_FUNC_CNT2 && eFunc != SUBTOTAL_FUNC_SELECTION_COUNT)
 112                 {
 113                     //  Zahlformat aus Attributen oder Formel
 114                     pDoc->GetNumberFormat( nPosX, nPosY, nTab, nNumFmt );
 115                 }
 116
 117                 String aValStr;
 118                 Color* pDummy;
 119                 pFormatter->GetOutputString( nVal, nNumFmt, aValStr, &pDummy );
 120                 aStr += aValStr;
 121             }
 122         }
 123
 124         rFuncStr = aStr;
 125         return sal_True;
 126     }
 127
 128     return false;
 129 }
 130
 131
 132
 133 //  Functions that are disabled, depending on the selection
 134 //  Default:
 135 //      SID_DELETE,
 136 //      SID_DELETE_CONTENTS,
 137 //      FID_DELETE_CELL
 138 //      FID_VALIDATION
 139
 140
 141 void ScTabViewShell::GetState( SfxItemSet& rSet )
 142 {
 143     ScViewData* pViewData   = GetViewData();
 144     ScDocument* pDoc        = pViewData->GetDocument();
 145     ScDocShell* pDocShell   = pViewData->GetDocShell();
 146     ScMarkData& rMark       = pViewData->GetMarkData();
 147     SCCOL       nPosX       = pViewData->GetCurX();
 148     SCROW       nPosY       = pViewData->GetCurY();
 149     SCTAB       nTab        = pViewData->GetTabNo();
 150     sal_uInt16      nMyId       = 0;
 151
 152     SfxViewFrame* pThisFrame = GetViewFrame();
 153     sal_Bool bOle = GetViewFrame()->GetFrame().IsInPlace();
 154
 155     SCTAB nTabCount = pDoc->GetTableCount();
 156     SCTAB nTabSelCount = rMark.GetSelectCount();
 157
 158     SfxWhichIter    aIter(rSet);
 159     sal_uInt16          nWhich = aIter.FirstWhich();
 160
 161     while ( nWhich )
 162     {
 163         switch ( nWhich )
 164         {
 165             case FID_CHG_COMMENT:
 166                 {
 167                     ScDocShell* pDocSh = GetViewData()->GetDocShell();
 168                     ScAddress aPos( nPosX, nPosY, nTab );
 169                     if ( pDocSh->IsReadOnly() || !pDocSh->GetChangeAction(aPos) || pDocSh->IsDocShared() )
 170                         rSet.DisableItem( nWhich );
 171                 }
 172                 break;
 173
 174             case SID_OPENDLG_EDIT_PRINTAREA:
 175             case SID_ADD_PRINTAREA:
 176             case SID_DEFINE_PRINTAREA:
 177                 {
 178                     if ( pDocShell && pDocShell->IsDocShared() )
 179                     {
 180                         rSet.DisableItem( nWhich );
 181                     }
 182                 }
 183                 break;
 184
 185             case SID_DELETE_PRINTAREA:
 186                 if ( nTabSelCount > 1 )
 187                 {
 188                     // #i22589# also take "Print Entire Sheet" into account here
 189                     sal_Bool bHas = false;
 190                     for (SCTAB i=0; !bHas && i<nTabCount; i++)
 191                         bHas = rMark.GetTableSelect(i) && (pDoc->GetPrintRangeCount(i) || pDoc->IsPrintEntireSheet(i));
 192                     if (!bHas)
 193                         rSet.DisableItem( nWhich );
 194                 }
 195                 else if ( !pDoc->GetPrintRangeCount( nTab ) && !pDoc->IsPrintEntireSheet( nTab ) )
 196                     rSet.DisableItem( nWhich );
 197                 if ( pDocShell && pDocShell->IsDocShared() )
 198                 {
 199                     rSet.DisableItem( nWhich );
 200                 }
 201                 break;
 202
 203             case SID_STATUS_PAGESTYLE:
 204             case SID_HFEDIT:
 205                 GetViewData()->GetDocShell()->GetStatePageStyle( *this, rSet, nTab );
 206                 break;
 207
 208             case SID_SEARCH_ITEM:
 209             {
 210                 SvxSearchItem aItem(ScGlobal::GetSearchItem()); // make a copy.
 211                 // Search on current selection if a range is marked.
 212                 aItem.SetSelection(rMark.IsMarked());
 213                 rSet.Put(aItem);
 214                 break;
 215             }
 216
 217             case SID_SEARCH_OPTIONS:
 218                 {
 219                     // Anything goes
 220                     sal_uInt16 nOptions = 0xffff;
 221
 222                     // No replacement if ReadOnly
 223                     if (GetViewData()->GetDocShell()->IsReadOnly())
 224                         nOptions &= ~( SEARCH_OPTIONS_REPLACE | SEARCH_OPTIONS_REPLACE_ALL );
 225                     rSet.Put( SfxUInt16Item( nWhich, nOptions ) );
 226                 }
 227                 break;
 228
 229             case SID_CURRENTCELL:
 230                 {
 231                     ScAddress aScAddress( GetViewData()->GetCurX(), GetViewData()->GetCurY(), 0 );
 232                     String  aAddr;
 233                     aScAddress.Format( aAddr, SCA_ABS, NULL, pDoc->GetAddressConvention() );
 234                     SfxStringItem   aPosItem( SID_CURRENTCELL, aAddr );
 235
 236                     rSet.Put( aPosItem );
 237                 }
 238                 break;
 239
 240             case SID_CURRENTTAB:
 241                 // Table for Basic is 1-based
 242                 rSet.Put( SfxUInt16Item( nWhich, static_cast<sal_uInt16>(GetViewData()->GetTabNo()) + 1 ) );
 243                 break;
 244
 245             case SID_CURRENTDOC:
 246                 rSet.Put( SfxStringItem( nWhich, GetViewData()->GetDocShell()->GetTitle() ) );
 247                 break;
 248
 249             case FID_TOGGLEINPUTLINE:
 250                 {
 251                     sal_uInt16 nId = ScInputWindowWrapper::GetChildWindowId();
 252
 253                     if ( pThisFrame->KnowsChildWindow( nId ) )
 254                     {
 255                         SfxChildWindow* pWnd = pThisFrame->GetChildWindow( nId );
 256                         rSet.Put( SfxBoolItem( nWhich, pWnd ? sal_True : false ) );
 257                     }
 258                     else
 259                         rSet.DisableItem( nWhich );
 260                 }
 261                 break;
 262
 263             case FID_DEL_MANUALBREAKS:
 264                 if (!pDoc->HasManualBreaks(nTab))
 265                     rSet.DisableItem( nWhich );
 266                 break;
 267
 268             case FID_RESET_PRINTZOOM:
 269                 {
 270                     // disable if already set to default
 271
 272                     String aStyleName = pDoc->GetPageStyle( nTab );
 273                     ScStyleSheetPool* pStylePool = pDoc->GetStyleSheetPool();
 274                     SfxStyleSheetBase* pStyleSheet = pStylePool->Find( aStyleName,
 275                                                     SFX_STYLE_FAMILY_PAGE );
 276                     OSL_ENSURE( pStyleSheet, "PageStyle not found" );
 277                     if ( pStyleSheet )
 278                     {
 279                         SfxItemSet& rStyleSet = pStyleSheet->GetItemSet();
 280                         sal_uInt16 nScale = ((const SfxUInt16Item&)
 281                                             rStyleSet.Get(ATTR_PAGE_SCALE)).GetValue();
 282                         sal_uInt16 nPages = ((const SfxUInt16Item&)
 283                                             rStyleSet.Get(ATTR_PAGE_SCALETOPAGES)).GetValue();
 284                         if ( nScale == 100 && nPages == 0 )
 285                             rSet.DisableItem( nWhich );
 286                     }
 287                 }
 288                 break;
 289
 290             case FID_SCALE:
 291             case SID_ATTR_ZOOM:
 292                 if ( bOle )
 293                     rSet.DisableItem( nWhich );
 294                 else
 295                 {
 296                     const Fraction& rOldY = GetViewData()->GetZoomY();
 297                     sal_uInt16 nZoom = (sal_uInt16)(( rOldY.GetNumerator() * 100 )
 298                                                 / rOldY.GetDenominator());
 299                     rSet.Put( SvxZoomItem( SVX_ZOOM_PERCENT, nZoom, nWhich ) );
 300                 }
 301                 break;
 302
 303             case SID_ATTR_ZOOMSLIDER:
 304                 {
 305                     if ( bOle )
 306                         rSet.DisableItem( nWhich );
 307                     else
 308                     {
 309                         const Fraction& rOldY = GetViewData()->GetZoomY();
 310                         sal_uInt16 nCurrentZoom = (sal_uInt16)(( rOldY.GetNumerator() * 100 ) / rOldY.GetDenominator());
 311
 312                         if( nCurrentZoom )
 313                         {
 314                             SvxZoomSliderItem aZoomSliderItem( nCurrentZoom, MINZOOM, MAXZOOM, SID_ATTR_ZOOMSLIDER );
 315                             aZoomSliderItem.AddSnappingPoint( 100 );
 316                             rSet.Put( aZoomSliderItem );
 317                         }
 318                     }
 319                 }
 320                 break;
 321
 322             case FID_TOGGLESYNTAX:
 323                 rSet.Put(SfxBoolItem(nWhich, GetViewData()->IsSyntaxMode()));
 324                 break;
 325
 326             case FID_TOGGLEHEADERS:
 327                 rSet.Put(SfxBoolItem(nWhich, GetViewData()->IsHeaderMode()));
 328                 break;
 329
 330             case FID_TOGGLEFORMULA:
 331                 {
 332                     const ScViewOptions& rOpts = pViewData->GetOptions();
 333                     sal_Bool bFormulaMode = rOpts.GetOption( VOPT_FORMULAS );
 334                     rSet.Put(SfxBoolItem(nWhich, bFormulaMode ));
 335                 }
 336                 break;
 337
 338             case FID_NORMALVIEWMODE:
 339             case FID_PAGEBREAKMODE:
 340                 // always handle both slots - they exclude each other
 341                 if ( bOle )
 342                 {
 343                     rSet.DisableItem( FID_NORMALVIEWMODE );
 344                     rSet.DisableItem( FID_PAGEBREAKMODE );
 345                 }
 346                 else
 347                 {
 348                     rSet.Put(SfxBoolItem(FID_NORMALVIEWMODE, !GetViewData()->IsPagebreakMode()));
 349                     rSet.Put(SfxBoolItem(FID_PAGEBREAKMODE, GetViewData()->IsPagebreakMode()));
 350                 }
 351                 break;
 352
 353             case FID_FUNCTION_BOX:
 354                 nMyId = ScFunctionChildWindow::GetChildWindowId();
 355                 rSet.Put(SfxBoolItem(FID_FUNCTION_BOX, pThisFrame->HasChildWindow(nMyId)));
 356                 break;
 357
 358             case FID_PROTECT_DOC:
 359                 {
 360                     if ( pDocShell && pDocShell->IsDocShared() )
 361                     {
 362                         rSet.DisableItem( nWhich );
 363                     }
 364                     else
 365                     {
 366                         rSet.Put( SfxBoolItem( nWhich, pDoc->IsDocProtected() ) );
 367                     }
 368                 }
 369                 break;
 370
 371             case FID_PROTECT_TABLE:
 372                 {
 373                     if ( pDocShell && pDocShell->IsDocShared() )
 374                     {
 375                         rSet.DisableItem( nWhich );
 376                     }
 377                     else
 378                     {
 379                         rSet.Put( SfxBoolItem( nWhich, pDoc->IsTabProtected( nTab ) ) );
 380                     }
 381                 }
 382                 break;
 383
 384             case SID_AUTO_OUTLINE:
 385                 {
 386                     if (pDoc->GetChangeTrack()!=NULL || GetViewData()->IsMultiMarked())
 387                     {
 388                         rSet.DisableItem( nWhich );
 389                     }
 390                 }
 391                 break;
 392
 393             case SID_OUTLINE_DELETEALL:
 394                 {
 395                     SCTAB nOlTab = GetViewData()->GetTabNo();
 396                     ScOutlineTable* pOlTable = pDoc->GetOutlineTable( nOlTab );
 397                     if (pOlTable == NULL)
 398                         rSet.DisableItem( nWhich );
 399                 }
 400                 break;
 401
 402             case SID_WINDOW_SPLIT:
 403                 rSet.Put(SfxBoolItem(nWhich,
 404                             pViewData->GetHSplitMode() == SC_SPLIT_NORMAL ||
 405                             pViewData->GetVSplitMode() == SC_SPLIT_NORMAL ));
 406                 break;
 407
 408             case SID_WINDOW_FIX:
 409                 rSet.Put(SfxBoolItem(nWhich,
 410                             pViewData->GetHSplitMode() == SC_SPLIT_FIX ||
 411                             pViewData->GetVSplitMode() == SC_SPLIT_FIX ));
 412                 break;
 413
 414             case FID_CHG_SHOW:
 415                 {
 416                     if ( pDoc->GetChangeTrack() == NULL || ( pDocShell && pDocShell->IsDocShared() ) )
 417                         rSet.DisableItem( nWhich );
 418                 }
 419                 break;
 420             case FID_CHG_ACCEPT:
 421                 {
 422                     rSet.Put(SfxBoolItem(FID_CHG_ACCEPT,
 423                             pThisFrame->HasChildWindow(FID_CHG_ACCEPT)));
 424                     if(pDoc->GetChangeTrack()==NULL)
 425                     {
 426                         if ( !pThisFrame->HasChildWindow(FID_CHG_ACCEPT) )
 427                         {
 428                             rSet.DisableItem( nWhich);
 429                         }
 430                     }
 431                     if ( pDocShell && pDocShell->IsDocShared() )
 432                     {
 433                         rSet.DisableItem( nWhich );
 434                     }
 435                 }
 436                 break;
 437
 438             case SID_FORMATPAGE:
 439                 // in protected tables
 440                 if ( pDocShell && ( pDocShell->IsReadOnly() || pDocShell->IsDocShared() ) )
 441                     rSet.DisableItem( nWhich );
 442                 break;
 443
 444             case SID_PRINTPREVIEW:
 445                 // Toggle slot needs a State
 446                 rSet.Put( SfxBoolItem( nWhich, false ) );
 447                 break;
 448
 449             case SID_READONLY_MODE:
 450                 rSet.Put( SfxBoolItem( nWhich, GetViewData()->GetDocShell()->IsReadOnly() ) );
 451                 break;
 452
 453             case FID_TAB_DESELECTALL:
 454                 if ( nTabSelCount == 1 )
 455                     rSet.DisableItem( nWhich );     // enabled only if several sheets are selected
 456                 break;
 457
 458         } // switch ( nWitch )
 459         nWhich = aIter.NextWhich();
 460     } // while ( nWitch )
 461 }
 462
 463 //------------------------------------------------------------------
 464 void ScTabViewShell::ExecuteCellFormatDlg(SfxRequest& rReq, const OString &rName)
 465 {
 466     SfxAbstractTabDialog * pDlg = NULL;
 467     ScDocument*             pDoc    = GetViewData()->GetDocument();
 468
 469     SvxBoxItem              aLineOuter( ATTR_BORDER );
 470     SvxBoxInfoItem          aLineInner( ATTR_BORDER_INNER );
 471
 472     SvxNumberInfoItem*      pNumberInfoItem = NULL;
 473     const ScPatternAttr*    pOldAttrs       = GetSelectionPattern();
 474     SfxItemSet*             pOldSet         = new SfxItemSet(
 475                                                     pOldAttrs->GetItemSet() );
 476
 477
 478     // Get border items and put them in the set:
 479     GetSelectionFrame( aLineOuter, aLineInner );
 480     //Fix border incorrect for RTL fdo#62399
 481     if( pDoc->IsLayoutRTL( GetViewData()->GetTabNo() ) )
 482     {
 483         SvxBoxItem     aNewFrame( aLineOuter );
 484         SvxBoxInfoItem aTempInfo( aLineInner );
 485
 486         if ( aLineInner.IsValid(VALID_LEFT) )
 487             aNewFrame.SetLine( aLineOuter.GetLeft(), BOX_LINE_RIGHT );
 488         if ( aLineInner.IsValid(VALID_RIGHT) )
 489             aNewFrame.SetLine( aLineOuter.GetRight(), BOX_LINE_LEFT );
 490
 491         aLineInner.SetValid( VALID_LEFT, aTempInfo.IsValid(VALID_RIGHT));
 492         aLineInner.SetValid( VALID_RIGHT, aTempInfo.IsValid(VALID_LEFT));
 493
 494         pOldSet->Put( aNewFrame );
 495     }
 496     else
 497         pOldSet->Put( aLineOuter );
 498
 499     pOldSet->Put( aLineInner );
 500
 501     // Generate NumberFormat Value from Value and Language and box it.
 502     pOldSet->Put( SfxUInt32Item( ATTR_VALUE_FORMAT,
 503         pOldAttrs->GetNumberFormat( pDoc->GetFormatTable() ) ) );
 504
 505     MakeNumberInfoItem( pDoc, GetViewData(), &pNumberInfoItem );
 506
 507     pOldSet->MergeRange( SID_ATTR_NUMBERFORMAT_INFO, SID_ATTR_NUMBERFORMAT_INFO );
 508     pOldSet->Put(*pNumberInfoItem );
 509
 510     bInFormatDialog = true;
 511     ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
 512     OSL_ENSURE(pFact, "ScAbstractFactory create fail!");
 513
 514     pDlg = pFact->CreateScAttrDlg(GetViewFrame(), GetDialogParent(), pOldSet);
 515     OSL_ENSURE(pDlg, "Dialog create fail!");
 516     if (!rName.isEmpty())
 517         pDlg->SetCurPageId(rName);
 518     short nResult = pDlg->Execute();
 519     bInFormatDialog = false;
 520
 521     if ( nResult == RET_OK )
 522     {
 523         const SfxItemSet* pOutSet = pDlg->GetOutputItemSet();
 524
 525         const SfxPoolItem* pItem=NULL;
 526         if(pOutSet->GetItemState(SID_ATTR_NUMBERFORMAT_INFO,sal_True,&pItem)==SFX_ITEM_SET)
 527         {
 528
 529             UpdateNumberFormatter((const SvxNumberInfoItem&)*pItem);
 530         }
 531
 532         ApplyAttributes( pOutSet, pOldSet );
 533
 534         rReq.Done( *pOutSet );
 535     }
 536     delete pOldSet;
 537     delete pNumberInfoItem;
 538     delete pDlg;
 539 }
 540
 541 //------------------------------------------------------------------
 542
 543 bool ScTabViewShell::IsRefInputMode() const
 544 {
 545     ScModule* pScMod = SC_MOD();
 546     if ( pScMod )
 547     {
 548         if( pScMod->IsRefDialogOpen() )
 549             return pScMod->IsFormulaMode();
 550         if( pScMod->IsFormulaMode() )
 551         {
 552             ScInputHandler* pHdl = pScMod->GetInputHdl();
 553             if ( pHdl )
 554             {
 555                 String aString = pHdl->GetEditString();
 556                 if ( !pHdl->GetSelIsRef() && aString.Len() > 1 &&
 557                      ( aString.GetChar(0) == '+' || aString.GetChar(0) == '-' ) )
 558                 {
 559                     const ScViewData* pViewData = GetViewData();
 560                     if ( pViewData )
 561                     {
 562                         ScDocument* pDoc = pViewData->GetDocument();
 563                         if ( pDoc )
 564                         {
 565                             const ScAddress aPos( pViewData->GetCurPos() );
 566                             ScCompiler aComp( pDoc, aPos );
 567                             aComp.SetGrammar(pDoc->GetGrammar());
 568                             aComp.SetCloseBrackets( false );
 569                             ScTokenArray* pArr = aComp.CompileString( aString );
 570                             if ( pArr && pArr->MayReferenceFollow() )
 571                             {
 572                                 return true;
 573                             }
 574                         }
 575                     }
 576                 }
 577                 else
 578                 {
 579                     return true;
 580                 }
 581             }
 582         }
 583     }
 584
 585     return false;
 586 }
 587
 588 //------------------------------------------------------------------
 589
 590 void ScTabViewShell::ExecuteInputDirect()
 591 {
 592     if ( !IsRefInputMode() )
 593     {
 594         ScModule* pScMod = SC_MOD();
 595         if ( pScMod )
 596         {
 597             pScMod->InputEnterHandler();
 598         }
 599     }
 600 }
 601
 602 //------------------------------------------------------------------
 603
 604 void ScTabViewShell::UpdateInputHandler( sal_Bool bForce /* = sal_False */, sal_Bool bStopEditing /* = sal_True */ )
 605 {
 606     ScInputHandler* pHdl = pInputHandler ? pInputHandler : SC_MOD()->GetInputHdl();
 607
 608     if ( pHdl )
 609     {
 610         String                  aString;
 611         const EditTextObject*   pObject     = NULL;
 612         ScViewData*             pViewData   = GetViewData();
 613         ScDocument*             pDoc        = pViewData->GetDocument();
 614         CellType                eType;
 615         SCCOL                   nPosX       = pViewData->GetCurX();
 616         SCROW                   nPosY       = pViewData->GetCurY();
 617         SCTAB                   nTab        = pViewData->GetTabNo();
 618         SCTAB                   nStartTab   = 0;
 619         SCTAB                   nEndTab     = 0;
 620         SCCOL                   nStartCol   = 0;
 621         SCROW                   nStartRow   = 0;
 622         SCCOL                   nEndCol     = 0;
 623         SCROW                   nEndRow     = 0;
 624         ScAddress aPos = pViewData->GetCurPos();
 625
 626         pViewData->GetSimpleArea( nStartCol, nStartRow, nStartTab,
 627                                   nEndCol,   nEndRow,   nEndTab );
 628
 629         PutInOrder( nStartCol, nEndCol );
 630         PutInOrder( nStartRow, nEndRow );
 631         PutInOrder( nStartTab, nEndTab );
 632
 633         bool bHideFormula = false;
 634         bool bHideAll     = false;
 635
 636         if (pDoc->IsTabProtected(nTab))
 637         {
 638             const ScProtectionAttr* pProt = (const ScProtectionAttr*)
 639                                             pDoc->GetAttr( nPosX,nPosY,nTab,
 640                                                            ATTR_PROTECTION);
 641             bHideFormula = pProt->GetHideFormula();
 642             bHideAll     = pProt->GetHideCell();
 643         }
 644
 645         if (!bHideAll)
 646         {
 647             eType = pDoc->GetCellType(aPos);
 648             if (eType == CELLTYPE_FORMULA)
 649             {
 650                 if (!bHideFormula)
 651                     pDoc->GetFormula( nPosX, nPosY, nTab, aString );
 652             }
 653             else if (eType == CELLTYPE_EDIT)
 654             {
 655                 pObject = pDoc->GetEditText(aPos);
 656             }
 657             else
 658             {
 659                 pDoc->GetInputString( nPosX, nPosY, nTab, aString );
 660                 if (eType == CELLTYPE_STRING)
 661                 {
 662                     //  Bei Bedarf ein ' vorneweg, damit der String nicht ungewollt
 663                     //  als Zahl interpretiert wird, und um dem Benutzer zu zeigen,
 664                     //  dass es ein String ist (#35060#).
 665                     //! Auch bei Zahlformat "Text"? -> dann beim Editieren wegnehmen
 666
 667                     SvNumberFormatter* pFormatter = pDoc->GetFormatTable();
 668                     sal_uInt32 nNumFmt;
 669                     pDoc->GetNumberFormat( nPosX, nPosY, nTab, nNumFmt );
 670                     double fDummy;
 671                     if ( pFormatter->IsNumberFormat(aString, nNumFmt, fDummy) )
 672                         aString.Insert('\'',0);
 673                 }
 674             }
 675         }
 676
 677         ScInputHdlState aState( ScAddress( nPosX,     nPosY,     nTab ),
 678                                 ScAddress( nStartCol, nStartRow, nTab ),
 679                                 ScAddress( nEndCol,   nEndRow,   nTab ),
 680                                 aString,
 681                                 pObject );
 682
 683         //  if using the view's local input handler, this view can always be set
 684         //  as current view inside NotifyChange.
 685         ScTabViewShell* pSourceSh = pInputHandler ? this : NULL;
 686
 687         pHdl->NotifyChange( &aState, bForce, pSourceSh, bStopEditing );
 688     }
 689
 690     SfxBindings& rBindings = GetViewFrame()->GetBindings();
 691     rBindings.Invalidate( SID_STATUS_SUM );         // immer zusammen mit Eingabezeile
 692     rBindings.Invalidate( SID_ATTR_SIZE );
 693     rBindings.Invalidate( SID_TABLE_CELL );
 694 }
 695
 696 void ScTabViewShell::UpdateInputHandlerCellAdjust( SvxCellHorJustify eJust )
 697 {
 698     if( ScInputHandler* pHdl = pInputHandler ? pInputHandler : SC_MOD()->GetInputHdl() )
 699         pHdl->UpdateCellAdjust( eJust );
 700 }
 701
 702 //------------------------------------------------------------------
 703
 704 void ScTabViewShell::ExecuteSave( SfxRequest& rReq )
 705 {
 706     // only SID_SAVEDOC / SID_SAVEASDOC
 707
 708     // Finish entering in any case, even if a formula is being processed
 709     SC_MOD()->InputEnterHandler();
 710
 711     if ( GetViewData()->GetDocShell()->IsDocShared() )
 712     {
 713         GetViewData()->GetDocShell()->SetDocumentModified();
 714     }
 715
 716     // otherwise as normal
 717     GetViewData()->GetDocShell()->ExecuteSlot( rReq );
 718 }
 719
 720 void ScTabViewShell::GetSaveState( SfxItemSet& rSet )
 721 {
 722     SfxShell* pDocSh = GetViewData()->GetDocShell();
 723
 724     SfxWhichIter aIter(rSet);
 725     sal_uInt16 nWhich = aIter.FirstWhich();
 726     while( nWhich )
 727     {
 728         if ( nWhich != SID_SAVEDOC || !GetViewData()->GetDocShell()->IsDocShared() )
 729         {
 730             // get state from DocShell
 731             pDocSh->GetSlotState( nWhich, NULL, &rSet );
 732         }
 733         nWhich = aIter.NextWhich();
 734     }
 735 }
 736
 737 void ScTabViewShell::ExecDrawOpt( SfxRequest& rReq )
 738 {
 739     ScViewOptions aViewOptions = GetViewData()->GetOptions();
 740     ScGridOptions aGridOptions = aViewOptions.GetGridOptions();
 741
 742     SfxBindings& rBindings = GetViewFrame()->GetBindings();
 743     const SfxItemSet* pArgs = rReq.GetArgs();
 744     const SfxPoolItem* pItem;
 745     sal_uInt16 nSlotId = rReq.GetSlot();
 746     switch (nSlotId)
 747     {
 748         case SID_GRID_VISIBLE:
 749             if ( pArgs && pArgs->GetItemState(nSlotId,sal_True,&pItem) == SFX_ITEM_SET )
 750             {
 751                 aGridOptions.SetGridVisible( ((const SfxBoolItem*)pItem)->GetValue() );
 752                 aViewOptions.SetGridOptions(aGridOptions);
 753                 rBindings.Invalidate(SID_GRID_VISIBLE);
 754             }
 755             break;
 756
 757         case SID_GRID_USE:
 758             if ( pArgs && pArgs->GetItemState(nSlotId,sal_True,&pItem) == SFX_ITEM_SET )
 759             {
 760                 aGridOptions.SetUseGridSnap( ((const SfxBoolItem*)pItem)->GetValue() );
 761                 aViewOptions.SetGridOptions(aGridOptions);
 762                 rBindings.Invalidate(SID_GRID_USE);
 763             }
 764             break;
 765
 766         case SID_HELPLINES_MOVE:
 767             if ( pArgs && pArgs->GetItemState(nSlotId,sal_True,&pItem) == SFX_ITEM_SET )
 768             {
 769                 aViewOptions.SetOption( VOPT_HELPLINES, ((const SfxBoolItem*)pItem)->GetValue() );
 770                 rBindings.Invalidate(SID_HELPLINES_MOVE);
 771             }
 772             break;
 773     }
 774
 775     GetViewData()->SetOptions(aViewOptions);
 776 }
 777
 778 void ScTabViewShell::GetDrawOptState( SfxItemSet& rSet )
 779 {
 780     SfxBoolItem aBool;
 781
 782     const ScViewOptions& rViewOptions = GetViewData()->GetOptions();
 783     const ScGridOptions& rGridOptions = rViewOptions.GetGridOptions();
 784
 785     aBool.SetValue(rGridOptions.GetGridVisible());
 786     aBool.SetWhich( SID_GRID_VISIBLE );
 787     rSet.Put( aBool );
 788
 789     aBool.SetValue(rGridOptions.GetUseGridSnap());
 790     aBool.SetWhich( SID_GRID_USE );
 791     rSet.Put( aBool );
 792
 793     aBool.SetValue(rViewOptions.GetOption( VOPT_HELPLINES ));
 794     aBool.SetWhich( SID_HELPLINES_MOVE );
 795     rSet.Put( aBool );
 796 }
 797
 798
 799
 800
 801 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */