1b3f79822SAndrew Rist /************************************************************** 2cdf0e10cSrcweir * 3b3f79822SAndrew Rist * Licensed to the Apache Software Foundation (ASF) under one 4b3f79822SAndrew Rist * or more contributor license agreements. See the NOTICE file 5b3f79822SAndrew Rist * distributed with this work for additional information 6b3f79822SAndrew Rist * regarding copyright ownership. The ASF licenses this file 7b3f79822SAndrew Rist * to you under the Apache License, Version 2.0 (the 8b3f79822SAndrew Rist * "License"); you may not use this file except in compliance 9b3f79822SAndrew Rist * with the License. You may obtain a copy of the License at 10b3f79822SAndrew Rist * 11b3f79822SAndrew Rist * http://www.apache.org/licenses/LICENSE-2.0 12b3f79822SAndrew Rist * 13b3f79822SAndrew Rist * Unless required by applicable law or agreed to in writing, 14b3f79822SAndrew Rist * software distributed under the License is distributed on an 15b3f79822SAndrew Rist * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16b3f79822SAndrew Rist * KIND, either express or implied. See the License for the 17b3f79822SAndrew Rist * specific language governing permissions and limitations 18b3f79822SAndrew Rist * under the License. 19b3f79822SAndrew Rist * 20b3f79822SAndrew Rist *************************************************************/ 21b3f79822SAndrew Rist 22b3f79822SAndrew Rist 23cdf0e10cSrcweir 24cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove 25cdf0e10cSrcweir #include "precompiled_sc.hxx" 26cdf0e10cSrcweir 27cdf0e10cSrcweir 28cdf0e10cSrcweir 29cdf0e10cSrcweir #include <svl/smplhint.hxx> 30cdf0e10cSrcweir 31cdf0e10cSrcweir #include <com/sun/star/sheet/NamedRangeFlag.hpp> 32cdf0e10cSrcweir #include <com/sun/star/awt/XBitmap.hpp> 33cdf0e10cSrcweir #include <com/sun/star/beans/PropertyAttribute.hpp> 34cdf0e10cSrcweir 35cdf0e10cSrcweir using namespace ::com::sun::star; 36cdf0e10cSrcweir 37cdf0e10cSrcweir 38cdf0e10cSrcweir #include "nameuno.hxx" 39cdf0e10cSrcweir #include "miscuno.hxx" 40cdf0e10cSrcweir #include "cellsuno.hxx" 41cdf0e10cSrcweir #include "convuno.hxx" 42cdf0e10cSrcweir #include "targuno.hxx" 43cdf0e10cSrcweir #include "tokenuno.hxx" 44cdf0e10cSrcweir #include "tokenarray.hxx" 45cdf0e10cSrcweir #include "docsh.hxx" 46cdf0e10cSrcweir #include "docfunc.hxx" 47cdf0e10cSrcweir #include "rangenam.hxx" 48cdf0e10cSrcweir //CHINA001 #include "namecrea.hxx" // NAME_TOP etc. 49cdf0e10cSrcweir #include "unoguard.hxx" 50cdf0e10cSrcweir #include "unonames.hxx" 51cdf0e10cSrcweir 52cdf0e10cSrcweir #include "scui_def.hxx" //CHINA001 53cdf0e10cSrcweir 54cdf0e10cSrcweir //------------------------------------------------------------------------ 55cdf0e10cSrcweir 56cdf0e10cSrcweir const SfxItemPropertyMapEntry* lcl_GetNamedRangeMap() 57cdf0e10cSrcweir { 58cdf0e10cSrcweir static SfxItemPropertyMapEntry aNamedRangeMap_Impl[] = 59cdf0e10cSrcweir { 60cdf0e10cSrcweir {MAP_CHAR_LEN(SC_UNO_LINKDISPBIT), 0, &getCppuType((uno::Reference<awt::XBitmap>*)0), beans::PropertyAttribute::READONLY, 0 }, 61cdf0e10cSrcweir {MAP_CHAR_LEN(SC_UNO_LINKDISPNAME), 0, &getCppuType((rtl::OUString*)0), beans::PropertyAttribute::READONLY, 0 }, 62cdf0e10cSrcweir {MAP_CHAR_LEN(SC_UNONAME_TOKENINDEX), 0, &getCppuType((sal_Int32*)0), beans::PropertyAttribute::READONLY, 0 }, 63cdf0e10cSrcweir {MAP_CHAR_LEN(SC_UNONAME_ISSHAREDFMLA), 0, &getBooleanCppuType(), 0, 0 }, 64cdf0e10cSrcweir {0,0,0,0,0,0} 65cdf0e10cSrcweir }; 66cdf0e10cSrcweir return aNamedRangeMap_Impl; 67cdf0e10cSrcweir } 68cdf0e10cSrcweir 69cdf0e10cSrcweir //------------------------------------------------------------------------ 70cdf0e10cSrcweir 71cdf0e10cSrcweir #define SCNAMEDRANGEOBJ_SERVICE "com.sun.star.sheet.NamedRange" 72cdf0e10cSrcweir 73cdf0e10cSrcweir SC_SIMPLE_SERVICE_INFO( ScLabelRangeObj, "ScLabelRangeObj", "com.sun.star.sheet.LabelRange" ) 74cdf0e10cSrcweir SC_SIMPLE_SERVICE_INFO( ScLabelRangesObj, "ScLabelRangesObj", "com.sun.star.sheet.LabelRanges" ) 75cdf0e10cSrcweir SC_SIMPLE_SERVICE_INFO( ScNamedRangesObj, "ScNamedRangesObj", "com.sun.star.sheet.NamedRanges" ) 76cdf0e10cSrcweir 77cdf0e10cSrcweir //------------------------------------------------------------------------ 78cdf0e10cSrcweir 79cdf0e10cSrcweir sal_Bool lcl_UserVisibleName( const ScRangeData* pData ) 80cdf0e10cSrcweir { 81cdf0e10cSrcweir //! als Methode an ScRangeData 82cdf0e10cSrcweir 83cdf0e10cSrcweir return ( pData && !pData->HasType( RT_DATABASE ) && !pData->HasType( RT_SHARED ) ); 84cdf0e10cSrcweir } 85cdf0e10cSrcweir 86cdf0e10cSrcweir //------------------------------------------------------------------------ 87cdf0e10cSrcweir 88*dffa72deSWang Lei ScNamedRangeObj::ScNamedRangeObj(ScDocShell* pDocSh, const String& rNm, const String& rScopeName) : 89cdf0e10cSrcweir pDocShell( pDocSh ), 90*dffa72deSWang Lei aName( rNm ), 91*dffa72deSWang Lei aScopeName(rScopeName) 92cdf0e10cSrcweir { 93cdf0e10cSrcweir pDocShell->GetDocument()->AddUnoObject(*this); 94cdf0e10cSrcweir } 95cdf0e10cSrcweir 96cdf0e10cSrcweir ScNamedRangeObj::~ScNamedRangeObj() 97cdf0e10cSrcweir { 98cdf0e10cSrcweir if (pDocShell) 99cdf0e10cSrcweir pDocShell->GetDocument()->RemoveUnoObject(*this); 100cdf0e10cSrcweir } 101cdf0e10cSrcweir 102cdf0e10cSrcweir void ScNamedRangeObj::Notify( SfxBroadcaster&, const SfxHint& rHint ) 103cdf0e10cSrcweir { 104cdf0e10cSrcweir // Ref-Update interessiert nicht 105cdf0e10cSrcweir 106cdf0e10cSrcweir if ( rHint.ISA( SfxSimpleHint ) && ((const SfxSimpleHint&)rHint).GetId() == SFX_HINT_DYING ) 107cdf0e10cSrcweir pDocShell = NULL; // ungueltig geworden 108cdf0e10cSrcweir } 109cdf0e10cSrcweir 110cdf0e10cSrcweir // Hilfsfuntionen 111cdf0e10cSrcweir 112cdf0e10cSrcweir ScRangeData* ScNamedRangeObj::GetRangeData_Impl() 113cdf0e10cSrcweir { 114cdf0e10cSrcweir ScRangeData* pRet = NULL; 115cdf0e10cSrcweir if (pDocShell) 116cdf0e10cSrcweir { 117cdf0e10cSrcweir ScRangeName* pNames = pDocShell->GetDocument()->GetRangeName(); 118cdf0e10cSrcweir if (pNames) 119cdf0e10cSrcweir { 120cdf0e10cSrcweir sal_uInt16 nPos = 0; 121*dffa72deSWang Lei SCTAB nameScope = MAXTABCOUNT; 122*dffa72deSWang Lei if ( aScopeName != EMPTY_STRING ) 123*dffa72deSWang Lei { 124*dffa72deSWang Lei pDocShell->GetDocument()->GetTable( aScopeName, nameScope ); 125*dffa72deSWang Lei } 126*dffa72deSWang Lei if (pNames->SearchName( aName, nPos, nameScope )) 127cdf0e10cSrcweir { 128cdf0e10cSrcweir pRet = (*pNames)[nPos]; 129cdf0e10cSrcweir pRet->ValidateTabRefs(); // adjust relative tab refs to valid tables 130cdf0e10cSrcweir } 131cdf0e10cSrcweir } 132cdf0e10cSrcweir } 133cdf0e10cSrcweir return pRet; 134cdf0e10cSrcweir } 135cdf0e10cSrcweir 136cdf0e10cSrcweir // sheet::XNamedRange 137cdf0e10cSrcweir 138*dffa72deSWang Lei void ScNamedRangeObj::Modify_Impl( const String* pNewRangeName, const ScTokenArray* pNewTokens, const String* pNewContent, 139cdf0e10cSrcweir const ScAddress* pNewPos, const sal_uInt16* pNewType, 140*dffa72deSWang Lei const formula::FormulaGrammar::Grammar eGrammar, const String* pNewScopeName ) 141*dffa72deSWang Lei { 142*dffa72deSWang Lei if (pDocShell) 143*dffa72deSWang Lei { 144*dffa72deSWang Lei ScDocument* pDoc = pDocShell->GetDocument(); 145*dffa72deSWang Lei ScRangeName* pNames = pDoc->GetRangeName(); 146*dffa72deSWang Lei if (pNames) 147*dffa72deSWang Lei { 148*dffa72deSWang Lei sal_uInt16 nPos = 0; 149*dffa72deSWang Lei SCTAB nameScope = MAXTABCOUNT; 150*dffa72deSWang Lei if (aScopeName != EMPTY_STRING ) 151*dffa72deSWang Lei pDoc->GetTable(aScopeName, nameScope); 152*dffa72deSWang Lei 153*dffa72deSWang Lei if (pNames->SearchName( aName, nPos, nameScope )) 154*dffa72deSWang Lei { 155*dffa72deSWang Lei SCTAB newNameScope = MAXTABCOUNT; 156*dffa72deSWang Lei if (pNewScopeName && *pNewScopeName != EMPTY_STRING && !pDoc->GetTable(*pNewScopeName, newNameScope)) 157*dffa72deSWang Lei return; 158*dffa72deSWang Lei //added for namerange renew 159*dffa72deSWang Lei else if (!pNewScopeName || *pNewScopeName == EMPTY_STRING ) 160*dffa72deSWang Lei newNameScope = nameScope; 161*dffa72deSWang Lei //end of add 162*dffa72deSWang Lei 163*dffa72deSWang Lei ScRangeName* pNewRanges = new ScRangeName( *pNames ); 164*dffa72deSWang Lei ScRangeData* pOld = (*pNames)[nPos]; 165*dffa72deSWang Lei 166*dffa72deSWang Lei String aInsName(pOld->GetName()); 167*dffa72deSWang Lei if (pNewRangeName) 168*dffa72deSWang Lei aInsName = *pNewRangeName; 169*dffa72deSWang Lei String aContent; // Content string based => 170*dffa72deSWang Lei pOld->GetSymbol( aContent, eGrammar); // no problems with changed positions and such. 171*dffa72deSWang Lei if (pNewContent) 172*dffa72deSWang Lei aContent = *pNewContent; 173*dffa72deSWang Lei ScAddress aPos(pOld->GetPos()); 174*dffa72deSWang Lei if (pNewPos) 175*dffa72deSWang Lei aPos = *pNewPos; 176*dffa72deSWang Lei sal_uInt16 nType = pOld->GetType(); 177*dffa72deSWang Lei if (pNewType) 178*dffa72deSWang Lei nType = *pNewType; 179*dffa72deSWang Lei 180*dffa72deSWang Lei ScRangeData* pNew = NULL; 181*dffa72deSWang Lei if ( pNewTokens ) 182*dffa72deSWang Lei pNew = new ScRangeData( pDoc, aInsName, *pNewTokens, aPos, nType ); 183*dffa72deSWang Lei else 184*dffa72deSWang Lei pNew = new ScRangeData( pDoc, aInsName, aContent, aPos, nType, eGrammar ); 185*dffa72deSWang Lei pNew->SetIndex( pOld->GetIndex() ); 186*dffa72deSWang Lei pNew->SetRangeScope(newNameScope); 187*dffa72deSWang Lei 188*dffa72deSWang Lei pNewRanges->AtFree( nPos ); 189*dffa72deSWang Lei if ( pNewRanges->Insert(pNew) ) 190*dffa72deSWang Lei { 191*dffa72deSWang Lei ScDocFunc aFunc(*pDocShell); 192*dffa72deSWang Lei aFunc.SetNewRangeNames( pNewRanges, sal_True ); 193*dffa72deSWang Lei aName = aInsName; //! broadcast? 194*dffa72deSWang Lei aScopeName = pNewScopeName ? *pNewScopeName : aScopeName; 195*dffa72deSWang Lei } 196*dffa72deSWang Lei else 197*dffa72deSWang Lei { 198*dffa72deSWang Lei delete pNew; //! uno::Exception/Fehler oder so 199*dffa72deSWang Lei delete pNewRanges; 200*dffa72deSWang Lei } 201*dffa72deSWang Lei } 202*dffa72deSWang Lei } 203*dffa72deSWang Lei } 204cdf0e10cSrcweir } 205cdf0e10cSrcweir 206cdf0e10cSrcweir 207cdf0e10cSrcweir rtl::OUString SAL_CALL ScNamedRangeObj::getName() throw(uno::RuntimeException) 208cdf0e10cSrcweir { 209cdf0e10cSrcweir ScUnoGuard aGuard; 210cdf0e10cSrcweir return aName; 211cdf0e10cSrcweir } 212cdf0e10cSrcweir 213cdf0e10cSrcweir void SAL_CALL ScNamedRangeObj::setName( const rtl::OUString& aNewName ) 214cdf0e10cSrcweir throw(uno::RuntimeException) 215cdf0e10cSrcweir { 216cdf0e10cSrcweir ScUnoGuard aGuard; 217cdf0e10cSrcweir //! Formeln anpassen ????? 218cdf0e10cSrcweir 219cdf0e10cSrcweir String aNewStr(aNewName); 220cdf0e10cSrcweir // GRAM_PODF_A1 for API compatibility. 221cdf0e10cSrcweir Modify_Impl( &aNewStr, NULL, NULL, NULL, NULL,formula::FormulaGrammar::GRAM_PODF_A1 ); 222cdf0e10cSrcweir 223cdf0e10cSrcweir if ( aName != aNewStr ) // some error occured... 224cdf0e10cSrcweir throw uno::RuntimeException(); // no other exceptions specified 225cdf0e10cSrcweir } 226*dffa72deSWang Lei rtl::OUString SAL_CALL ScNamedRangeObj::getScopeName() throw(uno::RuntimeException) 227*dffa72deSWang Lei { 228*dffa72deSWang Lei ScUnoGuard aGuard; 229*dffa72deSWang Lei return aScopeName; 230*dffa72deSWang Lei } 231*dffa72deSWang Lei 232*dffa72deSWang Lei void SAL_CALL ScNamedRangeObj::setScopeAndRangeName( const rtl::OUString& aNewScopeName, const rtl::OUString& aNewRangeName ) 233*dffa72deSWang Lei throw(uno::RuntimeException) 234*dffa72deSWang Lei { 235*dffa72deSWang Lei ScUnoGuard aGuard; 236*dffa72deSWang Lei //! Formeln anpassen ????? 237*dffa72deSWang Lei 238*dffa72deSWang Lei String aNewRangeStr(aNewRangeName); 239*dffa72deSWang Lei String aNewScopeStr(aNewScopeName); 240*dffa72deSWang Lei // GRAM_PODF_A1 for API compatibility. 241*dffa72deSWang Lei Modify_Impl( &aNewRangeStr, NULL, NULL, NULL, NULL,formula::FormulaGrammar::GRAM_PODF_A1, aNewScopeName.getLength() == 0 ? NULL : &aNewScopeStr); 242*dffa72deSWang Lei 243*dffa72deSWang Lei if ( aScopeName != aNewScopeStr || aName != aNewRangeStr ) // some error occured... 244*dffa72deSWang Lei throw uno::RuntimeException(); // no other exceptions specified 245*dffa72deSWang Lei } 246*dffa72deSWang Lei 247cdf0e10cSrcweir 248cdf0e10cSrcweir rtl::OUString SAL_CALL ScNamedRangeObj::getContent() throw(uno::RuntimeException) 249cdf0e10cSrcweir { 250cdf0e10cSrcweir ScUnoGuard aGuard; 251cdf0e10cSrcweir String aContent; 252cdf0e10cSrcweir ScRangeData* pData = GetRangeData_Impl(); 253cdf0e10cSrcweir if (pData) 254cdf0e10cSrcweir // GRAM_PODF_A1 for API compatibility. 255cdf0e10cSrcweir pData->GetSymbol( aContent,formula::FormulaGrammar::GRAM_PODF_A1); 256cdf0e10cSrcweir return aContent; 257cdf0e10cSrcweir } 258cdf0e10cSrcweir 259cdf0e10cSrcweir void SAL_CALL ScNamedRangeObj::setContent( const rtl::OUString& aContent ) 260cdf0e10cSrcweir throw(uno::RuntimeException) 261cdf0e10cSrcweir { 262cdf0e10cSrcweir ScUnoGuard aGuard; 263cdf0e10cSrcweir String aContStr(aContent); 264cdf0e10cSrcweir // GRAM_PODF_A1 for API compatibility. 265cdf0e10cSrcweir Modify_Impl( NULL, NULL, &aContStr, NULL, NULL,formula::FormulaGrammar::GRAM_PODF_A1 ); 266cdf0e10cSrcweir } 267cdf0e10cSrcweir 268cdf0e10cSrcweir void ScNamedRangeObj::SetContentWithGrammar( const ::rtl::OUString& aContent, 269cdf0e10cSrcweir const formula::FormulaGrammar::Grammar eGrammar ) 270cdf0e10cSrcweir throw(::com::sun::star::uno::RuntimeException) 271cdf0e10cSrcweir { 272cdf0e10cSrcweir String aContStr(aContent); 273cdf0e10cSrcweir Modify_Impl( NULL, NULL, &aContStr, NULL, NULL, eGrammar ); 274cdf0e10cSrcweir } 275cdf0e10cSrcweir 276cdf0e10cSrcweir table::CellAddress SAL_CALL ScNamedRangeObj::getReferencePosition() 277cdf0e10cSrcweir throw(uno::RuntimeException) 278cdf0e10cSrcweir { 279cdf0e10cSrcweir ScUnoGuard aGuard; 280cdf0e10cSrcweir ScAddress aPos; 281cdf0e10cSrcweir ScRangeData* pData = GetRangeData_Impl(); 282cdf0e10cSrcweir if (pData) 283cdf0e10cSrcweir aPos = pData->GetPos(); 284cdf0e10cSrcweir table::CellAddress aAddress; 285cdf0e10cSrcweir aAddress.Column = aPos.Col(); 286cdf0e10cSrcweir aAddress.Row = aPos.Row(); 287cdf0e10cSrcweir aAddress.Sheet = aPos.Tab(); 288cdf0e10cSrcweir if (pDocShell) 289cdf0e10cSrcweir { 290cdf0e10cSrcweir SCTAB nDocTabs = pDocShell->GetDocument()->GetTableCount(); 291cdf0e10cSrcweir if ( aAddress.Sheet >= nDocTabs && nDocTabs > 0 ) 292cdf0e10cSrcweir { 293cdf0e10cSrcweir // Even after ValidateTabRefs, the position can be invalid if 294cdf0e10cSrcweir // the content points to preceding tables. The resulting string 295cdf0e10cSrcweir // is invalid in any case, so the position is just shifted. 296cdf0e10cSrcweir aAddress.Sheet = nDocTabs - 1; 297cdf0e10cSrcweir } 298cdf0e10cSrcweir } 299cdf0e10cSrcweir return aAddress; 300cdf0e10cSrcweir } 301cdf0e10cSrcweir 302cdf0e10cSrcweir void SAL_CALL ScNamedRangeObj::setReferencePosition( const table::CellAddress& aReferencePosition ) 303cdf0e10cSrcweir throw(uno::RuntimeException) 304cdf0e10cSrcweir { 305cdf0e10cSrcweir ScUnoGuard aGuard; 306cdf0e10cSrcweir ScAddress aPos( (SCCOL)aReferencePosition.Column, (SCROW)aReferencePosition.Row, aReferencePosition.Sheet ); 307cdf0e10cSrcweir // GRAM_PODF_A1 for API compatibility. 308cdf0e10cSrcweir Modify_Impl( NULL, NULL, NULL, &aPos, NULL,formula::FormulaGrammar::GRAM_PODF_A1 ); 309cdf0e10cSrcweir } 310cdf0e10cSrcweir 311cdf0e10cSrcweir sal_Int32 SAL_CALL ScNamedRangeObj::getType() throw(uno::RuntimeException) 312cdf0e10cSrcweir { 313cdf0e10cSrcweir ScUnoGuard aGuard; 314cdf0e10cSrcweir sal_Int32 nType=0; 315cdf0e10cSrcweir ScRangeData* pData = GetRangeData_Impl(); 316cdf0e10cSrcweir if (pData) 317cdf0e10cSrcweir { 318cdf0e10cSrcweir // do not return internal RT_* flags 319cdf0e10cSrcweir // see property 'IsSharedFormula' for RT_SHARED 320cdf0e10cSrcweir if ( pData->HasType(RT_CRITERIA) ) nType |= sheet::NamedRangeFlag::FILTER_CRITERIA; 321cdf0e10cSrcweir if ( pData->HasType(RT_PRINTAREA) ) nType |= sheet::NamedRangeFlag::PRINT_AREA; 322cdf0e10cSrcweir if ( pData->HasType(RT_COLHEADER) ) nType |= sheet::NamedRangeFlag::COLUMN_HEADER; 323cdf0e10cSrcweir if ( pData->HasType(RT_ROWHEADER) ) nType |= sheet::NamedRangeFlag::ROW_HEADER; 324cdf0e10cSrcweir } 325cdf0e10cSrcweir return nType; 326cdf0e10cSrcweir } 327cdf0e10cSrcweir 328cdf0e10cSrcweir void SAL_CALL ScNamedRangeObj::setType( sal_Int32 nUnoType ) throw(uno::RuntimeException) 329cdf0e10cSrcweir { 330cdf0e10cSrcweir // see property 'IsSharedFormula' for RT_SHARED 331cdf0e10cSrcweir ScUnoGuard aGuard; 332cdf0e10cSrcweir sal_uInt16 nNewType = RT_NAME; 333cdf0e10cSrcweir if ( nUnoType & sheet::NamedRangeFlag::FILTER_CRITERIA ) nNewType |= RT_CRITERIA; 334cdf0e10cSrcweir if ( nUnoType & sheet::NamedRangeFlag::PRINT_AREA ) nNewType |= RT_PRINTAREA; 335cdf0e10cSrcweir if ( nUnoType & sheet::NamedRangeFlag::COLUMN_HEADER ) nNewType |= RT_COLHEADER; 336cdf0e10cSrcweir if ( nUnoType & sheet::NamedRangeFlag::ROW_HEADER ) nNewType |= RT_ROWHEADER; 337cdf0e10cSrcweir 338cdf0e10cSrcweir // GRAM_PODF_A1 for API compatibility. 339cdf0e10cSrcweir Modify_Impl( NULL, NULL, NULL, NULL, &nNewType,formula::FormulaGrammar::GRAM_PODF_A1 ); 340cdf0e10cSrcweir } 341cdf0e10cSrcweir 342cdf0e10cSrcweir // XFormulaTokens 343cdf0e10cSrcweir 344cdf0e10cSrcweir uno::Sequence<sheet::FormulaToken> SAL_CALL ScNamedRangeObj::getTokens() throw(uno::RuntimeException) 345cdf0e10cSrcweir { 346cdf0e10cSrcweir ScUnoGuard aGuard; 347cdf0e10cSrcweir uno::Sequence<sheet::FormulaToken> aSequence; 348cdf0e10cSrcweir ScRangeData* pData = GetRangeData_Impl(); 349cdf0e10cSrcweir if (pData && pDocShell) 350cdf0e10cSrcweir { 351cdf0e10cSrcweir ScTokenArray* pTokenArray = pData->GetCode(); 352cdf0e10cSrcweir if ( pTokenArray ) 353cdf0e10cSrcweir (void)ScTokenConversion::ConvertToTokenSequence( *pDocShell->GetDocument(), aSequence, *pTokenArray ); 354cdf0e10cSrcweir } 355cdf0e10cSrcweir return aSequence; 356cdf0e10cSrcweir } 357cdf0e10cSrcweir 358cdf0e10cSrcweir void SAL_CALL ScNamedRangeObj::setTokens( const uno::Sequence<sheet::FormulaToken>& rTokens ) throw(uno::RuntimeException) 359cdf0e10cSrcweir { 360cdf0e10cSrcweir ScUnoGuard aGuard; 361cdf0e10cSrcweir if( pDocShell ) 362cdf0e10cSrcweir { 363cdf0e10cSrcweir ScTokenArray aTokenArray; 364cdf0e10cSrcweir (void)ScTokenConversion::ConvertToTokenArray( *pDocShell->GetDocument(), aTokenArray, rTokens ); 365cdf0e10cSrcweir // GRAM_PODF_A1 for API compatibility. 366cdf0e10cSrcweir Modify_Impl( NULL, &aTokenArray, NULL, NULL, NULL, formula::FormulaGrammar::GRAM_PODF_A1 ); 367cdf0e10cSrcweir } 368cdf0e10cSrcweir } 369cdf0e10cSrcweir 370cdf0e10cSrcweir 371cdf0e10cSrcweir // XCellRangeSource 372cdf0e10cSrcweir 373cdf0e10cSrcweir uno::Reference<table::XCellRange> SAL_CALL ScNamedRangeObj::getReferredCells() 374cdf0e10cSrcweir throw(uno::RuntimeException) 375cdf0e10cSrcweir { 376cdf0e10cSrcweir ScUnoGuard aGuard; 377cdf0e10cSrcweir ScRange aRange; 378cdf0e10cSrcweir ScRangeData* pData = GetRangeData_Impl(); 379cdf0e10cSrcweir if ( pData && pData->IsValidReference( aRange ) ) 380cdf0e10cSrcweir { 381cdf0e10cSrcweir //! static Funktion um ScCellObj/ScCellRangeObj zu erzeugen am ScCellRangeObj ??? 382cdf0e10cSrcweir 383cdf0e10cSrcweir if ( aRange.aStart == aRange.aEnd ) 384cdf0e10cSrcweir return new ScCellObj( pDocShell, aRange.aStart ); 385cdf0e10cSrcweir else 386cdf0e10cSrcweir return new ScCellRangeObj( pDocShell, aRange ); 387cdf0e10cSrcweir } 388cdf0e10cSrcweir return NULL; 389cdf0e10cSrcweir } 390cdf0e10cSrcweir 391cdf0e10cSrcweir // beans::XPropertySet 392cdf0e10cSrcweir 393cdf0e10cSrcweir uno::Reference<beans::XPropertySetInfo> SAL_CALL ScNamedRangeObj::getPropertySetInfo() 394cdf0e10cSrcweir throw(uno::RuntimeException) 395cdf0e10cSrcweir { 396cdf0e10cSrcweir ScUnoGuard aGuard; 397cdf0e10cSrcweir static uno::Reference< beans::XPropertySetInfo > aRef(new SfxItemPropertySetInfo( lcl_GetNamedRangeMap() )); 398cdf0e10cSrcweir return aRef; 399cdf0e10cSrcweir } 400cdf0e10cSrcweir 401cdf0e10cSrcweir void SAL_CALL ScNamedRangeObj::setPropertyValue( 402cdf0e10cSrcweir const rtl::OUString& rPropertyName, const uno::Any& aValue ) 403cdf0e10cSrcweir throw(beans::UnknownPropertyException, beans::PropertyVetoException, 404cdf0e10cSrcweir lang::IllegalArgumentException, lang::WrappedTargetException, 405cdf0e10cSrcweir uno::RuntimeException) 406cdf0e10cSrcweir { 407cdf0e10cSrcweir ScUnoGuard aGuard; 408cdf0e10cSrcweir if ( rPropertyName.equalsAscii( SC_UNONAME_ISSHAREDFMLA ) ) 409cdf0e10cSrcweir { 410cdf0e10cSrcweir bool bIsShared = false; 411cdf0e10cSrcweir if( aValue >>= bIsShared ) 412cdf0e10cSrcweir { 413cdf0e10cSrcweir sal_uInt16 nNewType = bIsShared ? RT_SHARED : RT_NAME; 414cdf0e10cSrcweir Modify_Impl( NULL, NULL, NULL, NULL, &nNewType,formula::FormulaGrammar::GRAM_PODF_A1 ); 415cdf0e10cSrcweir } 416cdf0e10cSrcweir } 417cdf0e10cSrcweir } 418cdf0e10cSrcweir 419cdf0e10cSrcweir uno::Any SAL_CALL ScNamedRangeObj::getPropertyValue( const rtl::OUString& rPropertyName ) 420cdf0e10cSrcweir throw(beans::UnknownPropertyException, lang::WrappedTargetException, 421cdf0e10cSrcweir uno::RuntimeException) 422cdf0e10cSrcweir { 423cdf0e10cSrcweir ScUnoGuard aGuard; 424cdf0e10cSrcweir uno::Any aRet; 425cdf0e10cSrcweir if ( rPropertyName.equalsAscii( SC_UNO_LINKDISPBIT ) ) 426cdf0e10cSrcweir { 427cdf0e10cSrcweir // no target bitmaps for individual entries (would be all equal) 428cdf0e10cSrcweir // ScLinkTargetTypeObj::SetLinkTargetBitmap( aRet, SC_LINKTARGETTYPE_RANGENAME ); 429cdf0e10cSrcweir } 430cdf0e10cSrcweir else if ( rPropertyName.equalsAscii( SC_UNO_LINKDISPNAME ) ) 431cdf0e10cSrcweir aRet <<= rtl::OUString( aName ); 432cdf0e10cSrcweir else if ( rPropertyName.equalsAscii( SC_UNONAME_TOKENINDEX ) ) 433cdf0e10cSrcweir { 434cdf0e10cSrcweir // get index for use in formula tokens (read-only) 435cdf0e10cSrcweir ScRangeData* pData = GetRangeData_Impl(); 436cdf0e10cSrcweir if (pData) 437cdf0e10cSrcweir aRet <<= static_cast<sal_Int32>(pData->GetIndex()); 438cdf0e10cSrcweir } 439cdf0e10cSrcweir else if ( rPropertyName.equalsAscii( SC_UNONAME_ISSHAREDFMLA ) ) 440cdf0e10cSrcweir { 441cdf0e10cSrcweir if( ScRangeData* pData = GetRangeData_Impl() ) 442cdf0e10cSrcweir aRet <<= static_cast< bool >( pData->HasType( RT_SHARED ) ); 443cdf0e10cSrcweir } 444cdf0e10cSrcweir return aRet; 445cdf0e10cSrcweir } 446cdf0e10cSrcweir 447cdf0e10cSrcweir SC_IMPL_DUMMY_PROPERTY_LISTENER( ScNamedRangeObj ) 448cdf0e10cSrcweir 449cdf0e10cSrcweir // lang::XServiceInfo 450cdf0e10cSrcweir 451cdf0e10cSrcweir rtl::OUString SAL_CALL ScNamedRangeObj::getImplementationName() throw(uno::RuntimeException) 452cdf0e10cSrcweir { 453cdf0e10cSrcweir return rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "ScNamedRangeObj" ) ); 454cdf0e10cSrcweir } 455cdf0e10cSrcweir 456cdf0e10cSrcweir sal_Bool SAL_CALL ScNamedRangeObj::supportsService( const rtl::OUString& rServiceName ) 457cdf0e10cSrcweir throw(uno::RuntimeException) 458cdf0e10cSrcweir { 459cdf0e10cSrcweir return rServiceName.equalsAscii( SCNAMEDRANGEOBJ_SERVICE ) || 460cdf0e10cSrcweir rServiceName.equalsAscii( SCLINKTARGET_SERVICE ); 461cdf0e10cSrcweir } 462cdf0e10cSrcweir 463cdf0e10cSrcweir uno::Sequence<rtl::OUString> SAL_CALL ScNamedRangeObj::getSupportedServiceNames() 464cdf0e10cSrcweir throw(uno::RuntimeException) 465cdf0e10cSrcweir { 466cdf0e10cSrcweir uno::Sequence<rtl::OUString> aRet(2); 467cdf0e10cSrcweir aRet[0] = rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( SCNAMEDRANGEOBJ_SERVICE ) ); 468cdf0e10cSrcweir aRet[1] = rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( SCLINKTARGET_SERVICE ) ); 469cdf0e10cSrcweir return aRet; 470cdf0e10cSrcweir } 471cdf0e10cSrcweir 472cdf0e10cSrcweir 473cdf0e10cSrcweir // XUnoTunnel 474cdf0e10cSrcweir 475cdf0e10cSrcweir sal_Int64 SAL_CALL ScNamedRangeObj::getSomething( 476cdf0e10cSrcweir const uno::Sequence<sal_Int8 >& rId ) throw(uno::RuntimeException) 477cdf0e10cSrcweir { 478cdf0e10cSrcweir if ( rId.getLength() == 16 && 479cdf0e10cSrcweir 0 == rtl_compareMemory( getUnoTunnelId().getConstArray(), 480cdf0e10cSrcweir rId.getConstArray(), 16 ) ) 481cdf0e10cSrcweir { 482cdf0e10cSrcweir return sal::static_int_cast<sal_Int64>(reinterpret_cast<sal_IntPtr>(this)); 483cdf0e10cSrcweir } 484cdf0e10cSrcweir return 0; 485cdf0e10cSrcweir } 486cdf0e10cSrcweir 487cdf0e10cSrcweir // static 488cdf0e10cSrcweir const uno::Sequence<sal_Int8>& ScNamedRangeObj::getUnoTunnelId() 489cdf0e10cSrcweir { 490cdf0e10cSrcweir static uno::Sequence<sal_Int8> * pSeq = 0; 491cdf0e10cSrcweir if( !pSeq ) 492cdf0e10cSrcweir { 493cdf0e10cSrcweir osl::Guard< osl::Mutex > aGuard( osl::Mutex::getGlobalMutex() ); 494cdf0e10cSrcweir if( !pSeq ) 495cdf0e10cSrcweir { 496cdf0e10cSrcweir static uno::Sequence< sal_Int8 > aSeq( 16 ); 497cdf0e10cSrcweir rtl_createUuid( (sal_uInt8*)aSeq.getArray(), 0, sal_True ); 498cdf0e10cSrcweir pSeq = &aSeq; 499cdf0e10cSrcweir } 500cdf0e10cSrcweir } 501cdf0e10cSrcweir return *pSeq; 502cdf0e10cSrcweir } 503cdf0e10cSrcweir 504cdf0e10cSrcweir // static 505cdf0e10cSrcweir ScNamedRangeObj* ScNamedRangeObj::getImplementation( const uno::Reference<uno::XInterface> xObj ) 506cdf0e10cSrcweir { 507cdf0e10cSrcweir ScNamedRangeObj* pRet = NULL; 508cdf0e10cSrcweir uno::Reference<lang::XUnoTunnel> xUT( xObj, uno::UNO_QUERY ); 509cdf0e10cSrcweir if (xUT.is()) 510cdf0e10cSrcweir pRet = reinterpret_cast<ScNamedRangeObj*>(sal::static_int_cast<sal_IntPtr>(xUT->getSomething(getUnoTunnelId()))); 511cdf0e10cSrcweir return pRet; 512cdf0e10cSrcweir } 513cdf0e10cSrcweir 514cdf0e10cSrcweir //------------------------------------------------------------------------ 515cdf0e10cSrcweir 516cdf0e10cSrcweir ScNamedRangesObj::ScNamedRangesObj(ScDocShell* pDocSh) : 517cdf0e10cSrcweir pDocShell( pDocSh ) 518cdf0e10cSrcweir { 519cdf0e10cSrcweir pDocShell->GetDocument()->AddUnoObject(*this); 520cdf0e10cSrcweir } 521cdf0e10cSrcweir 522cdf0e10cSrcweir ScNamedRangesObj::~ScNamedRangesObj() 523cdf0e10cSrcweir { 524cdf0e10cSrcweir if (pDocShell) 525cdf0e10cSrcweir pDocShell->GetDocument()->RemoveUnoObject(*this); 526cdf0e10cSrcweir } 527cdf0e10cSrcweir 528cdf0e10cSrcweir void ScNamedRangesObj::Notify( SfxBroadcaster&, const SfxHint& rHint ) 529cdf0e10cSrcweir { 530cdf0e10cSrcweir // Referenz-Update interessiert hier nicht 531cdf0e10cSrcweir 532cdf0e10cSrcweir if ( rHint.ISA( SfxSimpleHint ) && 533cdf0e10cSrcweir ((const SfxSimpleHint&)rHint).GetId() == SFX_HINT_DYING ) 534cdf0e10cSrcweir { 535cdf0e10cSrcweir pDocShell = NULL; // ungueltig geworden 536cdf0e10cSrcweir } 537cdf0e10cSrcweir } 538cdf0e10cSrcweir 539cdf0e10cSrcweir // sheet::XNamedRanges 540cdf0e10cSrcweir 541cdf0e10cSrcweir ScNamedRangeObj* ScNamedRangesObj::GetObjectByIndex_Impl(sal_uInt16 nIndex) 542cdf0e10cSrcweir { 543cdf0e10cSrcweir if (pDocShell) 544cdf0e10cSrcweir { 545cdf0e10cSrcweir ScRangeName* pNames = pDocShell->GetDocument()->GetRangeName(); 546cdf0e10cSrcweir if (pNames) 547cdf0e10cSrcweir { 548cdf0e10cSrcweir sal_uInt16 nCount = pNames->GetCount(); 549cdf0e10cSrcweir sal_uInt16 nPos = 0; 550cdf0e10cSrcweir for (sal_uInt16 i=0; i<nCount; i++) 551cdf0e10cSrcweir { 552cdf0e10cSrcweir ScRangeData* pData = (*pNames)[i]; 553cdf0e10cSrcweir if (lcl_UserVisibleName(pData)) // interne weglassen 554cdf0e10cSrcweir { 555cdf0e10cSrcweir if ( nPos == nIndex ) 556*dffa72deSWang Lei return new ScNamedRangeObj( pDocShell, pData->GetName(), pData->GetScopeSheetName() ); 557cdf0e10cSrcweir ++nPos; 558cdf0e10cSrcweir } 559cdf0e10cSrcweir } 560cdf0e10cSrcweir } 561cdf0e10cSrcweir } 562cdf0e10cSrcweir return NULL; 563cdf0e10cSrcweir } 564cdf0e10cSrcweir 565cdf0e10cSrcweir ScNamedRangeObj* ScNamedRangesObj::GetObjectByName_Impl(const rtl::OUString& aName) 566cdf0e10cSrcweir { 567cdf0e10cSrcweir if ( pDocShell && hasByName(aName) ) 568cdf0e10cSrcweir return new ScNamedRangeObj( pDocShell, String(aName) ); 569cdf0e10cSrcweir return NULL; 570cdf0e10cSrcweir } 571cdf0e10cSrcweir 572*dffa72deSWang Lei ScNamedRangeObj* ScNamedRangesObj::GetObjectByScopeName_Impl(const ::rtl::OUString& aScopeName, const ::rtl::OUString& aRangeName) 573*dffa72deSWang Lei { 574*dffa72deSWang Lei if ( pDocShell && hasByScopeName(aScopeName, aRangeName) ) 575*dffa72deSWang Lei return new ScNamedRangeObj( pDocShell, String(aRangeName),String(aScopeName) ); 576*dffa72deSWang Lei return NULL; 577*dffa72deSWang Lei } 578*dffa72deSWang Lei void ScNamedRangesObj::ImplAddNewByScopeAndName(SCTAB aScope, const ::rtl::OUString& aRangeName, const ::rtl::OUString& aContent, 579*dffa72deSWang Lei const ::com::sun::star::table::CellAddress& aPosition, sal_Int32 nUnoType) throw(uno::RuntimeException) 580cdf0e10cSrcweir { 581cdf0e10cSrcweir ScAddress aPos( (SCCOL)aPosition.Column, (SCROW)aPosition.Row, aPosition.Sheet ); 582cdf0e10cSrcweir 583cdf0e10cSrcweir sal_uInt16 nNewType = RT_NAME; 584cdf0e10cSrcweir if ( nUnoType & sheet::NamedRangeFlag::FILTER_CRITERIA ) nNewType |= RT_CRITERIA; 585cdf0e10cSrcweir if ( nUnoType & sheet::NamedRangeFlag::PRINT_AREA ) nNewType |= RT_PRINTAREA; 586cdf0e10cSrcweir if ( nUnoType & sheet::NamedRangeFlag::COLUMN_HEADER ) nNewType |= RT_COLHEADER; 587cdf0e10cSrcweir if ( nUnoType & sheet::NamedRangeFlag::ROW_HEADER ) nNewType |= RT_ROWHEADER; 588cdf0e10cSrcweir 589*dffa72deSWang Lei bool bDone = false; 590cdf0e10cSrcweir if (pDocShell) 591cdf0e10cSrcweir { 592cdf0e10cSrcweir ScDocument* pDoc = pDocShell->GetDocument(); 593cdf0e10cSrcweir ScRangeName* pNames = pDoc->GetRangeName(); 594*dffa72deSWang Lei sal_uInt16 nIndex = 0; 595*dffa72deSWang Lei String aNameStr(aRangeName); 596*dffa72deSWang Lei String aContStr(aContent); 597*dffa72deSWang Lei if (pNames && !pNames->SearchName(aNameStr, nIndex,aScope)) 598cdf0e10cSrcweir { 599*dffa72deSWang Lei ScRangeName* pNewRanges = new ScRangeName( *pNames ); 600cdf0e10cSrcweir // GRAM_PODF_A1 for API compatibility. 601*dffa72deSWang Lei ScRangeData* pNew = new ScRangeData( pDoc, aNameStr, aContStr, 602*dffa72deSWang Lei aPos, nNewType,formula::FormulaGrammar::GRAM_PODF_A1 );//GRAM_ODFF,// 603*dffa72deSWang Lei 604*dffa72deSWang Lei pNew->SetRangeScope(aScope); 605*dffa72deSWang Lei 606*dffa72deSWang Lei if ( pNewRanges->Insert(pNew) ) 607*dffa72deSWang Lei { 608cdf0e10cSrcweir ScDocFunc aFunc(*pDocShell); 609*dffa72deSWang Lei aFunc.SetNewRangeNames( pNewRanges, sal_True ); 610*dffa72deSWang Lei bDone = true; 611*dffa72deSWang Lei } 612*dffa72deSWang Lei else 613*dffa72deSWang Lei { 614cdf0e10cSrcweir delete pNew; 615*dffa72deSWang Lei delete pNewRanges; 616*dffa72deSWang Lei } 617cdf0e10cSrcweir } 618cdf0e10cSrcweir } 619cdf0e10cSrcweir 620cdf0e10cSrcweir if (!bDone) 621cdf0e10cSrcweir throw uno::RuntimeException(); // no other exceptions specified 622cdf0e10cSrcweir } 623cdf0e10cSrcweir 624*dffa72deSWang Lei void SAL_CALL ScNamedRangesObj::addNewByName( const rtl::OUString& aName, 625*dffa72deSWang Lei const rtl::OUString& aContent, const table::CellAddress& aPosition, 626*dffa72deSWang Lei sal_Int32 nUnoType ) throw(uno::RuntimeException) 627*dffa72deSWang Lei { 628*dffa72deSWang Lei ScUnoGuard aGuard; 629*dffa72deSWang Lei ImplAddNewByScopeAndName(MAXTABCOUNT, aName, aContent, aPosition, nUnoType); 630*dffa72deSWang Lei } 631*dffa72deSWang Lei 632*dffa72deSWang Lei 633*dffa72deSWang Lei void SAL_CALL ScNamedRangesObj::addNewByScopeName( const rtl::OUString& aScopeName,const rtl::OUString& aRangeName, 634*dffa72deSWang Lei const rtl::OUString& aContent, const table::CellAddress& aPosition, 635*dffa72deSWang Lei sal_Int32 nUnoType ) throw(uno::RuntimeException) 636*dffa72deSWang Lei { 637*dffa72deSWang Lei ScUnoGuard aGuard; 638*dffa72deSWang Lei SCTAB scope = MAXTABCOUNT; 639*dffa72deSWang Lei if (aScopeName.getLength() != 0 && pDocShell && 640*dffa72deSWang Lei !pDocShell->GetDocument()->GetTable( String(aScopeName), scope ) ) 641*dffa72deSWang Lei throw uno::RuntimeException(); 642*dffa72deSWang Lei ImplAddNewByScopeAndName(scope, aRangeName, aContent, aPosition, nUnoType); 643*dffa72deSWang Lei 644*dffa72deSWang Lei 645*dffa72deSWang Lei } 646*dffa72deSWang Lei 647cdf0e10cSrcweir void SAL_CALL ScNamedRangesObj::addNewFromTitles( const table::CellRangeAddress& aSource, 648cdf0e10cSrcweir sheet::Border aBorder ) throw(uno::RuntimeException) 649cdf0e10cSrcweir { 650cdf0e10cSrcweir ScUnoGuard aGuard; 651cdf0e10cSrcweir //! das darf kein enum sein, weil mehrere Bits gesetzt sein koennen !!! 652cdf0e10cSrcweir 653cdf0e10cSrcweir sal_Bool bTop = ( aBorder == sheet::Border_TOP ); 654cdf0e10cSrcweir sal_Bool bLeft = ( aBorder == sheet::Border_LEFT ); 655cdf0e10cSrcweir sal_Bool bBottom = ( aBorder == sheet::Border_BOTTOM ); 656cdf0e10cSrcweir sal_Bool bRight = ( aBorder == sheet::Border_RIGHT ); 657cdf0e10cSrcweir 658cdf0e10cSrcweir ScRange aRange; 659cdf0e10cSrcweir ScUnoConversion::FillScRange( aRange, aSource ); 660cdf0e10cSrcweir 661cdf0e10cSrcweir sal_uInt16 nFlags = 0; 662cdf0e10cSrcweir if (bTop) nFlags |= NAME_TOP; 663cdf0e10cSrcweir if (bLeft) nFlags |= NAME_LEFT; 664cdf0e10cSrcweir if (bBottom) nFlags |= NAME_BOTTOM; 665cdf0e10cSrcweir if (bRight) nFlags |= NAME_RIGHT; 666cdf0e10cSrcweir 667cdf0e10cSrcweir if (nFlags) 668cdf0e10cSrcweir { 669cdf0e10cSrcweir ScDocFunc aFunc(*pDocShell); 670cdf0e10cSrcweir aFunc.CreateNames( aRange, nFlags, sal_True ); 671cdf0e10cSrcweir } 672cdf0e10cSrcweir } 673cdf0e10cSrcweir 674*dffa72deSWang Lei void ScNamedRangesObj::ImplRemoveByScopeAndName(SCTAB aScope, const ::rtl::OUString& aRangeName) 675*dffa72deSWang Lei throw(uno::RuntimeException) 676cdf0e10cSrcweir { 677*dffa72deSWang Lei bool bDone = false; 678cdf0e10cSrcweir if (pDocShell) 679cdf0e10cSrcweir { 680cdf0e10cSrcweir ScRangeName* pNames = pDocShell->GetDocument()->GetRangeName(); 681cdf0e10cSrcweir if (pNames) 682cdf0e10cSrcweir { 683cdf0e10cSrcweir sal_uInt16 nPos = 0; 684*dffa72deSWang Lei if (pNames->SearchName( String(aRangeName), nPos, aScope )) 685cdf0e10cSrcweir if ( lcl_UserVisibleName((*pNames)[nPos]) ) 686cdf0e10cSrcweir { 687*dffa72deSWang Lei ScRangeName* pNewRanges = new ScRangeName(*pNames); 688cdf0e10cSrcweir pNewRanges->AtFree(nPos); 689cdf0e10cSrcweir ScDocFunc aFunc(*pDocShell); 690*dffa72deSWang Lei aFunc.SetNewRangeNames( pNewRanges, sal_True ); 691*dffa72deSWang Lei bDone = true; 692cdf0e10cSrcweir } 693cdf0e10cSrcweir } 694cdf0e10cSrcweir } 695cdf0e10cSrcweir 696cdf0e10cSrcweir if (!bDone) 697cdf0e10cSrcweir throw uno::RuntimeException(); // no other exceptions specified 698cdf0e10cSrcweir } 699cdf0e10cSrcweir 700*dffa72deSWang Lei void SAL_CALL ScNamedRangesObj::removeByName( const rtl::OUString& aName ) 701*dffa72deSWang Lei throw(uno::RuntimeException) 702*dffa72deSWang Lei { 703*dffa72deSWang Lei ScUnoGuard aGuard; 704*dffa72deSWang Lei ImplRemoveByScopeAndName(MAXTABCOUNT, aName); 705*dffa72deSWang Lei } 706*dffa72deSWang Lei 707*dffa72deSWang Lei 708*dffa72deSWang Lei void SAL_CALL ScNamedRangesObj::removeByScopeName( const ::rtl::OUString& aScopeName, const ::rtl::OUString& aRangeName ) 709*dffa72deSWang Lei throw(uno::RuntimeException) 710*dffa72deSWang Lei { 711*dffa72deSWang Lei ScUnoGuard aGuard; 712*dffa72deSWang Lei SCTAB scope = MAXTABCOUNT; 713*dffa72deSWang Lei if (aScopeName.getLength() != 0 && pDocShell && 714*dffa72deSWang Lei !pDocShell->GetDocument()->GetTable( String(aScopeName), scope )) 715*dffa72deSWang Lei throw uno::RuntimeException(); 716*dffa72deSWang Lei ImplRemoveByScopeAndName(scope, aRangeName); 717*dffa72deSWang Lei } 718*dffa72deSWang Lei 719*dffa72deSWang Lei 720cdf0e10cSrcweir void SAL_CALL ScNamedRangesObj::outputList( const table::CellAddress& aOutputPosition ) 721cdf0e10cSrcweir throw(uno::RuntimeException) 722cdf0e10cSrcweir { 723cdf0e10cSrcweir ScUnoGuard aGuard; 724cdf0e10cSrcweir ScAddress aPos( (SCCOL)aOutputPosition.Column, (SCROW)aOutputPosition.Row, aOutputPosition.Sheet ); 725cdf0e10cSrcweir if (pDocShell) 726cdf0e10cSrcweir { 727cdf0e10cSrcweir ScDocFunc aFunc(*pDocShell); 728cdf0e10cSrcweir aFunc.InsertNameList( aPos, sal_True ); 729cdf0e10cSrcweir } 730cdf0e10cSrcweir } 731cdf0e10cSrcweir 732cdf0e10cSrcweir // container::XEnumerationAccess 733cdf0e10cSrcweir 734cdf0e10cSrcweir uno::Reference<container::XEnumeration> SAL_CALL ScNamedRangesObj::createEnumeration() 735cdf0e10cSrcweir throw(uno::RuntimeException) 736cdf0e10cSrcweir { 737cdf0e10cSrcweir ScUnoGuard aGuard; 738cdf0e10cSrcweir return new ScIndexEnumeration(this, rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.sheet.NamedRangesEnumeration"))); 739cdf0e10cSrcweir } 740cdf0e10cSrcweir 741cdf0e10cSrcweir // container::XIndexAccess 742cdf0e10cSrcweir 743cdf0e10cSrcweir sal_Int32 SAL_CALL ScNamedRangesObj::getCount() throw(uno::RuntimeException) 744cdf0e10cSrcweir { 745cdf0e10cSrcweir ScUnoGuard aGuard; 746cdf0e10cSrcweir long nRet = 0; 747cdf0e10cSrcweir if (pDocShell) 748cdf0e10cSrcweir { 749cdf0e10cSrcweir ScRangeName* pNames = pDocShell->GetDocument()->GetRangeName(); 750cdf0e10cSrcweir if (pNames) 751cdf0e10cSrcweir { 752cdf0e10cSrcweir sal_uInt16 nCount = pNames->GetCount(); 753cdf0e10cSrcweir for (sal_uInt16 i=0; i<nCount; i++) 754cdf0e10cSrcweir if (lcl_UserVisibleName( (*pNames)[i] )) // interne weglassen 755cdf0e10cSrcweir ++nRet; 756cdf0e10cSrcweir } 757cdf0e10cSrcweir } 758cdf0e10cSrcweir return nRet; 759cdf0e10cSrcweir } 760cdf0e10cSrcweir 761cdf0e10cSrcweir uno::Any SAL_CALL ScNamedRangesObj::getByIndex( sal_Int32 nIndex ) 762cdf0e10cSrcweir throw(lang::IndexOutOfBoundsException, 763cdf0e10cSrcweir lang::WrappedTargetException, uno::RuntimeException) 764cdf0e10cSrcweir { 765cdf0e10cSrcweir ScUnoGuard aGuard; 766cdf0e10cSrcweir uno::Reference< sheet::XNamedRange > xRange(GetObjectByIndex_Impl((sal_uInt16)nIndex)); 767cdf0e10cSrcweir if ( xRange.is() ) 768cdf0e10cSrcweir return uno::makeAny(xRange); 769cdf0e10cSrcweir else 770cdf0e10cSrcweir throw lang::IndexOutOfBoundsException(); 771cdf0e10cSrcweir // return uno::Any(); 772cdf0e10cSrcweir } 773cdf0e10cSrcweir 774cdf0e10cSrcweir uno::Type SAL_CALL ScNamedRangesObj::getElementType() throw(uno::RuntimeException) 775cdf0e10cSrcweir { 776cdf0e10cSrcweir ScUnoGuard aGuard; 777cdf0e10cSrcweir return ::getCppuType((const uno::Reference< sheet::XNamedRange >*)0); // muss zu getByIndex passen 778cdf0e10cSrcweir } 779cdf0e10cSrcweir 780cdf0e10cSrcweir sal_Bool SAL_CALL ScNamedRangesObj::hasElements() throw(uno::RuntimeException) 781cdf0e10cSrcweir { 782cdf0e10cSrcweir ScUnoGuard aGuard; 783cdf0e10cSrcweir return ( getCount() != 0 ); 784cdf0e10cSrcweir } 785cdf0e10cSrcweir 786cdf0e10cSrcweir uno::Any SAL_CALL ScNamedRangesObj::getByName( const rtl::OUString& aName ) 787cdf0e10cSrcweir throw(container::NoSuchElementException, 788cdf0e10cSrcweir lang::WrappedTargetException, uno::RuntimeException) 789cdf0e10cSrcweir { 790cdf0e10cSrcweir ScUnoGuard aGuard; 791cdf0e10cSrcweir uno::Reference< sheet::XNamedRange > xRange(GetObjectByName_Impl(aName)); 792cdf0e10cSrcweir if ( xRange.is() ) 793cdf0e10cSrcweir return uno::makeAny(xRange); 794cdf0e10cSrcweir else 795cdf0e10cSrcweir throw container::NoSuchElementException(); 796cdf0e10cSrcweir // return uno::Any(); 797cdf0e10cSrcweir } 798cdf0e10cSrcweir 799*dffa72deSWang Lei uno::Any SAL_CALL ScNamedRangesObj::getByScopeName( const rtl::OUString& aScopeName, const rtl::OUString& aRangeName ) 800*dffa72deSWang Lei throw(container::NoSuchElementException, 801*dffa72deSWang Lei lang::WrappedTargetException, uno::RuntimeException) 802*dffa72deSWang Lei { 803*dffa72deSWang Lei ScUnoGuard aGuard; 804*dffa72deSWang Lei uno::Reference< sheet::XNamedRange > xRange(GetObjectByScopeName_Impl(aScopeName, aRangeName)); 805*dffa72deSWang Lei if ( xRange.is() ) 806*dffa72deSWang Lei return uno::makeAny(xRange); 807*dffa72deSWang Lei else 808*dffa72deSWang Lei throw container::NoSuchElementException(); 809*dffa72deSWang Lei // return uno::Any(); 810*dffa72deSWang Lei } 811cdf0e10cSrcweir uno::Sequence<rtl::OUString> SAL_CALL ScNamedRangesObj::getElementNames() 812cdf0e10cSrcweir throw(uno::RuntimeException) 813cdf0e10cSrcweir { 814cdf0e10cSrcweir ScUnoGuard aGuard; 815cdf0e10cSrcweir if (pDocShell) 816cdf0e10cSrcweir { 817cdf0e10cSrcweir ScRangeName* pNames = pDocShell->GetDocument()->GetRangeName(); 818cdf0e10cSrcweir if (pNames) 819cdf0e10cSrcweir { 820cdf0e10cSrcweir long nVisCount = getCount(); // Namen mit lcl_UserVisibleName 821cdf0e10cSrcweir uno::Sequence<rtl::OUString> aSeq(nVisCount); 822cdf0e10cSrcweir rtl::OUString* pAry = aSeq.getArray(); 823cdf0e10cSrcweir 824cdf0e10cSrcweir sal_uInt16 nCount = pNames->GetCount(); 825cdf0e10cSrcweir sal_uInt16 nVisPos = 0; 826cdf0e10cSrcweir for (sal_uInt16 i=0; i<nCount; i++) 827cdf0e10cSrcweir { 828cdf0e10cSrcweir ScRangeData* pData = (*pNames)[i]; 829cdf0e10cSrcweir if ( lcl_UserVisibleName(pData) ) 830cdf0e10cSrcweir pAry[nVisPos++] = pData->GetName(); 831cdf0e10cSrcweir } 832cdf0e10cSrcweir // DBG_ASSERT(nVisPos == nVisCount, "huch, verzaehlt?"); 833cdf0e10cSrcweir return aSeq; 834cdf0e10cSrcweir } 835cdf0e10cSrcweir } 836cdf0e10cSrcweir return uno::Sequence<rtl::OUString>(0); 837cdf0e10cSrcweir } 838cdf0e10cSrcweir 839*dffa72deSWang Lei uno::Sequence< sheet::RangeScopeName > SAL_CALL ScNamedRangesObj::getElementScopeNames() 840*dffa72deSWang Lei throw(uno::RuntimeException) 841*dffa72deSWang Lei { 842*dffa72deSWang Lei ScUnoGuard aGuard; 843*dffa72deSWang Lei if (pDocShell) 844*dffa72deSWang Lei { 845*dffa72deSWang Lei ScRangeName* pNames = pDocShell->GetDocument()->GetRangeName(); 846*dffa72deSWang Lei if (pNames) 847*dffa72deSWang Lei { 848*dffa72deSWang Lei long nVisCount = getCount(); // Namen mit lcl_UserVisibleName 849*dffa72deSWang Lei uno::Sequence<sheet::RangeScopeName> aSeq(nVisCount); 850*dffa72deSWang Lei sheet::RangeScopeName * pAry = aSeq.getArray(); 851*dffa72deSWang Lei 852*dffa72deSWang Lei sal_uInt16 nCount = pNames->GetCount(); 853*dffa72deSWang Lei sal_uInt16 nVisPos = 0; 854*dffa72deSWang Lei for (sal_uInt16 i=0; i<nCount; i++) 855*dffa72deSWang Lei { 856*dffa72deSWang Lei ScRangeData* pData = (*pNames)[i]; 857*dffa72deSWang Lei if ( lcl_UserVisibleName(pData) ) 858*dffa72deSWang Lei { 859*dffa72deSWang Lei pAry[nVisPos].RangeName = pData->GetName(); 860*dffa72deSWang Lei pAry[nVisPos++].ScopeName = pData->GetScopeSheetName(); 861*dffa72deSWang Lei } 862*dffa72deSWang Lei } 863*dffa72deSWang Lei // DBG_ASSERT(nVisPos == nVisCount, "huch, verzaehlt?"); 864*dffa72deSWang Lei return aSeq; 865*dffa72deSWang Lei } 866*dffa72deSWang Lei } 867*dffa72deSWang Lei return uno::Sequence< sheet::RangeScopeName >(0); 868*dffa72deSWang Lei } 869cdf0e10cSrcweir sal_Bool SAL_CALL ScNamedRangesObj::hasByName( const rtl::OUString& aName ) 870cdf0e10cSrcweir throw(uno::RuntimeException) 871cdf0e10cSrcweir { 872cdf0e10cSrcweir ScUnoGuard aGuard; 873cdf0e10cSrcweir if (pDocShell) 874cdf0e10cSrcweir { 875cdf0e10cSrcweir ScRangeName* pNames = pDocShell->GetDocument()->GetRangeName(); 876cdf0e10cSrcweir if (pNames) 877cdf0e10cSrcweir { 878cdf0e10cSrcweir sal_uInt16 nPos = 0; 879cdf0e10cSrcweir if (pNames->SearchName( String(aName), nPos )) 880cdf0e10cSrcweir if ( lcl_UserVisibleName((*pNames)[nPos]) ) 881cdf0e10cSrcweir return sal_True; 882cdf0e10cSrcweir } 883cdf0e10cSrcweir } 884cdf0e10cSrcweir return sal_False; 885cdf0e10cSrcweir } 886cdf0e10cSrcweir 887*dffa72deSWang Lei sal_Bool SAL_CALL ScNamedRangesObj::hasByScopeName( const ::rtl::OUString& aScopeName, const ::rtl::OUString& aRangeName) 888*dffa72deSWang Lei throw(uno::RuntimeException) 889*dffa72deSWang Lei { 890*dffa72deSWang Lei ScUnoGuard aGuard; 891*dffa72deSWang Lei if (pDocShell) 892*dffa72deSWang Lei { 893*dffa72deSWang Lei SCTAB scope = MAXTABCOUNT; 894*dffa72deSWang Lei if (aScopeName.getLength() != 0 && !pDocShell->GetDocument()->GetTable( String(aScopeName), scope ) ) 895*dffa72deSWang Lei return sal_False; 896*dffa72deSWang Lei 897*dffa72deSWang Lei ScRangeName* pNames = pDocShell->GetDocument()->GetRangeName(); 898*dffa72deSWang Lei if (pNames) 899*dffa72deSWang Lei { 900*dffa72deSWang Lei sal_uInt16 nPos = 0; 901*dffa72deSWang Lei if (pNames->SearchName( String(aRangeName), nPos, scope )) 902*dffa72deSWang Lei if ( lcl_UserVisibleName((*pNames)[nPos]) ) 903*dffa72deSWang Lei return sal_True; 904*dffa72deSWang Lei } 905*dffa72deSWang Lei } 906*dffa72deSWang Lei return sal_False; 907*dffa72deSWang Lei } 908cdf0e10cSrcweir /** called from the XActionLockable interface methods on initial locking */ 909cdf0e10cSrcweir void ScNamedRangesObj::lock() 910cdf0e10cSrcweir { 911cdf0e10cSrcweir pDocShell->GetDocument()->CompileNameFormula( sal_True ); // CreateFormulaString 912cdf0e10cSrcweir } 913cdf0e10cSrcweir 914cdf0e10cSrcweir /** called from the XActionLockable interface methods on final unlock */ 915cdf0e10cSrcweir void ScNamedRangesObj::unlock() 916cdf0e10cSrcweir { 917cdf0e10cSrcweir pDocShell->GetDocument()->CompileNameFormula( sal_False ); // CompileFormulaString 918cdf0e10cSrcweir } 919cdf0e10cSrcweir 920cdf0e10cSrcweir // document::XActionLockable 921cdf0e10cSrcweir 922cdf0e10cSrcweir sal_Bool ScNamedRangesObj::isActionLocked() throw(uno::RuntimeException) 923cdf0e10cSrcweir { 924cdf0e10cSrcweir ScUnoGuard aGuard; 925cdf0e10cSrcweir return pDocShell->GetDocument()->GetNamedRangesLockCount() != 0; 926cdf0e10cSrcweir } 927cdf0e10cSrcweir 928cdf0e10cSrcweir void ScNamedRangesObj::addActionLock() throw(uno::RuntimeException) 929cdf0e10cSrcweir { 930cdf0e10cSrcweir ScUnoGuard aGuard; 931cdf0e10cSrcweir ScDocument* pDoc = pDocShell->GetDocument(); 932cdf0e10cSrcweir sal_Int16 nLockCount = pDoc->GetNamedRangesLockCount(); 933cdf0e10cSrcweir ++nLockCount; 934cdf0e10cSrcweir if ( nLockCount == 1 ) 935cdf0e10cSrcweir { 936cdf0e10cSrcweir lock(); 937cdf0e10cSrcweir } 938cdf0e10cSrcweir pDoc->SetNamedRangesLockCount( nLockCount ); 939cdf0e10cSrcweir } 940cdf0e10cSrcweir 941cdf0e10cSrcweir void ScNamedRangesObj::removeActionLock() throw(uno::RuntimeException) 942cdf0e10cSrcweir { 943cdf0e10cSrcweir ScUnoGuard aGuard; 944cdf0e10cSrcweir ScDocument* pDoc = pDocShell->GetDocument(); 945cdf0e10cSrcweir sal_Int16 nLockCount = pDoc->GetNamedRangesLockCount(); 946cdf0e10cSrcweir if ( nLockCount > 0 ) 947cdf0e10cSrcweir { 948cdf0e10cSrcweir --nLockCount; 949cdf0e10cSrcweir if ( nLockCount == 0 ) 950cdf0e10cSrcweir { 951cdf0e10cSrcweir unlock(); 952cdf0e10cSrcweir } 953cdf0e10cSrcweir pDoc->SetNamedRangesLockCount( nLockCount ); 954cdf0e10cSrcweir } 955cdf0e10cSrcweir } 956cdf0e10cSrcweir 957cdf0e10cSrcweir void ScNamedRangesObj::setActionLocks( sal_Int16 nLock ) throw(uno::RuntimeException) 958cdf0e10cSrcweir { 959cdf0e10cSrcweir ScUnoGuard aGuard; 960cdf0e10cSrcweir if ( nLock >= 0 ) 961cdf0e10cSrcweir { 962cdf0e10cSrcweir ScDocument* pDoc = pDocShell->GetDocument(); 963cdf0e10cSrcweir sal_Int16 nLockCount = pDoc->GetNamedRangesLockCount(); 964cdf0e10cSrcweir if ( nLock == 0 && nLockCount > 0 ) 965cdf0e10cSrcweir { 966cdf0e10cSrcweir unlock(); 967cdf0e10cSrcweir } 968cdf0e10cSrcweir if ( nLock > 0 && nLockCount == 0 ) 969cdf0e10cSrcweir { 970cdf0e10cSrcweir lock(); 971cdf0e10cSrcweir } 972cdf0e10cSrcweir pDoc->SetNamedRangesLockCount( nLock ); 973cdf0e10cSrcweir } 974cdf0e10cSrcweir } 975cdf0e10cSrcweir 976cdf0e10cSrcweir sal_Int16 ScNamedRangesObj::resetActionLocks() throw(uno::RuntimeException) 977cdf0e10cSrcweir { 978cdf0e10cSrcweir ScUnoGuard aGuard; 979cdf0e10cSrcweir ScDocument* pDoc = pDocShell->GetDocument(); 980cdf0e10cSrcweir sal_Int16 nLockCount = pDoc->GetNamedRangesLockCount(); 981cdf0e10cSrcweir if ( nLockCount > 0 ) 982cdf0e10cSrcweir { 983cdf0e10cSrcweir unlock(); 984cdf0e10cSrcweir } 985cdf0e10cSrcweir pDoc->SetNamedRangesLockCount( 0 ); 986cdf0e10cSrcweir return nLockCount; 987cdf0e10cSrcweir } 988cdf0e10cSrcweir 989cdf0e10cSrcweir //------------------------------------------------------------------------ 990cdf0e10cSrcweir 991cdf0e10cSrcweir ScLabelRangeObj::ScLabelRangeObj(ScDocShell* pDocSh, sal_Bool bCol, const ScRange& rR) : 992cdf0e10cSrcweir pDocShell( pDocSh ), 993cdf0e10cSrcweir bColumn( bCol ), 994cdf0e10cSrcweir aRange( rR ) 995cdf0e10cSrcweir { 996cdf0e10cSrcweir pDocShell->GetDocument()->AddUnoObject(*this); 997cdf0e10cSrcweir } 998cdf0e10cSrcweir 999cdf0e10cSrcweir ScLabelRangeObj::~ScLabelRangeObj() 1000cdf0e10cSrcweir { 1001cdf0e10cSrcweir if (pDocShell) 1002cdf0e10cSrcweir pDocShell->GetDocument()->RemoveUnoObject(*this); 1003cdf0e10cSrcweir } 1004cdf0e10cSrcweir 1005cdf0e10cSrcweir void ScLabelRangeObj::Notify( SfxBroadcaster&, const SfxHint& rHint ) 1006cdf0e10cSrcweir { 1007cdf0e10cSrcweir //! Ref-Update !!! 1008cdf0e10cSrcweir 1009cdf0e10cSrcweir if ( rHint.ISA( SfxSimpleHint ) && ((const SfxSimpleHint&)rHint).GetId() == SFX_HINT_DYING ) 1010cdf0e10cSrcweir pDocShell = NULL; // ungueltig geworden 1011cdf0e10cSrcweir } 1012cdf0e10cSrcweir 1013cdf0e10cSrcweir // Hilfsfuntionen 1014cdf0e10cSrcweir 1015cdf0e10cSrcweir ScRangePair* ScLabelRangeObj::GetData_Impl() 1016cdf0e10cSrcweir { 1017cdf0e10cSrcweir ScRangePair* pRet = NULL; 1018cdf0e10cSrcweir if (pDocShell) 1019cdf0e10cSrcweir { 1020cdf0e10cSrcweir ScDocument* pDoc = pDocShell->GetDocument(); 1021cdf0e10cSrcweir ScRangePairList* pList = bColumn ? pDoc->GetColNameRanges() : pDoc->GetRowNameRanges(); 1022cdf0e10cSrcweir if (pList) 1023cdf0e10cSrcweir pRet = pList->Find( aRange ); 1024cdf0e10cSrcweir } 1025cdf0e10cSrcweir return pRet; 1026cdf0e10cSrcweir } 1027cdf0e10cSrcweir 1028cdf0e10cSrcweir void ScLabelRangeObj::Modify_Impl( const ScRange* pLabel, const ScRange* pData ) 1029cdf0e10cSrcweir { 1030cdf0e10cSrcweir if (pDocShell) 1031cdf0e10cSrcweir { 1032cdf0e10cSrcweir ScDocument* pDoc = pDocShell->GetDocument(); 1033cdf0e10cSrcweir ScRangePairList* pOldList = bColumn ? pDoc->GetColNameRanges() : pDoc->GetRowNameRanges(); 1034cdf0e10cSrcweir if (pOldList) 1035cdf0e10cSrcweir { 1036cdf0e10cSrcweir ScRangePairListRef xNewList(pOldList->Clone()); 1037cdf0e10cSrcweir ScRangePair* pEntry = xNewList->Find( aRange ); 1038cdf0e10cSrcweir if (pEntry) 1039cdf0e10cSrcweir { 1040cdf0e10cSrcweir xNewList->Remove( pEntry ); // nur aus der Liste entfernt, nicht geloescht 1041cdf0e10cSrcweir 1042cdf0e10cSrcweir if ( pLabel ) 1043cdf0e10cSrcweir pEntry->GetRange(0) = *pLabel; 1044cdf0e10cSrcweir if ( pData ) 1045cdf0e10cSrcweir pEntry->GetRange(1) = *pData; 1046cdf0e10cSrcweir 1047cdf0e10cSrcweir xNewList->Join( *pEntry ); 1048cdf0e10cSrcweir delete pEntry; 1049cdf0e10cSrcweir 1050cdf0e10cSrcweir if (bColumn) 1051cdf0e10cSrcweir pDoc->GetColNameRangesRef() = xNewList; 1052cdf0e10cSrcweir else 1053cdf0e10cSrcweir pDoc->GetRowNameRangesRef() = xNewList; 1054cdf0e10cSrcweir 1055cdf0e10cSrcweir pDoc->CompileColRowNameFormula(); 1056cdf0e10cSrcweir pDocShell->PostPaint( 0,0,0, MAXCOL,MAXROW,MAXTAB, PAINT_GRID ); 1057cdf0e10cSrcweir pDocShell->SetDocumentModified(); 1058cdf0e10cSrcweir 1059cdf0e10cSrcweir //! Undo ?!?! (hier und aus Dialog) 1060cdf0e10cSrcweir 1061cdf0e10cSrcweir if ( pLabel ) 1062cdf0e10cSrcweir aRange = *pLabel; // Objekt anpassen, um Range wiederzufinden 1063cdf0e10cSrcweir } 1064cdf0e10cSrcweir } 1065cdf0e10cSrcweir } 1066cdf0e10cSrcweir } 1067cdf0e10cSrcweir 1068cdf0e10cSrcweir // sheet::XLabelRange 1069cdf0e10cSrcweir 1070cdf0e10cSrcweir table::CellRangeAddress SAL_CALL ScLabelRangeObj::getLabelArea() 1071cdf0e10cSrcweir throw(uno::RuntimeException) 1072cdf0e10cSrcweir { 1073cdf0e10cSrcweir ScUnoGuard aGuard; 1074cdf0e10cSrcweir table::CellRangeAddress aRet; 1075cdf0e10cSrcweir ScRangePair* pData = GetData_Impl(); 1076cdf0e10cSrcweir if (pData) 1077cdf0e10cSrcweir ScUnoConversion::FillApiRange( aRet, pData->GetRange(0) ); 1078cdf0e10cSrcweir return aRet; 1079cdf0e10cSrcweir } 1080cdf0e10cSrcweir 1081cdf0e10cSrcweir void SAL_CALL ScLabelRangeObj::setLabelArea( const table::CellRangeAddress& aLabelArea ) 1082cdf0e10cSrcweir throw(uno::RuntimeException) 1083cdf0e10cSrcweir { 1084cdf0e10cSrcweir ScUnoGuard aGuard; 1085cdf0e10cSrcweir ScRange aLabelRange; 1086cdf0e10cSrcweir ScUnoConversion::FillScRange( aLabelRange, aLabelArea ); 1087cdf0e10cSrcweir Modify_Impl( &aLabelRange, NULL ); 1088cdf0e10cSrcweir } 1089cdf0e10cSrcweir 1090cdf0e10cSrcweir table::CellRangeAddress SAL_CALL ScLabelRangeObj::getDataArea() 1091cdf0e10cSrcweir throw(uno::RuntimeException) 1092cdf0e10cSrcweir { 1093cdf0e10cSrcweir ScUnoGuard aGuard; 1094cdf0e10cSrcweir table::CellRangeAddress aRet; 1095cdf0e10cSrcweir ScRangePair* pData = GetData_Impl(); 1096cdf0e10cSrcweir if (pData) 1097cdf0e10cSrcweir ScUnoConversion::FillApiRange( aRet, pData->GetRange(1) ); 1098cdf0e10cSrcweir return aRet; 1099cdf0e10cSrcweir } 1100cdf0e10cSrcweir 1101cdf0e10cSrcweir void SAL_CALL ScLabelRangeObj::setDataArea( const table::CellRangeAddress& aDataArea ) 1102cdf0e10cSrcweir throw(uno::RuntimeException) 1103cdf0e10cSrcweir { 1104cdf0e10cSrcweir ScUnoGuard aGuard; 1105cdf0e10cSrcweir ScRange aDataRange; 1106cdf0e10cSrcweir ScUnoConversion::FillScRange( aDataRange, aDataArea ); 1107cdf0e10cSrcweir Modify_Impl( NULL, &aDataRange ); 1108cdf0e10cSrcweir } 1109cdf0e10cSrcweir 1110cdf0e10cSrcweir //------------------------------------------------------------------------ 1111cdf0e10cSrcweir 1112cdf0e10cSrcweir ScLabelRangesObj::ScLabelRangesObj(ScDocShell* pDocSh, sal_Bool bCol) : 1113cdf0e10cSrcweir pDocShell( pDocSh ), 1114cdf0e10cSrcweir bColumn( bCol ) 1115cdf0e10cSrcweir { 1116cdf0e10cSrcweir pDocShell->GetDocument()->AddUnoObject(*this); 1117cdf0e10cSrcweir } 1118cdf0e10cSrcweir 1119cdf0e10cSrcweir ScLabelRangesObj::~ScLabelRangesObj() 1120cdf0e10cSrcweir { 1121cdf0e10cSrcweir if (pDocShell) 1122cdf0e10cSrcweir pDocShell->GetDocument()->RemoveUnoObject(*this); 1123cdf0e10cSrcweir } 1124cdf0e10cSrcweir 1125cdf0e10cSrcweir void ScLabelRangesObj::Notify( SfxBroadcaster&, const SfxHint& rHint ) 1126cdf0e10cSrcweir { 1127cdf0e10cSrcweir // Referenz-Update interessiert hier nicht 1128cdf0e10cSrcweir 1129cdf0e10cSrcweir if ( rHint.ISA( SfxSimpleHint ) && 1130cdf0e10cSrcweir ((const SfxSimpleHint&)rHint).GetId() == SFX_HINT_DYING ) 1131cdf0e10cSrcweir { 1132cdf0e10cSrcweir pDocShell = NULL; // ungueltig geworden 1133cdf0e10cSrcweir } 1134cdf0e10cSrcweir } 1135cdf0e10cSrcweir 1136cdf0e10cSrcweir // sheet::XLabelRanges 1137cdf0e10cSrcweir 1138cdf0e10cSrcweir ScLabelRangeObj* ScLabelRangesObj::GetObjectByIndex_Impl(sal_uInt16 nIndex) 1139cdf0e10cSrcweir { 1140cdf0e10cSrcweir if (pDocShell) 1141cdf0e10cSrcweir { 1142cdf0e10cSrcweir ScDocument* pDoc = pDocShell->GetDocument(); 1143cdf0e10cSrcweir ScRangePairList* pList = bColumn ? pDoc->GetColNameRanges() : pDoc->GetRowNameRanges(); 1144cdf0e10cSrcweir if ( pList && nIndex < pList->Count() ) 1145cdf0e10cSrcweir { 1146cdf0e10cSrcweir ScRangePair* pData = pList->GetObject(nIndex); 1147cdf0e10cSrcweir if (pData) 1148cdf0e10cSrcweir return new ScLabelRangeObj( pDocShell, bColumn, pData->GetRange(0) ); 1149cdf0e10cSrcweir } 1150cdf0e10cSrcweir } 1151cdf0e10cSrcweir return NULL; 1152cdf0e10cSrcweir } 1153cdf0e10cSrcweir 1154cdf0e10cSrcweir void SAL_CALL ScLabelRangesObj::addNew( const table::CellRangeAddress& aLabelArea, 1155cdf0e10cSrcweir const table::CellRangeAddress& aDataArea ) 1156cdf0e10cSrcweir throw(uno::RuntimeException) 1157cdf0e10cSrcweir { 1158cdf0e10cSrcweir ScUnoGuard aGuard; 1159cdf0e10cSrcweir if (pDocShell) 1160cdf0e10cSrcweir { 1161cdf0e10cSrcweir ScDocument* pDoc = pDocShell->GetDocument(); 1162cdf0e10cSrcweir ScRangePairList* pOldList = bColumn ? pDoc->GetColNameRanges() : pDoc->GetRowNameRanges(); 1163cdf0e10cSrcweir if (pOldList) 1164cdf0e10cSrcweir { 1165cdf0e10cSrcweir ScRangePairListRef xNewList(pOldList->Clone()); 1166cdf0e10cSrcweir 1167cdf0e10cSrcweir ScRange aLabelRange; 1168cdf0e10cSrcweir ScRange aDataRange; 1169cdf0e10cSrcweir ScUnoConversion::FillScRange( aLabelRange, aLabelArea ); 1170cdf0e10cSrcweir ScUnoConversion::FillScRange( aDataRange, aDataArea ); 1171cdf0e10cSrcweir xNewList->Join( ScRangePair( aLabelRange, aDataRange ) ); 1172cdf0e10cSrcweir 1173cdf0e10cSrcweir if (bColumn) 1174cdf0e10cSrcweir pDoc->GetColNameRangesRef() = xNewList; 1175cdf0e10cSrcweir else 1176cdf0e10cSrcweir pDoc->GetRowNameRangesRef() = xNewList; 1177cdf0e10cSrcweir 1178cdf0e10cSrcweir pDoc->CompileColRowNameFormula(); 1179cdf0e10cSrcweir pDocShell->PostPaint( 0,0,0, MAXCOL,MAXROW,MAXTAB, PAINT_GRID ); 1180cdf0e10cSrcweir pDocShell->SetDocumentModified(); 1181cdf0e10cSrcweir 1182cdf0e10cSrcweir //! Undo ?!?! (hier und aus Dialog) 1183cdf0e10cSrcweir } 1184cdf0e10cSrcweir } 1185cdf0e10cSrcweir } 1186cdf0e10cSrcweir 1187cdf0e10cSrcweir void SAL_CALL ScLabelRangesObj::removeByIndex( sal_Int32 nIndex ) 1188cdf0e10cSrcweir throw(uno::RuntimeException) 1189cdf0e10cSrcweir { 1190cdf0e10cSrcweir ScUnoGuard aGuard; 1191cdf0e10cSrcweir sal_Bool bDone = sal_False; 1192cdf0e10cSrcweir if (pDocShell) 1193cdf0e10cSrcweir { 1194cdf0e10cSrcweir ScDocument* pDoc = pDocShell->GetDocument(); 1195cdf0e10cSrcweir ScRangePairList* pOldList = bColumn ? pDoc->GetColNameRanges() : pDoc->GetRowNameRanges(); 1196cdf0e10cSrcweir 1197cdf0e10cSrcweir if ( pOldList && nIndex >= 0 && nIndex < (sal_Int32)pOldList->Count() ) 1198cdf0e10cSrcweir { 1199cdf0e10cSrcweir ScRangePairListRef xNewList(pOldList->Clone()); 1200cdf0e10cSrcweir 1201cdf0e10cSrcweir ScRangePair* pEntry = xNewList->GetObject( nIndex ); 1202cdf0e10cSrcweir if (pEntry) 1203cdf0e10cSrcweir { 1204cdf0e10cSrcweir xNewList->Remove( pEntry ); 1205cdf0e10cSrcweir delete pEntry; 1206cdf0e10cSrcweir 1207cdf0e10cSrcweir if (bColumn) 1208cdf0e10cSrcweir pDoc->GetColNameRangesRef() = xNewList; 1209cdf0e10cSrcweir else 1210cdf0e10cSrcweir pDoc->GetRowNameRangesRef() = xNewList; 1211cdf0e10cSrcweir 1212cdf0e10cSrcweir pDoc->CompileColRowNameFormula(); 1213cdf0e10cSrcweir pDocShell->PostPaint( 0,0,0, MAXCOL,MAXROW,MAXTAB, PAINT_GRID ); 1214cdf0e10cSrcweir pDocShell->SetDocumentModified(); 1215cdf0e10cSrcweir bDone = sal_True; 1216cdf0e10cSrcweir 1217cdf0e10cSrcweir //! Undo ?!?! (hier und aus Dialog) 1218cdf0e10cSrcweir } 1219cdf0e10cSrcweir } 1220cdf0e10cSrcweir } 1221cdf0e10cSrcweir if (!bDone) 1222cdf0e10cSrcweir throw uno::RuntimeException(); // no other exceptions specified 1223cdf0e10cSrcweir } 1224cdf0e10cSrcweir 1225cdf0e10cSrcweir // container::XEnumerationAccess 1226cdf0e10cSrcweir 1227cdf0e10cSrcweir uno::Reference<container::XEnumeration> SAL_CALL ScLabelRangesObj::createEnumeration() 1228cdf0e10cSrcweir throw(uno::RuntimeException) 1229cdf0e10cSrcweir { 1230cdf0e10cSrcweir ScUnoGuard aGuard; 1231cdf0e10cSrcweir return new ScIndexEnumeration(this, rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.sheet.LabelRangesEnumeration"))); 1232cdf0e10cSrcweir } 1233cdf0e10cSrcweir 1234cdf0e10cSrcweir // container::XIndexAccess 1235cdf0e10cSrcweir 1236cdf0e10cSrcweir sal_Int32 SAL_CALL ScLabelRangesObj::getCount() throw(uno::RuntimeException) 1237cdf0e10cSrcweir { 1238cdf0e10cSrcweir ScUnoGuard aGuard; 1239cdf0e10cSrcweir if (pDocShell) 1240cdf0e10cSrcweir { 1241cdf0e10cSrcweir ScDocument* pDoc = pDocShell->GetDocument(); 1242cdf0e10cSrcweir ScRangePairList* pList = bColumn ? pDoc->GetColNameRanges() : pDoc->GetRowNameRanges(); 1243cdf0e10cSrcweir if (pList) 1244cdf0e10cSrcweir return pList->Count(); 1245cdf0e10cSrcweir } 1246cdf0e10cSrcweir return 0; 1247cdf0e10cSrcweir } 1248cdf0e10cSrcweir 1249cdf0e10cSrcweir uno::Any SAL_CALL ScLabelRangesObj::getByIndex( sal_Int32 nIndex ) 1250cdf0e10cSrcweir throw(lang::IndexOutOfBoundsException, 1251cdf0e10cSrcweir lang::WrappedTargetException, uno::RuntimeException) 1252cdf0e10cSrcweir { 1253cdf0e10cSrcweir ScUnoGuard aGuard; 1254cdf0e10cSrcweir uno::Reference< sheet::XLabelRange > xRange(GetObjectByIndex_Impl((sal_uInt16)nIndex)); 1255cdf0e10cSrcweir if ( xRange.is() ) 1256cdf0e10cSrcweir return uno::makeAny(xRange); 1257cdf0e10cSrcweir else 1258cdf0e10cSrcweir throw lang::IndexOutOfBoundsException(); 1259cdf0e10cSrcweir // return uno::Any(); 1260cdf0e10cSrcweir } 1261cdf0e10cSrcweir 1262cdf0e10cSrcweir uno::Type SAL_CALL ScLabelRangesObj::getElementType() throw(uno::RuntimeException) 1263cdf0e10cSrcweir { 1264cdf0e10cSrcweir ScUnoGuard aGuard; 1265cdf0e10cSrcweir return ::getCppuType((const uno::Reference< sheet::XLabelRange >*)0); // muss zu getByIndex passen 1266cdf0e10cSrcweir 1267cdf0e10cSrcweir } 1268cdf0e10cSrcweir 1269cdf0e10cSrcweir sal_Bool SAL_CALL ScLabelRangesObj::hasElements() throw(uno::RuntimeException) 1270cdf0e10cSrcweir { 1271cdf0e10cSrcweir ScUnoGuard aGuard; 1272cdf0e10cSrcweir return ( getCount() != 0 ); 1273cdf0e10cSrcweir } 1274cdf0e10cSrcweir 1275cdf0e10cSrcweir //------------------------------------------------------------------------ 1276cdf0e10cSrcweir 1277cdf0e10cSrcweir 1278cdf0e10cSrcweir 1279