?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
update dev300-m58
[ooovba.git] / sc / source / ui / view / cellsh1.cxx
blob62c40698cb9536b9a1eacc17ced8cc2a6ba7b8af
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: cellsh1.cxx,v $
10 * $Revision: 1.54.102.5 $
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 //------------------------------------------------------------------
36
37 //svdraw.hxx
38 #define _SDR_NOITEMS
39 #define _SDR_NOTOUCH
40 #define _SDR_NOTRANSFORM
41 #define _SI_NOSBXCONTROLS
42 #define _VCONT_HXX
43 #define _SI_NOOTHERFORMS
44 #define _VCTRLS_HXX
45 #define _SI_NOCONTROL
46 #define _SETBRW_HXX
47 #define _VCBRW_HXX
48 #define _SI_NOSBXCONTROLS
49
50 //------------------------------------------------------------------
51 #include <com/sun/star/i18n/TextConversionOption.hpp>
52 #include <com/sun/star/sheet/DataPilotFieldFilter.hpp>
53
54 #include "scitems.hxx"
55 #include <sfx2/viewfrm.hxx>
56
57 #define _ZFORLIST_DECLARE_TABLE
58 #include <svtools/stritem.hxx>
59 #include <svtools/whiter.hxx>
60 #include <svtools/zforlist.hxx>
61 #include <svtools/zformat.hxx>
62 #include <sfx2/dispatch.hxx>
63 #include <sfx2/request.hxx>
64 #include <vcl/msgbox.hxx>
65 #include <svx/svxdlg.hxx>
66 #include <sot/formats.hxx>
67 #include <svx/postattr.hxx>
68 #include <svx/fontitem.hxx>
69 #include <svx/clipfmtitem.hxx>
70 #include <sfx2/passwd.hxx>
71 #include <svx/hlnkitem.hxx>
72 #include <basic/sbxcore.hxx>
73 #include <svtools/useroptions.hxx>
74 #include <vcl/waitobj.hxx>
75 #include <unotools/localedatawrapper.hxx>
76
77 #include "cellsh.hxx"
78 #include "sc.hrc"
79 #include "document.hxx"
80 #include "patattr.hxx"
81 #include "scmod.hxx"
82 #include "scresid.hxx"
83 #include "tabvwsh.hxx"
84 //CHINA001 #include "inscldlg.hxx"
85 //CHINA001 #include "inscodlg.hxx"
86 //CHINA001 #include "delcldlg.hxx"
87 //CHINA001 #include "delcodlg.hxx"
88 //CHINA001 #include "filldlg.hxx"
89 //CHINA001 #include "groupdlg.hxx"
90 #include "impex.hxx"
91 #include "reffind.hxx"
92 //CHINA001 #include "namecrea.hxx"
93 #include "uiitems.hxx"
94 #include "reffact.hxx"
95 //CHINA001 #include "namepast.hxx"
96 #include "inputhdl.hxx"
97 #include "transobj.hxx"
98 #include "drwtrans.hxx"
99 //CHINA001 #include "linkarea.hxx"
100 #include "docfunc.hxx"
101 #include "editable.hxx"
102 #include "dpobject.hxx"
103 #include "dpsave.hxx"
104 #include "dpgroup.hxx" // for ScDPNumGroupInfo
105 #include "spellparam.hxx"
106 #include "postit.hxx"
107 #include "clipparam.hxx"
108
109 #include "globstr.hrc"
110 #include "scui_def.hxx" //CHINA001
111 #include <svx/svxdlg.hxx> //CHINA001
112 #include <svx/dialogs.hrc> //CHINA001
113 #include "scabstdlg.hxx" //CHINA001
114 #define IS_AVAILABLE(WhichId,ppItem) \
115 (pReqArgs->GetItemState((WhichId), TRUE, ppItem ) == SFX_ITEM_SET)
116
117 #define C2U(cChar) rtl::OUString::createFromAscii(cChar)
118
119 #include <com/sun/star/ui/dialogs/XExecutableDialog.hpp>
120 #include <com/sun/star/lang/XInitialization.hpp>
121 #include <com/sun/star/beans/PropertyValue.hpp>
122 #include <com/sun/star/beans/XPropertySet.hpp>
123 #include <cppuhelper/bootstrap.hxx>
124
125 using namespace ::com::sun::star;
126 using namespace ::com::sun::star::beans;
127 using namespace ::com::sun::star::uno;
128
129 //------------------------------------------------------------------
130 void ScCellShell::ExecuteEdit( SfxRequest& rReq )
131 {
132 ScModule* pScMod = SC_MOD();
133 ScTabViewShell* pTabViewShell = GetViewData()->GetViewShell();
134 SfxBindings& rBindings = pTabViewShell->GetViewFrame()->GetBindings();
135 const SfxItemSet* pReqArgs = rReq.GetArgs();
136 USHORT nSlot = rReq.GetSlot();
137
138 pTabViewShell->HideListBox(); // Autofilter-DropDown-Listbox
139
140 // Eingabe beenden
141 if ( GetViewData()->HasEditView( GetViewData()->GetActivePart() ) )
142 {
143 switch ( nSlot )
144 {
145 case FID_DEFINE_NAME:
146 case FID_USE_NAME:
147 case FID_INSERT_NAME:
148 case SID_SPELL_DIALOG:
149 case SID_HANGUL_HANJA_CONVERSION:
150
151 pScMod->InputEnterHandler();
152 pTabViewShell->UpdateInputHandler();
153 break;
154
155 default:
156 break;
157 }
158 }
159
160 switch ( nSlot )
161 {
162 //
163 // Einfuegen / Loeschen von Zellen / Zeilen / Spalten
164 //
165
166 case FID_INS_ROW:
167 pTabViewShell->InsertCells(INS_INSROWS);
168 rReq.Done();
169 break;
170
171 case FID_INS_COLUMN:
172 pTabViewShell->InsertCells(INS_INSCOLS);
173 rReq.Done();
174 break;
175
176 case FID_INS_CELLSDOWN:
177 pTabViewShell->InsertCells(INS_CELLSDOWN);
178 rReq.Done();
179 break;
180
181 case FID_INS_CELLSRIGHT:
182 pTabViewShell->InsertCells(INS_CELLSRIGHT);
183 rReq.Done();
184 break;
185
186 case SID_DEL_ROWS:
187 pTabViewShell->DeleteCells( DEL_DELROWS );
188 rReq.Done();
189 break;
190
191 case SID_DEL_COLS:
192 pTabViewShell->DeleteCells( DEL_DELCOLS );
193 rReq.Done();
194 break;
195
196 case FID_INS_CELL:
197 {
198 InsCellCmd eCmd=INS_NONE;
199
200 if ( pReqArgs )
201 {
202 const SfxPoolItem* pItem;
203 String aFlags;
204
205 if( IS_AVAILABLE( FID_INS_CELL, &pItem ) )
206 aFlags = ((const SfxStringItem*)pItem)->GetValue();
207 if( aFlags.Len() )
208 {
209 switch( aFlags.GetChar(0) )
210 {
211 case 'V': eCmd = INS_CELLSDOWN ;break;
212 case '>': eCmd = INS_CELLSRIGHT ;break;
213 case 'R': eCmd = INS_INSROWS ;break;
214 case 'C': eCmd = INS_INSCOLS ;break;
215 }
216 }
217 }
218 else
219 {
220 if ( GetViewData()->SimpleColMarked() )
221 eCmd = INS_INSCOLS;
222 else if ( GetViewData()->SimpleRowMarked() )
223 eCmd = INS_INSROWS;
224 else
225 {
226 ScDocument* pDoc = GetViewData()->GetDocument();
227 BOOL bTheFlag=(pDoc->GetChangeTrack()!=NULL);
228
229 //CHINA001 ScInsertCellDlg* pDlg = new ScInsertCellDlg( pTabViewShell->GetDialogParent(),
230 //CHINA001 bTheFlag);
231 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
232 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
233
234 AbstractScInsertCellDlg* pDlg = pFact->CreateScInsertCellDlg( pTabViewShell->GetDialogParent(), RID_SCDLG_INSCELL, bTheFlag);
235 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
236 if (pDlg->Execute() == RET_OK)
237 eCmd = pDlg->GetInsCellCmd();
238 delete pDlg;
239 }
240 }
241
242 if (eCmd!=INS_NONE)
243 {
244 pTabViewShell->InsertCells( eCmd );
245
246 if( ! rReq.IsAPI() )
247 {
248 String aParam;
249
250 switch( eCmd )
251 {
252 case INS_CELLSDOWN: aParam='V'; break;
253 case INS_CELLSRIGHT: aParam='>'; break;
254 case INS_INSROWS: aParam='R'; break;
255 case INS_INSCOLS: aParam='C'; break;
256 default:
257 {
258 // added to avoid warnings
259 }
260 }
261 rReq.AppendItem( SfxStringItem( FID_INS_CELL, aParam ) );
262 rReq.Done();
263 }
264 }
265 }
266 break;
267
268 case FID_DELETE_CELL:
269 {
270 DelCellCmd eCmd = DEL_NONE;
271
272 if ( pReqArgs )
273 {
274 const SfxPoolItem* pItem;
275 String aFlags;
276
277 if( IS_AVAILABLE( FID_DELETE_CELL, &pItem ) )
278 aFlags = ((const SfxStringItem*)pItem)->GetValue();
279 if( aFlags.Len() )
280 {
281 switch( aFlags.GetChar(0) )
282 {
283 case 'U': eCmd = DEL_CELLSUP ;break;
284 case 'L': eCmd = DEL_CELLSLEFT ;break;
285 case 'R': eCmd = DEL_DELROWS ;break;
286 case 'C': eCmd = DEL_DELCOLS ;break;
287 }
288 }
289 }
290 else
291 {
292 if ( GetViewData()->SimpleColMarked() )
293 eCmd = DEL_DELCOLS;
294 else if ( GetViewData()->SimpleRowMarked() )
295 eCmd = DEL_DELROWS;
296 else
297 {
298 ScRange aRange;
299 ScDocument* pDoc = GetViewData()->GetDocument();
300 BOOL bTheFlag=GetViewData()->IsMultiMarked() ||
301 (GetViewData()->GetSimpleArea(aRange) == SC_MARK_SIMPLE_FILTERED) ||
302 (pDoc->GetChangeTrack() != NULL);
303
304 //CHINA001 ScDeleteCellDlg* pDlg = new ScDeleteCellDlg(
305 //CHINA001 pTabViewShell->GetDialogParent(),bTheFlag);
306 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
307 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
308
309 AbstractScDeleteCellDlg* pDlg = pFact->CreateScDeleteCellDlg( pTabViewShell->GetDialogParent(), RID_SCDLG_DELCELL, bTheFlag );
310 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
311
312 if (pDlg->Execute() == RET_OK)
313 eCmd = pDlg->GetDelCellCmd();
314 delete pDlg;
315 }
316 }
317
318 if (eCmd != DEL_NONE )
319 {
320 pTabViewShell->DeleteCells( eCmd );
321
322 if( ! rReq.IsAPI() )
323 {
324 String aParam;
325
326 switch( eCmd )
327 {
328 case DEL_CELLSUP: aParam='U'; break;
329 case DEL_CELLSLEFT: aParam='L'; break;
330 case DEL_DELROWS: aParam='R'; break;
331 case DEL_DELCOLS: aParam='C'; break;
332 default:
333 {
334 // added to avoid warnings
335 }
336 }
337 rReq.AppendItem( SfxStringItem( FID_DELETE_CELL, aParam ) );
338 rReq.Done();
339 }
340 }
341 }
342 break;
343
344 //
345 // Inhalte von Zellen loeschen
346 //
347
348 case SID_DELETE_CONTENTS:
349 pTabViewShell->DeleteContents( IDF_CONTENTS );
350 rReq.Done();
351 break;
352
353 case SID_DELETE:
354 {
355 USHORT nFlags = IDF_NONE;
356
357 if ( pReqArgs!=NULL && pTabViewShell->SelectionEditable() )
358 {
359 const SfxPoolItem* pItem;
360 String aFlags = 'A';
361
362 if( IS_AVAILABLE( SID_DELETE, &pItem ) )
363 aFlags = ((const SfxStringItem*)pItem)->GetValue();
364
365 aFlags.ToUpperAscii();
366 BOOL bCont = TRUE;
367
368 for( xub_StrLen i=0 ; bCont && i<aFlags.Len() ; i++ )
369 {
370 switch( aFlags.GetChar(i) )
371 {
372 case 'A': // Alle
373 nFlags |= IDF_ALL;
374 bCont = FALSE; // nicht mehr weitermachen!
375 break;
376 case 'S': nFlags |= IDF_STRING; break;
377 case 'V': nFlags |= IDF_VALUE; break;
378 case 'D': nFlags |= IDF_DATETIME; break;
379 case 'F': nFlags |= IDF_FORMULA; break;
380 case 'N': nFlags |= IDF_NOTE; break;
381 case 'T': nFlags |= IDF_ATTRIB; break;
382 case 'O': nFlags |= IDF_OBJECTS; break;
383 }
384 }
385 }
386 else
387 {
388 ScEditableTester aTester( pTabViewShell );
389 if (aTester.IsEditable())
390 {
391 //CHINA001 ScDeleteContentsDlg* pDlg = new ScDeleteContentsDlg( pTabViewShell->GetDialogParent() );
392 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
393 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
394
395 AbstractScDeleteContentsDlg* pDlg = pFact->CreateScDeleteContentsDlg( pTabViewShell->GetDialogParent(), RID_SCDLG_DELCONT );
396 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
397 ScDocument* pDoc = GetViewData()->GetDocument();
398 SCTAB nTab = GetViewData()->GetTabNo();
399 if ( pDoc->IsTabProtected(nTab) )
400 pDlg->DisableObjects();
401 if (pDlg->Execute() == RET_OK)
402 {
403 nFlags = pDlg->GetDelContentsCmdBits();
404 }
405 delete pDlg;
406 }
407 else
408 pTabViewShell->ErrorMessage(aTester.GetMessageId());
409 }
410
411 if( nFlags != IDF_NONE )
412 {
413 pTabViewShell->DeleteContents( nFlags );
414
415 if( ! rReq.IsAPI() )
416 {
417 String aFlags;
418
419 if( nFlags == IDF_ALL )
420 {
421 aFlags += 'A';
422 }
423 else
424 {
425 if( nFlags & IDF_STRING ) aFlags += 'S';
426 if( nFlags & IDF_VALUE ) aFlags += 'V';
427 if( nFlags & IDF_DATETIME ) aFlags += 'D';
428 if( nFlags & IDF_FORMULA ) aFlags += 'F';
429 if( nFlags & IDF_NOTE ) aFlags += 'N';
430 if( nFlags & IDF_ATTRIB ) aFlags += 'T';
431 if( nFlags & IDF_OBJECTS ) aFlags += 'O';
432 }
433
434 rReq.AppendItem( SfxStringItem( SID_DELETE, aFlags ) );
435 rReq.Done();
436 }
437 }
438 }
439 break;
440
441 //
442 // Ausfuellen...
443 //
444
445 case FID_FILL_TO_BOTTOM:
446 pTabViewShell->FillSimple( FILL_TO_BOTTOM );
447 rReq.Done();
448 break;
449
450 case FID_FILL_TO_RIGHT:
451 pTabViewShell->FillSimple( FILL_TO_RIGHT );
452 rReq.Done();
453 break;
454
455 case FID_FILL_TO_TOP:
456 pTabViewShell->FillSimple( FILL_TO_TOP );
457 rReq.Done();
458 break;
459
460 case FID_FILL_TO_LEFT:
461 pTabViewShell->FillSimple( FILL_TO_LEFT );
462 rReq.Done();
463 break;
464
465 case FID_FILL_TAB:
466 {
467 USHORT nFlags = IDF_NONE;
468 USHORT nFunction = PASTE_NOFUNC;
469 BOOL bSkipEmpty = FALSE;
470 BOOL bAsLink = FALSE;
471
472 if ( pReqArgs!=NULL && pTabViewShell->SelectionEditable() )
473 {
474 const SfxPoolItem* pItem;
475 String aFlags = 'A';
476
477 if( IS_AVAILABLE( FID_FILL_TAB, &pItem ) )
478 aFlags = ((const SfxStringItem*)pItem)->GetValue();
479
480 aFlags.ToUpperAscii();
481 BOOL bCont = TRUE;
482
483 for( xub_StrLen i=0 ; bCont && i<aFlags.Len() ; i++ )
484 {
485 switch( aFlags.GetChar(i) )
486 {
487 case 'A': // Alle
488 nFlags |= IDF_ALL;
489 bCont = FALSE; // nicht mehr weitermachen!
490 break;
491 case 'S': nFlags |= IDF_STRING; break;
492 case 'V': nFlags |= IDF_VALUE; break;
493 case 'D': nFlags |= IDF_DATETIME; break;
494 case 'F': nFlags |= IDF_FORMULA; break;
495 case 'N': nFlags |= IDF_NOTE; break;
496 case 'T': nFlags |= IDF_ATTRIB; break;
497 }
498 }
499 }
500 else
501 {
502 //CHINA001 ScInsertContentsDlg* pDlg =
503 //CHINA001 new ScInsertContentsDlg(pTabViewShell->GetDialogParent(),
504 //CHINA001 0, /* nCheckDefaults */
505 //CHINA001 &ScGlobal::GetRscString(STR_FILL_TAB) );
506 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
507 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
508
509 AbstractScInsertContentsDlg* pDlg = pFact->CreateScInsertContentsDlg( pTabViewShell->GetDialogParent(),
510 RID_SCDLG_INSCONT, 0, /* nCheckDefaults */
511 &ScGlobal::GetRscString(STR_FILL_TAB));
512 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
513 pDlg->SetFillMode(TRUE);
514
515 if (pDlg->Execute() == RET_OK)
516 {
517 nFlags = pDlg->GetInsContentsCmdBits();
518 nFunction = pDlg->GetFormulaCmdBits();
519 bSkipEmpty = pDlg->IsSkipEmptyCells();
520 bAsLink = pDlg->IsLink();
521 // MoveMode gibt's bei Tabelle fuellen nicht
522 }
523 delete pDlg;
524 }
525
526 if( nFlags != IDF_NONE )
527 {
528 pTabViewShell->FillTab( nFlags, nFunction, bSkipEmpty, bAsLink );
529
530 if( ! rReq.IsAPI() )
531 {
532 String aFlags;
533
534 if( nFlags == IDF_ALL )
535 {
536 aFlags += 'A';
537 }
538 else
539 {
540 if( nFlags & IDF_STRING ) aFlags += 'S';
541 if( nFlags & IDF_VALUE ) aFlags += 'V';
542 if( nFlags & IDF_DATETIME ) aFlags += 'D';
543 if( nFlags & IDF_FORMULA ) aFlags += 'F';
544 if( nFlags & IDF_NOTE ) aFlags += 'N';
545 if( nFlags & IDF_ATTRIB ) aFlags += 'T';
546 }
547
548 rReq.AppendItem( SfxStringItem( FID_FILL_TAB, aFlags ) );
549 rReq.Done();
550 }
551 }
552 }
553 break;
554
555 case FID_FILL_SERIES:
556 {
557 SCCOL nStartCol;
558 SCROW nStartRow;
559 SCTAB nStartTab;
560 SCCOL nEndCol;
561 SCROW nEndRow;
562 SCTAB nEndTab;
563 USHORT nPossDir = FDS_OPT_NONE;
564 FillDir eFillDir = FILL_TO_BOTTOM;
565 FillCmd eFillCmd = FILL_LINEAR;
566 FillDateCmd eFillDateCmd = FILL_DAY;
567 double fStartVal = MAXDOUBLE;
568 double fIncVal = 1;
569 double fMaxVal = MAXDOUBLE;
570 BOOL bDoIt = FALSE;
571
572 GetViewData()->GetSimpleArea( nStartCol, nStartRow, nStartTab,
573 nEndCol, nEndRow, nEndTab );
574
575 if( nStartCol!=nEndCol )
576 {
577 nPossDir |= FDS_OPT_HORZ;
578 eFillDir=FILL_TO_RIGHT;
579 }
580
581 if( nStartRow!=nEndRow )
582 {
583 nPossDir |= FDS_OPT_VERT;
584 eFillDir=FILL_TO_BOTTOM;
585 }
586
587 ScDocument* pDoc = GetViewData()->GetDocument();
588 SvNumberFormatter* pFormatter = pDoc->GetFormatTable();
589
590 if( pReqArgs )
591 {
592 const SfxPoolItem* pItem;
593 String aFillDir, aFillCmd, aFillDateCmd;
594 String aFillStep, aFillStart, aFillMax;
595 sal_uInt32 nKey;
596 double fTmpVal;
597
598 bDoIt=FALSE;
599
600 if( IS_AVAILABLE( FID_FILL_SERIES, &pItem ) )
601 aFillDir = ((const SfxStringItem*)pItem)->GetValue();
602 if( IS_AVAILABLE( FN_PARAM_1, &pItem ) )
603 aFillCmd = ((const SfxStringItem*)pItem)->GetValue();
604 if( IS_AVAILABLE( FN_PARAM_2, &pItem ) )
605 aFillDateCmd = ((const SfxStringItem*)pItem)->GetValue();
606 if( IS_AVAILABLE( FN_PARAM_3, &pItem ) )
607 aFillStep = ((const SfxStringItem*)pItem)->GetValue();
608 if( IS_AVAILABLE( FN_PARAM_4, &pItem ) )
609 aFillStart = ((const SfxStringItem*)pItem)->GetValue();
610 if( IS_AVAILABLE( FN_PARAM_5, &pItem ) )
611 aFillMax = ((const SfxStringItem*)pItem)->GetValue();
612
613 if( aFillDir.Len() )
614 switch( aFillDir.GetChar(0) )
615 {
616 case 'B': case 'b': eFillDir=FILL_TO_BOTTOM; break;
617 case 'R': case 'r': eFillDir=FILL_TO_RIGHT; break;
618 case 'T': case 't': eFillDir=FILL_TO_TOP; break;
619 case 'L': case 'l': eFillDir=FILL_TO_LEFT; break;
620 }
621
622 if( aFillCmd.Len() )
623 switch( aFillCmd.GetChar(0) )
624 {
625 case 'S': case 's': eFillCmd=FILL_SIMPLE; break;
626 case 'L': case 'l': eFillCmd=FILL_LINEAR; break;
627 case 'G': case 'g': eFillCmd=FILL_GROWTH; break;
628 case 'D': case 'd': eFillCmd=FILL_DATE; break;
629 case 'A': case 'a': eFillCmd=FILL_AUTO; break;
630 }
631
632 if( aFillDateCmd.Len() )
633 switch( aFillDateCmd.GetChar(0) )
634 {
635 case 'D': case 'd': eFillDateCmd=FILL_DAY; break;
636 case 'W': case 'w': eFillDateCmd=FILL_WEEKDAY; break;
637 case 'M': case 'm': eFillDateCmd=FILL_MONTH; break;
638 case 'Y': case 'y': eFillDateCmd=FILL_YEAR; break;
639 }
640
641 nKey = 0;
642 if( pFormatter->IsNumberFormat( aFillStart, nKey, fTmpVal ))
643 fStartVal = fTmpVal;
644
645 nKey = 0;
646 if( pFormatter->IsNumberFormat( aFillStep, nKey, fTmpVal ))
647 fIncVal = fTmpVal;
648
649 nKey = 0;
650 if( pFormatter->IsNumberFormat( aFillMax, nKey, fTmpVal ))
651 fMaxVal = fTmpVal;
652
653 bDoIt = TRUE;
654
655 }
656 else // (pReqArgs == NULL) => Dialog hochziehen
657 {
658 //
659 sal_uInt32 nPrivFormat;
660 CellType eCellType;
661 pDoc->GetNumberFormat( nStartCol, nStartRow, nStartTab, nPrivFormat );
662 pDoc->GetCellType( nStartCol, nStartRow, nStartTab,eCellType );
663 const SvNumberformat* pPrivEntry = pFormatter->GetEntry( nPrivFormat );
664 if (!pPrivEntry)
665 {
666 DBG_ERROR("Zahlformat nicht gefunden !!!");
667 }
668 else
669 {
670 short nPrivType = pPrivEntry->GetType();
671 if ( ( nPrivType & NUMBERFORMAT_DATE)>0)
672 {
673 eFillCmd=FILL_DATE;
674 }
675 else if(eCellType==CELLTYPE_STRING)
676 {
677 eFillCmd=FILL_AUTO;
678 }
679 }
680
681 //
682 String aStartStr;
683
684 // Startwert nur vorbelegen, wenn nur 1 Zeile oder Spalte:
685 if ( nStartCol == nEndCol || nStartRow == nEndRow )
686 {
687 double fInputEndVal = 0.0;
688 String aEndStr;
689
690 pDoc->GetInputString( nStartCol, nStartRow, nStartTab, aStartStr);
691 pDoc->GetValue( nStartCol, nStartRow, nStartTab, fStartVal );
692
693
694 if(eFillDir==FILL_TO_BOTTOM && nStartRow < nEndRow )
695 {
696 pDoc->GetInputString( nStartCol, nStartRow+1, nStartTab, aEndStr);
697 if(aEndStr.Len()>0)
698 {
699 pDoc->GetValue( nStartCol, nStartRow+1, nStartTab, fInputEndVal);
700 fIncVal=fInputEndVal-fStartVal;
701 }
702 }
703 else
704 {
705 if(nStartCol < nEndCol)
706 {
707 pDoc->GetInputString( nStartCol+1, nStartRow, nStartTab, aEndStr);
708 if(aEndStr.Len()>0)
709 {
710 pDoc->GetValue( nStartCol+1, nStartRow, nStartTab, fInputEndVal);
711 fIncVal=fInputEndVal-fStartVal;
712 }
713 }
714 }
715 if(eFillCmd==FILL_DATE)
716 {
717 Date aNullDate = *pDoc->GetFormatTable()->GetNullDate();
718 Date aStartDate = aNullDate;
719 aStartDate+= (long)fStartVal;
720 Date aEndDate = aNullDate;
721 aEndDate+= (long)fInputEndVal;
722 double fTempDate=0;
723
724 if(aStartDate.GetYear()!=aEndDate.GetYear())
725 {
726 eFillDateCmd = FILL_YEAR;
727 fTempDate=aEndDate.GetYear()-aStartDate.GetYear();
728 }
729 if(aStartDate.GetMonth()!=aEndDate.GetMonth())
730 {
731 eFillDateCmd = FILL_MONTH;
732 fTempDate=fTempDate*12+aEndDate.GetMonth()-aStartDate.GetMonth();
733 }
734 if(aStartDate.GetDay()==aEndDate.GetDay())
735 {
736 fIncVal=fTempDate;
737 }
738 }
739 }
740 //CHINA001 ScFillSeriesDlg* pDlg = new ScFillSeriesDlg(
741 //CHINA001 pTabViewShell->GetDialogParent(), *pDoc,
742 //CHINA001 eFillDir, eFillCmd, eFillDateCmd,
743 //CHINA001 aStartStr, fIncVal, fMaxVal,
744 //CHINA001 nPossDir);
745 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
746 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
747
748 AbstractScFillSeriesDlg* pDlg = pFact->CreateScFillSeriesDlg( pTabViewShell->GetDialogParent(),
749 *pDoc,
750 eFillDir, eFillCmd, eFillDateCmd,
751 aStartStr, fIncVal, fMaxVal,
752 nPossDir,
753 RID_SCDLG_FILLSERIES);
754 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
755
756 if ( nStartCol != nEndCol && nStartRow != nEndRow )
757 {
758 pDlg->SetEdStartValEnabled(FALSE);
759 }
760
761 if ( pDlg->Execute() == RET_OK )
762 {
763 eFillDir = pDlg->GetFillDir();
764 eFillCmd = pDlg->GetFillCmd();
765 eFillDateCmd = pDlg->GetFillDateCmd();
766
767 if(eFillCmd==FILL_AUTO)
768 {
769 String aStr=pDlg->GetStartStr();
770 if(aStr.Len()>0)
771 pTabViewShell->EnterData( nStartCol, nStartRow, nStartTab, aStr );
772 }
773 fStartVal = pDlg->GetStart();
774 fIncVal = pDlg->GetStep();
775 fMaxVal = pDlg->GetMax();
776 bDoIt = TRUE;
777 }
778 delete pDlg;
779 }
780
781 if( bDoIt )
782 {
783 //nScFillModeMouseModifier = 0; // kein Ctrl/Copy
784 pTabViewShell->FillSeries( eFillDir, eFillCmd, eFillDateCmd, fStartVal, fIncVal, fMaxVal );
785
786 if( ! rReq.IsAPI() )
787 {
788 String aPara;
789 Color* pColor=0;
790
791 switch( eFillDir )
792 {
793 case FILL_TO_BOTTOM: aPara = 'B'; break;
794 case FILL_TO_RIGHT: aPara = 'R'; break;
795 case FILL_TO_TOP: aPara = 'T'; break;
796 case FILL_TO_LEFT: aPara = 'L'; break;
797 default: aPara.Erase(); break;
798 }
799 rReq.AppendItem( SfxStringItem( FID_FILL_SERIES, aPara ) );
800
801 switch( eFillCmd )
802 {
803 case FILL_SIMPLE: aPara = 'S'; break;
804 case FILL_LINEAR: aPara = 'L'; break;
805 case FILL_GROWTH: aPara = 'G'; break;
806 case FILL_DATE: aPara = 'D'; break;
807 case FILL_AUTO: aPara = 'A'; break;
808 default: aPara.Erase(); break;
809 }
810 rReq.AppendItem( SfxStringItem( FN_PARAM_1, aPara ) );
811
812 switch( eFillDateCmd )
813 {
814 case FILL_DAY: aPara = 'D'; break;
815 case FILL_WEEKDAY: aPara = 'W'; break;
816 case FILL_MONTH: aPara = 'M'; break;
817 case FILL_YEAR: aPara = 'Y'; break;
818 default: aPara.Erase(); break;
819 }
820 rReq.AppendItem( SfxStringItem( FN_PARAM_2, aPara ) );
821
822 ULONG nFormatKey = pFormatter->GetStandardFormat(NUMBERFORMAT_NUMBER,
823 ScGlobal::eLnge );
824
825 pFormatter->GetOutputString( fIncVal, nFormatKey, aPara, &pColor );
826 rReq.AppendItem( SfxStringItem( FN_PARAM_3, aPara ) );
827
828 pFormatter->GetOutputString( fStartVal, nFormatKey, aPara, &pColor );
829 rReq.AppendItem( SfxStringItem( FN_PARAM_4, aPara ) );
830
831 pFormatter->GetOutputString( fMaxVal, nFormatKey, aPara, &pColor );
832 rReq.AppendItem( SfxStringItem( FN_PARAM_5, aPara ) );
833
834 rReq.Done();
835 }
836 }
837 }
838 break;
839
840 case FID_FILL_AUTO:
841 {
842 SCCOL nStartCol;
843 SCROW nStartRow;
844 SCCOL nEndCol;
845 SCROW nEndRow;
846 SCTAB nStartTab, nEndTab;
847
848 GetViewData()->GetFillData( nStartCol, nStartRow, nEndCol, nEndRow );
849 SCCOL nFillCol = GetViewData()->GetRefEndX();
850 SCROW nFillRow = GetViewData()->GetRefEndY();
851 ScDocument* pDoc = GetViewData()->GetDocument();
852
853 if( pReqArgs != NULL )
854 {
855 const SfxPoolItem* pItem;
856
857 if( IS_AVAILABLE( FID_FILL_AUTO, &pItem ) )
858 {
859 ScAddress aScAddress;
860 String aArg = ((const SfxStringItem*)pItem)->GetValue();
861
862 if( aScAddress.Parse( aArg, pDoc, pDoc->GetAddressConvention() ) & SCA_VALID )
863 {
864 nFillRow = aScAddress.Row();
865 nFillCol = aScAddress.Col();
866 }
867 }
868
869 GetViewData()->GetSimpleArea( nStartCol,nStartRow,nStartTab,
870 nEndCol,nEndRow,nEndTab );
871 }
872 else // Aufruf per Maus
873 {
874 // #55284# nicht innerhalb einer zusammengefassten Zelle
875
876 if ( nStartCol == nEndCol && nStartRow == nEndRow )
877 {
878 SCCOL nMergeCol = nStartCol;
879 SCROW nMergeRow = nStartRow;
880 if ( GetViewData()->GetDocument()->ExtendMerge(
881 nStartCol, nStartRow, nMergeCol, nMergeRow,
882 GetViewData()->GetTabNo() ) )
883 {
884 if ( nFillCol >= nStartCol && nFillCol <= nMergeCol && nFillRow == nStartRow )
885 nFillCol = nStartCol;
886 if ( nFillRow >= nStartRow && nFillRow <= nMergeRow && nFillCol == nStartCol )
887 nFillRow = nStartRow;
888 }
889 }
890 }
891
892 if ( nFillCol != nEndCol || nFillRow != nEndRow )
893 {
894 if ( nFillCol==nEndCol || nFillRow==nEndRow )
895 {
896 FillDir eDir = FILL_TO_BOTTOM;
897 SCCOLROW nCount = 0;
898
899 if ( nFillCol==nEndCol )
900 {
901 if ( nFillRow > nEndRow )
902 {
903 eDir = FILL_TO_BOTTOM;
904 nCount = nFillRow - nEndRow;
905 }
906 else if ( nFillRow < nStartRow )
907 {
908 eDir = FILL_TO_TOP;
909 nCount = nStartRow - nFillRow;
910 }
911 }
912 else
913 {
914 if ( nFillCol > nEndCol )
915 {
916 eDir = FILL_TO_RIGHT;
917 nCount = nFillCol - nEndCol;
918 }
919 else if ( nFillCol < nStartCol )
920 {
921 eDir = FILL_TO_LEFT;
922 nCount = nStartCol - nFillCol;
923 }
924 }
925
926 if ( nCount != 0)
927 {
928 pTabViewShell->FillAuto( eDir, nStartCol, nStartRow, nEndCol, nEndRow, nCount );
929
930 if( ! rReq.IsAPI() )
931 {
932 String aAdrStr;
933 ScAddress aAdr( nFillCol, nFillRow, 0 );
934 aAdr.Format( aAdrStr, SCR_ABS, pDoc, pDoc->GetAddressConvention() );
935
936 rReq.AppendItem( SfxStringItem( FID_FILL_AUTO, aAdrStr ) );
937 rReq.Done();
938 }
939 }
940
941 }
942 else
943 {
944 DBG_ERROR( "Richtung nicht eindeutig fuer AutoFill" );
945 }
946 }
947 }
948 break;
949
950 //
951 // Gliederung (Outlines)
952 // SID_AUTO_OUTLINE, SID_OUTLINE_DELETEALL in Execute (in docsh.idl)
953 //
954
955 case SID_OUTLINE_HIDE:
956 if ( GetViewData()->GetDocument()->GetDPAtCursor( GetViewData()->GetCurX(),
957 GetViewData()->GetCurY(), GetViewData()->GetTabNo() ) )
958 pTabViewShell->SetDataPilotDetails( FALSE );
959 else
960 pTabViewShell->HideMarkedOutlines();
961 rReq.Done();
962 break;
963
964 case SID_OUTLINE_SHOW:
965 {
966 ScDPObject* pDPObj = GetViewData()->GetDocument()->GetDPAtCursor( GetViewData()->GetCurX(),
967 GetViewData()->GetCurY(), GetViewData()->GetTabNo() );
968 if ( pDPObj )
969 {
970 Sequence<sheet::DataPilotFieldFilter> aFilters;
971 USHORT nOrientation;
972 if ( pTabViewShell->HasSelectionForDrillDown( nOrientation ) )
973 {
974 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
975 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
976
977 AbstractScDPShowDetailDlg* pDlg = pFact->CreateScDPShowDetailDlg(
978 pTabViewShell->GetDialogParent(), RID_SCDLG_DPSHOWDETAIL, *pDPObj, nOrientation );
979 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
980 if ( pDlg->Execute() == RET_OK )
981 {
982 String aNewDimName( pDlg->GetDimensionName() );
983 pTabViewShell->SetDataPilotDetails( TRUE, &aNewDimName );
984 }
985 }
986 else if ( !pDPObj->IsServiceData() &&
987 pDPObj->GetDataFieldPositionData(
988 ScAddress( GetViewData()->GetCurX(), GetViewData()->GetCurY(), GetViewData()->GetTabNo() ),
989 aFilters ) )
990 pTabViewShell->ShowDataPilotSourceData( *pDPObj, aFilters );
991 else
992 pTabViewShell->SetDataPilotDetails( TRUE );
993 }
994 else
995 pTabViewShell->ShowMarkedOutlines();
996 rReq.Done();
997 }
998 break;
999
1000 case SID_OUTLINE_MAKE:
1001 {
1002 BOOL bColumns = FALSE;
1003 BOOL bOk = TRUE;
1004
1005 if ( GetViewData()->GetDocument()->GetDPAtCursor( GetViewData()->GetCurX(),
1006 GetViewData()->GetCurY(), GetViewData()->GetTabNo() ) )
1007 {
1008 ScDPNumGroupInfo aNumInfo;
1009 aNumInfo.Enable = sal_True;
1010 aNumInfo.AutoStart = sal_True;
1011 aNumInfo.AutoEnd = sal_True;
1012 sal_Int32 nParts = 0;
1013 if ( pTabViewShell->HasSelectionForDateGroup( aNumInfo, nParts ) )
1014 {
1015 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
1016 DBG_ASSERT( pFact, "ScAbstractFactory create fail!" );
1017 Date aNullDate( *GetViewData()->GetDocument()->GetFormatTable()->GetNullDate() );
1018 AbstractScDPDateGroupDlg* pDlg = pFact->CreateScDPDateGroupDlg(
1019 pTabViewShell->GetDialogParent(), RID_SCDLG_DPDATEGROUP,
1020 aNumInfo, nParts, aNullDate );
1021 DBG_ASSERT( pDlg, "Dialog create fail!" );
1022 if( pDlg->Execute() == RET_OK )
1023 {
1024 aNumInfo = pDlg->GetGroupInfo();
1025 pTabViewShell->DateGroupDataPilot( aNumInfo, pDlg->GetDatePart() );
1026 }
1027 }
1028 else if ( pTabViewShell->HasSelectionForNumGroup( aNumInfo ) )
1029 {
1030 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
1031 DBG_ASSERT( pFact, "ScAbstractFactory create fail!" );
1032 AbstractScDPNumGroupDlg* pDlg = pFact->CreateScDPNumGroupDlg(
1033 pTabViewShell->GetDialogParent(), RID_SCDLG_DPNUMGROUP, aNumInfo );
1034 DBG_ASSERT( pDlg, "Dialog create fail!" );
1035 if( pDlg->Execute() == RET_OK )
1036 pTabViewShell->NumGroupDataPilot( pDlg->GetGroupInfo() );
1037 }
1038 else
1039 pTabViewShell->GroupDataPilot();
1040
1041 bOk = FALSE;
1042 }
1043 else if( pReqArgs != NULL )
1044 {
1045 const SfxPoolItem* pItem;
1046 bOk = FALSE;
1047
1048 if( IS_AVAILABLE( SID_OUTLINE_MAKE, &pItem ) )
1049 {
1050 String aCol = ((const SfxStringItem*)pItem)->GetValue();
1051 aCol.ToUpperAscii();
1052
1053 switch( aCol.GetChar(0) )
1054 {
1055 case 'R': bColumns=FALSE; bOk = TRUE;break;
1056 case 'C': bColumns=TRUE; bOk = TRUE;break;
1057 }
1058 }
1059 }
1060 else // Dialog, wenn nicht ganze Zeilen/Spalten markiert
1061 {
1062 if ( GetViewData()->SimpleColMarked() && !GetViewData()->SimpleRowMarked() )
1063 bColumns = TRUE;
1064 else if ( !GetViewData()->SimpleColMarked() && GetViewData()->SimpleRowMarked() )
1065 bColumns = FALSE;
1066 else
1067 {
1068 //CHINA001 ScGroupDlg* pDlg = new ScGroupDlg(pTabViewShell->GetDialogParent(),
1069 //CHINA001 RID_SCDLG_GRP_MAKE, FALSE );
1070 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
1071 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
1072
1073 AbstractScGroupDlg* pDlg = pFact->CreateAbstractScGroupDlg( pTabViewShell->GetDialogParent(), RID_SCDLG_GRP_MAKE, RID_SCDLG_GRP_MAKE,FALSE);
1074 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
1075 if ( pDlg->Execute() == RET_OK )
1076 bColumns = pDlg->GetColsChecked();
1077 else
1078 bOk = FALSE;
1079 delete pDlg;
1080 }
1081 }
1082 if (bOk)
1083 {
1084 pTabViewShell->MakeOutline( bColumns );
1085
1086 if( ! rReq.IsAPI() )
1087 {
1088 String aCol = bColumns ? 'C' : 'R';
1089 rReq.AppendItem( SfxStringItem( SID_OUTLINE_MAKE, aCol ) );
1090 rReq.Done();
1091 }
1092 }
1093 }
1094 break;
1095
1096 case SID_OUTLINE_REMOVE:
1097 {
1098 BOOL bColumns = FALSE;
1099 BOOL bOk = TRUE;
1100
1101 if ( GetViewData()->GetDocument()->GetDPAtCursor( GetViewData()->GetCurX(),
1102 GetViewData()->GetCurY(), GetViewData()->GetTabNo() ) )
1103 {
1104 pTabViewShell->UngroupDataPilot();
1105 bOk = FALSE;
1106 }
1107 else if( pReqArgs != NULL )
1108 {
1109 const SfxPoolItem* pItem;
1110 bOk = FALSE;
1111
1112 if( IS_AVAILABLE( SID_OUTLINE_REMOVE, &pItem ) )
1113 {
1114 String aCol = ((const SfxStringItem*)pItem)->GetValue();
1115 aCol.ToUpperAscii();
1116
1117 switch( aCol.GetChar(0) )
1118 {
1119 case 'R': bColumns=FALSE; bOk = TRUE;break;
1120 case 'C': bColumns=TRUE; bOk = TRUE;break;
1121 }
1122 }
1123 }
1124 else // Dialog nur, wenn Aufheben fuer Zeilen und Spalten moeglich
1125 {
1126 BOOL bColPoss, bRowPoss;
1127 pTabViewShell->TestRemoveOutline( bColPoss, bRowPoss );
1128 if ( bColPoss && bRowPoss )
1129 {
1130 //CHINA001 ScGroupDlg* pDlg = new ScGroupDlg( pTabViewShell->GetDialogParent(),
1131 //CHINA001 RID_SCDLG_GRP_KILL, TRUE );
1132 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
1133 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
1134
1135 AbstractScGroupDlg* pDlg = pFact->CreateAbstractScGroupDlg( pTabViewShell->GetDialogParent(), RID_SCDLG_GRP_KILL, RID_SCDLG_GRP_KILL,TRUE);
1136 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
1137 if ( pDlg->Execute() == RET_OK )
1138 bColumns = pDlg->GetColsChecked();
1139 else
1140 bOk = FALSE;
1141 delete pDlg;
1142 }
1143 else if ( bColPoss )
1144 bColumns = TRUE;
1145 else if ( bRowPoss )
1146 bColumns = FALSE;
1147 else
1148 bOk = FALSE;
1149 }
1150 if (bOk)
1151 {
1152 pTabViewShell->RemoveOutline( bColumns );
1153
1154 if( ! rReq.IsAPI() )
1155 {
1156 String aCol = bColumns ? 'C' : 'R';
1157 rReq.AppendItem( SfxStringItem( SID_OUTLINE_REMOVE, aCol ) );
1158 rReq.Done();
1159 }
1160 }
1161 }
1162 break;
1163
1164 //
1165 // Clipboard
1166 //
1167
1168 case SID_COPY: // fuer Grafiken in DrawShell
1169 {
1170 WaitObject aWait( GetViewData()->GetDialogParent() );
1171 pTabViewShell->CopyToClip( NULL, FALSE, FALSE, TRUE );
1172 rReq.Done();
1173 GetViewData()->SetPasteMode( (ScPasteFlags) (SC_PASTE_MODE | SC_PASTE_BORDER) );
1174 pTabViewShell->ShowCursor();
1175 }
1176 break;
1177
1178 case SID_CUT: // fuer Grafiken in DrawShell
1179 {
1180 WaitObject aWait( GetViewData()->GetDialogParent() );
1181 pTabViewShell->CutToClip( NULL, TRUE );
1182 rReq.Done();
1183 GetViewData()->SetPasteMode( SC_PASTE_MODE );
1184 }
1185 break;
1186
1187 case SID_PASTE:
1188 {
1189 PasteFromClipboard ( GetViewData(), pTabViewShell, true );
1190 rReq.Done();
1191 }
1192 break;
1193
1194 case SID_CLIPBOARD_FORMAT_ITEMS:
1195 {
1196 WaitObject aWait( GetViewData()->GetDialogParent() );
1197
1198 ULONG nFormat = 0;
1199 const SfxPoolItem* pItem;
1200 if ( pReqArgs &&
1201 pReqArgs->GetItemState(nSlot, TRUE, &pItem) == SFX_ITEM_SET &&
1202 pItem->ISA(SfxUInt32Item) )
1203 {
1204 nFormat = ((const SfxUInt32Item*)pItem)->GetValue();
1205 }
1206
1207 if ( nFormat )
1208 {
1209 Window* pWin = GetViewData()->GetActiveWin();
1210 BOOL bCells = ( ScTransferObj::GetOwnClipboard( pWin ) != NULL );
1211 BOOL bDraw = ( ScDrawTransferObj::GetOwnClipboard( pWin ) != NULL );
1212 BOOL bOle = ( nFormat == SOT_FORMATSTR_ID_EMBED_SOURCE );
1213
1214 if ( bCells && bOle )
1215 pTabViewShell->PasteFromSystem();
1216 else if ( bDraw && bOle )
1217 pTabViewShell->PasteDraw();
1218 else
1219 pTabViewShell->PasteFromSystem(nFormat);
1220 }
1221 //?else
1222 //? pTabViewShell->PasteFromSystem();
1223
1224 rReq.Done();
1225 }
1226 pTabViewShell->CellContentChanged();
1227 break;
1228
1229 case FID_INS_CELL_CONTENTS:
1230 {
1231 USHORT nFlags = IDF_NONE;
1232 USHORT nFunction = PASTE_NOFUNC;
1233 BOOL bSkipEmpty = FALSE;
1234 BOOL bTranspose = FALSE;
1235 BOOL bAsLink = FALSE;
1236 InsCellCmd eMoveMode = INS_NONE;
1237
1238 Window* pWin = GetViewData()->GetActiveWin();
1239 ScDocument* pDoc = GetViewData()->GetDocument();
1240 BOOL bOtherDoc = !pDoc->IsClipboardSource();
1241 ScTransferObj* pOwnClip = ScTransferObj::GetOwnClipboard( pWin );
1242 if ( pOwnClip )
1243 {
1244 // #129384# keep a reference in case the clipboard is changed during dialog or PasteFromClip
1245 uno::Reference<datatransfer::XTransferable> aOwnClipRef( pOwnClip );
1246 if ( pReqArgs!=NULL && pTabViewShell->SelectionEditable() )
1247 {
1248 const SfxPoolItem* pItem;
1249 String aFlags = 'A';
1250
1251 if( IS_AVAILABLE( FID_INS_CELL_CONTENTS, &pItem ) )
1252 aFlags = ((const SfxStringItem*)pItem)->GetValue();
1253
1254 aFlags.ToUpperAscii();
1255 BOOL bCont = TRUE;
1256
1257 for( xub_StrLen i=0 ; bCont && i<aFlags.Len() ; i++ )
1258 {
1259 switch( aFlags.GetChar(i) )
1260 {
1261 case 'A': // Alle
1262 nFlags |= IDF_ALL;
1263 bCont = FALSE; // nicht mehr weitermachen!
1264 break;
1265 case 'S': nFlags |= IDF_STRING; break;
1266 case 'V': nFlags |= IDF_VALUE; break;
1267 case 'D': nFlags |= IDF_DATETIME; break;
1268 case 'F': nFlags |= IDF_FORMULA; break;
1269 case 'N': nFlags |= IDF_NOTE; break;
1270 case 'T': nFlags |= IDF_ATTRIB; break;
1271 }
1272 }
1273
1274 SFX_REQUEST_ARG( rReq, pFuncItem, SfxUInt16Item, FN_PARAM_1, sal_False );
1275 SFX_REQUEST_ARG( rReq, pSkipItem, SfxBoolItem, FN_PARAM_2, sal_False );
1276 SFX_REQUEST_ARG( rReq, pTransposeItem, SfxBoolItem, FN_PARAM_3, sal_False );
1277 SFX_REQUEST_ARG( rReq, pLinkItem, SfxBoolItem, FN_PARAM_4, sal_False );
1278 SFX_REQUEST_ARG( rReq, pMoveItem, SfxInt16Item, FN_PARAM_5, sal_False );
1279 if ( pFuncItem )
1280 nFunction = pFuncItem->GetValue();
1281 if ( pSkipItem )
1282 bSkipEmpty = pSkipItem->GetValue();
1283 if ( pTransposeItem )
1284 bTranspose = pTransposeItem->GetValue();
1285 if ( pLinkItem )
1286 bAsLink = pLinkItem->GetValue();
1287 if ( pMoveItem )
1288 eMoveMode = (InsCellCmd) pMoveItem->GetValue();
1289 }
1290 else
1291 {
1292 ScEditableTester aTester( pTabViewShell );
1293 if (aTester.IsEditable())
1294 {
1295 //CHINA001 ScInsertContentsDlg* pDlg = new ScInsertContentsDlg( pTabViewShell->GetDialogParent() );
1296 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
1297 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
1298
1299 AbstractScInsertContentsDlg* pDlg = pFact->CreateScInsertContentsDlg( pTabViewShell->GetDialogParent(),
1300 RID_SCDLG_INSCONT);
1301 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
1302 pDlg->SetOtherDoc( bOtherDoc );
1303 // #53661# bei ChangeTrack MoveMode disablen
1304 pDlg->SetChangeTrack( pDoc->GetChangeTrack() != NULL );
1305 // #72930# cut/move references may disable shift
1306 // directions if source and destination ranges intersect
1307 if ( !bOtherDoc )
1308 {
1309 if ( pOwnClip && pOwnClip->GetDocument()->IsCutMode() )
1310 {
1311 ScViewData* pData = GetViewData();
1312 if ( pData->GetMarkData().GetTableSelect(
1313 pData->GetTabNo() ) )
1314 {
1315 SCCOL nPosX = pData->GetCurX();
1316 SCROW nPosY = pData->GetCurY();
1317 SCCOL nClipStartX, nClipSizeX;
1318 SCROW nClipStartY, nClipSizeY;
1319 pOwnClip->GetDocument()->GetClipStart( nClipStartX, nClipStartY );
1320 // for CutMode, filtered rows can always be included
1321 pOwnClip->GetDocument()->GetClipArea( nClipSizeX, nClipSizeY, TRUE );
1322 int nDisableShift = 0;
1323 if ( nClipStartX <= nPosX + nClipSizeX &&
1324 nPosX <= nClipStartX + nClipSizeX )
1325 nDisableShift |= SC_CELL_SHIFT_DISABLE_DOWN;
1326 if ( nClipStartY <= nPosY + nClipSizeY &&
1327 nPosY <= nClipStartY + nClipSizeY )
1328 nDisableShift |= SC_CELL_SHIFT_DISABLE_RIGHT;
1329 if ( nDisableShift )
1330 pDlg->SetCellShiftDisabled( nDisableShift );
1331 }
1332 }
1333 }
1334 if (pDlg->Execute() == RET_OK)
1335 {
1336 nFlags = pDlg->GetInsContentsCmdBits();
1337 nFunction = pDlg->GetFormulaCmdBits();
1338 bSkipEmpty = pDlg->IsSkipEmptyCells();
1339 bTranspose = pDlg->IsTranspose();
1340 bAsLink = pDlg->IsLink();
1341 eMoveMode = pDlg->GetMoveMode();
1342 }
1343 delete pDlg;
1344 }
1345 else
1346 pTabViewShell->ErrorMessage(aTester.GetMessageId());
1347 }
1348
1349 if( nFlags != IDF_NONE )
1350 {
1351 {
1352 WaitObject aWait( GetViewData()->GetDialogParent() );
1353 if ( bAsLink && bOtherDoc )
1354 pTabViewShell->PasteFromSystem(SOT_FORMATSTR_ID_LINK); // DDE einfuegen
1355 else
1356 pTabViewShell->PasteFromClip( nFlags, pOwnClip->GetDocument(),
1357 nFunction, bSkipEmpty, bTranspose, bAsLink,
1358 eMoveMode, IDF_NONE, TRUE ); // allow warning dialog
1359 }
1360
1361 if( !pReqArgs )
1362 {
1363 String aFlags;
1364
1365 if( nFlags == IDF_ALL )
1366 {
1367 aFlags += 'A';
1368 }
1369 else
1370 {
1371 if( nFlags & IDF_STRING ) aFlags += 'S';
1372 if( nFlags & IDF_VALUE ) aFlags += 'V';
1373 if( nFlags & IDF_DATETIME ) aFlags += 'D';
1374 if( nFlags & IDF_FORMULA ) aFlags += 'F';
1375 if( nFlags & IDF_NOTE ) aFlags += 'N';
1376 if( nFlags & IDF_ATTRIB ) aFlags += 'T';
1377 }
1378
1379 rReq.AppendItem( SfxStringItem( FID_INS_CELL_CONTENTS, aFlags ) );
1380 rReq.AppendItem( SfxBoolItem( FN_PARAM_2, bSkipEmpty ) );
1381 rReq.AppendItem( SfxBoolItem( FN_PARAM_3, bTranspose ) );
1382 rReq.AppendItem( SfxBoolItem( FN_PARAM_4, bAsLink ) );
1383 rReq.AppendItem( SfxUInt16Item( FN_PARAM_1, nFunction ) );
1384 rReq.AppendItem( SfxInt16Item( FN_PARAM_5, (sal_Int16) eMoveMode ) );
1385 rReq.Done();
1386 }
1387 }
1388 }
1389 }
1390 pTabViewShell->CellContentChanged(); // => PasteFromXXX ???
1391 break;
1392
1393 case FID_PASTE_CONTENTS:
1394 // Unterscheidung, ob eigene oder fremde Daten,
1395 // dadurch FID_INS_CELL_CONTENTS ueberfluessig
1396 {
1397 Window* pWin = GetViewData()->GetActiveWin();
1398
1399 // Clipboard-ID als Parameter angegeben? Basic "PasteSpecial(Format)"
1400 const SfxPoolItem* pItem=NULL;
1401 if ( pReqArgs &&
1402 pReqArgs->GetItemState(nSlot, TRUE, &pItem) == SFX_ITEM_SET &&
1403 pItem->ISA(SfxUInt32Item) )
1404 {
1405 ULONG nFormat = ((const SfxUInt32Item*)pItem)->GetValue();
1406 BOOL bRet=TRUE;
1407 {
1408 WaitObject aWait( GetViewData()->GetDialogParent() );
1409 BOOL bDraw = ( ScDrawTransferObj::GetOwnClipboard( pWin ) != NULL );
1410 if ( bDraw && nFormat == SOT_FORMATSTR_ID_EMBED_SOURCE )
1411 pTabViewShell->PasteDraw();
1412 else
1413 bRet = pTabViewShell->PasteFromSystem(nFormat, TRUE); // TRUE: keine Fehlermeldungen
1414 }
1415
1416 if ( bRet )
1417 {
1418 rReq.SetReturnValue(SfxInt16Item(nSlot, bRet)); // 1 = Erfolg, 0 = Fehler
1419 rReq.Done();
1420 }
1421 else
1422 // if format is not available -> fallback to request without parameters
1423 pItem = NULL;
1424 }
1425
1426 if ( !pItem )
1427 {
1428 if ( ScTransferObj::GetOwnClipboard( pWin ) ) // own cell data
1429 {
1430 rReq.SetSlot( FID_INS_CELL_CONTENTS );
1431 ExecuteSlot( rReq, GetInterface() );
1432 rReq.SetReturnValue(SfxInt16Item(nSlot, 1)); // 1 = Erfolg
1433 }
1434 else // Zeichenobjekte oder fremde Daten
1435 {
1436 BOOL bDraw = ( ScDrawTransferObj::GetOwnClipboard( pWin ) != NULL );
1437
1438 SvxClipboardFmtItem aFormats( SID_CLIPBOARD_FORMAT_ITEMS );
1439 GetPossibleClipboardFormats( aFormats );
1440
1441 USHORT nFormatCount = aFormats.Count();
1442 if ( nFormatCount )
1443 {
1444 SvxAbstractDialogFactory* pFact = SvxAbstractDialogFactory::Create();
1445 SfxAbstractPasteDialog* pDlg = pFact->CreatePasteDialog( pTabViewShell->GetDialogParent() );
1446 if ( pDlg )
1447 {
1448 for (USHORT i=0; i<nFormatCount; i++)
1449 {
1450 ULONG nFormatId = aFormats.GetClipbrdFormatId( i );
1451 String aName = aFormats.GetClipbrdFormatName( i );
1452 // special case for paste dialog: '*' is replaced by object type
1453 if ( nFormatId == SOT_FORMATSTR_ID_EMBED_SOURCE )
1454 aName.Assign((sal_Unicode)'*');
1455 pDlg->Insert( nFormatId, aName );
1456 }
1457
1458 TransferableDataHelper aDataHelper(
1459 TransferableDataHelper::CreateFromSystemClipboard( pWin ) );
1460 ULONG nFormat = pDlg->GetFormat( aDataHelper.GetTransferable() );
1461 if (nFormat > 0)
1462 {
1463 {
1464 WaitObject aWait( GetViewData()->GetDialogParent() );
1465 if ( bDraw && nFormat == SOT_FORMATSTR_ID_EMBED_SOURCE )
1466 pTabViewShell->PasteDraw();
1467 else
1468 pTabViewShell->PasteFromSystem(nFormat);
1469 }
1470 rReq.SetReturnValue(SfxInt16Item(nSlot, 1)); // 1 = Erfolg
1471 rReq.AppendItem( SfxUInt32Item( nSlot, nFormat ) );
1472 rReq.Done();
1473 }
1474 else
1475 {
1476 rReq.SetReturnValue(SfxInt16Item(nSlot, 0)); // 0 = Fehler
1477 rReq.Ignore();
1478 }
1479
1480 delete pDlg;
1481 }
1482 }
1483 else
1484 rReq.SetReturnValue(SfxInt16Item(nSlot, 0)); // 0 = Fehler
1485 }
1486 }
1487 }
1488 pTabViewShell->CellContentChanged(); // => PasteFromSystem() ???
1489 break;
1490
1491 #if 0
1492 // clipboard slots were used only for old basic:
1493
1494 case SID_GET_CLPBRD_FORMAT_COUNT:
1495 rReq.SetReturnValue( SfxUInt16Item( nSlot, Clipboard::GetFormatCount() ) );
1496 break;
1497
1498 case SID_GET_CLPBRD_FORMAT_BY_IDX:
1499 if (pReqArgs)
1500 {
1501 const SfxPoolItem* pItem;
1502 if ( pReqArgs->GetItemState(nSlot, TRUE, &pItem) == SFX_ITEM_SET &&
1503 pItem->ISA(SfxUInt16Item) )
1504 {
1505 USHORT nCount = Clipboard::GetFormatCount();
1506 USHORT nPos = ((const SfxUInt16Item*)pItem)->GetValue(); // 1-based
1507 if ( nPos && nPos <= nCount )
1508 rReq.SetReturnValue( SfxUInt32Item( nSlot, Clipboard::GetFormat(--nPos) ) );
1509 }
1510 }
1511 break;
1512
1513 case SID_GET_CLPBRD_FORMAT_NAME:
1514 if (pReqArgs)
1515 {
1516 const SfxPoolItem* pItem;
1517 if ( pReqArgs->GetItemState(nSlot, TRUE, &pItem) == SFX_ITEM_SET &&
1518 pItem->ISA(SfxUInt32Item) )
1519 {
1520 String aName = Exchange::GetFormatName(
1521 ((const SfxUInt32Item*)pItem)->GetValue() );
1522 rReq.SetReturnValue( SfxStringItem( nSlot, aName ) );
1523 }
1524 }
1525 break;
1526 #endif
1527
1528 //
1529 // sonstiges
1530 //
1531
1532 case FID_INS_ROWBRK:
1533 pTabViewShell->InsertPageBreak( FALSE );
1534 rReq.Done();
1535 break;
1536
1537 case FID_INS_COLBRK:
1538 pTabViewShell->InsertPageBreak( TRUE );
1539 rReq.Done();
1540 break;
1541
1542 case FID_DEL_ROWBRK:
1543 pTabViewShell->DeletePageBreak( FALSE );
1544 rReq.Done();
1545 break;
1546
1547 case FID_DEL_COLBRK:
1548 pTabViewShell->DeletePageBreak( TRUE );
1549 rReq.Done();
1550 break;
1551
1552 case SID_DETECTIVE_ADD_PRED:
1553 pTabViewShell->DetectiveAddPred();
1554 rReq.Done();
1555 break;
1556
1557 case SID_DETECTIVE_DEL_PRED:
1558 pTabViewShell->DetectiveDelPred();
1559 rReq.Done();
1560 break;
1561
1562 case SID_DETECTIVE_ADD_SUCC:
1563 pTabViewShell->DetectiveAddSucc();
1564 rReq.Done();
1565 break;
1566
1567 case SID_DETECTIVE_DEL_SUCC:
1568 pTabViewShell->DetectiveDelSucc();
1569 rReq.Done();
1570 break;
1571
1572 case SID_DETECTIVE_ADD_ERR:
1573 pTabViewShell->DetectiveAddError();
1574 rReq.Done();
1575 break;
1576
1577 case SID_DETECTIVE_INVALID:
1578 pTabViewShell->DetectiveMarkInvalid();
1579 rReq.Done();
1580 break;
1581
1582 case SID_DETECTIVE_REFRESH:
1583 pTabViewShell->DetectiveRefresh();
1584 rReq.Done();
1585 break;
1586
1587 case SID_DETECTIVE_MARK_PRED:
1588 pTabViewShell->DetectiveMarkPred();
1589 break;
1590 case SID_DETECTIVE_MARK_SUCC:
1591 pTabViewShell->DetectiveMarkSucc();
1592 break;
1593
1594 case SID_SPELL_DIALOG:
1595 // pTabViewShell->DoSpellingChecker();
1596 {
1597 SfxViewFrame* pViewFrame = pTabViewShell->GetViewFrame();
1598 if( rReq.GetArgs() )
1599 pViewFrame->SetChildWindow( SID_SPELL_DIALOG,
1600 static_cast< const SfxBoolItem& >( rReq.GetArgs()->
1601 Get( SID_SPELL_DIALOG ) ).GetValue() );
1602 else
1603 pViewFrame->ToggleChildWindow( SID_SPELL_DIALOG );
1604
1605 pViewFrame->GetBindings().Invalidate( SID_SPELL_DIALOG );
1606 rReq.Ignore();
1607 }
1608 break;
1609
1610 case SID_HANGUL_HANJA_CONVERSION:
1611 pTabViewShell->DoHangulHanjaConversion();
1612 break;
1613
1614 case SID_CHINESE_CONVERSION:
1615 {
1616 //open ChineseTranslationDialog
1617 Reference< XComponentContext > xContext(
1618 ::cppu::defaultBootstrap_InitialComponentContext() ); //@todo get context from calc if that has one
1619 if(xContext.is())
1620 {
1621 Reference< lang::XMultiComponentFactory > xMCF( xContext->getServiceManager() );
1622 if(xMCF.is())
1623 {
1624 Reference< ui::dialogs::XExecutableDialog > xDialog(
1625 xMCF->createInstanceWithContext(
1626 rtl::OUString::createFromAscii("com.sun.star.linguistic2.ChineseTranslationDialog")
1627 , xContext), UNO_QUERY);
1628 Reference< lang::XInitialization > xInit( xDialog, UNO_QUERY );
1629 if( xInit.is() )
1630 {
1631 // initialize dialog
1632 Reference< awt::XWindow > xDialogParentWindow(0);
1633 Sequence<Any> aSeq(1);
1634 Any* pArray = aSeq.getArray();
1635 PropertyValue aParam;
1636 aParam.Name = rtl::OUString::createFromAscii("ParentWindow");
1637 aParam.Value <<= makeAny(xDialogParentWindow);
1638 pArray[0] <<= makeAny(aParam);
1639 xInit->initialize( aSeq );
1640
1641 //execute dialog
1642 sal_Int16 nDialogRet = xDialog->execute();
1643 if( RET_OK == nDialogRet )
1644 {
1645 //get some parameters from the dialog
1646 sal_Bool bToSimplified = sal_True;
1647 sal_Bool bUseVariants = sal_True;
1648 sal_Bool bCommonTerms = sal_True;
1649 Reference< beans::XPropertySet > xProp( xDialog, UNO_QUERY );
1650 if( xProp.is() )
1651 {
1652 try
1653 {
1654 xProp->getPropertyValue( C2U("IsDirectionToSimplified") ) >>= bToSimplified;
1655 xProp->getPropertyValue( C2U("IsUseCharacterVariants") ) >>= bUseVariants;
1656 xProp->getPropertyValue( C2U("IsTranslateCommonTerms") ) >>= bCommonTerms;
1657 }
1658 catch( Exception& )
1659 {
1660 }
1661 }
1662
1663 //execute translation
1664 LanguageType eSourceLang = bToSimplified ? LANGUAGE_CHINESE_TRADITIONAL : LANGUAGE_CHINESE_SIMPLIFIED;
1665 LanguageType eTargetLang = bToSimplified ? LANGUAGE_CHINESE_SIMPLIFIED : LANGUAGE_CHINESE_TRADITIONAL;
1666 sal_Int32 nOptions = bUseVariants ? i18n::TextConversionOption::USE_CHARACTER_VARIANTS : 0;
1667 if( !bCommonTerms )
1668 nOptions |= i18n::TextConversionOption::CHARACTER_BY_CHARACTER;
1669
1670 Font aTargetFont = GetViewData()->GetActiveWin()->GetDefaultFont(
1671 DEFAULTFONT_CJK_SPREADSHEET,
1672 eTargetLang, DEFAULTFONT_FLAGS_ONLYONE );
1673 ScConversionParam aConvParam( SC_CONVERSION_CHINESE_TRANSL,
1674 eSourceLang, eTargetLang, aTargetFont, nOptions, false );
1675 pTabViewShell->DoSheetConversion( aConvParam );
1676 }
1677 }
1678 Reference< lang::XComponent > xComponent( xDialog, UNO_QUERY );
1679 if( xComponent.is() )
1680 xComponent->dispose();
1681 }
1682 }
1683 }
1684 break;
1685
1686 case SID_THESAURUS:
1687 pTabViewShell->DoThesaurus();
1688 break;
1689
1690 case SID_TOGGLE_REL:
1691 pTabViewShell->DoRefConversion();
1692 break;
1693
1694 case SID_DEC_INDENT:
1695 pTabViewShell->ChangeIndent( FALSE );
1696 break;
1697 case SID_INC_INDENT:
1698 pTabViewShell->ChangeIndent( TRUE );
1699 break;
1700
1701 case FID_USE_NAME:
1702 {
1703 USHORT nFlags = pTabViewShell->GetCreateNameFlags();
1704
1705 //CHINA001 ScNameCreateDlg* pDlg = new ScNameCreateDlg( pTabViewShell->GetDialogParent(), nFlags );
1706 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
1707 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
1708
1709 AbstractScNameCreateDlg* pDlg = pFact->CreateScNameCreateDlg(pTabViewShell->GetDialogParent(), nFlags, RID_SCDLG_NAMES_CREATE );
1710 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
1711
1712 if( pDlg->Execute() )
1713 {
1714 nFlags = pDlg->GetFlags();
1715 pTabViewShell->CreateNames(nFlags);
1716 rReq.Done();
1717 }
1718 delete pDlg;
1719 }
1720 break;
1721
1722 case SID_CONSOLIDATE:
1723 {
1724 const SfxPoolItem* pItem;
1725 if ( pReqArgs && SFX_ITEM_SET ==
1726 pReqArgs->GetItemState( SCITEM_CONSOLIDATEDATA, TRUE, &pItem ) )
1727 {
1728 const ScConsolidateParam& rParam =
1729 ((const ScConsolidateItem*)pItem)->GetData();
1730
1731 pTabViewShell->Consolidate( rParam );
1732 GetViewData()->GetDocument()->SetConsolidateDlgData( &rParam );
1733
1734 rReq.Done();
1735 }
1736 else if (rReq.IsAPI())
1737 SbxBase::SetError(SbxERR_BAD_PARAMETER);
1738 }
1739 break;
1740
1741 case SID_INS_FUNCTION:
1742 {
1743 const SfxBoolItem* pOkItem = (const SfxBoolItem*)&pReqArgs->Get( SID_DLG_RETOK );
1744
1745 // pScMod->SetFunctionDlg( NULL );
1746
1747 if ( pOkItem->GetValue() ) // OK
1748 {
1749 String aFormula;
1750 const SfxStringItem* pSItem = (const SfxStringItem*)&pReqArgs->Get( SCITEM_STRING );
1751 const SfxBoolItem* pMatrixItem = (const SfxBoolItem*) &pReqArgs->Get( SID_DLG_MATRIX );
1752
1753 aFormula += pSItem->GetValue();
1754 pScMod->ActivateInputWindow( &aFormula, pMatrixItem->GetValue() );
1755 }
1756 else // CANCEL
1757 {
1758 pScMod->ActivateInputWindow( NULL );
1759 }
1760 rReq.Ignore(); // only SID_ENTER_STRING is recorded
1761 }
1762 break;
1763
1764 case FID_DEFINE_NAME:
1765 if ( pReqArgs )
1766 {
1767 const SfxPoolItem* pItem;
1768 String aName, aSymbol, aAttrib;
1769
1770 if( IS_AVAILABLE( FID_DEFINE_NAME, &pItem ) )
1771 aName = ((const SfxStringItem*)pItem)->GetValue();
1772
1773 if( IS_AVAILABLE( FN_PARAM_1, &pItem ) )
1774 aSymbol = ((const SfxStringItem*)pItem)->GetValue();
1775
1776 if( IS_AVAILABLE( FN_PARAM_2, &pItem ) )
1777 aAttrib = ((const SfxStringItem*)pItem)->GetValue();
1778
1779 if ( aName.Len() && aSymbol.Len() )
1780 {
1781 if (pTabViewShell->InsertName( aName, aSymbol, aAttrib ))
1782 rReq.Done();
1783 else
1784 SbxBase::SetError( SbxERR_BAD_PARAMETER ); // Basic-Fehler
1785 }
1786 }
1787 else
1788 {
1789 USHORT nId = ScNameDlgWrapper::GetChildWindowId();
1790 SfxViewFrame* pViewFrm = pTabViewShell->GetViewFrame();
1791 SfxChildWindow* pWnd = pViewFrm->GetChildWindow( nId );
1792
1793 pScMod->SetRefDialog( nId, pWnd ? FALSE : TRUE );
1794 }
1795 break;
1796
1797 case SID_DEFINE_COLROWNAMERANGES:
1798 {
1799
1800 USHORT nId = ScColRowNameRangesDlgWrapper::GetChildWindowId();
1801 SfxViewFrame* pViewFrm = pTabViewShell->GetViewFrame();
1802 SfxChildWindow* pWnd = pViewFrm->GetChildWindow( nId );
1803
1804 pScMod->SetRefDialog( nId, pWnd ? FALSE : TRUE );
1805
1806 }
1807 break;
1808
1809 case SID_UPDATECHART:
1810 {
1811 BOOL bAll = FALSE;
1812
1813 if( pReqArgs )
1814 {
1815 const SfxPoolItem* pItem;
1816
1817 if( IS_AVAILABLE( SID_UPDATECHART, &pItem ) )
1818 bAll = ((const SfxBoolItem*)pItem)->GetValue();
1819 }
1820
1821 pTabViewShell->UpdateCharts( bAll );
1822
1823 if( ! rReq.IsAPI() )
1824 {
1825 rReq.AppendItem( SfxBoolItem( SID_UPDATECHART, bAll ) );
1826 rReq.Done();
1827 }
1828 }
1829 break;
1830
1831
1832 case SID_TABOP:
1833 if (pReqArgs)
1834 {
1835 const ScTabOpItem& rItem =
1836 (const ScTabOpItem&)
1837 pReqArgs->Get( SID_TABOP );
1838
1839 pTabViewShell->TabOp( rItem.GetData() );
1840
1841 rReq.Done( *pReqArgs );
1842 }
1843 break;
1844
1845 case SID_SOLVE:
1846 if (pReqArgs)
1847 {
1848 const ScSolveItem& rItem =
1849 (const ScSolveItem&)
1850 pReqArgs->Get( SCITEM_SOLVEDATA );
1851
1852 pTabViewShell->Solve( rItem.GetData() );
1853
1854 rReq.Done( *pReqArgs );
1855 }
1856 break;
1857
1858 case FID_INSERT_NAME:
1859 {
1860 ScDocument* pDoc = GetViewData()->GetDocument();
1861 //CHINA001 ScNamePasteDlg* pDlg = new ScNamePasteDlg( pTabViewShell->GetDialogParent(), pDoc->GetRangeName() );
1862 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
1863 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
1864
1865 AbstractScNamePasteDlg* pDlg = pFact->CreateScNamePasteDlg( pTabViewShell->GetDialogParent(), pDoc->GetRangeName(), RID_SCDLG_NAMES_PASTE );
1866 DBG_ASSERT(pDlg, "Dialog create fail!");//CHINA001
1867 switch( pDlg->Execute() )
1868 {
1869 case BTN_PASTE_LIST:
1870 pTabViewShell->InsertNameList();
1871 break;
1872 case BTN_PASTE_NAME:
1873 {
1874 ScInputHandler* pHdl = pScMod->GetInputHdl( pTabViewShell );
1875 if (pHdl)
1876 {
1877 // das "=" per Key-Event, schaltet in den Eingabe-Modus
1878 pScMod->InputKeyEvent( KeyEvent('=',KeyCode()) );
1879
1880 String aName = pDlg->GetSelectedName();
1881 pHdl->InsertFunction( aName, FALSE ); // ohne "()"
1882 }
1883 }
1884 break;
1885 }
1886 delete pDlg;
1887 }
1888 break;
1889
1890 case SID_RANGE_NOTETEXT:
1891 if (pReqArgs)
1892 {
1893 const SfxStringItem& rTextItem = (const SfxStringItem&)pReqArgs->Get( SID_RANGE_NOTETEXT );
1894
1895 // #43343# immer Cursorposition
1896 ScAddress aPos( GetViewData()->GetCurX(), GetViewData()->GetCurY(), GetViewData()->GetTabNo() );
1897 pTabViewShell->SetNoteText( aPos, rTextItem.GetValue() );
1898 rReq.Done();
1899 }
1900 break;
1901
1902 case SID_INSERT_POSTIT:
1903 if ( pReqArgs )
1904 {
1905 const SvxPostItAuthorItem& rAuthorItem = (const SvxPostItAuthorItem&)pReqArgs->Get( SID_ATTR_POSTIT_AUTHOR );
1906 const SvxPostItDateItem& rDateItem = (const SvxPostItDateItem&) pReqArgs->Get( SID_ATTR_POSTIT_DATE );
1907 const SvxPostItTextItem& rTextItem = (const SvxPostItTextItem&) pReqArgs->Get( SID_ATTR_POSTIT_TEXT );
1908
1909 ScAddress aPos( GetViewData()->GetCurX(), GetViewData()->GetCurY(), GetViewData()->GetTabNo() );
1910 pTabViewShell->ReplaceNote( aPos, rTextItem.GetValue(), &rAuthorItem.GetValue(), &rDateItem.GetValue() );
1911 rReq.Done();
1912 }
1913 else
1914 {
1915 pTabViewShell->EditNote(); // Zeichenobjekt zum Editieren
1916 }
1917 break;
1918
1919 case FID_NOTE_VISIBLE:
1920 {
1921 ScDocument* pDoc = GetViewData()->GetDocument();
1922 ScAddress aPos( GetViewData()->GetCurX(), GetViewData()->GetCurY(), GetViewData()->GetTabNo() );
1923 if( ScPostIt* pNote = pDoc->GetNote( aPos ) )
1924 {
1925 bool bShow;
1926 const SfxPoolItem* pItem;
1927 if ( pReqArgs && (pReqArgs->GetItemState( FID_NOTE_VISIBLE, TRUE, &pItem ) == SFX_ITEM_SET) )
1928 bShow = ((const SfxBoolItem*) pItem)->GetValue();
1929 else
1930 bShow = !pNote->IsCaptionShown();
1931
1932 pTabViewShell->ShowNote( bShow );
1933
1934 if (!pReqArgs)
1935 rReq.AppendItem( SfxBoolItem( FID_NOTE_VISIBLE, bShow ) );
1936
1937 rReq.Done();
1938 rBindings.Invalidate( FID_NOTE_VISIBLE );
1939 }
1940 else
1941 rReq.Ignore();
1942 }
1943 break;
1944
1945 case SID_DELETE_NOTE:
1946 pTabViewShell->DeleteContents( IDF_NOTE ); // delete all notes in selection
1947 rReq.Done();
1948 break;
1949
1950 case SID_CHARMAP:
1951 if( pReqArgs != NULL )
1952 {
1953 String aChars, aFontName;
1954 const SfxItemSet *pArgs = rReq.GetArgs();
1955 const SfxPoolItem* pItem = 0;
1956 if ( pArgs )
1957 pArgs->GetItemState(GetPool().GetWhich(SID_CHARMAP), FALSE, &pItem);
1958 if ( pItem )
1959 {
1960 const SfxStringItem* pStringItem = PTR_CAST( SfxStringItem, pItem );
1961 if ( pStringItem )
1962 aChars = pStringItem->GetValue();
1963 const SfxPoolItem* pFtItem = NULL;
1964 pArgs->GetItemState( GetPool().GetWhich(SID_ATTR_SPECIALCHAR), FALSE, &pFtItem);
1965 const SfxStringItem* pFontItem = PTR_CAST( SfxStringItem, pFtItem );
1966 if ( pFontItem )
1967 aFontName = pFontItem->GetValue();
1968 }
1969
1970 if ( aChars.Len() )
1971 {
1972 Font aFont;
1973 pTabViewShell->GetSelectionPattern()->GetFont( aFont, SC_AUTOCOL_BLACK, NULL, NULL, NULL,
1974 pTabViewShell->GetSelectionScriptType() );
1975 if ( aFontName.Len() )
1976 aFont = Font( aFontName, Size(1,1) );
1977 pTabViewShell->InsertSpecialChar( aChars, aFont );
1978 if( ! rReq.IsAPI() )
1979 rReq.Done();
1980 }
1981 }
1982 else
1983 {
1984 //CHINA001 SvxCharacterMap* pDlg = new SvxCharacterMap( pTabViewShell->GetDialogParent(), FALSE );
1985 SvxAbstractDialogFactory* pFact = SvxAbstractDialogFactory::Create();
1986
1987 // font color doesn't matter here
1988 Font aCurFont;
1989 pTabViewShell->GetSelectionPattern()->GetFont( aCurFont, SC_AUTOCOL_BLACK, NULL, NULL, NULL,
1990 pTabViewShell->GetSelectionScriptType() );
1991
1992 SfxAllItemSet aSet( GetPool() );
1993 aSet.Put( SfxBoolItem( FN_PARAM_1, FALSE ) );
1994 aSet.Put( SvxFontItem( aCurFont.GetFamily(), aCurFont.GetName(), aCurFont.GetStyleName(), aCurFont.GetPitch(), aCurFont.GetCharSet(), GetPool().GetWhich(SID_ATTR_CHAR_FONT) ) );
1995
1996 SfxAbstractDialog* pDlg = pFact->CreateSfxDialog( pTabViewShell->GetDialogParent(), aSet,
1997 pTabViewShell->GetViewFrame()->GetFrame()->GetFrameInterface(), RID_SVXDLG_CHARMAP );
1998
1999 if ( pDlg->Execute() == RET_OK )
2000 {
2001 SFX_ITEMSET_ARG( pDlg->GetOutputItemSet(), pItem, SfxStringItem, SID_CHARMAP, FALSE );
2002 SFX_ITEMSET_ARG( pDlg->GetOutputItemSet(), pFontItem, SvxFontItem, SID_ATTR_CHAR_FONT, FALSE );
2003
2004 if ( pItem && pFontItem )
2005 {
2006 Font aNewFont( pFontItem->GetFamilyName(), pFontItem->GetStyleName(), Size(1,1) );
2007 aNewFont.SetCharSet( pFontItem->GetCharSet() );
2008 aNewFont.SetPitch( pFontItem->GetPitch() );
2009 pTabViewShell->InsertSpecialChar( pItem->GetValue(), aNewFont );
2010 rReq.AppendItem( *pFontItem );
2011 rReq.AppendItem( *pItem );
2012 rReq.Done();
2013 }
2014 }
2015 delete pDlg;
2016 }
2017 break;
2018
2019 case SID_SELECT_SCENARIO:
2020 {
2021 // Testing
2022
2023 if ( pReqArgs )
2024 {
2025 const SfxStringItem* pItem =
2026 (const SfxStringItem*)&pReqArgs->Get( SID_SELECT_SCENARIO );
2027
2028 if( pItem )
2029 {
2030 pTabViewShell->UseScenario( pItem->GetValue() );
2031 //! wofuer soll der Return-Wert gut sein?!?!
2032 rReq.SetReturnValue( SfxStringItem( SID_SELECT_SCENARIO, pItem->GetValue() ) );
2033 rReq.Done();
2034 }
2035 else
2036 {
2037 DBG_ERROR("NULL");
2038 }
2039 }
2040 }
2041 break;
2042
2043 case SID_HYPERLINK_SETLINK:
2044 if( pReqArgs )
2045 {
2046 const SfxPoolItem* pItem;
2047 if( IS_AVAILABLE( SID_HYPERLINK_SETLINK, &pItem ) )
2048 {
2049 const SvxHyperlinkItem* pHyper = (const SvxHyperlinkItem*) pItem;
2050 const String& rName = pHyper->GetName();
2051 const String& rURL = pHyper->GetURL();
2052 const String& rTarget = pHyper->GetTargetFrame();
2053 USHORT nType = (USHORT) pHyper->GetInsertMode();
2054
2055 pTabViewShell->InsertURL( rName, rURL, rTarget, nType );
2056 rReq.Done();
2057 }
2058 else
2059 rReq.Ignore();
2060 }
2061 break;
2062
2063 case FID_CONDITIONAL_FORMAT:
2064 if( pReqArgs )
2065 {
2066 const SfxPoolItem* pItem;
2067 if( IS_AVAILABLE( FID_CONDITIONAL_FORMAT, &pItem ) )
2068 {
2069 // Wenn RefInput auf andere Tabelle als Datentabelle umgeschaltet
2070 // hat wieder zurueckschalten:
2071 if ( GetViewData()->GetTabNo() != GetViewData()->GetRefTabNo() )
2072 {
2073 pTabViewShell->SetTabNo( GetViewData()->GetRefTabNo() );
2074 pTabViewShell->PaintExtras();
2075 }
2076
2077 const ScCondFrmtItem* pCndFmtItem = (const ScCondFrmtItem*) pItem;
2078 pTabViewShell->SetConditionalFormat( pCndFmtItem->GetData() );
2079 rReq.Done();
2080 }
2081 }
2082 break;
2083
2084 case SID_EXTERNAL_SOURCE:
2085 {
2086 String aFile;
2087 String aFilter;
2088 String aOptions;
2089 String aSource;
2090 ULONG nRefresh=0;
2091
2092 SFX_REQUEST_ARG( rReq, pFile, SfxStringItem, SID_FILE_NAME, sal_False );
2093 SFX_REQUEST_ARG( rReq, pSource, SfxStringItem, FN_PARAM_1, sal_False );
2094 if ( pFile && pSource )
2095 {
2096 aFile = pFile->GetValue();
2097 aSource = pSource->GetValue();
2098 SFX_REQUEST_ARG( rReq, pFilter, SfxStringItem, SID_FILTER_NAME, sal_False );
2099 if ( pFilter )
2100 aFilter = pFilter->GetValue();
2101 SFX_REQUEST_ARG( rReq, pOptions, SfxStringItem, SID_FILE_FILTEROPTIONS, sal_False );
2102 if ( pOptions )
2103 aOptions = pOptions->GetValue();
2104 SFX_REQUEST_ARG( rReq, pRefresh, SfxUInt32Item, FN_PARAM_2, sal_False );
2105 if ( pRefresh )
2106 nRefresh = pRefresh->GetValue();
2107 }
2108 else
2109 {
2110 //CHINA001 ScLinkedAreaDlg* pDlg = new ScLinkedAreaDlg( pTabViewShell->GetDialogParent() );
2111 ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
2112 DBG_ASSERT(pFact, "ScAbstractFactory create fail!");//CHINA001
2113
2114 delete pImpl->m_pLinkedDlg;
2115 pImpl->m_pLinkedDlg =
2116 pFact->CreateScLinkedAreaDlg( pTabViewShell->GetDialogParent(),
2117 RID_SCDLG_LINKAREA);
2118 DBG_ASSERT(pImpl->m_pLinkedDlg, "Dialog create fail!");//CHINA001
2119 delete pImpl->m_pRequest;
2120 pImpl->m_pRequest = new SfxRequest( rReq );
2121 pImpl->m_pLinkedDlg->StartExecuteModal( LINK( this, ScCellShell, DialogClosed ) );
2122 return;
2123 }
2124
2125 ExecuteExternalSource( aFile, aFilter, aOptions, aSource, nRefresh, rReq );
2126 }
2127 break;
2128
2129 //
2130 //
2131 //
2132
2133 default:
2134 DBG_ERROR("falscher Slot bei ExecuteEdit");
2135 break;
2136 }
2137 }
2138
2139 void ScCellShell::ExecuteTrans( SfxRequest& rReq )
2140 {
2141 sal_Int32 nType = ScViewUtil::GetTransliterationType( rReq.GetSlot() );
2142 if ( nType )
2143 {
2144 GetViewData()->GetView()->TransliterateText( nType );
2145 rReq.Done();
2146 }
2147 }
2148
2149 void ScCellShell::ExecuteExternalSource(
2150 const String& _rFile, const String& _rFilter, const String& _rOptions,
2151 const String& _rSource, ULONG _nRefresh, SfxRequest& _rRequest )
2152 {
2153 if ( _rFile.Len() && _rSource.Len() ) // filter may be empty
2154 {
2155 ScRange aLinkRange;
2156 BOOL bMove = FALSE;
2157
2158 ScViewData* pData = GetViewData();
2159 ScMarkData& rMark = pData->GetMarkData();
2160 rMark.MarkToSimple();
2161 if ( rMark.IsMarked() )
2162 {
2163 rMark.GetMarkArea( aLinkRange );
2164 bMove = TRUE; // insert/delete cells to fit range
2165 }
2166 else
2167 aLinkRange = ScRange( pData->GetCurX(), pData->GetCurY(), pData->GetTabNo() );
2168
2169 ScDocFunc aFunc(*pData->GetDocShell());
2170 aFunc.InsertAreaLink( _rFile, _rFilter, _rOptions, _rSource,
2171 aLinkRange, _nRefresh, bMove, FALSE );
2172 _rRequest.Done();
2173 }
2174 else
2175 _rRequest.Ignore();
2176 }
2177
2178 IMPL_LINK( ScCellShell, DialogClosed, AbstractScLinkedAreaDlg*, EMPTYARG )
2179 {
2180 DBG_ASSERT( pImpl->m_pLinkedDlg, "ScCellShell::DialogClosed(): invalid request" );
2181 DBG_ASSERT( pImpl->m_pRequest, "ScCellShell::DialogClosed(): invalid request" );
2182 String sFile, sFilter, sOptions, sSource;
2183 ULONG nRefresh = 0;
2184
2185 if ( pImpl->m_pLinkedDlg->GetResult() == RET_OK )
2186 {
2187 sFile = pImpl->m_pLinkedDlg->GetURL();
2188 sFilter = pImpl->m_pLinkedDlg->GetFilter();
2189 sOptions = pImpl->m_pLinkedDlg->GetOptions();
2190 sSource = pImpl->m_pLinkedDlg->GetSource();
2191 nRefresh = pImpl->m_pLinkedDlg->GetRefresh();
2192 if ( sFile.Len() )
2193 pImpl->m_pRequest->AppendItem( SfxStringItem( SID_FILE_NAME, sFile ) );
2194 if ( sFilter.Len() )
2195 pImpl->m_pRequest->AppendItem( SfxStringItem( SID_FILTER_NAME, sFilter ) );
2196 if ( sOptions.Len() )
2197 pImpl->m_pRequest->AppendItem( SfxStringItem( SID_FILE_FILTEROPTIONS, sOptions ) );
2198 if ( sSource.Len() )
2199 pImpl->m_pRequest->AppendItem( SfxStringItem( FN_PARAM_1, sSource ) );
2200 if ( nRefresh )
2201 pImpl->m_pRequest->AppendItem( SfxUInt32Item( FN_PARAM_2, nRefresh ) );
2202 }
2203
2204 ExecuteExternalSource( sFile, sFilter, sOptions, sSource, nRefresh, *(pImpl->m_pRequest) );
2205 return 0;
2206 }
2207
2208 void ScCellShell::PasteFromClipboard( ScViewData* pViewData, ScTabViewShell* pTabViewShell, bool bShowDialog )
2209 {
2210 Window* pWin = pViewData->GetActiveWin();
2211 ScTransferObj* pOwnClip = ScTransferObj::GetOwnClipboard( pWin );
2212 ScDocument* pThisDoc = pViewData->GetDocument();
2213 ScDPObject* pDPObj = pThisDoc->GetDPAtCursor( pViewData->GetCurX(),
2214 pViewData->GetCurY(), pViewData->GetTabNo() );
2215 if ( pOwnClip && pDPObj )
2216 {
2217 // paste from Calc into DataPilot table: sort (similar to drag & drop)
2218
2219 ScDocument* pClipDoc = pOwnClip->GetDocument();
2220 SCTAB nSourceTab = pOwnClip->GetVisibleTab();
2221
2222 SCCOL nClipStartX;
2223 SCROW nClipStartY;
2224 SCCOL nClipEndX;
2225 SCROW nClipEndY;
2226 pClipDoc->GetClipStart( nClipStartX, nClipStartY );
2227 pClipDoc->GetClipArea( nClipEndX, nClipEndY, TRUE );
2228 nClipEndX = nClipEndX + nClipStartX;
2229 nClipEndY = nClipEndY + nClipStartY; // GetClipArea returns the difference
2230
2231 ScRange aSource( nClipStartX, nClipStartY, nSourceTab, nClipEndX, nClipEndY, nSourceTab );
2232 BOOL bDone = pTabViewShell->DataPilotMove( aSource, pViewData->GetCurPos() );
2233 if ( !bDone )
2234 pTabViewShell->ErrorMessage( STR_ERR_DATAPILOT_INPUT );
2235 }
2236 else
2237 {
2238 // normal paste
2239 WaitObject aWait( pViewData->GetDialogParent() );
2240 if (!pOwnClip)
2241 pTabViewShell->PasteFromSystem();
2242 else
2243 {
2244 ScDocument* pClipDoc = pOwnClip->GetDocument();
2245 sal_uInt16 nFlags = IDF_ALL;
2246 if (pClipDoc->GetClipParam().isMultiRange())
2247 // For multi-range paste, we paste values by default.
2248 nFlags &= ~IDF_FORMULA;
2249
2250 pTabViewShell->PasteFromClip( nFlags, pClipDoc,
2251 PASTE_NOFUNC, FALSE, FALSE, FALSE, INS_NONE, IDF_NONE,
2252 bShowDialog ); // allow warning dialog
2253 }
2254 }
2255 pTabViewShell->CellContentChanged(); // => PasteFromSystem() ???
2256 }
vba interoperability for OOo