blob: b24e09abc49c2caf421e89d1bf60153424f8b743 [file] [log] [blame]
/**************************************************************
*
* Licensed to the Apache Software Foundation (ASF) under one
* or more contributor license agreements. See the NOTICE file
* distributed with this work for additional information
* regarding copyright ownership. The ASF licenses this file
* to you under the Apache License, Version 2.0 (the
* "License"); you may not use this file except in compliance
* with the License. You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing,
* software distributed under the License is distributed on an
* "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
* KIND, either express or implied. See the License for the
* specific language governing permissions and limitations
* under the License.
*
*************************************************************/
// MARKER(update_precomp.py): autogen include statement, do not remove
#include "precompiled_sw.hxx"
#include <float.h>
#include <rtl/math.hxx>
#include <hintids.hxx> // fuer RES_..
#include <cellatr.hxx>
#include <calc.hxx>
#include <format.hxx>
#include <doc.hxx>
#include <swtable.hxx>
#include <node.hxx>
#include <hints.hxx>
#include <rolbck.hxx>
#include <switerator.hxx>
//TYPEINIT1( SwFmt, SwClient ); //rtti fuer SwFmt
/*************************************************************************
|*
*************************************************************************/
SwTblBoxNumFormat::SwTblBoxNumFormat( sal_uInt32 nFormat, sal_Bool bFlag )
: SfxUInt32Item( RES_BOXATR_FORMAT, nFormat ), bAuto( bFlag )
{
}
int SwTblBoxNumFormat::operator==( const SfxPoolItem& rAttr ) const
{
ASSERT( SfxPoolItem::operator==( rAttr ), "keine gleichen Attribute" );
return GetValue() == ((SwTblBoxNumFormat&)rAttr).GetValue() &&
bAuto == ((SwTblBoxNumFormat&)rAttr).bAuto;
}
SfxPoolItem* SwTblBoxNumFormat::Clone( SfxItemPool* ) const
{
return new SwTblBoxNumFormat( GetValue(), bAuto );
}
/*************************************************************************
|*
*************************************************************************/
SwTblBoxFormula::SwTblBoxFormula( const String& rFormula )
: SfxPoolItem( RES_BOXATR_FORMULA ),
SwTableFormula( rFormula ),
pDefinedIn( 0 )
{
}
int SwTblBoxFormula::operator==( const SfxPoolItem& rAttr ) const
{
ASSERT( SfxPoolItem::operator==( rAttr ), "keine gleichen Attribute" );
return GetFormula() == ((SwTblBoxFormula&)rAttr).GetFormula() &&
pDefinedIn == ((SwTblBoxFormula&)rAttr).pDefinedIn;
}
SfxPoolItem* SwTblBoxFormula::Clone( SfxItemPool* ) const
{
// auf externe Darstellung umschalten!!
SwTblBoxFormula* pNew = new SwTblBoxFormula( GetFormula() );
pNew->SwTableFormula::operator=( *this );
return pNew;
}
// suche den Node, in dem die Formel steht:
// TextFeld -> TextNode,
// BoxAttribut -> BoxStartNode
// !!! MUSS VON JEDER ABLEITUNG UEBERLADEN WERDEN !!!
const SwNode* SwTblBoxFormula::GetNodeOfFormula() const
{
const SwNode* pRet = 0;
if( pDefinedIn )
{
SwTableBox* pBox = SwIterator<SwTableBox,SwModify>::FirstElement( *pDefinedIn );
if( pBox )
pRet = pBox->GetSttNd();
}
return pRet;
}
SwTableBox* SwTblBoxFormula::GetTableBox()
{
SwTableBox* pBox = 0;
if( pDefinedIn )
pBox = SwIterator<SwTableBox,SwModify>::FirstElement( *pDefinedIn );
return pBox;
}
void SwTblBoxFormula::ChangeState( const SfxPoolItem* pItem )
{
if( !pDefinedIn )
return ;
SwTableFmlUpdate* pUpdtFld;
if( !pItem || RES_TABLEFML_UPDATE != pItem->Which() )
{
// setze bei allen das Value-Flag zurueck
ChgValid( sal_False );
return ;
}
pUpdtFld = (SwTableFmlUpdate*)pItem;
// bestimme die Tabelle, in der das Attribut steht
const SwTableNode* pTblNd;
const SwNode* pNd = GetNodeOfFormula();
if( pNd && &pNd->GetNodes() == &pNd->GetDoc()->GetNodes() &&
0 != ( pTblNd = pNd->FindTableNode() ))
{
switch( pUpdtFld->eFlags )
{
case TBL_CALC:
// setze das Value-Flag zurueck
// JP 17.06.96: interne Darstellung auf alle Formeln
// (Referenzen auf andere Tabellen!!!)
// if( VF_CMD & pFld->GetFormat() )
// pFld->PtrToBoxNm( pUpdtFld->pTbl );
// else
ChgValid( sal_False );
break;
case TBL_BOXNAME:
// ist es die gesuchte Tabelle ??
if( &pTblNd->GetTable() == pUpdtFld->pTbl )
// zur externen Darstellung
PtrToBoxNm( pUpdtFld->pTbl );
break;
case TBL_BOXPTR:
// zur internen Darstellung
// JP 17.06.96: interne Darstellung auf alle Formeln
// (Referenzen auf andere Tabellen!!!)
BoxNmToPtr( &pTblNd->GetTable() );
break;
case TBL_RELBOXNAME:
// ist es die gesuchte Tabelle ??
if( &pTblNd->GetTable() == pUpdtFld->pTbl )
// zur relativen Darstellung
ToRelBoxNm( pUpdtFld->pTbl );
break;
case TBL_SPLITTBL:
if( &pTblNd->GetTable() == pUpdtFld->pTbl )
{
sal_uInt16 nLnPos = SwTableFormula::GetLnPosInTbl(
pTblNd->GetTable(), GetTableBox() );
pUpdtFld->bBehindSplitLine = USHRT_MAX != nLnPos &&
pUpdtFld->nSplitLine <= nLnPos;
}
else
pUpdtFld->bBehindSplitLine = sal_False;
// kein break
case TBL_MERGETBL:
if( pUpdtFld->pHistory )
{
// fuer die History brauche ich aber die unveraenderte Formel
SwTblBoxFormula aCopy( *this );
pUpdtFld->bModified = sal_False;
ToSplitMergeBoxNm( *pUpdtFld );
if( pUpdtFld->bModified )
{
// und dann in der externen Darstellung
aCopy.PtrToBoxNm( &pTblNd->GetTable() );
pUpdtFld->pHistory->Add( &aCopy, &aCopy,
pNd->FindTableBoxStartNode()->GetIndex() );
}
}
else
ToSplitMergeBoxNm( *pUpdtFld );
break;
}
}
}
void SwTblBoxFormula::Calc( SwTblCalcPara& rCalcPara, double& rValue )
{
if( !rCalcPara.rCalc.IsCalcError() ) // ist schon Fehler gesetzt ?
{
// erzeuge aus den BoxNamen die Pointer
BoxNmToPtr( rCalcPara.pTbl );
String sFml( MakeFormel( rCalcPara ));
if( !rCalcPara.rCalc.IsCalcError() )
rValue = rCalcPara.rCalc.Calculate( sFml ).GetDouble();
else
rValue = DBL_MAX;
ChgValid( !rCalcPara.IsStackOverFlow() ); // der Wert ist wieder gueltig
}
}
/*************************************************************************
|*
*************************************************************************/
SwTblBoxValue::SwTblBoxValue()
: SfxPoolItem( RES_BOXATR_VALUE ), nValue( 0 )
{
}
SwTblBoxValue::SwTblBoxValue( const double nVal )
: SfxPoolItem( RES_BOXATR_VALUE ), nValue( nVal )
{
}
int SwTblBoxValue::operator==( const SfxPoolItem& rAttr ) const
{
ASSERT(SfxPoolItem::operator==(rAttr), "SwTblBoxValue: item not equal");
SwTblBoxValue const& rOther( static_cast<SwTblBoxValue const&>(rAttr) );
// items with NaN should be equal to enable pooling
return ::rtl::math::isNan(nValue)
? ::rtl::math::isNan(rOther.nValue)
: (nValue == rOther.nValue);
}
SfxPoolItem* SwTblBoxValue::Clone( SfxItemPool* ) const
{
return new SwTblBoxValue( nValue );
}