?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
merge the formfield patch from ooo-build
[ooovba.git] / sc / source / ui / docshell / docsh4.cxx
blobdbbaef061182f8ead621885df70703aa90e08f35
1 /*************************************************************************
2 *
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * Copyright 2008 by Sun Microsystems, Inc.
6 *
7 * OpenOffice.org - a multi-platform office productivity suite
8 *
9 * $RCSfile: docsh4.cxx,v $
10 * $Revision: 1.61.30.2 $
11 *
12 * This file is part of OpenOffice.org.
13 *
14 * OpenOffice.org is free software: you can redistribute it and/or modify
15 * it under the terms of the GNU Lesser General Public License version 3
16 * only, as published by the Free Software Foundation.
17 *
18 * OpenOffice.org is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU Lesser General Public License version 3 for more details
22 * (a copy is included in the LICENSE file that accompanied this code).
23 *
24 * You should have received a copy of the GNU Lesser General Public License
25 * version 3 along with OpenOffice.org. If not, see
26 * <http://www.openoffice.org/license.html>
27 * for a copy of the LGPLv3 License.
28 *
29 ************************************************************************/
30
31 // MARKER(update_precomp.py): autogen include statement, do not remove
32 #include "precompiled_sc.hxx"
33
34
35 #include <com/sun/star/embed/XEmbeddedObject.hpp>
36 #include <com/sun/star/frame/XComponentLoader.hpp>
37
38
39 using namespace ::com::sun::star;
40
41 // INCLUDE ---------------------------------------------------------------
42 #if STLPORT_VERSION>=321
43 #include <math.h> // prevent conflict between exception and std::exception
44 #endif
45
46 #include "scitems.hxx"
47 #include <sfx2/fcontnr.hxx>
48 #include <svx/eeitem.hxx>
49
50 #include <sfx2/app.hxx>
51 #include <sfx2/bindings.hxx>
52 #include <sfx2/docfile.hxx>
53 #include <sfx2/docfilt.hxx>
54 #include <svtools/ehdl.hxx>
55 #include <basic/sbxcore.hxx>
56 #include <sfx2/printer.hxx>
57 #include <sfx2/request.hxx>
58 #include <svtools/sfxecode.hxx>
59 #include <sfx2/topfrm.hxx>
60 #include <svx/ofaitem.hxx>
61 #include <sot/formats.hxx>
62 #include <svtools/printdlg.hxx>
63 #include <svtools/whiter.hxx>
64 #include <vcl/msgbox.hxx>
65 #include <vcl/waitobj.hxx>
66 #include <tools/multisel.hxx>
67 #include <svx/drawitem.hxx>
68 #include <svx/fmview.hxx>
69 #include <svx/pageitem.hxx>
70 #include <svx/svditer.hxx>
71 #include <svx/svdpage.hxx>
72 #include <svx/fmshell.hxx>
73 #include <sfx2/passwd.hxx>
74 #include <sfx2/filedlghelper.hxx>
75 #include <sfx2/docinsert.hxx>
76 #include <svtools/PasswordHelper.hxx>
77 #include <svtools/documentlockfile.hxx>
78 #include <svtools/sharecontrolfile.hxx>
79
80 #include <comphelper/processfactory.hxx>
81 #include "docuno.hxx"
82
83 #include <com/sun/star/sdbc/XResultSet.hpp>
84 #include "docsh.hxx"
85 #include "docshimp.hxx"
86 #include "docfunc.hxx"
87 #include "sc.hrc"
88 #include "stlsheet.hxx"
89 #include "stlpool.hxx"
90 #include "appoptio.hxx"
91 #include "globstr.hrc"
92 #include "global.hxx"
93 //CHINA001 #include "styledlg.hxx"
94 //CHINA001 #include "hfedtdlg.hxx"
95 #include "dbdocfun.hxx"
96 #include "printfun.hxx" // DrawToDev
97 #include "viewdata.hxx"
98 #include "tabvwsh.hxx"
99 #include "impex.hxx"
100 #include "attrib.hxx"
101 //CHINA001 #include "corodlg.hxx"
102 #include "undodat.hxx"
103 #include "autostyl.hxx"
104 #include "undocell.hxx"
105 #include "undotab.hxx"
106 #include "inputhdl.hxx"
107 #include "dbcolect.hxx"
108 #include "servobj.hxx"
109 #include "rangenam.hxx"
110 #include "scmod.hxx"
111 //CHINA001 #include "scendlg.hxx"
112 #include "chgviset.hxx"
113 #include "reffact.hxx"
114 #include "chartlis.hxx"
115 #include "waitoff.hxx"
116 #include "tablink.hxx" // ScDocumentLoader statics
117 #include "drwlayer.hxx"
118 #include "docoptio.hxx"
119 #include "undostyl.hxx"
120 #include "rangeseq.hxx"
121 #include "chgtrack.hxx"
122 #include "printopt.hxx"
123 #include <com/sun/star/document/UpdateDocMode.hpp>
124 #include "scresid.hxx" //add by CHINA001
125 #include "scabstdlg.hxx" //CHINA001
126 #include "externalrefmgr.hxx"
127
128 #include "sharedocdlg.hxx"
129 #include "conditio.hxx"
130
131 //------------------------------------------------------------------
132
133 #define IS_SHARE_HEADER(set) \
134 ((SfxBoolItem&) \
135 ((SvxSetItem&)(set).Get(ATTR_PAGE_HEADERSET)).GetItemSet(). \
136 Get(ATTR_PAGE_SHARED)).GetValue()
137
138 #define IS_SHARE_FOOTER(set) \
139 ((SfxBoolItem&) \
140 ((SvxSetItem&)(set).Get(ATTR_PAGE_FOOTERSET)).GetItemSet(). \
141 Get(ATTR_PAGE_SHARED)).GetValue()
142
143 #define IS_AVAILABLE(WhichId,ppItem) \
144 (pReqArgs->GetItemState((WhichId), TRUE, ppItem ) == SFX_ITEM_SET)
145
146 #define SC_PREVIEW_SIZE_X 10000
147 #define SC_PREVIEW_SIZE_Y 12400
148
149
150 //------------------------------------------------------------------
151
152 void ScDocShell::Execute( SfxRequest& rReq )
153 {
154 // SID_SC_RANGE (Range),
155 // SID_SC_CELLTEXT (CellText),
156 // SID_SC_CELLS (Cells) - removed (old Basic)
157
158 const SfxItemSet* pReqArgs = rReq.GetArgs();
159 SfxBindings* pBindings = GetViewBindings();
160 BOOL bUndo (aDocument.IsUndoEnabled());
161
162 USHORT nSlot = rReq.GetSlot();
163 switch ( nSlot )
164 {
165 case SID_SC_SETTEXT:
166 {
167 const SfxPoolItem* pColItem;
168 const SfxPoolItem* pRowItem;
169 const SfxPoolItem* pTabItem;
170 const SfxPoolItem* pTextItem;
171 if( pReqArgs && IS_AVAILABLE( FN_PARAM_1, &pColItem ) &&
172 IS_AVAILABLE( FN_PARAM_2, &pRowItem ) &&
173 IS_AVAILABLE( FN_PARAM_3, &pTabItem ) &&
174 IS_AVAILABLE( SID_SC_SETTEXT, &pTextItem ) )
175 {
176 // Parameter sind 1-based !!!
177 SCCOL nCol = ((SfxInt16Item*)pColItem)->GetValue() - 1;
178 SCROW nRow = ((SfxInt32Item*)pRowItem)->GetValue() - 1;
179 SCTAB nTab = ((SfxInt16Item*)pTabItem)->GetValue() - 1;
180
181 SCTAB nTabCount = aDocument.GetTableCount();
182 if ( ValidCol(nCol) && ValidRow(nRow) && ValidTab(nTab,nTabCount) )
183 {
184 if ( aDocument.IsBlockEditable( nTab, nCol,nRow, nCol, nRow ) )
185 {
186 String aVal = ((const SfxStringItem*)pTextItem)->GetValue();
187 aDocument.SetString( nCol, nRow, nTab, aVal );
188
189 PostPaintCell( nCol, nRow, nTab );
190 SetDocumentModified();
191
192 rReq.Done();
193 break;
194 }
195 else // geschuetzte Zelle
196 {
197 SbxBase::SetError( SbxERR_BAD_PARAMETER ); //! welchen Fehler ?
198 break;
199 }
200 }
201 }
202 SbxBase::SetError( SbxERR_NO_OBJECT );
203 }
204 break;
205
206
207 // SID_SBA_QRY_CHANGETARGET gibts nicht mehr - auch in idl raus
208
209 case SID_SBA_IMPORT:
210 {
211 if (pReqArgs)
212 {
213 const sal_Unicode cSbaSep = 11; // Trennzeichen
214
215 const SfxPoolItem* pItem;
216 String sSbaData, sTarget;
217 if ( pReqArgs->GetItemState( nSlot, TRUE, &pItem ) == SFX_ITEM_SET )
218 sSbaData = ((const SfxStringItem*)pItem)->GetValue();
219 if ( pReqArgs->GetItemState( FN_PARAM_1, TRUE, &pItem ) == SFX_ITEM_SET )
220 sTarget = ((const SfxStringItem*)pItem)->GetValue();
221
222 BOOL bIsNewArea = TRUE; // Default TRUE (keine Nachfrage)
223 if ( pReqArgs->GetItemState( FN_PARAM_2, TRUE, &pItem ) == SFX_ITEM_SET )
224 bIsNewArea = ((const SfxBoolItem*)pItem)->GetValue();
225
226 ::com::sun::star::uno::Reference<
227 ::com::sun::star::sdbc::XResultSet > xResultSet;
228 if ( pReqArgs->GetItemState( FN_PARAM_3, FALSE, &pItem ) == SFX_ITEM_SET && pItem )
229 xResultSet.set(((const SfxUsrAnyItem*)pItem)->GetValue(),::com::sun::star::uno::UNO_QUERY);
230
231 String sDBName = sSbaData.GetToken(0,cSbaSep); // Datenbankname
232 String sDBTable = sSbaData.GetToken(1,cSbaSep); // Tabellen- oder Query-Name
233 String sTabFlag = sSbaData.GetToken(2,cSbaSep);
234 String sDBSql = sSbaData.GetToken(3,cSbaSep); // SQL im Klartext
235
236 BYTE nType = ScDbTable; // "0" oder "1"
237 if ( sTabFlag.EqualsAscii("0") ) // "0" = Query, "1" = Table (Default)
238 nType = ScDbQuery;
239
240 SbaSelectionListRef pSelectionList = new SbaSelectionList;
241 xub_StrLen nCount = sSbaData.GetTokenCount(cSbaSep);
242
243 for (xub_StrLen i = 4; i < nCount; i++)
244 {
245 String aSelItem = sSbaData.GetToken(i,cSbaSep);
246 if (aSelItem.Len())
247 {
248 void *pPtr = (void*)aSelItem.ToInt32();
249 pSelectionList->Insert( pPtr, LIST_APPEND );
250 }
251 }
252
253 // bei Bedarf neuen Datenbankbereich anlegen
254 BOOL bMakeArea = FALSE;
255 if (bIsNewArea)
256 {
257 ScDBCollection* pDBColl = aDocument.GetDBCollection();
258 USHORT nDummy;
259 if ( !pDBColl || !pDBColl->SearchName( sTarget, nDummy ) )
260 {
261 ScAddress aPos;
262 if ( aPos.Parse( sTarget, &aDocument, aDocument.GetAddressConvention() ) & SCA_VALID )
263 {
264 bMakeArea = TRUE;
265 if (bUndo)
266 {
267 String aStrImport = ScGlobal::GetRscString( STR_UNDO_IMPORTDATA );
268 GetUndoManager()->EnterListAction( aStrImport, aStrImport );
269 }
270
271 ScDBData* pDBData = GetDBData( ScRange(aPos), SC_DB_IMPORT, FALSE );
272 DBG_ASSERT(pDBData, "kann DB-Daten nicht anlegen");
273 sTarget = pDBData->GetName();
274 }
275 }
276 }
277
278 // nachfragen, bevor alter DB-Bereich ueberschrieben wird
279 BOOL bDo = TRUE;
280 if (!bIsNewArea)
281 {
282 String aTemplate = ScGlobal::GetRscString( STR_IMPORT_REPLACE );
283 String aMessage = aTemplate.GetToken( 0, '#' );
284 aMessage += sTarget;
285 aMessage += aTemplate.GetToken( 1, '#' );
286
287 QueryBox aBox( 0, WinBits(WB_YES_NO | WB_DEF_YES), aMessage );
288 bDo = ( aBox.Execute() == RET_YES );
289 }
290
291 if (bDo)
292 {
293 ScDBDocFunc(*this).UpdateImport( sTarget, sDBName,
294 sDBTable, sDBSql, TRUE, nType, xResultSet,
295 pSelectionList );
296 rReq.Done();
297
298 // UpdateImport aktualisiert auch die internen Operationen
299 }
300 else
301 rReq.Ignore();
302
303 if ( bMakeArea && bUndo)
304 GetUndoManager()->LeaveListAction();
305 }
306 else
307 {
308 DBG_ERROR( "arguments expected" );
309 }
310 }
311 break;
312
313 case SID_CHART_SOURCE:
314 case SID_CHART_ADDSOURCE:
315 if (pReqArgs)
316 {
317 ScDocument* pDoc = GetDocument();
318 // BOOL bUndo (pDoc->IsUndoEnabled());
319 const SfxPoolItem* pItem;
320 String aChartName, aRangeName;
321
322 ScRange aSingleRange;
323 ScRangeListRef aRangeListRef;
324 BOOL bMultiRange = FALSE;
325
326 BOOL bColHeaders = TRUE;
327 BOOL bRowHeaders = TRUE;
328 BOOL bColInit = FALSE;
329 BOOL bRowInit = FALSE;
330 BOOL bAddRange = (nSlot == SID_CHART_ADDSOURCE);
331
332 if( IS_AVAILABLE( SID_CHART_NAME, &pItem ) )
333 aChartName = ((const SfxStringItem*)pItem)->GetValue();
334
335 if( IS_AVAILABLE( SID_CHART_SOURCE, &pItem ) )
336 aRangeName = ((const SfxStringItem*)pItem)->GetValue();
337
338 if( IS_AVAILABLE( FN_PARAM_1, &pItem ) )
339 {
340 bColHeaders = ((const SfxBoolItem*)pItem)->GetValue();
341 bColInit = TRUE;
342 }
343 if( IS_AVAILABLE( FN_PARAM_2, &pItem ) )
344 {
345 bRowHeaders = ((const SfxBoolItem*)pItem)->GetValue();
346 bRowInit = TRUE;
347 }
348
349 ScAddress::Details aDetails(pDoc->GetAddressConvention(), 0, 0);
350 BOOL bValid = ( aSingleRange.ParseAny( aRangeName, pDoc, aDetails ) & SCA_VALID ) != 0;
351 if (!bValid)
352 {
353 aRangeListRef = new ScRangeList;
354 aRangeListRef->Parse( aRangeName, pDoc );
355 if ( aRangeListRef->Count() )
356 {
357 bMultiRange = TRUE;
358 aSingleRange = *aRangeListRef->GetObject(0); // fuer Header
359 bValid = TRUE;
360 }
361 else
362 aRangeListRef.Clear();
363 }
364
365 ScTabViewShell* pViewSh = ScTabViewShell::GetActiveViewShell();
366 if (pViewSh && bValid && aChartName.Len() != 0 )
367 {
368 Window* pParent = pViewSh->GetDialogParent();
369
370 SCCOL nCol1 = aSingleRange.aStart.Col();
371 SCROW nRow1 = aSingleRange.aStart.Row();
372 SCCOL nCol2 = aSingleRange.aEnd.Col();
373 SCROW nRow2 = aSingleRange.aEnd.Row();
374 SCTAB nTab = aSingleRange.aStart.Tab();
375
376 //! immer oder gar nicht begrenzen ???
377 if (!bMultiRange)
378 aDocument.LimitChartArea( nTab, nCol1,nRow1, nCol2,nRow2 );
379
380 // Dialog fuer Spalten/Zeilenkoepfe
381 BOOL bOk = TRUE;
382 if ( !bAddRange && ( !bColInit || !bRowInit ) )
383 {
384 // Spalten/Zeilenkoepfe testen wie in chartarr
385 if (!bColInit)
386 {
387 for (SCCOL i=nCol1; i<=nCol2 && bColHeaders; i++)
388 if (aDocument.HasValueData( i, nRow1, nTab ))
389 bColHeaders = FALSE;
390 }
391 if (!bRowInit)
392 {
393 for (SCROW i=nRow1; i<=nRow2 && bRowHeaders; i++)
394 if (aDocument.HasValueData( nCol1, i, nTab ))
395 bRowHeaders = FALSE;
396 }
397
398 //CHINA001 ScColRowLabelDlg aDlg( pParent, bRowHeaders, bColHeaders );
399 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
400 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
401
402 AbstractScColRowLabelDlg* pDlg = pFact->CreateScColRowLabelDlg( pParent, RID_SCDLG_CHARTCOLROW, bRowHeaders, bColHeaders);
403 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
404 if ( pDlg->Execute() == RET_OK ) //CHINA001 if ( aDlg.Execute() == RET_OK )
405 {
406 bColHeaders = pDlg->IsRow(); //CHINA001 bColHeaders = aDlg.IsRow(); // Spaltenkoepfe = 1. Zeile
407 bRowHeaders = pDlg->IsCol(); //CHINA001 bRowHeaders = aDlg.IsCol();
408
409 rReq.AppendItem(SfxBoolItem(FN_PARAM_1, bColHeaders));
410 rReq.AppendItem(SfxBoolItem(FN_PARAM_2, bRowHeaders));
411 }
412 else
413 bOk = FALSE;
414 delete pDlg; //CHINA001
415 }
416
417 if (bOk) // ausfuehren
418 {
419 if (bMultiRange)
420 {
421 if (bUndo)
422 {
423 GetUndoManager()->AddUndoAction(
424 new ScUndoChartData( this, aChartName, aRangeListRef,
425 bColHeaders, bRowHeaders, bAddRange ) );
426 }
427 aDocument.UpdateChartArea( aChartName, aRangeListRef,
428 bColHeaders, bRowHeaders, bAddRange );
429 }
430 else
431 {
432 ScRange aNewRange( nCol1,nRow1,nTab, nCol2,nRow2,nTab );
433 if (bUndo)
434 {
435 GetUndoManager()->AddUndoAction(
436 new ScUndoChartData( this, aChartName, aNewRange,
437 bColHeaders, bRowHeaders, bAddRange ) );
438 }
439 aDocument.UpdateChartArea( aChartName, aNewRange,
440 bColHeaders, bRowHeaders, bAddRange );
441 }
442 }
443 }
444 else
445 {
446 DBG_ERROR("UpdateChartArea: keine ViewShell oder falsche Daten");
447 }
448 rReq.Done();
449 }
450 else
451 {
452 DBG_ERROR("SID_CHART_SOURCE ohne Argumente");
453 }
454 break;
455
456 case FID_AUTO_CALC:
457 {
458 BOOL bNewVal;
459 const SfxPoolItem* pItem;
460 if ( pReqArgs && SFX_ITEM_SET == pReqArgs->GetItemState( nSlot, TRUE, &pItem ) )
461 bNewVal = ((const SfxBoolItem*)pItem)->GetValue();
462 else
463 bNewVal = !aDocument.GetAutoCalc(); // Toggle fuer Menue
464 aDocument.SetAutoCalc( bNewVal );
465 SetDocumentModified();
466 if (pBindings)
467 {
468 pBindings->Invalidate( FID_AUTO_CALC );
469 // pBindings->Invalidate( FID_RECALC ); // jetzt immer enabled
470 }
471 rReq.AppendItem( SfxBoolItem( FID_AUTO_CALC, bNewVal ) );
472 rReq.Done();
473 }
474 break;
475 case FID_RECALC:
476 DoRecalc( rReq.IsAPI() );
477 rReq.Done();
478 break;
479 case FID_HARD_RECALC:
480 DoHardRecalc( rReq.IsAPI() );
481 rReq.Done();
482 break;
483 case SID_UPDATETABLINKS:
484 {
485 ScDocument* pDoc = GetDocument();
486
487 ScLkUpdMode nSet=pDoc->GetLinkMode();
488
489 USHORT nDlgRet=RET_NO;
490 if(nSet==LM_UNKNOWN)
491 {
492 ScAppOptions aAppOptions=SC_MOD()->GetAppOptions();
493 nSet=aAppOptions.GetLinkMode();
494 }
495
496 if (nCanUpdate == com::sun::star::document::UpdateDocMode::NO_UPDATE)
497 nSet = LM_NEVER;
498 else if (nCanUpdate == com::sun::star::document::UpdateDocMode::QUIET_UPDATE &&
499 nSet == LM_ON_DEMAND)
500 nSet = LM_NEVER;
501 else if (nCanUpdate == com::sun::star::document::UpdateDocMode::FULL_UPDATE)
502 nSet = LM_ALWAYS;
503
504 if(nSet==LM_ON_DEMAND)
505 {
506 QueryBox aBox( GetActiveDialogParent(), WinBits(WB_YES_NO | WB_DEF_YES),
507 ScGlobal::GetRscString(STR_RELOAD_TABLES) );
508
509 nDlgRet=aBox.Execute();
510 }
511
512 if (nDlgRet == RET_YES || nSet==LM_ALWAYS)
513 {
514 ReloadTabLinks();
515 aDocument.UpdateExternalRefLinks();
516 aDocument.UpdateDdeLinks();
517 aDocument.UpdateAreaLinks();
518
519 //! Test, ob Fehler
520 rReq.Done();
521 }
522 else
523 rReq.Ignore();
524 }
525 break;
526
527 case SID_REIMPORT_AFTER_LOAD:
528 {
529 // wird nach dem Laden aufgerufen, wenn DB-Bereiche mit
530 // weggelassenen Daten enthalten sind
531
532 BOOL bDone = FALSE;
533 ScDBCollection* pDBColl = aDocument.GetDBCollection();
534
535 if ((nCanUpdate != com::sun::star::document::UpdateDocMode::NO_UPDATE) &&
536 (nCanUpdate != com::sun::star::document::UpdateDocMode::QUIET_UPDATE))
537 {
538 ScRange aRange;
539 ScTabViewShell* pViewSh = GetBestViewShell();
540 DBG_ASSERT(pViewSh,"SID_REIMPORT_AFTER_LOAD: keine View");
541 if (pViewSh && pDBColl)
542 {
543 QueryBox aBox( GetActiveDialogParent(), WinBits(WB_YES_NO | WB_DEF_YES),
544 ScGlobal::GetRscString(STR_REIMPORT_AFTER_LOAD) );
545 if (aBox.Execute() == RET_YES)
546 {
547 for (USHORT i=0; i<pDBColl->GetCount(); i++)
548 {
549 ScDBData* pDBData = (*pDBColl)[i];
550 if ( pDBData->IsStripData() &&
551 pDBData->HasImportParam() && !pDBData->HasImportSelection() )
552 {
553 pDBData->GetArea(aRange);
554 pViewSh->MarkRange(aRange);
555
556 // Import und interne Operationen wie SID_REFRESH_DBAREA
557 // (Abfrage auf Import hier nicht noetig)
558
559 ScImportParam aImportParam;
560 pDBData->GetImportParam( aImportParam );
561 BOOL bContinue = pViewSh->ImportData( aImportParam );
562 pDBData->SetImportParam( aImportParam );
563
564 // markieren (Groesse kann sich geaendert haben)
565 pDBData->GetArea(aRange);
566 pViewSh->MarkRange(aRange);
567
568 if ( bContinue ) // #41905# Fehler beim Import -> Abbruch
569 {
570 // interne Operationen, wenn welche gespeichert
571
572 if ( pDBData->HasQueryParam() || pDBData->HasSortParam() ||
573 pDBData->HasSubTotalParam() )
574 pViewSh->RepeatDB();
575
576 // Pivottabellen die den Bereich als Quelldaten haben
577
578 RefreshPivotTables(aRange);
579 }
580 }
581 }
582 bDone = TRUE;
583 }
584 }
585 }
586
587 if ( !bDone && pDBColl )
588 {
589 // wenn nicht, dann aber die abhaengigen Formeln updaten
590 //! auch fuer einzelne Bereiche, die nicht aktualisiert werden koennen
591
592 aDocument.CalcAll(); //! nur die abhaengigen
593 PostDataChanged();
594 }
595
596 if (bDone)
597 rReq.Done();
598 else
599 rReq.Ignore();
600 }
601 break;
602
603
604 case SID_AUTO_STYLE:
605 DBG_ERROR("use ScAutoStyleHint instead of SID_AUTO_STYLE");
606 break;
607
608 case SID_GET_COLORTABLE:
609 {
610 // passende ColorTable ist per PutItem gesetzt worden
611 SvxColorTableItem* pColItem = (SvxColorTableItem*)GetItem(SID_COLOR_TABLE);
612 XColorTable* pTable = pColItem->GetColorTable();
613 rReq.SetReturnValue(OfaPtrItem(SID_GET_COLORTABLE, pTable));
614 }
615 break;
616
617 case FID_CHG_RECORD:
618 {
619 ScDocument* pDoc = GetDocument();
620 if(pDoc!=NULL)
621 {
622 // get argument (recorded macro)
623 SFX_REQUEST_ARG( rReq, pItem, SfxBoolItem, FID_CHG_RECORD, sal_False );
624 BOOL bDo = TRUE;
625
626 // xmlsec05/06:
627 // getting real parent window when called from Security-Options TP
628 Window* pParent = NULL;
629 const SfxPoolItem* pParentItem;
630 if( pReqArgs && SFX_ITEM_SET == pReqArgs->GetItemState( SID_ATTR_PARENTWINDOW, FALSE, &pParentItem ) )
631 pParent = ( Window* ) ( ( const OfaPtrItem* ) pParentItem )->GetValue();
632
633 // desired state
634 ScChangeTrack* pChangeTrack = pDoc->GetChangeTrack();
635 BOOL bActivateTracking = (pChangeTrack == 0); // toggle
636 if ( pItem )
637 bActivateTracking = pItem->GetValue(); // from argument
638
639 if ( !bActivateTracking )
640 {
641 if ( !pItem )
642 {
643 // no dialog on playing the macro
644 WarningBox aBox( pParent ? pParent : GetActiveDialogParent(),
645 WinBits(WB_YES_NO | WB_DEF_NO),
646 ScGlobal::GetRscString( STR_END_REDLINING ) );
647 bDo = ( aBox.Execute() == RET_YES );
648 }
649
650 if ( bDo )
651 {
652 if ( pChangeTrack->IsProtected() )
653 bDo = ExecuteChangeProtectionDialog( NULL );
654 if ( bDo )
655 {
656 pDoc->EndChangeTracking();
657 PostPaintGridAll();
658 }
659 }
660 }
661 else
662 {
663 pDoc->StartChangeTracking();
664 ScChangeViewSettings aChangeViewSet;
665 aChangeViewSet.SetShowChanges(TRUE);
666 pDoc->SetChangeViewSettings(aChangeViewSet);
667 }
668
669 if ( bDo )
670 {
671 // update "accept changes" dialog
672 //! notify all views
673 SfxViewFrame* pViewFrm = SfxViewFrame::Current();
674 if ( pViewFrm && pViewFrm->HasChildWindow(FID_CHG_ACCEPT) )
675 {
676 SfxChildWindow* pChild = pViewFrm->GetChildWindow(FID_CHG_ACCEPT);
677 if (pChild)
678 {
679 ((ScAcceptChgDlgWrapper*)pChild)->ReInitDlg();
680 }
681 }
682
683 // Slots invalidieren
684 if (pBindings)
685 pBindings->InvalidateAll(FALSE);
686 if ( !pItem )
687 rReq.AppendItem( SfxBoolItem( FID_CHG_RECORD, bActivateTracking ) );
688 rReq.Done();
689 }
690 else
691 rReq.Ignore();
692 }
693 }
694 break;
695
696 case SID_CHG_PROTECT :
697 {
698 Window* pParent = NULL;
699 const SfxPoolItem* pParentItem;
700 if( pReqArgs && SFX_ITEM_SET == pReqArgs->GetItemState( SID_ATTR_PARENTWINDOW, FALSE, &pParentItem ) )
701 pParent = ( Window* ) ( ( const OfaPtrItem* ) pParentItem )->GetValue();
702 if ( ExecuteChangeProtectionDialog( pParent ) )
703 {
704 rReq.Done();
705 SetDocumentModified();
706 }
707 else
708 rReq.Ignore();
709 }
710 break;
711
712 case SID_DOCUMENT_MERGE:
713 case SID_DOCUMENT_COMPARE:
714 {
715 BOOL bDo = TRUE;
716 ScChangeTrack* pChangeTrack = aDocument.GetChangeTrack();
717 if ( pChangeTrack && !pImpl->bIgnoreLostRedliningWarning )
718 {
719 if ( nSlot == SID_DOCUMENT_COMPARE )
720 { //! old changes trace will be lost
721 WarningBox aBox( GetActiveDialogParent(),
722 WinBits(WB_YES_NO | WB_DEF_NO),
723 ScGlobal::GetRscString( STR_END_REDLINING ) );
724 if( aBox.Execute() == RET_YES )
725 bDo = ExecuteChangeProtectionDialog( NULL, TRUE );
726 else
727 bDo = FALSE;
728 }
729 else // merge might reject some actions
730 bDo = ExecuteChangeProtectionDialog( NULL, TRUE );
731 }
732 if ( !bDo )
733 {
734 rReq.Ignore();
735 break;
736 }
737 SfxApplication* pApp = SFX_APP();
738 const SfxPoolItem* pItem;
739 SfxMedium* pMed = NULL;
740 if ( pReqArgs &&
741 pReqArgs->GetItemState( SID_FILE_NAME, TRUE, &pItem ) == SFX_ITEM_SET &&
742 pItem->ISA(SfxStringItem) )
743 {
744 String aFileName = ((const SfxStringItem*)pItem)->GetValue();
745
746 String aFilterName;
747 if ( pReqArgs->GetItemState( SID_FILTER_NAME, TRUE, &pItem ) == SFX_ITEM_SET &&
748 pItem->ISA(SfxStringItem) )
749 {
750 aFilterName = ((const SfxStringItem*)pItem)->GetValue();
751 }
752 String aOptions;
753 if ( pReqArgs->GetItemState( SID_FILE_FILTEROPTIONS, TRUE, &pItem ) == SFX_ITEM_SET &&
754 pItem->ISA(SfxStringItem) )
755 {
756 aOptions = ((const SfxStringItem*)pItem)->GetValue();
757 }
758 short nVersion = 0;
759 if ( pReqArgs->GetItemState( SID_VERSION, TRUE, &pItem ) == SFX_ITEM_SET &&
760 pItem->ISA(SfxInt16Item) )
761 {
762 nVersion = ((const SfxInt16Item*)pItem)->GetValue();
763 }
764
765 // kein Filter angegeben -> Detection
766 if ( !aFilterName.Len() )
767 ScDocumentLoader::GetFilterName( aFileName, aFilterName, aOptions, TRUE, FALSE );
768
769 // filter name from dialog contains application prefix,
770 // GetFilter needs name without the prefix.
771 ScDocumentLoader::RemoveAppPrefix( aFilterName );
772
773 const SfxFilter* pFilter = ScDocShell::Factory().GetFilterContainer()->GetFilter4FilterName( aFilterName );
774 SfxItemSet* pSet = new SfxAllItemSet( pApp->GetPool() );
775 if ( aOptions.Len() )
776 pSet->Put( SfxStringItem( SID_FILE_FILTEROPTIONS, aOptions ) );
777 if ( nVersion != 0 )
778 pSet->Put( SfxInt16Item( SID_VERSION, nVersion ) );
779 pMed = new SfxMedium( aFileName, STREAM_STD_READ, FALSE, pFilter, pSet );
780 }
781 else
782 {
783 // start file dialog asynchronous
784 pImpl->bIgnoreLostRedliningWarning = true;
785 delete pImpl->pRequest;
786 pImpl->pRequest = new SfxRequest( rReq );
787 delete pImpl->pDocInserter;
788 pImpl->pDocInserter = new ::sfx2::DocumentInserter(
789 0, String::CreateFromAscii( ScDocShell::Factory().GetShortName() ), 0 );
790 pImpl->pDocInserter->StartExecuteModal( LINK( this, ScDocShell, DialogClosedHdl ) );
791 return ;
792 }
793
794 if ( pMed ) // nun wirklich ausfuehren...
795 {
796 SfxErrorContext aEc( ERRCTX_SFX_OPENDOC, pMed->GetName() );
797
798 ScDocShell* pOtherDocSh = new ScDocShell;
799 SfxObjectShellRef aDocShTablesRef = pOtherDocSh;
800 pOtherDocSh->DoLoad( pMed );
801 ULONG nErr = pOtherDocSh->GetErrorCode();
802 if (nErr)
803 ErrorHandler::HandleError( nErr ); // auch Warnings
804
805 if ( !pOtherDocSh->GetError() ) // nur Errors
806 {
807 BOOL bHadTrack = ( aDocument.GetChangeTrack() != NULL );
808 ULONG nStart = 0;
809 if ( nSlot == SID_DOCUMENT_MERGE && pChangeTrack )
810 {
811 nStart = pChangeTrack->GetActionMax() + 1;
812 }
813
814 if ( nSlot == SID_DOCUMENT_COMPARE )
815 CompareDocument( *pOtherDocSh->GetDocument() );
816 else
817 MergeDocument( *pOtherDocSh->GetDocument() );
818
819 // show "accept changes" dialog
820 //! get view for this document!
821 if ( !IsDocShared() )
822 {
823 SfxViewFrame* pViewFrm = SfxViewFrame::Current();
824 if ( pViewFrm )
825 {
826 pViewFrm->ShowChildWindow( ScAcceptChgDlgWrapper::GetChildWindowId(), TRUE ); //@51669
827 }
828 if ( pBindings )
829 {
830 pBindings->Invalidate( FID_CHG_ACCEPT );
831 }
832 }
833
834 rReq.SetReturnValue( SfxInt32Item( nSlot, 0 ) ); //! ???????
835 rReq.Done();
836
837 if (!bHadTrack) // neu eingeschaltet -> auch anzeigen
838 {
839 ScChangeViewSettings* pOldSet = aDocument.GetChangeViewSettings();
840 if ( !pOldSet || !pOldSet->ShowChanges() )
841 {
842 ScChangeViewSettings aChangeViewSet;
843 aChangeViewSet.SetShowChanges(TRUE);
844 aDocument.SetChangeViewSettings(aChangeViewSet);
845 }
846 }
847 else if ( nSlot == SID_DOCUMENT_MERGE && IsDocShared() && pChangeTrack )
848 {
849 ULONG nEnd = pChangeTrack->GetActionMax();
850 if ( nEnd >= nStart )
851 {
852 // only show changes from merged document
853 ScChangeViewSettings aChangeViewSet;
854 aChangeViewSet.SetShowChanges( TRUE );
855 aChangeViewSet.SetShowAccepted( TRUE );
856 aChangeViewSet.SetHasActionRange( true );
857 aChangeViewSet.SetTheActionRange( nStart, nEnd );
858 aDocument.SetChangeViewSettings( aChangeViewSet );
859
860 // update view
861 PostPaintExtras();
862 PostPaintGridAll();
863 }
864 }
865 }
866 pOtherDocSh->DoClose(); // delete passiert mit der Ref
867 }
868 }
869 break;
870
871 case SID_DELETE_SCENARIO:
872 if (pReqArgs)
873 {
874 const SfxPoolItem* pItem;
875 if ( pReqArgs->GetItemState( nSlot, TRUE, &pItem ) == SFX_ITEM_SET )
876 {
877 if ( pItem->ISA(SfxStringItem) )
878 {
879 String aName = ((const SfxStringItem*)pItem)->GetValue();
880 SCTAB nTab;
881 if (aDocument.GetTable( aName, nTab ))
882 {
883 // DeleteTable von viewfunc nach docfunc verschieben!
884
885 ScTabViewShell* pSh = GetBestViewShell();
886 if ( pSh )
887 {
888 //! SetTabNo in DeleteTable weglassen?
889 SCTAB nDispTab = pSh->GetViewData()->GetTabNo();
890 pSh->DeleteTable( nTab );
891 pSh->SetTabNo(nDispTab);
892 rReq.Done();
893 }
894 }
895 }
896 }
897 }
898 break;
899
900 case SID_EDIT_SCENARIO:
901 {
902 const SfxPoolItem* pItem;
903 if ( pReqArgs->GetItemState( nSlot, TRUE, &pItem ) == SFX_ITEM_SET )
904 {
905 if ( pItem->ISA(SfxStringItem) )
906 {
907 String aName = ((const SfxStringItem*)pItem)->GetValue();
908 SCTAB nTab;
909 if (aDocument.GetTable( aName, nTab ))
910 {
911 if (aDocument.IsScenario(nTab))
912 {
913 String aComment;
914 Color aColor;
915 USHORT nFlags;
916 aDocument.GetScenarioData( nTab, aComment, aColor, nFlags );
917
918 // Determine if the Sheet that the Scenario was created on
919 // is protected. But first we need to find that Sheet.
920 // Rewind back to the actual sheet.
921 SCTAB nActualTab = nTab;
922 do
923 {
924 nActualTab--;
925 }
926 while(aDocument.IsScenario(nActualTab));
927 BOOL bSheetProtected = aDocument.IsTabProtected(nActualTab);
928
929 //! anderen Titel am Dialog setzen
930 //CHINA001 ScNewScenarioDlg* pNewDlg =
931 //CHINA001 new ScNewScenarioDlg( GetActiveDialogParent(), aName, TRUE, bSheetProtected);
932 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
933 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
934
935 AbstractScNewScenarioDlg* pNewDlg = pFact->CreateScNewScenarioDlg( GetActiveDialogParent(), aName, RID_SCDLG_NEWSCENARIO, TRUE,bSheetProtected);
936 DBG_ASSERT(pNewDlg, "Dialog create fail!");//CHINA001
937 pNewDlg->SetScenarioData( aName, aComment, aColor, nFlags );
938 if ( pNewDlg->Execute() == RET_OK )
939 {
940 pNewDlg->GetScenarioData( aName, aComment, aColor, nFlags );
941 ModifyScenario( nTab, aName, aComment, aColor, nFlags );
942 rReq.Done();
943 }
944 delete pNewDlg;
945 }
946 }
947 }
948 }
949 }
950 break;
951
952 case SID_ATTR_YEAR2000 :
953 {
954 const SfxPoolItem* pItem;
955 if ( pReqArgs->GetItemState( nSlot, TRUE, &pItem ) == SFX_ITEM_SET )
956 {
957 if ( pItem->ISA(SfxUInt16Item) )
958 {
959 UINT16 nY2k = ((SfxUInt16Item*)pItem)->GetValue();
960 // immer an den DocOptions setzen, damit das auch fuer SO50
961 // gespeichert wird (und alle Abfragen bisher auch darauf laufen).
962 // SetDocOptions propagiert das an den NumberFormatter
963 ScDocOptions aDocOpt( aDocument.GetDocOptions() );
964 aDocOpt.SetYear2000( nY2k );
965 aDocument.SetDocOptions( aDocOpt );
966 // die FormShell soll es mitbekommen
967 ScTabViewShell* pSh = GetBestViewShell();
968 if ( pSh )
969 {
970 FmFormShell* pFSh = pSh->GetFormShell();
971 if ( pFSh )
972 pFSh->SetY2KState( nY2k );
973 }
974 }
975 }
976 }
977 break;
978
979 case SID_SHARE_DOC:
980 {
981 ScViewData* pViewData = GetViewData();
982 if ( !pViewData )
983 {
984 rReq.Ignore();
985 break;
986 }
987
988 ScShareDocumentDlg aDlg( GetActiveDialogParent(), pViewData );
989 if ( aDlg.Execute() == RET_OK )
990 {
991 bool bSetShared = aDlg.IsShareDocumentChecked();
992 if ( bSetShared != static_cast< bool >( IsDocShared() ) )
993 {
994 if ( bSetShared )
995 {
996 bool bContinue = true;
997 if ( HasName() )
998 {
999 QueryBox aBox( GetActiveDialogParent(), WinBits( WB_YES_NO | WB_DEF_YES ),
1000 ScGlobal::GetRscString( STR_DOC_WILLBESAVED ) );
1001 if ( aBox.Execute() == RET_NO )
1002 {
1003 bContinue = false;
1004 }
1005 }
1006 if ( bContinue )
1007 {
1008 EnableSharedSettings( true );
1009
1010 SC_MOD()->SetInSharedDocSaving( true );
1011 if ( !SwitchToShared( sal_True, sal_True ) )
1012 {
1013 // TODO/LATER: what should be done in case the switch has failed?
1014 // for example in case the user has cancelled the saveAs operation
1015 }
1016
1017 SC_MOD()->SetInSharedDocSaving( false );
1018
1019 InvalidateName();
1020 GetUndoManager()->Clear();
1021
1022 ScTabView* pTabView = dynamic_cast< ScTabView* >( pViewData->GetView() );
1023 if ( pTabView )
1024 {
1025 pTabView->UpdateLayerLocks();
1026 }
1027 }
1028 }
1029 else
1030 {
1031 uno::Reference< frame::XModel > xModel;
1032 try
1033 {
1034 // load shared file
1035 xModel.set( LoadSharedDocument(), uno::UNO_QUERY_THROW );
1036 uno::Reference< util::XCloseable > xCloseable( xModel, uno::UNO_QUERY_THROW );
1037
1038 // check if shared flag is set in shared file
1039 bool bShared = false;
1040 ScModelObj* pDocObj = ScModelObj::getImplementation( xModel );
1041 if ( pDocObj )
1042 {
1043 ScDocShell* pDocShell = dynamic_cast< ScDocShell* >( pDocObj->GetEmbeddedObject() );
1044 if ( pDocShell )
1045 {
1046 bShared = pDocShell->HasSharedXMLFlagSet();
1047 }
1048 }
1049
1050 // #i87870# check if shared status was disabled and enabled again
1051 bool bOwnEntry = false;
1052 try
1053 {
1054 ::svt::ShareControlFile aControlFile( GetSharedFileURL() );
1055 bOwnEntry = aControlFile.HasOwnEntry();
1056 }
1057 catch ( uno::Exception& )
1058 {
1059 }
1060
1061 if ( bShared && bOwnEntry )
1062 {
1063 uno::Reference< frame::XStorable > xStorable( xModel, uno::UNO_QUERY_THROW );
1064 if ( xStorable->isReadonly() )
1065 {
1066 xCloseable->close( sal_True );
1067
1068 String aUserName( ScGlobal::GetRscString( STR_UNKNOWN_USER ) );
1069 try
1070 {
1071 ::svt::DocumentLockFile aLockFile( GetSharedFileURL() );
1072 uno::Sequence< ::rtl::OUString > aData = aLockFile.GetLockData();
1073 if ( aData.getLength() > LOCKFILE_SYSUSERNAME_ID )
1074 {
1075 if ( aData[LOCKFILE_OOOUSERNAME_ID].getLength() > 0 )
1076 {
1077 aUserName = aData[LOCKFILE_OOOUSERNAME_ID];
1078 }
1079 else if ( aData[LOCKFILE_SYSUSERNAME_ID].getLength() > 0 )
1080 {
1081 aUserName = aData[LOCKFILE_SYSUSERNAME_ID];
1082 }
1083 }
1084 }
1085 catch ( uno::Exception& )
1086 {
1087 }
1088 String aMessage( ScGlobal::GetRscString( STR_FILE_LOCKED_TRY_LATER ) );
1089 aMessage.SearchAndReplaceAscii( "%1", aUserName );
1090
1091 WarningBox aBox( GetActiveDialogParent(), WinBits( WB_OK ), aMessage );
1092 aBox.Execute();
1093 }
1094 else
1095 {
1096 WarningBox aBox( GetActiveDialogParent(), WinBits( WB_YES_NO | WB_DEF_YES ),
1097 ScGlobal::GetRscString( STR_DOC_DISABLESHARED ) );
1098 if ( aBox.Execute() == RET_YES )
1099 {
1100 xCloseable->close( sal_True );
1101
1102 if ( !SwitchToShared( sal_False, sal_True ) )
1103 {
1104 // TODO/LATER: what should be done in case the switch has failed?
1105 // for example in case the user has cancelled the saveAs operation
1106 }
1107
1108 EnableSharedSettings( false );
1109
1110 if ( pBindings )
1111 {
1112 pBindings->ExecuteSynchron( SID_SAVEDOC );
1113 }
1114
1115 ScTabView* pTabView = dynamic_cast< ScTabView* >( pViewData->GetView() );
1116 if ( pTabView )
1117 {
1118 pTabView->UpdateLayerLocks();
1119 }
1120 }
1121 else
1122 {
1123 xCloseable->close( sal_True );
1124 }
1125 }
1126 }
1127 else
1128 {
1129 xCloseable->close( sal_True );
1130 WarningBox aBox( GetActiveDialogParent(), WinBits( WB_OK ),
1131 ScGlobal::GetRscString( STR_DOC_NOLONGERSHARED ) );
1132 aBox.Execute();
1133 }
1134 }
1135 catch ( uno::Exception& )
1136 {
1137 DBG_ERROR( "SID_SHARE_DOC: caught exception\n" );
1138 SC_MOD()->SetInSharedDocSaving( false );
1139
1140 try
1141 {
1142 uno::Reference< util::XCloseable > xClose( xModel, uno::UNO_QUERY_THROW );
1143 xClose->close( sal_True );
1144 }
1145 catch ( uno::Exception& )
1146 {
1147 }
1148 }
1149 }
1150 }
1151 }
1152 rReq.Done();
1153 }
1154 break;
1155
1156 default:
1157 {
1158 // kleiner (?) Hack -> forward der Slots an TabViewShell
1159 ScTabViewShell* pSh = GetBestViewShell();
1160 if ( pSh )
1161 pSh->Execute( rReq );
1162 else
1163 SbxBase::SetError( SbxERR_NO_ACTIVE_OBJECT );
1164 }
1165 }
1166 }
1167
1168
1169 //------------------------------------------------------------------
1170
1171 BOOL ScDocShell::ExecuteChangeProtectionDialog( Window* _pParent, BOOL bJustQueryIfProtected )
1172 {
1173 BOOL bDone = FALSE;
1174 ScChangeTrack* pChangeTrack = aDocument.GetChangeTrack();
1175 if ( pChangeTrack )
1176 {
1177 BOOL bProtected = pChangeTrack->IsProtected();
1178 if ( bJustQueryIfProtected && !bProtected )
1179 return TRUE;
1180
1181 String aTitle( ScResId( bProtected ? SCSTR_CHG_UNPROTECT : SCSTR_CHG_PROTECT ) );
1182 String aText( ScResId( SCSTR_PASSWORD ) );
1183 String aPassword;
1184
1185 SfxPasswordDialog* pDlg = new SfxPasswordDialog(
1186 _pParent ? _pParent : GetActiveDialogParent(), &aText );
1187 pDlg->SetText( aTitle );
1188 pDlg->SetMinLen( 1 );
1189 pDlg->SetHelpId( SID_CHG_PROTECT );
1190 pDlg->SetEditHelpId( HID_CHG_PROTECT );
1191 if ( !bProtected )
1192 pDlg->ShowExtras( SHOWEXTRAS_CONFIRM );
1193 if ( pDlg->Execute() == RET_OK )
1194 aPassword = pDlg->GetPassword();
1195 delete pDlg;
1196
1197 if ( aPassword.Len() )
1198 {
1199 if ( bProtected )
1200 {
1201 if ( SvPasswordHelper::CompareHashPassword(pChangeTrack->GetProtection(), aPassword) )
1202 {
1203 if ( bJustQueryIfProtected )
1204 bDone = TRUE;
1205 else
1206 pChangeTrack->SetProtection(
1207 com::sun::star::uno::Sequence< sal_Int8 > (0) );
1208 }
1209 else
1210 {
1211 InfoBox aBox( GetActiveDialogParent(),
1212 String( ScResId( SCSTR_WRONGPASSWORD ) ) );
1213 aBox.Execute();
1214 }
1215 }
1216 else
1217 {
1218 com::sun::star::uno::Sequence< sal_Int8 > aPass;
1219 SvPasswordHelper::GetHashPassword( aPass, aPassword );
1220 pChangeTrack->SetProtection( aPass );
1221 }
1222 if ( bProtected != pChangeTrack->IsProtected() )
1223 {
1224 // update "accept changes" dialog
1225 //! notify all views
1226 SfxViewFrame* pViewFrm = SfxViewFrame::Current();
1227 if ( pViewFrm && pViewFrm->HasChildWindow( FID_CHG_ACCEPT ) )
1228 {
1229 SfxChildWindow* pChild = pViewFrm->GetChildWindow( FID_CHG_ACCEPT );
1230 if ( pChild )
1231 ((ScAcceptChgDlgWrapper*)pChild)->ReInitDlg();
1232 }
1233 bDone = TRUE;
1234 }
1235 }
1236 }
1237 else if ( bJustQueryIfProtected )
1238 bDone = TRUE;
1239 return bDone;
1240 }
1241
1242
1243 //------------------------------------------------------------------
1244
1245 void ScDocShell::DoRecalc( BOOL bApi )
1246 {
1247 BOOL bDone = FALSE;
1248 ScTabViewShell* pSh = GetBestViewShell();
1249 if ( pSh )
1250 {
1251 ScInputHandler* pHdl = SC_MOD()->GetInputHdl(pSh);
1252 if ( pHdl && pHdl->IsInputMode() && pHdl->IsFormulaMode() && !bApi )
1253 {
1254 pHdl->FormulaPreview(); // Teilergebnis als QuickHelp
1255 bDone = TRUE;
1256 }
1257 else
1258 {
1259 pSh->UpdateInputLine(); // InputEnterHandler
1260 pSh->UpdateInputHandler();
1261 }
1262 }
1263 if (!bDone) // sonst Dokument neu berechnen
1264 {
1265 WaitObject aWaitObj( GetActiveDialogParent() );
1266 aDocument.CalcFormulaTree();
1267 if ( pSh )
1268 pSh->UpdateCharts(TRUE);
1269
1270 aDocument.BroadcastUno( SfxSimpleHint( SFX_HINT_DATACHANGED ) );
1271
1272 // #47939# Wenn es Charts gibt, dann alles painten, damit nicht
1273 // PostDataChanged und die Charts nacheinander kommen und Teile
1274 // doppelt gepainted werden.
1275
1276 ScChartListenerCollection* pCharts = aDocument.GetChartListenerCollection();
1277 if ( pCharts && pCharts->GetCount() )
1278 PostPaintGridAll();
1279 else
1280 PostDataChanged();
1281 }
1282 }
1283
1284 void ScDocShell::DoHardRecalc( BOOL /* bApi */ )
1285 {
1286 WaitObject aWaitObj( GetActiveDialogParent() );
1287 ScTabViewShell* pSh = GetBestViewShell();
1288 if ( pSh )
1289 {
1290 pSh->UpdateInputLine(); // InputEnterHandler
1291 pSh->UpdateInputHandler();
1292 }
1293 aDocument.CalcAll();
1294 GetDocFunc().DetectiveRefresh(); // erzeugt eigenes Undo
1295 if ( pSh )
1296 pSh->UpdateCharts(TRUE);
1297
1298 // CalcAll doesn't broadcast value changes, so SC_HINT_CALCALL is broadcasted globally
1299 // in addition to SFX_HINT_DATACHANGED.
1300 aDocument.BroadcastUno( SfxSimpleHint( SC_HINT_CALCALL ) );
1301 aDocument.BroadcastUno( SfxSimpleHint( SFX_HINT_DATACHANGED ) );
1302
1303 // use hard recalc also to disable stream-copying of all sheets
1304 // (somewhat consistent with charts)
1305 SCTAB nTabCount = aDocument.GetTableCount();
1306 for (SCTAB nTab=0; nTab<nTabCount; nTab++)
1307 if (aDocument.IsStreamValid(nTab))
1308 aDocument.SetStreamValid(nTab, FALSE);
1309
1310 PostPaintGridAll();
1311 }
1312
1313 //------------------------------------------------------------------
1314
1315 void ScDocShell::DoAutoStyle( const ScRange& rRange, const String& rStyle )
1316 {
1317 ScStyleSheetPool* pStylePool = aDocument.GetStyleSheetPool();
1318 ScStyleSheet* pStyleSheet =
1319 pStylePool->FindCaseIns( rStyle, SFX_STYLE_FAMILY_PARA );
1320 if (!pStyleSheet)
1321 pStyleSheet = (ScStyleSheet*)
1322 pStylePool->Find( ScGlobal::GetRscString(STR_STYLENAME_STANDARD), SFX_STYLE_FAMILY_PARA );
1323 if (pStyleSheet)
1324 {
1325 DBG_ASSERT(rRange.aStart.Tab() == rRange.aEnd.Tab(),
1326 "DoAutoStyle mit mehreren Tabellen");
1327 SCTAB nTab = rRange.aStart.Tab();
1328 SCCOL nStartCol = rRange.aStart.Col();
1329 SCROW nStartRow = rRange.aStart.Row();
1330 SCCOL nEndCol = rRange.aEnd.Col();
1331 SCROW nEndRow = rRange.aEnd.Row();
1332 aDocument.ApplyStyleAreaTab( nStartCol, nStartRow, nEndCol, nEndRow, nTab, *pStyleSheet );
1333 aDocument.ExtendMerge( nStartCol, nStartRow, nEndCol, nEndRow, nTab );
1334 PostPaint( nStartCol, nStartRow, nTab, nEndCol, nEndRow, nTab, PAINT_GRID );
1335 }
1336 }
1337
1338 //------------------------------------------------------------------
1339
1340 void ScDocShell::NotifyStyle( const SfxStyleSheetHint& rHint )
1341 {
1342 USHORT nId = rHint.GetHint();
1343 const SfxStyleSheetBase* pStyle = rHint.GetStyleSheet();
1344 if (!pStyle)
1345 return;
1346
1347 if ( pStyle->GetFamily() == SFX_STYLE_FAMILY_PAGE )
1348 {
1349 if ( nId == SFX_STYLESHEET_MODIFIED )
1350 {
1351 ScDocShellModificator aModificator( *this );
1352
1353 String aNewName = pStyle->GetName();
1354 String aOldName = aNewName;
1355 BOOL bExtended = rHint.ISA(SfxStyleSheetHintExtended); // Name geaendert?
1356 if (bExtended)
1357 aOldName = ((SfxStyleSheetHintExtended&)rHint).GetOldName();
1358
1359 if ( aNewName != aOldName )
1360 aDocument.RenamePageStyleInUse( aOldName, aNewName );
1361
1362 SCTAB nTabCount = aDocument.GetTableCount();
1363 for (SCTAB nTab=0; nTab<nTabCount; nTab++)
1364 if (aDocument.GetPageStyle(nTab) == aNewName) // schon auf neu angepasst
1365 {
1366 aDocument.PageStyleModified( nTab, aNewName );
1367 ScPrintFunc aPrintFunc( this, GetPrinter(), nTab );
1368 aPrintFunc.UpdatePages();
1369 }
1370
1371 aModificator.SetDocumentModified();
1372
1373 if (bExtended)
1374 {
1375 SfxBindings* pBindings = GetViewBindings();
1376 if (pBindings)
1377 {
1378 pBindings->Invalidate( SID_STATUS_PAGESTYLE );
1379 pBindings->Invalidate( SID_STYLE_FAMILY4 );
1380 pBindings->Invalidate( FID_RESET_PRINTZOOM );
1381 pBindings->Invalidate( SID_ATTR_PARA_LEFT_TO_RIGHT );
1382 pBindings->Invalidate( SID_ATTR_PARA_RIGHT_TO_LEFT );
1383 }
1384 }
1385 }
1386 }
1387 else if ( pStyle->GetFamily() == SFX_STYLE_FAMILY_PARA )
1388 {
1389 if ( nId == SFX_STYLESHEET_MODIFIED)
1390 {
1391 String aNewName = pStyle->GetName();
1392 String aOldName = aNewName;
1393 BOOL bExtended = rHint.ISA(SfxStyleSheetHintExtended);
1394 if (bExtended)
1395 aOldName = ((SfxStyleSheetHintExtended&)rHint).GetOldName();
1396 if ( aNewName != aOldName )
1397 {
1398 ScConditionalFormatList* pList = aDocument.GetCondFormList();
1399 if (pList)
1400 pList->RenameCellStyle( aOldName,aNewName );
1401 }
1402 }
1403 }
1404
1405 // alles andere geht ueber Slots...
1406 }
1407
1408 // wie in printfun.cxx
1409 #define ZOOM_MIN 10
1410
1411 void ScDocShell::SetPrintZoom( SCTAB nTab, USHORT nScale, USHORT nPages )
1412 {
1413 BOOL bUndo(aDocument.IsUndoEnabled());
1414 String aStyleName = aDocument.GetPageStyle( nTab );
1415 ScStyleSheetPool* pStylePool = aDocument.GetStyleSheetPool();
1416 SfxStyleSheetBase* pStyleSheet = pStylePool->Find( aStyleName, SFX_STYLE_FAMILY_PAGE );
1417 DBG_ASSERT( pStyleSheet, "PageStyle not found" );
1418 if ( pStyleSheet )
1419 {
1420 ScDocShellModificator aModificator( *this );
1421
1422 SfxItemSet& rSet = pStyleSheet->GetItemSet();
1423 if (bUndo)
1424 {
1425 USHORT nOldScale = ((const SfxUInt16Item&)rSet.Get(ATTR_PAGE_SCALE)).GetValue();
1426 USHORT nOldPages = ((const SfxUInt16Item&)rSet.Get(ATTR_PAGE_SCALETOPAGES)).GetValue();
1427 GetUndoManager()->AddUndoAction( new ScUndoPrintZoom(
1428 this, nTab, nOldScale, nOldPages, nScale, nPages ) );
1429 }
1430
1431 rSet.Put( SfxUInt16Item( ATTR_PAGE_SCALE, nScale ) );
1432 rSet.Put( SfxUInt16Item( ATTR_PAGE_SCALETOPAGES, nPages ) );
1433
1434 ScPrintFunc aPrintFunc( this, GetPrinter(), nTab );
1435 aPrintFunc.UpdatePages();
1436 aModificator.SetDocumentModified();
1437
1438 SfxBindings* pBindings = GetViewBindings();
1439 if (pBindings)
1440 pBindings->Invalidate( FID_RESET_PRINTZOOM );
1441 }
1442 }
1443
1444 BOOL ScDocShell::AdjustPrintZoom( const ScRange& rRange )
1445 {
1446 BOOL bChange = FALSE;
1447 SCTAB nTab = rRange.aStart.Tab();
1448
1449 String aStyleName = aDocument.GetPageStyle( nTab );
1450 ScStyleSheetPool* pStylePool = aDocument.GetStyleSheetPool();
1451 SfxStyleSheetBase* pStyleSheet = pStylePool->Find( aStyleName, SFX_STYLE_FAMILY_PAGE );
1452 DBG_ASSERT( pStyleSheet, "PageStyle not found" );
1453 if ( pStyleSheet )
1454 {
1455 SfxItemSet& rSet = pStyleSheet->GetItemSet();
1456 BOOL bHeaders = ((const SfxBoolItem&)rSet.Get(ATTR_PAGE_HEADERS)).GetValue();
1457 USHORT nOldScale = ((const SfxUInt16Item&)rSet.Get(ATTR_PAGE_SCALE)).GetValue();
1458 USHORT nOldPages = ((const SfxUInt16Item&)rSet.Get(ATTR_PAGE_SCALETOPAGES)).GetValue();
1459 const ScRange* pRepeatCol = aDocument.GetRepeatColRange( nTab );
1460 const ScRange* pRepeatRow = aDocument.GetRepeatRowRange( nTab );
1461
1462 // benoetigte Skalierung fuer Selektion ausrechnen
1463
1464 USHORT nNewScale = nOldScale;
1465
1466 long nBlkTwipsX = 0;
1467 if (bHeaders)
1468 nBlkTwipsX += (long) PRINT_HEADER_WIDTH;
1469 SCCOL nStartCol = rRange.aStart.Col();
1470 SCCOL nEndCol = rRange.aEnd.Col();
1471 if ( pRepeatCol && nStartCol >= pRepeatCol->aStart.Col() )
1472 {
1473 for (SCCOL i=pRepeatCol->aStart.Col(); i<=pRepeatCol->aEnd.Col(); i++ )
1474 nBlkTwipsX += aDocument.GetColWidth( i, nTab );
1475 if ( nStartCol <= pRepeatCol->aEnd.Col() )
1476 nStartCol = pRepeatCol->aEnd.Col() + 1;
1477 }
1478 // legacy compilers' own scope for i
1479 {
1480 for ( SCCOL i=nStartCol; i<=nEndCol; i++ )
1481 nBlkTwipsX += aDocument.GetColWidth( i, nTab );
1482 }
1483
1484 long nBlkTwipsY = 0;
1485 if (bHeaders)
1486 nBlkTwipsY += (long) PRINT_HEADER_HEIGHT;
1487 SCROW nStartRow = rRange.aStart.Row();
1488 SCROW nEndRow = rRange.aEnd.Row();
1489 if ( pRepeatRow && nStartRow >= pRepeatRow->aStart.Row() )
1490 {
1491 nBlkTwipsY += aDocument.FastGetRowHeight( pRepeatRow->aStart.Row(),
1492 pRepeatRow->aEnd.Row(), nTab );
1493 if ( nStartRow <= pRepeatRow->aEnd.Row() )
1494 nStartRow = pRepeatRow->aEnd.Row() + 1;
1495 }
1496 nBlkTwipsY += aDocument.FastGetRowHeight( nStartRow, nEndRow, nTab );
1497
1498 Size aPhysPage;
1499 long nHdr, nFtr;
1500 ScPrintFunc aOldPrFunc( this, GetPrinter(), nTab );
1501 aOldPrFunc.GetScaleData( aPhysPage, nHdr, nFtr );
1502 nBlkTwipsY += nHdr + nFtr;
1503
1504 if ( nBlkTwipsX == 0 ) // #100639# hidden columns/rows may lead to 0
1505 nBlkTwipsX = 1;
1506 if ( nBlkTwipsY == 0 )
1507 nBlkTwipsY = 1;
1508
1509 long nNeeded = Min( aPhysPage.Width() * 100 / nBlkTwipsX,
1510 aPhysPage.Height() * 100 / nBlkTwipsY );
1511 if ( nNeeded < ZOOM_MIN )
1512 nNeeded = ZOOM_MIN; // Begrenzung
1513 if ( nNeeded < (long) nNewScale )
1514 nNewScale = (USHORT) nNeeded;
1515
1516 bChange = ( nNewScale != nOldScale || nOldPages != 0 );
1517 if ( bChange )
1518 SetPrintZoom( nTab, nNewScale, 0 );
1519 }
1520 return bChange;
1521 }
1522
1523 void ScDocShell::PageStyleModified( const String& rStyleName, BOOL bApi )
1524 {
1525 ScDocShellModificator aModificator( *this );
1526
1527 BOOL bWarn = FALSE;
1528
1529 SCTAB nTabCount = aDocument.GetTableCount();
1530 SCTAB nUseTab = MAXTAB+1;
1531 for (SCTAB nTab=0; nTab<nTabCount && nUseTab>MAXTAB; nTab++)
1532 if ( aDocument.GetPageStyle(nTab) == rStyleName &&
1533 ( !bApi || aDocument.GetPageSize(nTab).Width() ) )
1534 nUseTab = nTab;
1535 // bei bApi nur, wenn Umbrueche schon angezeigt
1536
1537 if (ValidTab(nUseTab)) // nicht verwendet -> nichts zu tun
1538 {
1539 ScPrintFunc aPrintFunc( this, GetPrinter(), nUseTab ); //! ohne CountPages auskommen
1540 if (!aPrintFunc.UpdatePages()) // setzt Umbrueche auf allen Tabs
1541 bWarn = TRUE;
1542
1543 if (bWarn && !bApi)
1544 {
1545 ScWaitCursorOff aWaitOff( GetActiveDialogParent() );
1546 InfoBox aInfoBox(GetActiveDialogParent(),
1547 ScGlobal::GetRscString(STR_PRINT_INVALID_AREA));
1548 aInfoBox.Execute();
1549 }
1550 }
1551
1552 aModificator.SetDocumentModified();
1553
1554 SfxBindings* pBindings = GetViewBindings();
1555 if (pBindings)
1556 {
1557 pBindings->Invalidate( FID_RESET_PRINTZOOM );
1558 pBindings->Invalidate( SID_ATTR_PARA_LEFT_TO_RIGHT );
1559 pBindings->Invalidate( SID_ATTR_PARA_RIGHT_TO_LEFT );
1560 }
1561 }
1562
1563 void ScDocShell::ExecutePageStyle( SfxViewShell& rCaller,
1564 SfxRequest& rReq,
1565 SCTAB nCurTab )
1566 {
1567 const SfxItemSet* pReqArgs = rReq.GetArgs();
1568
1569 switch ( rReq.GetSlot() )
1570 {
1571 case SID_STATUS_PAGESTYLE: // Click auf StatusBar-Control
1572 case SID_FORMATPAGE:
1573 {
1574 if ( pReqArgs != NULL )
1575 {
1576 }
1577 else if ( pReqArgs == NULL )
1578 {
1579 BOOL bUndo(aDocument.IsUndoEnabled());
1580 String aOldName = aDocument.GetPageStyle( nCurTab );
1581 ScStyleSheetPool* pStylePool = aDocument.GetStyleSheetPool();
1582 SfxStyleSheetBase* pStyleSheet
1583 = pStylePool->Find( aOldName, SFX_STYLE_FAMILY_PAGE );
1584
1585 DBG_ASSERT( pStyleSheet, "PageStyle not found! :-/" );
1586
1587 if ( pStyleSheet )
1588 {
1589 ScStyleSaveData aOldData;
1590 if (bUndo)
1591 aOldData.InitFromStyle( pStyleSheet );
1592
1593 SfxItemSet& rStyleSet = pStyleSheet->GetItemSet();
1594
1595 //CHINA001 ScStyleDlg* pDlg = new ScStyleDlg( GetActiveDialogParent(),
1596 //CHINA001 *pStyleSheet,
1597 //CHINA001 RID_SCDLG_STYLES_PAGE );
1598 //CHINA001
1599 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
1600 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
1601
1602 SfxAbstractTabDialog* pDlg = pFact->CreateScStyleDlg( GetActiveDialogParent(), *pStyleSheet, RID_SCDLG_STYLES_PAGE, RID_SCDLG_STYLES_PAGE );
1603 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
1604
1605 if ( pDlg->Execute() == RET_OK )
1606 {
1607 const SfxItemSet* pOutSet = pDlg->GetOutputItemSet();
1608
1609 WaitObject aWait( GetActiveDialogParent() );
1610
1611 String aNewName = pStyleSheet->GetName();
1612 if ( aNewName != aOldName &&
1613 aDocument.RenamePageStyleInUse( aOldName, aNewName ) )
1614 {
1615 SfxBindings* pBindings = GetViewBindings();
1616 if (pBindings)
1617 {
1618 pBindings->Invalidate( SID_STATUS_PAGESTYLE );
1619 pBindings->Invalidate( FID_RESET_PRINTZOOM );
1620 }
1621 }
1622
1623 if ( pOutSet )
1624 aDocument.ModifyStyleSheet( *pStyleSheet, *pOutSet );
1625
1626 // merken fuer GetState():
1627 GetPageOnFromPageStyleSet( &rStyleSet, nCurTab, bHeaderOn, bFooterOn );
1628 rCaller.GetViewFrame()->GetBindings().Invalidate( SID_HFEDIT );
1629
1630 ScStyleSaveData aNewData;
1631 aNewData.InitFromStyle( pStyleSheet );
1632 if (bUndo)
1633 {
1634 GetUndoManager()->AddUndoAction(
1635 new ScUndoModifyStyle( this, SFX_STYLE_FAMILY_PAGE,
1636 aOldData, aNewData ) );
1637 }
1638
1639 PageStyleModified( aNewName, FALSE );
1640 rReq.Done();
1641 }
1642 delete pDlg;
1643
1644 rStyleSet.ClearItem( ATTR_PAGE_PAPERTRAY );
1645 }
1646 }
1647 }
1648 break;
1649
1650 case SID_HFEDIT:
1651 {
1652 if ( pReqArgs != NULL )
1653 {
1654 }
1655 else if ( pReqArgs == NULL )
1656 {
1657 String aStr( aDocument.GetPageStyle( nCurTab ) );
1658
1659 ScStyleSheetPool* pStylePool
1660 = aDocument.GetStyleSheetPool();
1661
1662 SfxStyleSheetBase* pStyleSheet
1663 = pStylePool->Find( aStr, SFX_STYLE_FAMILY_PAGE );
1664
1665 DBG_ASSERT( pStyleSheet, "PageStyle not found! :-/" );
1666
1667 if ( pStyleSheet )
1668 {
1669 SfxItemSet& rStyleSet = pStyleSheet->GetItemSet();
1670
1671 SvxPageUsage eUsage =
1672 SvxPageUsage( ((const SvxPageItem&)
1673 rStyleSet.Get( ATTR_PAGE )).
1674 GetPageUsage() );
1675 BOOL bShareHeader = IS_SHARE_HEADER(rStyleSet);
1676 BOOL bShareFooter = IS_SHARE_FOOTER(rStyleSet);
1677 USHORT nResId = 0;
1678
1679 switch ( eUsage )
1680 {
1681 case SVX_PAGE_LEFT:
1682 case SVX_PAGE_RIGHT:
1683 {
1684 if ( bHeaderOn && bFooterOn )
1685 nResId = RID_SCDLG_HFEDIT;
1686 else if ( SVX_PAGE_RIGHT == eUsage )
1687 {
1688 if ( !bHeaderOn && bFooterOn )
1689 nResId = RID_SCDLG_HFEDIT_RIGHTFOOTER;
1690 else if ( bHeaderOn && !bFooterOn )
1691 nResId = RID_SCDLG_HFEDIT_RIGHTHEADER;
1692 }
1693 else
1694 {
1695 // #69193a# respect "shared" setting
1696 if ( !bHeaderOn && bFooterOn )
1697 nResId = bShareFooter ?
1698 RID_SCDLG_HFEDIT_RIGHTFOOTER :
1699 RID_SCDLG_HFEDIT_LEFTFOOTER;
1700 else if ( bHeaderOn && !bFooterOn )
1701 nResId = bShareHeader ?
1702 RID_SCDLG_HFEDIT_RIGHTHEADER :
1703 RID_SCDLG_HFEDIT_LEFTHEADER;
1704 }
1705 }
1706 break;
1707
1708 case SVX_PAGE_MIRROR:
1709 case SVX_PAGE_ALL:
1710 default:
1711 {
1712 if ( !bShareHeader && !bShareFooter )
1713 {
1714 if ( bHeaderOn && bFooterOn )
1715 nResId = RID_SCDLG_HFEDIT_ALL;
1716 else if ( !bHeaderOn && bFooterOn )
1717 nResId = RID_SCDLG_HFEDIT_FOOTER;
1718 else if ( bHeaderOn && !bFooterOn )
1719 nResId = RID_SCDLG_HFEDIT_HEADER;
1720 }
1721 else if ( bShareHeader && bShareFooter )
1722 {
1723 if ( bHeaderOn && bFooterOn )
1724 nResId = RID_SCDLG_HFEDIT;
1725 else
1726 {
1727 if ( !bHeaderOn && bFooterOn )
1728 nResId = RID_SCDLG_HFEDIT_RIGHTFOOTER;
1729 else if ( bHeaderOn && !bFooterOn )
1730 nResId = RID_SCDLG_HFEDIT_RIGHTHEADER;
1731 }
1732 }
1733 else if ( !bShareHeader && bShareFooter )
1734 {
1735 if ( bHeaderOn && bFooterOn )
1736 nResId = RID_SCDLG_HFEDIT_SFTR;
1737 else if ( !bHeaderOn && bFooterOn )
1738 nResId = RID_SCDLG_HFEDIT_RIGHTFOOTER;
1739 else if ( bHeaderOn && !bFooterOn )
1740 nResId = RID_SCDLG_HFEDIT_HEADER;
1741 }
1742 else if ( bShareHeader && !bShareFooter )
1743 {
1744 if ( bHeaderOn && bFooterOn )
1745 nResId = RID_SCDLG_HFEDIT_SHDR;
1746 else if ( !bHeaderOn && bFooterOn )
1747 nResId = RID_SCDLG_HFEDIT_FOOTER;
1748 else if ( bHeaderOn && !bFooterOn )
1749 nResId = RID_SCDLG_HFEDIT_RIGHTHEADER;
1750 }
1751 }
1752 }
1753
1754 //CHINA001 ScHFEditDlg* pDlg
1755 //CHINA001 = new ScHFEditDlg( SFX_APP()->GetViewFrame(),
1756 //CHINA001 GetActiveDialogParent(),
1757 //CHINA001 rStyleSet,
1758 //CHINA001 aStr,
1759 //CHINA001 nResId );
1760 //CHINA001
1761 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
1762 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
1763
1764 SfxAbstractTabDialog* pDlg = pFact->CreateScHFEditDlg( SfxViewFrame::Current(),
1765 GetActiveDialogParent(),
1766 rStyleSet,
1767 aStr,
1768 RID_SCDLG_HFEDIT, nResId);
1769 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
1770 if ( pDlg->Execute() == RET_OK )
1771 {
1772 const SfxItemSet* pOutSet = pDlg->GetOutputItemSet();
1773
1774 if ( pOutSet )
1775 aDocument.ModifyStyleSheet( *pStyleSheet, *pOutSet );
1776
1777 SetDocumentModified();
1778 rReq.Done();
1779 }
1780 delete pDlg;
1781 }
1782 }
1783 }
1784 break;
1785
1786 default:
1787 break;
1788 }
1789 }
1790
1791 void ScDocShell::GetStatePageStyle( SfxViewShell& /* rCaller */,
1792 SfxItemSet& rSet,
1793 SCTAB nCurTab )
1794 {
1795 SfxWhichIter aIter(rSet);
1796 USHORT nWhich = aIter.FirstWhich();
1797 while ( nWhich )
1798 {
1799 switch (nWhich)
1800 {
1801 case SID_STATUS_PAGESTYLE:
1802 rSet.Put( SfxStringItem( nWhich, aDocument.GetPageStyle( nCurTab ) ) );
1803 break;
1804
1805 case SID_HFEDIT:
1806 {
1807 String aStr = aDocument.GetPageStyle( nCurTab );
1808 ScStyleSheetPool* pStylePool = aDocument.GetStyleSheetPool();
1809 SfxStyleSheetBase* pStyleSheet = pStylePool->Find( aStr, SFX_STYLE_FAMILY_PAGE );
1810
1811 DBG_ASSERT( pStyleSheet, "PageStyle not found! :-/" );
1812
1813 if ( pStyleSheet )
1814 {
1815 SfxItemSet& rStyleSet = pStyleSheet->GetItemSet();
1816
1817 GetPageOnFromPageStyleSet( &rStyleSet, nCurTab, bHeaderOn, bFooterOn );
1818
1819 if ( !bHeaderOn && !bFooterOn )
1820 rSet.DisableItem( nWhich );
1821 }
1822 }
1823 break;
1824 }
1825
1826 nWhich = aIter.NextWhich();
1827 }
1828 }
1829
1830 void lcl_GetPrintData( ScDocShell* pDocShell /*in*/,
1831 ScDocument* pDocument /*in*/, SfxPrinter* pPrinter /*in*/,
1832 PrintDialog* pPrintDialog /*in*/, bool bForceSelected /*in*/,
1833 ScMarkData* pMarkData /*inout*/, bool& rbHasOptions /*out*/,
1834 ScPrintOptions& rOptions /*out*/, bool& rbAllTabs /*out*/,
1835 long& rnTotalPages /*out*/, long aPageArr[] /*out*/,
1836 MultiSelection& rPageRanges /*out*/, ScRange** ppMarkedRange /*out*/ )
1837 {
1838 // get settings from print options sub-dialog
1839 const SfxItemSet& rOptionSet = pPrinter->GetOptions();
1840 const SfxPoolItem* pItem;
1841 rbHasOptions = ( rOptionSet.GetItemState( SID_SCPRINTOPTIONS, FALSE, &pItem ) == SFX_ITEM_SET );
1842 if ( rbHasOptions )
1843 {
1844 rOptions = ((const ScTpPrintItem*)pItem)->GetPrintOptions();
1845 }
1846 else
1847 {
1848 // use configuration
1849 rOptions = SC_MOD()->GetPrintOptions();
1850 }
1851
1852 // update all pending row heights with a single progress bar,
1853 // instead of a separate progress for each sheet from ScPrintFunc
1854 pDocShell->UpdatePendingRowHeights( MAXTAB, true );
1855
1856 // get number of total pages
1857 rnTotalPages = 0;
1858 SCTAB nTabCount = pDocument->GetTableCount();
1859 for ( SCTAB nTab = 0; nTab < nTabCount; ++nTab )
1860 {
1861 ScPrintFunc aPrintFunc( pDocShell, pPrinter, nTab, 0, 0, NULL, &rOptions );
1862 long nThisTab = aPrintFunc.GetTotalPages();
1863 aPageArr[nTab] = nThisTab;
1864 rnTotalPages += nThisTab;
1865 }
1866
1867 rPageRanges.SetTotalRange( Range( 0, RANGE_MAX ) );
1868 rPageRanges.Select( Range( 1, rnTotalPages ) );
1869
1870 rbAllTabs = ( pPrintDialog ? ( pPrintDialog->GetCheckedSheetRange() == PRINTSHEETS_ALL ) : SC_MOD()->GetPrintOptions().GetAllSheets() );
1871 if ( bForceSelected )
1872 {
1873 rbAllTabs = false;
1874 }
1875
1876 if ( ( pPrintDialog && pPrintDialog->GetCheckedSheetRange() == PRINTSHEETS_SELECTED_CELLS ) || bForceSelected )
1877 {
1878 if ( pMarkData && ( pMarkData->IsMarked() || pMarkData->IsMultiMarked() ) )
1879 {
1880 pMarkData->MarkToMulti();
1881 *ppMarkedRange = new ScRange;
1882 pMarkData->GetMultiMarkArea( **ppMarkedRange );
1883 pMarkData->MarkToSimple();
1884 }
1885 }
1886
1887 PrintDialogRange eDlgOption = pPrintDialog ? pPrintDialog->GetCheckedRange() : PRINTDIALOG_ALL;
1888 if ( eDlgOption == PRINTDIALOG_RANGE )
1889 {
1890 rPageRanges = MultiSelection( pPrintDialog->GetRangeText() );
1891 }
1892
1893 // get number of total pages if selection
1894 if ( !rbAllTabs )
1895 {
1896 rnTotalPages = 0;
1897 for ( SCTAB nTab = 0; nTab < nTabCount; ++nTab )
1898 {
1899 if ( *ppMarkedRange ) // selected range is used instead of print ranges -> page count is different
1900 {
1901 ScPrintFunc aPrintFunc( pDocShell, pPrinter, nTab, 0, 0, *ppMarkedRange, &rOptions );
1902 aPageArr[nTab] = aPrintFunc.GetTotalPages();
1903 }
1904 if ( !pMarkData || pMarkData->GetTableSelect( nTab ) )
1905 {
1906 rnTotalPages += aPageArr[nTab];
1907 }
1908 }
1909 if ( eDlgOption == PRINTDIALOG_ALL || bForceSelected )
1910 {
1911 rPageRanges.Select( Range( 1, rnTotalPages ) );
1912 }
1913 }
1914 }
1915
1916 bool ScDocShell::CheckPrint( PrintDialog* pPrintDialog, ScMarkData* pMarkData, bool bForceSelected, bool bIsAPI )
1917 {
1918 SfxPrinter* pPrinter = GetPrinter();
1919 if ( !pPrinter )
1920 {
1921 return false;
1922 }
1923
1924 bool bHasOptions = false;
1925 ScPrintOptions aOptions;
1926 bool bAllTabs = true;
1927 long nTotalPages = 0;
1928 long aPageArr[MAXTABCOUNT]; // pages per sheet
1929 MultiSelection aPageRanges; // pages to print
1930 ScRange* pMarkedRange = NULL;
1931
1932 lcl_GetPrintData( this, &aDocument, pPrinter, pPrintDialog, bForceSelected,
1933 pMarkData, bHasOptions, aOptions, bAllTabs, nTotalPages,
1934 aPageArr, aPageRanges, &pMarkedRange );
1935
1936 delete pMarkedRange;
1937
1938 if ( nTotalPages == 0 )
1939 {
1940 if ( !bIsAPI )
1941 {
1942 WarningBox aWarningBox( GetActiveDialogParent(), WinBits( WB_OK ),
1943 String( ScResId( STR_PRINT_NOTHING ) ) );
1944 aWarningBox.Execute();
1945 }
1946 return false;
1947 }
1948
1949 return true;
1950 }
1951
1952 void ScDocShell::PreparePrint( PrintDialog* pPrintDialog, ScMarkData* pMarkData )
1953 {
1954 SfxPrinter* pPrinter = GetPrinter();
1955 if ( !pPrinter )
1956 {
1957 return;
1958 }
1959
1960 delete pOldJobSetup; // gesetzt nur bei Fehler in StartJob()
1961 pOldJobSetup = new ScJobSetup( pPrinter ); // Einstellungen merken
1962
1963 // Einstellungen fuer die erste gedruckte Seite muessen hier (vor StartJob) gesetzt werden
1964 //! Selection etc. mit Print() zusammenfassen !!!
1965 //! Seiten nur einmal zaehlen
1966
1967 bool bHasOptions = false;
1968 ScPrintOptions aOptions;
1969 bool bAllTabs = true;
1970 long nTotalPages = 0;
1971 long aPageArr[MAXTABCOUNT]; // pages per sheet
1972 MultiSelection aPageRanges; // pages to print
1973 ScRange* pMarkedRange = NULL;
1974
1975 lcl_GetPrintData( this, &aDocument, pPrinter, pPrintDialog, false,
1976 pMarkData, bHasOptions, aOptions, bAllTabs, nTotalPages,
1977 aPageArr, aPageRanges, &pMarkedRange );
1978
1979 BOOL bFound = FALSE; // erste Seite gefunden
1980 long nTabStart = 0;
1981 SCTAB nTabCount = aDocument.GetTableCount();
1982 for ( SCTAB nTab=0; nTab<nTabCount && !bFound; nTab++ )
1983 {
1984 if ( bAllTabs || !pMarkData || pMarkData->GetTableSelect( nTab ) )
1985 {
1986 long nNext = nTabStart + aPageArr[nTab];
1987 BOOL bSelected = FALSE;
1988 for (long nP=nTabStart+1; nP<=nNext; nP++) // 1-basiert
1989 if (aPageRanges.IsSelected( nP )) // eine Seite von dieser Tabelle selektiert?
1990 bSelected = TRUE;
1991
1992 if (bSelected)
1993 {
1994 ScPrintFunc aPrintFunc( this, pPrinter, nTab );
1995
1996 aPrintFunc.ApplyPrintSettings(); // dann Settings fuer diese Tabelle
1997 bFound = TRUE;
1998 }
1999 nTabStart = nNext;
2000 }
2001 }
2002
2003 delete pMarkedRange;
2004 }
2005
2006 BOOL lcl_HasTransparent( ScDocument* pDoc, SCTAB nTab, const ScRange* pRange )
2007 {
2008 BOOL bFound = FALSE;
2009 ScDrawLayer* pDrawLayer = pDoc->GetDrawLayer();
2010 if (pDrawLayer)
2011 {
2012 SdrPage* pPage = pDrawLayer->GetPage(static_cast<sal_uInt16>(nTab));
2013 DBG_ASSERT(pPage,"Page ?");
2014 if (pPage)
2015 {
2016 Rectangle aMMRect;
2017 if ( pRange )
2018 aMMRect = pDoc->GetMMRect( pRange->aStart.Col(), pRange->aStart.Row(),
2019 pRange->aEnd.Col(), pRange->aEnd.Row(), nTab );
2020
2021 SdrObjListIter aIter( *pPage, IM_DEEPNOGROUPS );
2022 SdrObject* pObject = aIter.Next();
2023 while (pObject && !bFound)
2024 {
2025 if (pObject->IsTransparent())
2026 {
2027 if ( pRange )
2028 {
2029 Rectangle aObjRect = pObject->GetLogicRect();
2030 if ( aObjRect.IsOver( aMMRect ) )
2031 bFound = TRUE;
2032 }
2033 else
2034 bFound = TRUE;
2035 }
2036
2037 pObject = aIter.Next();
2038 }
2039 }
2040 }
2041
2042 return bFound;
2043 }
2044
2045 void ScDocShell::Print( SfxProgress& rProgress, PrintDialog* pPrintDialog,
2046 ScMarkData* pMarkData, Window* pDialogParent, BOOL bForceSelected, BOOL bIsAPI )
2047 {
2048 SfxPrinter* pPrinter = GetPrinter();
2049 if ( !pPrinter )
2050 {
2051 return;
2052 }
2053
2054 bool bHasOptions = false;
2055 ScPrintOptions aOptions;
2056 bool bAllTabs = true;
2057 long nTotalPages = 0;
2058 long aPageArr[MAXTABCOUNT]; // pages per sheet
2059 MultiSelection aPageRanges; // pages to print
2060 ScRange* pMarkedRange = NULL;
2061
2062 lcl_GetPrintData( this, &aDocument, pPrinter, pPrintDialog, bForceSelected,
2063 pMarkData, bHasOptions, aOptions, bAllTabs, nTotalPages,
2064 aPageArr, aPageRanges, &pMarkedRange );
2065
2066 USHORT nCollateCopies = 1;
2067 if ( pPrintDialog && pPrintDialog->IsCollateEnabled() && pPrintDialog->IsCollateChecked() )
2068 nCollateCopies = pPrintDialog->GetCopyCount();
2069
2070 // test if printed range contains transparent objects
2071
2072 BOOL bHasTransp = FALSE;
2073 BOOL bAnyPrintRanges = aDocument.HasPrintRange();
2074 ScStyleSheetPool* pStylePool = aDocument.GetStyleSheetPool();
2075 SCTAB nTabCount = aDocument.GetTableCount();
2076 for ( SCTAB nTab=0; nTab<nTabCount && !bHasTransp; nTab++ )
2077 {
2078 if ( bAllTabs || !pMarkData || pMarkData->GetTableSelect( nTab ) )
2079 {
2080 SfxStyleSheetBase* pStyleSheet = pStylePool->Find(
2081 aDocument.GetPageStyle( nTab ), SFX_STYLE_FAMILY_PAGE );
2082 if ( pStyleSheet )
2083 {
2084 const SfxItemSet& rSet = pStyleSheet->GetItemSet();
2085 if ( ((const ScViewObjectModeItem&)rSet.Get(ATTR_PAGE_CHARTS)).GetValue() == VOBJ_MODE_SHOW ||
2086 ((const ScViewObjectModeItem&)rSet.Get(ATTR_PAGE_OBJECTS)).GetValue() == VOBJ_MODE_SHOW ||
2087 ((const ScViewObjectModeItem&)rSet.Get(ATTR_PAGE_DRAWINGS)).GetValue() == VOBJ_MODE_SHOW )
2088 {
2089 if ( pMarkedRange )
2090 bHasTransp = bHasTransp || lcl_HasTransparent( &aDocument, nTab, pMarkedRange );
2091 else if ( aDocument.GetPrintRangeCount(nTab) )
2092 {
2093 USHORT nRangeCount = aDocument.GetPrintRangeCount(nTab);
2094 for (USHORT i=0; i<nRangeCount; i++)
2095 bHasTransp = bHasTransp ||
2096 lcl_HasTransparent( &aDocument, nTab, aDocument.GetPrintRange( nTab, i ) );
2097 }
2098 else if (!bAnyPrintRanges || aDocument.IsPrintEntireSheet(nTab))
2099 bHasTransp = bHasTransp || lcl_HasTransparent( &aDocument, nTab, NULL );
2100 }
2101 }
2102 }
2103 }
2104
2105 BOOL bContinue = pPrinter->InitJob( pDialogParent, !bIsAPI && bHasTransp );
2106
2107 if ( bContinue )
2108 {
2109 for ( USHORT n=0; n<nCollateCopies; n++ )
2110 {
2111 long nTabStart = 0;
2112 long nDisplayStart = 0;
2113 long nAttrPage = 1;
2114 long nPrinted = 0;
2115
2116 for ( SCTAB nTab=0; nTab<nTabCount; nTab++ )
2117 {
2118 if ( bAllTabs || !pMarkData || pMarkData->GetTableSelect( nTab ) )
2119 {
2120 FmFormView* pDrawView = NULL;
2121 Rectangle aFull( 0, 0, LONG_MAX, LONG_MAX );
2122
2123 // #114135#
2124 ScDrawLayer* pModel = aDocument.GetDrawLayer(); // ist nicht NULL
2125
2126 if(pModel)
2127 {
2128 pDrawView = new FmFormView( pModel, pPrinter );
2129 pDrawView->ShowSdrPage(pDrawView->GetModel()->GetPage(nTab));
2130 pDrawView->SetPrintPreview( TRUE );
2131 }
2132
2133 ScPrintFunc aPrintFunc( this, pPrinter, nTab, nAttrPage, nTotalPages, pMarkedRange, &aOptions );
2134 aPrintFunc.SetDrawView( pDrawView );
2135 nPrinted += aPrintFunc.DoPrint( aPageRanges, nTabStart, nDisplayStart, TRUE, &rProgress, NULL );
2136
2137 nTabStart += aPageArr[nTab];
2138 if ( aDocument.NeedPageResetAfterTab(nTab) )
2139 nDisplayStart = 0;
2140 else
2141 nDisplayStart += aPageArr[nTab];
2142 nAttrPage = aPrintFunc.GetFirstPageNo(); // behalten oder aus Vorlage
2143
2144 delete pDrawView;
2145 }
2146 }
2147
2148 if ( n+1 < nCollateCopies && pPrinter->GetDuplexMode() == DUPLEX_ON && ( nPrinted % 2 ) == 1 )
2149 {
2150 // #105584# when several collated copies are printed in duplex mode, and there is
2151 // an odd number of pages, print an empty page between copies, so the first page of
2152 // the second copy isn't printed on the back of the last page of the first copy.
2153 // (same as in Writer ViewShell::Prt)
2154
2155 pPrinter->StartPage();
2156 pPrinter->EndPage();
2157 }
2158 }
2159 }
2160
2161 delete pMarkedRange;
2162
2163 if (pOldJobSetup)
2164 {
2165 pPrinter->SetOrientation( pOldJobSetup->eOrientation );
2166 pPrinter->SetPaperBin ( pOldJobSetup->nPaperBin );
2167 pPrinter->SetPaper ( pOldJobSetup->ePaper );
2168
2169 if ( PAPER_USER == pOldJobSetup->ePaper )
2170 {
2171 pPrinter->SetMapMode( pOldJobSetup->aUserMapMode );
2172 pPrinter->SetPaperSizeUser( pOldJobSetup->aUserSize );
2173 }
2174
2175 delete pOldJobSetup;
2176 pOldJobSetup = NULL;
2177 }
2178
2179 if ( bHasOptions )
2180 {
2181 // remove PrintOptions from printer ItemSet,
2182 // so next time the options from the configuration are used
2183
2184 SfxItemSet aSet( pPrinter->GetOptions() );
2185 aSet.ClearItem( SID_SCPRINTOPTIONS );
2186 pPrinter->SetOptions( aSet );
2187 }
2188
2189 PostPaintGridAll(); //! nur wenn geaendert
2190 }
2191
2192 void ScDocShell::GetState( SfxItemSet &rSet )
2193 {
2194 SfxWhichIter aIter(rSet);
2195 USHORT nWhich = aIter.FirstWhich();
2196 while ( nWhich )
2197 {
2198 switch (nWhich)
2199 {
2200 case FID_AUTO_CALC:
2201 if ( (BOOL) aDocument.GetHardRecalcState() )
2202 rSet.DisableItem( nWhich );
2203 else
2204 rSet.Put( SfxBoolItem( nWhich, aDocument.GetAutoCalc() ) );
2205 break;
2206
2207 case FID_CHG_RECORD:
2208 if ( IsDocShared() )
2209 rSet.DisableItem( nWhich );
2210 else
2211 rSet.Put( SfxBoolItem( nWhich,
2212 aDocument.GetChangeTrack() != NULL ) );
2213 break;
2214
2215 case SID_CHG_PROTECT:
2216 {
2217 ScChangeTrack* pChangeTrack = aDocument.GetChangeTrack();
2218 if ( pChangeTrack && !IsDocShared() )
2219 rSet.Put( SfxBoolItem( nWhich,
2220 pChangeTrack->IsProtected() ) );
2221 else
2222 rSet.DisableItem( nWhich );
2223 }
2224 break;
2225
2226 case SID_DOCUMENT_COMPARE:
2227 {
2228 if ( IsDocShared() )
2229 {
2230 rSet.DisableItem( nWhich );
2231 }
2232 }
2233 break;
2234
2235 // Wenn eine Formel editiert wird, muss FID_RECALC auf jeden Fall enabled sein.
2236 // Recalc fuer das Doc war mal wegen #29898# disabled, wenn AutoCalc an war,
2237 // ist jetzt wegen #41540# aber auch immer enabled.
2238 // case FID_RECALC:
2239 // if ( aDocument.GetAutoCalc() )
2240 // rSet.DisableItem( nWhich );
2241 // break;
2242
2243 case SID_TABLES_COUNT:
2244 rSet.Put( SfxInt16Item( nWhich, aDocument.GetTableCount() ) );
2245 break;
2246
2247 case SID_ATTR_YEAR2000 :
2248 rSet.Put( SfxUInt16Item( nWhich,
2249 aDocument.GetDocOptions().GetYear2000() ) );
2250 break;
2251
2252 case SID_SHARE_DOC:
2253 {
2254 if ( IsReadOnly() )
2255 {
2256 rSet.DisableItem( nWhich );
2257 }
2258 }
2259 break;
2260
2261 default:
2262 {
2263 }
2264 break;
2265 }
2266
2267 nWhich = aIter.NextWhich();
2268 }
2269 }
2270
2271 void ScDocShell::GetSbxState( SfxItemSet &rSet )
2272 {
2273 // SID_SC_SELECTION (Selection),
2274 // SID_SC_ACTIVECELL (ActiveCell),
2275 // SID_SC_ACTIVETAB (ActiveTable),
2276 // SID_TABLES_GET (Tables),
2277 // SID_PIVOT_GET (DataPilotTables) - removed (old Basic)
2278
2279 //
2280 // Wenn hier Slots von der View-Shell executed werden, muss auch der
2281 // GetState weitergeleitet werden!
2282 //
2283
2284 ScTabViewShell* pVisibleSh = GetBestViewShell(); // sichtbare View
2285 if ( pVisibleSh )
2286 pVisibleSh->GetState( rSet );
2287 }
2288
2289 void __EXPORT ScDocShell::Draw( OutputDevice* pDev, const JobSetup & /* rSetup */, USHORT nAspect )
2290 {
2291 // bIsOle = TRUE; // jetzt ueber den CreateMode
2292
2293 SCTAB nVisTab = aDocument.GetVisibleTab();
2294 if (!aDocument.HasTable(nVisTab))
2295 return;
2296
2297 ULONG nOldLayoutMode = pDev->GetLayoutMode();
2298 pDev->SetLayoutMode( TEXT_LAYOUT_DEFAULT ); // even if it's the same, to get the metafile action
2299
2300 if ( nAspect == ASPECT_THUMBNAIL )
2301 {
2302 Rectangle aBoundRect = GetVisArea( ASPECT_THUMBNAIL );
2303 ScViewData aTmpData( this, NULL );
2304 aTmpData.SetTabNo(nVisTab);
2305 aDocument.SnapVisArea( aBoundRect );
2306 aTmpData.SetScreen( aBoundRect );
2307 ScPrintFunc::DrawToDev( &aDocument, pDev, 1.0, aBoundRect, &aTmpData, TRUE );
2308 }
2309 else
2310 {
2311 Rectangle aBoundRect = SfxObjectShell::GetVisArea();
2312 ScViewData aTmpData( this, NULL );
2313 aTmpData.SetTabNo(nVisTab);
2314 aDocument.SnapVisArea( aBoundRect );
2315 aTmpData.SetScreen( aBoundRect );
2316 ScPrintFunc::DrawToDev( &aDocument, pDev, 1.0, aBoundRect, &aTmpData, TRUE );
2317 }
2318
2319 pDev->SetLayoutMode( nOldLayoutMode );
2320 }
2321
2322 Rectangle __EXPORT ScDocShell::GetVisArea( USHORT nAspect ) const
2323 {
2324 SfxObjectCreateMode eShellMode = GetCreateMode();
2325 if ( eShellMode == SFX_CREATE_MODE_ORGANIZER )
2326 {
2327 // ohne Inhalte wissen wir auch nicht, wie gross die Inhalte sind
2328 // leeres Rechteck zurueckgeben, das wird dann nach dem Laden berechnet
2329 return Rectangle();
2330 }
2331
2332 if( nAspect == ASPECT_THUMBNAIL )
2333 {
2334 // Rectangle aArea( 0,0, 3175,3175 ); // 120x120 Pixel in 1:1
2335 Rectangle aArea( 0,0, SC_PREVIEW_SIZE_X,SC_PREVIEW_SIZE_Y );
2336 BOOL bNegativePage = aDocument.IsNegativePage( aDocument.GetVisibleTab() );
2337 if ( bNegativePage )
2338 ScDrawLayer::MirrorRectRTL( aArea );
2339 aDocument.SnapVisArea( aArea );
2340 return aArea;
2341 }
2342 else if( nAspect == ASPECT_CONTENT && eShellMode != SFX_CREATE_MODE_EMBEDDED )
2343 {
2344 // Visarea holen wie nach Load
2345
2346 SCTAB nVisTab = aDocument.GetVisibleTab();
2347 if (!aDocument.HasTable(nVisTab))
2348 {
2349 nVisTab = 0;
2350 ((ScDocShell*)this)->aDocument.SetVisibleTab(nVisTab);
2351 }
2352 SCCOL nStartCol;
2353 SCROW nStartRow;
2354 aDocument.GetDataStart( nVisTab, nStartCol, nStartRow );
2355 SCCOL nEndCol;
2356 SCROW nEndRow;
2357 aDocument.GetPrintArea( nVisTab, nEndCol, nEndRow );
2358 if (nStartCol>nEndCol)
2359 nStartCol = nEndCol;
2360 if (nStartRow>nEndRow)
2361 nStartRow = nEndRow;
2362 Rectangle aNewArea = ((ScDocument&)aDocument)
2363 .GetMMRect( nStartCol,nStartRow, nEndCol,nEndRow, nVisTab );
2364 //TODO/LATER: different methods for setting VisArea?!
2365 ((ScDocShell*)this)->SfxObjectShell::SetVisArea( aNewArea );
2366 return aNewArea;
2367 }
2368 else
2369 return SfxObjectShell::GetVisArea( nAspect );
2370 }
2371
2372 void ScDocShell::GetPageOnFromPageStyleSet( const SfxItemSet* pStyleSet,
2373 SCTAB nCurTab,
2374 BOOL& rbHeader,
2375 BOOL& rbFooter )
2376 {
2377 if ( !pStyleSet )
2378 {
2379 ScStyleSheetPool* pStylePool = aDocument.GetStyleSheetPool();
2380 SfxStyleSheetBase* pStyleSheet = pStylePool->
2381 Find( aDocument.GetPageStyle( nCurTab ),
2382 SFX_STYLE_FAMILY_PAGE );
2383
2384 DBG_ASSERT( pStyleSheet, "PageStyle not found! :-/" );
2385
2386 if ( pStyleSheet )
2387 pStyleSet = &pStyleSheet->GetItemSet();
2388 else
2389 rbHeader = rbFooter = FALSE;
2390 }
2391
2392 DBG_ASSERT( pStyleSet, "PageStyle-Set not found! :-(" );
2393
2394 //--------------------------------------------------------------------
2395
2396 const SvxSetItem* pSetItem = NULL;
2397 const SfxItemSet* pSet = NULL;
2398
2399 pSetItem = (const SvxSetItem*) &pStyleSet->Get( ATTR_PAGE_HEADERSET );
2400 pSet = &pSetItem->GetItemSet();
2401 rbHeader = ((const SfxBoolItem&)pSet->Get(ATTR_PAGE_ON)).GetValue();
2402
2403 pSetItem = (const SvxSetItem*) &pStyleSet->Get( ATTR_PAGE_FOOTERSET );
2404 pSet = &pSetItem->GetItemSet();
2405 rbFooter = ((const SfxBoolItem&)pSet->Get(ATTR_PAGE_ON)).GetValue();
2406 }
2407
2408 long __EXPORT ScDocShell::DdeGetData( const String& rItem,
2409 const String& rMimeType,
2410 ::com::sun::star::uno::Any & rValue )
2411 {
2412 if( FORMAT_STRING == SotExchange::GetFormatIdFromMimeType( rMimeType ) )
2413 {
2414 if( rItem.EqualsIgnoreCaseAscii( "Format" ) )
2415 {
2416 ByteString aFmtByte( aDdeTextFmt, gsl_getSystemTextEncoding() );
2417 rValue <<= ::com::sun::star::uno::Sequence< sal_Int8 >(
2418 (sal_Int8*)aFmtByte.GetBuffer(),
2419 aFmtByte.Len() + 1 );
2420 return 1;
2421 }
2422 ScImportExport aObj( &aDocument, rItem );
2423 if ( !aObj.IsRef() )
2424 return 0; // ungueltiger Bereich
2425
2426 if( aDdeTextFmt.GetChar(0) == 'F' )
2427 aObj.SetFormulas( TRUE );
2428 if( aDdeTextFmt.EqualsAscii( "SYLK" ) ||
2429 aDdeTextFmt.EqualsAscii( "FSYLK" ) )
2430 {
2431 ByteString aData;
2432 if( aObj.ExportByteString( aData, gsl_getSystemTextEncoding(),
2433 SOT_FORMATSTR_ID_SYLK ) )
2434 {
2435 rValue <<= ::com::sun::star::uno::Sequence< sal_Int8 >(
2436 (sal_Int8*)aData.GetBuffer(),
2437 aData.Len() + 1 );
2438 return 1;
2439 }
2440 else
2441 return 0;
2442 }
2443 if( aDdeTextFmt.EqualsAscii( "CSV" ) ||
2444 aDdeTextFmt.EqualsAscii( "FCSV" ) )
2445 aObj.SetSeparator( ',' );
2446 aObj.SetExportTextOptions( ScExportTextOptions( ScExportTextOptions::ToSpace, 0, false ) );
2447 return aObj.ExportData( rMimeType, rValue ) ? 1 : 0;
2448 }
2449
2450 ScImportExport aObj( &aDocument, rItem );
2451 aObj.SetExportTextOptions( ScExportTextOptions( ScExportTextOptions::ToSpace, 0, false ) );
2452 if( aObj.IsRef() )
2453 return aObj.ExportData( rMimeType, rValue ) ? 1 : 0;
2454 return 0;
2455 }
2456
2457 long __EXPORT ScDocShell::DdeSetData( const String& rItem,
2458 const String& rMimeType,
2459 const ::com::sun::star::uno::Any & rValue )
2460 {
2461 if( FORMAT_STRING == SotExchange::GetFormatIdFromMimeType( rMimeType ))
2462 {
2463 if( rItem.EqualsIgnoreCaseAscii( "Format" ) )
2464 {
2465 if ( ScByteSequenceToString::GetString( aDdeTextFmt, rValue, gsl_getSystemTextEncoding() ) )
2466 {
2467 aDdeTextFmt.ToUpperAscii();
2468 return 1;
2469 }
2470 return 0;
2471 }
2472 ScImportExport aObj( &aDocument, rItem );
2473 if( aDdeTextFmt.GetChar(0) == 'F' )
2474 aObj.SetFormulas( TRUE );
2475 if( aDdeTextFmt.EqualsAscii( "SYLK" ) ||
2476 aDdeTextFmt.EqualsAscii( "FSYLK" ) )
2477 {
2478 String aData;
2479 if ( ScByteSequenceToString::GetString( aData, rValue, gsl_getSystemTextEncoding() ) )
2480 {
2481 return aObj.ImportString( aData, SOT_FORMATSTR_ID_SYLK ) ? 1 : 0;
2482 }
2483 return 0;
2484 }
2485 if( aDdeTextFmt.EqualsAscii( "CSV" ) ||
2486 aDdeTextFmt.EqualsAscii( "FCSV" ) )
2487 aObj.SetSeparator( ',' );
2488 return aObj.ImportData( rMimeType, rValue ) ? 1 : 0;
2489 }
2490 ScImportExport aObj( &aDocument, rItem );
2491 if( aObj.IsRef() )
2492 return aObj.ImportData( rMimeType, rValue ) ? 1 : 0;
2493 return 0;
2494 }
2495
2496 ::sfx2::SvLinkSource* __EXPORT ScDocShell::DdeCreateLinkSource( const String& rItem )
2497 {
2498 // only check for valid item string - range is parsed again in ScServerObject ctor
2499
2500 // named range?
2501 String aPos = rItem;
2502 ScRangeName* pRange = aDocument.GetRangeName();
2503 if( pRange )
2504 {
2505 USHORT nPos;
2506 if( pRange->SearchName( aPos, nPos ) )
2507 {
2508 ScRangeData* pData = (*pRange)[ nPos ];
2509 if( pData->HasType( RT_REFAREA )
2510 || pData->HasType( RT_ABSAREA )
2511 || pData->HasType( RT_ABSPOS ) )
2512 pData->GetSymbol( aPos ); // continue with the name's contents
2513 }
2514 }
2515
2516 // Address in DDE function must be always parsed as CONV_OOO so that it
2517 // would always work regardless of current address convension. We do this
2518 // because the address item in a DDE entry is *not* normalized when saved
2519 // into ODF.
2520 ScRange aRange;
2521 bool bValid = ( (aRange.Parse(aPos, &aDocument, formula::FormulaGrammar::CONV_OOO ) & SCA_VALID) ||
2522 (aRange.aStart.Parse(aPos, &aDocument, formula::FormulaGrammar::CONV_OOO) & SCA_VALID) );
2523
2524 ScServerObject* pObj = NULL; // NULL = error
2525 if ( bValid )
2526 pObj = new ScServerObject( this, rItem );
2527
2528 // GetLinkManager()->InsertServer() is in the ScServerObject ctor
2529
2530 return pObj;
2531 }
2532
2533 //------------------------------------------------------------------
2534
2535 ScViewData* ScDocShell::GetViewData()
2536 {
2537 SfxViewShell* pCur = SfxViewShell::Current();
2538 ScTabViewShell* pViewSh = PTR_CAST(ScTabViewShell,pCur);
2539 return pViewSh ? pViewSh->GetViewData() : NULL;
2540 }
2541
2542 //------------------------------------------------------------------
2543
2544 SCTAB ScDocShell::GetCurTab()
2545 {
2546 //! this must be made non-static and use a ViewShell from this document!
2547
2548 ScViewData* pViewData = GetViewData();
2549
2550 return pViewData ? pViewData->GetTabNo() : static_cast<SCTAB>(0);
2551 }
2552
2553 ScTabViewShell* ScDocShell::GetBestViewShell( BOOL bOnlyVisible )
2554 {
2555 ScTabViewShell* pViewSh = ScTabViewShell::GetActiveViewShell();
2556 // falsches Doc?
2557 if( pViewSh && pViewSh->GetViewData()->GetDocShell() != this )
2558 pViewSh = NULL;
2559 if( !pViewSh )
2560 {
2561 // 1. ViewShell suchen
2562 SfxViewFrame* pFrame = SfxViewFrame::GetFirst( this, TYPE(SfxTopViewFrame), bOnlyVisible );
2563 if( pFrame )
2564 {
2565 SfxViewShell* p = pFrame->GetViewShell();
2566 pViewSh = PTR_CAST(ScTabViewShell,p);
2567 }
2568 }
2569 return pViewSh;
2570 }
2571
2572 SfxBindings* ScDocShell::GetViewBindings()
2573 {
2574 // used to invalidate slots after changes to this document
2575
2576 SfxViewShell* pViewSh = GetBestViewShell();
2577 if (pViewSh)
2578 return &pViewSh->GetViewFrame()->GetBindings();
2579 else
2580 return NULL;
2581 }
2582
2583 //------------------------------------------------------------------
2584
2585 ScDocShell* ScDocShell::GetShellByNum( USHORT nDocNo ) // static
2586 {
2587 ScDocShell* pFound = NULL;
2588 SfxObjectShell* pShell = SfxObjectShell::GetFirst();
2589 USHORT nShellCnt = 0;
2590
2591 while ( pShell && !pFound )
2592 {
2593 if ( pShell->Type() == TYPE(ScDocShell) )
2594 {
2595 if ( nShellCnt == nDocNo )
2596 pFound = (ScDocShell*) pShell;
2597 else
2598 ++nShellCnt;
2599 }
2600 pShell = SfxObjectShell::GetNext( *pShell );
2601 }
2602
2603 return pFound;
2604 }
2605
2606 //------------------------------------------------------------------
2607
2608 IMPL_LINK( ScDocShell, DialogClosedHdl, sfx2::FileDialogHelper*, _pFileDlg )
2609 {
2610 DBG_ASSERT( _pFileDlg, "ScDocShell::DialogClosedHdl(): no file dialog" );
2611 DBG_ASSERT( pImpl->pDocInserter, "ScDocShell::DialogClosedHdl(): no document inserter" );
2612
2613 if ( ERRCODE_NONE == _pFileDlg->GetError() )
2614 {
2615 USHORT nSlot = pImpl->pRequest->GetSlot();
2616 SfxMedium* pMed = pImpl->pDocInserter->CreateMedium();
2617 // #i87094# If a .odt was selected pMed is NULL.
2618 if (pMed)
2619 {
2620 pImpl->pRequest->AppendItem( SfxStringItem( SID_FILE_NAME, pMed->GetName() ) );
2621 if ( SID_DOCUMENT_COMPARE == nSlot )
2622 {
2623 if ( pMed->GetFilter() )
2624 pImpl->pRequest->AppendItem(
2625 SfxStringItem( SID_FILTER_NAME, pMed->GetFilter()->GetFilterName() ) );
2626 String sOptions = ScDocumentLoader::GetOptions( *pMed );
2627 if ( sOptions.Len() > 0 )
2628 pImpl->pRequest->AppendItem( SfxStringItem( SID_FILE_FILTEROPTIONS, sOptions ) );
2629 }
2630 const SfxPoolItem* pItem = NULL;
2631 SfxItemSet* pSet = pMed->GetItemSet();
2632 if ( pSet &&
2633 pSet->GetItemState( SID_VERSION, TRUE, &pItem ) == SFX_ITEM_SET &&
2634 pItem->ISA( SfxInt16Item ) )
2635 {
2636 pImpl->pRequest->AppendItem( *pItem );
2637 }
2638
2639 Execute( *(pImpl->pRequest) );
2640 }
2641 }
2642
2643 pImpl->bIgnoreLostRedliningWarning = false;
2644 return 0;
2645 }
2646
2647 //------------------------------------------------------------------
2648
2649 void ScDocShell::EnableSharedSettings( bool bEnable )
2650 {
2651 SetDocumentModified();
2652
2653 if ( bEnable )
2654 {
2655 aDocument.EndChangeTracking();
2656 aDocument.StartChangeTracking();
2657
2658 // hide accept or reject changes dialog
2659 USHORT nId = ScAcceptChgDlgWrapper::GetChildWindowId();
2660 SfxViewFrame* pViewFrame = SfxViewFrame::Current();
2661 if ( pViewFrame && pViewFrame->HasChildWindow( nId ) )
2662 {
2663 pViewFrame->ToggleChildWindow( nId );
2664 SfxBindings* pBindings = GetViewBindings();
2665 if ( pBindings )
2666 {
2667 pBindings->Invalidate( FID_CHG_ACCEPT );
2668 }
2669 }
2670 }
2671 else
2672 {
2673 aDocument.EndChangeTracking();
2674 }
2675
2676 ScChangeViewSettings aChangeViewSet;
2677 aChangeViewSet.SetShowChanges( FALSE );
2678 aDocument.SetChangeViewSettings( aChangeViewSet );
2679 }
2680
2681 uno::Reference< frame::XModel > ScDocShell::LoadSharedDocument()
2682 {
2683 uno::Reference< frame::XModel > xModel;
2684 try
2685 {
2686 SC_MOD()->SetInSharedDocLoading( true );
2687 uno::Reference< lang::XMultiServiceFactory > xFactory(
2688 ::comphelper::getProcessServiceFactory(), uno::UNO_QUERY_THROW );
2689 uno::Reference< frame::XComponentLoader > xLoader(
2690 xFactory->createInstance( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.frame.Desktop" ) ) ),
2691 uno::UNO_QUERY_THROW );
2692 uno::Sequence < beans::PropertyValue > aArgs( 1 );
2693 aArgs[0].Name = ::rtl::OUString::createFromAscii( "Hidden" );
2694 aArgs[0].Value <<= sal_True;
2695
2696 if ( GetMedium() )
2697 {
2698 SFX_ITEMSET_ARG( GetMedium()->GetItemSet(), pPasswordItem, SfxStringItem, SID_PASSWORD, sal_False);
2699 if ( pPasswordItem && pPasswordItem->GetValue().Len() )
2700 {
2701 aArgs.realloc( 2 );
2702 aArgs[1].Name = ::rtl::OUString::createFromAscii( "Password" );
2703 aArgs[1].Value <<= ::rtl::OUString( pPasswordItem->GetValue() );
2704 }
2705 }
2706
2707 xModel.set(
2708 xLoader->loadComponentFromURL( GetSharedFileURL(), ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "_blank" ) ), 0, aArgs ),
2709 uno::UNO_QUERY_THROW );
2710 SC_MOD()->SetInSharedDocLoading( false );
2711 }
2712 catch ( uno::Exception& )
2713 {
2714 DBG_ERROR( "ScDocShell::LoadSharedDocument(): caught exception\n" );
2715 SC_MOD()->SetInSharedDocLoading( false );
2716 try
2717 {
2718 uno::Reference< util::XCloseable > xClose( xModel, uno::UNO_QUERY_THROW );
2719 xClose->close( sal_True );
2720 return uno::Reference< frame::XModel >();
2721 }
2722 catch ( uno::Exception& )
2723 {
2724 return uno::Reference< frame::XModel >();
2725 }
2726 }
2727 return xModel;
2728 }
vba interoperability for OOo