summaryrefslogtreecommitdiff
path: root/sw/source/core/fields/fldbas.cxx
diff options
context:
space:
mode:
Diffstat (limited to 'sw/source/core/fields/fldbas.cxx')
-rw-r--r--sw/source/core/fields/fldbas.cxx817
1 files changed, 817 insertions, 0 deletions
diff --git a/sw/source/core/fields/fldbas.cxx b/sw/source/core/fields/fldbas.cxx
new file mode 100644
index 000000000000..c47bd63e70ad
--- /dev/null
+++ b/sw/source/core/fields/fldbas.cxx
@@ -0,0 +1,817 @@
+/*************************************************************************
+ *
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * Copyright 2000, 2010 Oracle and/or its affiliates.
+ *
+ * OpenOffice.org - a multi-platform office productivity suite
+ *
+ * This file is part of OpenOffice.org.
+ *
+ * OpenOffice.org is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Lesser General Public License version 3
+ * only, as published by the Free Software Foundation.
+ *
+ * OpenOffice.org is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU Lesser General Public License version 3 for more details
+ * (a copy is included in the LICENSE file that accompanied this code).
+ *
+ * You should have received a copy of the GNU Lesser General Public License
+ * version 3 along with OpenOffice.org. If not, see
+ * <http://www.openoffice.org/license.html>
+ * for a copy of the LGPLv3 License.
+ *
+ ************************************************************************/
+
+// MARKER(update_precomp.py): autogen include statement, do not remove
+#include "precompiled_sw.hxx"
+
+
+// #include <math.h>
+#include <float.h>
+#include <rtl/math.hxx>
+#include <svl/zforlist.hxx>
+#include <svl/zformat.hxx>
+#include <editeng/unolingu.hxx>
+#ifndef _UNOFLDMID_H
+#include <unofldmid.h>
+#endif
+#include <doc.hxx>
+#include <editsh.hxx>
+#include <frame.hxx>
+#include <fldbas.hxx>
+#include <flddat.hxx>
+#include <ndtxt.hxx>
+#include <fmtfld.hxx>
+#include <txtfld.hxx>
+#include <pam.hxx>
+#include <docfld.hxx>
+#include <swtable.hxx>
+#include <docufld.hxx>
+#include <expfld.hxx>
+#include <shellres.hxx>
+#include <calc.hxx>
+#ifndef _COMCORE_HRC
+#include <comcore.hrc>
+#endif
+
+#include <math.h>
+#ifdef MAC
+#include <stdlib.h>
+#endif
+#include <float.h>
+
+using namespace ::com::sun::star;
+using namespace nsSwDocInfoSubType;
+
+USHORT lcl_GetLanguageOfFormat( USHORT nLng, ULONG nFmt,
+ const SvNumberFormatter& rFormatter )
+{
+ if( nLng == LANGUAGE_NONE ) // wegen Bug #60010
+ nLng = LANGUAGE_SYSTEM;
+ else if( nLng == ::GetAppLanguage() )
+ switch( rFormatter.GetIndexTableOffset( nFmt ))
+ {
+ case NF_NUMBER_SYSTEM:
+ case NF_DATE_SYSTEM_SHORT:
+ case NF_DATE_SYSTEM_LONG:
+ case NF_DATETIME_SYSTEM_SHORT_HHMM:
+ nLng = LANGUAGE_SYSTEM;
+ break;
+ default: break;
+ }
+ return nLng;
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung: Globals
+ --------------------------------------------------------------------*/
+// Array der Feldname
+
+SvStringsDtor* SwFieldType::pFldNames = 0;
+
+DBG_NAME(SwFieldType)
+
+ USHORT __FAR_DATA aTypeTab[] = {
+ /* RES_DBFLD */ TYP_DBFLD,
+ /* RES_USERFLD */ TYP_USERFLD,
+ /* RES_FILENAMEFLD */ TYP_FILENAMEFLD,
+ /* RES_DBNAMEFLD */ TYP_DBNAMEFLD,
+ /* RES_DATEFLD */ TYP_DATEFLD,
+ /* RES_TIMEFLD */ TYP_TIMEFLD,
+ /* RES_PAGENUMBERFLD */ TYP_PAGENUMBERFLD, // dynamisch
+ /* RES_AUTHORFLD */ TYP_AUTHORFLD,
+ /* RES_CHAPTERFLD */ TYP_CHAPTERFLD,
+ /* RES_DOCSTATFLD */ TYP_DOCSTATFLD,
+ /* RES_GETEXPFLD */ TYP_GETFLD, // dynamisch
+ /* RES_SETEXPFLD */ TYP_SETFLD, // dynamisch
+ /* RES_GETREFFLD */ TYP_GETREFFLD,
+ /* RES_HIDDENTXTFLD */ TYP_HIDDENTXTFLD,
+ /* RES_POSTITFLD */ TYP_POSTITFLD,
+ /* RES_FIXDATEFLD */ TYP_FIXDATEFLD,
+ /* RES_FIXTIMEFLD */ TYP_FIXTIMEFLD,
+ /* RES_REGFLD */ 0, // alt
+ /* RES_VARREGFLD */ 0, // alt
+ /* RES_SETREFFLD */ TYP_SETREFFLD,
+ /* RES_INPUTFLD */ TYP_INPUTFLD,
+ /* RES_MACROFLD */ TYP_MACROFLD,
+ /* RES_DDEFLD */ TYP_DDEFLD,
+ /* RES_TABLEFLD */ TYP_FORMELFLD,
+ /* RES_HIDDENPARAFLD */ TYP_HIDDENPARAFLD,
+ /* RES_DOCINFOFLD */ TYP_DOCINFOFLD,
+ /* RES_TEMPLNAMEFLD */ TYP_TEMPLNAMEFLD,
+ /* RES_DBNEXTSETFLD */ TYP_DBNEXTSETFLD,
+ /* RES_DBNUMSETFLD */ TYP_DBNUMSETFLD,
+ /* RES_DBSETNUMBERFLD */ TYP_DBSETNUMBERFLD,
+ /* RES_EXTUSERFLD */ TYP_EXTUSERFLD,
+ /* RES_REFPAGESETFLD */ TYP_SETREFPAGEFLD,
+ /* RES_REFPAGEGETFLD */ TYP_GETREFPAGEFLD,
+ /* RES_INTERNETFLD */ TYP_INTERNETFLD,
+ /* RES_JUMPEDITFLD */ TYP_JUMPEDITFLD,
+ /* RES_SCRIPTFLD */ TYP_SCRIPTFLD,
+ /* RES_DATETIMEFLD */ 0, // dynamisch
+ /* RES_AUTHORITY */ TYP_AUTHORITY,
+ /* RES_COMBINED_CHARS */ TYP_COMBINED_CHARS,
+ /* RES_DROPDOWN */ TYP_DROPDOWN
+ };
+ // ????? TYP_USRINPFLD,
+
+
+
+const String& SwFieldType::GetTypeStr(USHORT nTypeId)
+{
+ if( !pFldNames )
+ _GetFldName();
+
+ if( nTypeId < SwFieldType::pFldNames->Count() )
+ return *SwFieldType::pFldNames->GetObject( nTypeId );
+ else
+ return aEmptyStr;
+}
+
+
+/*---------------------------------------------------
+ Jedes Feld referenziert einen Feldtypen, der fuer
+ jedes Dokument einmalig ist.
+ --------------------------------------------------*/
+
+SwFieldType::SwFieldType( USHORT nWhichId )
+ : SwModify(0),
+ nWhich( nWhichId )
+{
+ DBG_CTOR( SwFieldType, 0 );
+}
+
+#ifdef DBG_UTIL
+
+SwFieldType::~SwFieldType()
+{
+ DBG_DTOR( SwFieldType, 0 );
+}
+
+#endif
+
+const String& SwFieldType::GetName() const
+{
+ return aEmptyStr;
+}
+
+BOOL SwFieldType::QueryValue( uno::Any&, USHORT ) const
+{
+ return FALSE;
+}
+BOOL SwFieldType::PutValue( const uno::Any& , USHORT )
+{
+ return FALSE;
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung: Basisklasse aller Felder
+ Felder referenzieren einen Feldtyp
+ Felder sind n-mal vorhanden, Feldtypen nur einmal
+ --------------------------------------------------------------------*/
+
+SwField::SwField(SwFieldType* pTyp, sal_uInt32 nFmt, USHORT nLng) :
+ nLang(nLng),
+ bIsAutomaticLanguage(TRUE),
+ nFormat(nFmt)
+{
+ ASSERT( pTyp, "SwField: ungueltiger SwFieldType" );
+ pType = pTyp;
+}
+
+SwField::~SwField()
+{
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung: Statt Umweg ueber den Typ
+ --------------------------------------------------------------------*/
+
+#ifdef DBG_UTIL
+USHORT SwField::Which() const
+{
+ ASSERT(pType, "Kein Typ vorhanden");
+ return pType->Which();
+}
+#endif
+
+/*--------------------------------------------------------------------
+ Beschreibung:
+ --------------------------------------------------------------------*/
+
+USHORT SwField::GetTypeId() const
+{
+
+ USHORT nRet;
+ switch( pType->Which() )
+ {
+ case RES_DATETIMEFLD:
+ if (GetSubType() & FIXEDFLD)
+ nRet = static_cast<USHORT>(GetSubType() & DATEFLD ? TYP_FIXDATEFLD : TYP_FIXTIMEFLD);
+ else
+ nRet = static_cast<USHORT>(GetSubType() & DATEFLD ? TYP_DATEFLD : TYP_TIMEFLD);
+ break;
+ case RES_GETEXPFLD:
+ nRet = static_cast<USHORT>(nsSwGetSetExpType::GSE_FORMULA & GetSubType() ? TYP_FORMELFLD : TYP_GETFLD);
+ break;
+
+ case RES_HIDDENTXTFLD:
+ nRet = GetSubType();
+ break;
+
+ case RES_SETEXPFLD:
+ if( nsSwGetSetExpType::GSE_SEQ & GetSubType() )
+ nRet = TYP_SEQFLD;
+ else if( ((SwSetExpField*)this)->GetInputFlag() )
+ nRet = TYP_SETINPFLD;
+ else
+ nRet = TYP_SETFLD;
+ break;
+
+ case RES_PAGENUMBERFLD:
+ nRet = GetSubType();
+ if( PG_NEXT == nRet )
+ nRet = TYP_NEXTPAGEFLD;
+ else if( PG_PREV == nRet )
+ nRet = TYP_PREVPAGEFLD;
+ else
+ nRet = TYP_PAGENUMBERFLD;
+ break;
+
+ default:
+ nRet = aTypeTab[ pType->Which() ];
+ }
+ return nRet;
+}
+
+
+/*--------------------------------------------------------------------
+ Beschreibung: liefert den Namen oder den Inhalt
+ --------------------------------------------------------------------*/
+
+String SwField::GetCntnt( BOOL bName ) const
+{
+ String sRet;
+ if( bName )
+ {
+ USHORT nTypeId = GetTypeId();
+ if( RES_DATETIMEFLD == GetTyp()->Which() )
+ nTypeId = static_cast<USHORT>(GetSubType() & DATEFLD ? TYP_DATEFLD : TYP_TIMEFLD);
+
+ sRet = SwFieldType::GetTypeStr( nTypeId );
+ if( IsFixed() )
+ ( sRet += ' ' ) += ViewShell::GetShellRes()->aFixedStr;
+ }
+ else
+ sRet = Expand();
+ return sRet;
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung: Parameter setzen auslesen
+ --------------------------------------------------------------------*/
+
+const String& SwField::GetPar1() const
+{
+ return aEmptyStr;
+}
+
+String SwField::GetPar2() const
+{
+ return aEmptyStr;
+}
+
+String SwField::GetFormula() const
+{
+ return GetPar2();
+}
+
+void SwField::SetPar1(const String& )
+{}
+
+void SwField::SetPar2(const String& )
+{}
+
+USHORT SwField::GetSubType() const
+{
+// ASSERT(0, "Sorry Not implemented");
+ return 0;
+}
+
+void SwField::SetSubType(USHORT )
+{
+// ASSERT(0, "Sorry Not implemented");
+}
+
+BOOL SwField::QueryValue( uno::Any& rVal, USHORT nWhichId ) const
+{
+ switch( nWhichId )
+ {
+ case FIELD_PROP_BOOL4:
+ {
+ BOOL bFixed = !bIsAutomaticLanguage;
+ rVal.setValue(&bFixed, ::getCppuBooleanType());
+ }
+ break;
+ default:
+ DBG_ERROR("illegal property");
+ }
+ return TRUE;
+}
+BOOL SwField::PutValue( const uno::Any& rVal, USHORT nWhichId )
+{
+ switch( nWhichId )
+ {
+ case FIELD_PROP_BOOL4:
+ {
+ BOOL bFixed = FALSE;
+ if(rVal >>= bFixed)
+ bIsAutomaticLanguage = !bFixed;
+ }
+ break;
+ default:
+ DBG_ERROR("illegal property");
+ }
+ return TRUE;
+}
+
+
+/*--------------------------------------------------------------------
+ Beschreibung: neuen Typ setzen
+ (wird fuer das Kopieren zwischen Dokumenten benutzt)
+ muss immer vom gleichen Typ sein.
+ --------------------------------------------------------------------*/
+
+SwFieldType* SwField::ChgTyp( SwFieldType* pNewType )
+{
+ ASSERT( pNewType && pNewType->Which() == pType->Which(),
+ "kein Typ oder ungleiche Typen" );
+
+ SwFieldType* pOld = pType;
+ pType = pNewType;
+ return pOld;
+}
+
+ // hat das Feld eine Action auf dem ClickHandler ? (z.B. INetFelder,..)
+BOOL SwField::HasClickHdl() const
+{
+ BOOL bRet = FALSE;
+ switch( pType->Which() )
+ {
+ case RES_INTERNETFLD:
+ case RES_JUMPEDITFLD:
+ case RES_GETREFFLD:
+ case RES_MACROFLD:
+ case RES_INPUTFLD:
+ case RES_DROPDOWN :
+ bRet = TRUE;
+ break;
+
+ case RES_SETEXPFLD:
+ bRet = ((SwSetExpField*)this)->GetInputFlag();
+ break;
+ }
+ return bRet;
+}
+
+void SwField::SetLanguage(USHORT nLng)
+{
+ nLang = nLng;
+}
+
+void SwField::ChangeFormat(sal_uInt32 n)
+{
+ nFormat = n;
+}
+
+BOOL SwField::IsFixed() const
+{
+ BOOL bRet = FALSE;
+ switch( pType->Which() )
+ {
+ case RES_FIXDATEFLD:
+ case RES_FIXTIMEFLD:
+ bRet = TRUE;
+ break;
+
+ case RES_DATETIMEFLD:
+ bRet = 0 != (GetSubType() & FIXEDFLD);
+ break;
+
+ case RES_EXTUSERFLD:
+ case RES_AUTHORFLD:
+ bRet = 0 != (GetFormat() & AF_FIXED);
+ break;
+
+ case RES_FILENAMEFLD:
+ bRet = 0 != (GetFormat() & FF_FIXED);
+ break;
+
+ case RES_DOCINFOFLD:
+ bRet = 0 != (GetSubType() & DI_SUB_FIXED);
+ break;
+ }
+ return bRet;
+}
+
+String SwField::ExpandField(bool const bInClipboard) const
+{
+ if (!bInClipboard) // #i85766# do not expand fields in clipboard documents
+ {
+ m_Cache = Expand();
+ }
+ return m_Cache;
+}
+
+SwField * SwField::CopyField() const
+{
+ SwField *const pNew = Copy();
+ // #i85766# cache expansion of source (for clipboard)
+ pNew->m_Cache = Expand();
+ return pNew;
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung: Numerierung expandieren
+ --------------------------------------------------------------------*/
+
+String FormatNumber(USHORT nNum, sal_uInt32 nFormat)
+{
+ if(SVX_NUM_PAGEDESC == nFormat)
+ return String::CreateFromInt32( nNum );
+ SvxNumberType aNumber;
+
+ ASSERT(nFormat != SVX_NUM_NUMBER_NONE, "Falsches Nummern-Format" );
+
+ aNumber.SetNumberingType((sal_Int16)nFormat);
+ return aNumber.GetNumStr(nNum);
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung: CTOR SwValueFieldType
+ --------------------------------------------------------------------*/
+
+SwValueFieldType::SwValueFieldType( SwDoc* pDocPtr, USHORT nWhichId )
+ : SwFieldType(nWhichId),
+ pDoc(pDocPtr),
+ bUseFormat(TRUE)
+{
+}
+
+SwValueFieldType::SwValueFieldType( const SwValueFieldType& rTyp )
+ : SwFieldType(rTyp.Which()),
+ pDoc(rTyp.GetDoc()),
+ bUseFormat(rTyp.UseFormat())
+{
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung: Wert formatiert als String zurueckgeben
+ --------------------------------------------------------------------*/
+
+String SwValueFieldType::ExpandValue( const double& rVal,
+ sal_uInt32 nFmt, USHORT nLng) const
+{
+ if (rVal >= DBL_MAX) // FehlerString fuer Calculator
+ return ViewShell::GetShellRes()->aCalc_Error;
+
+ String sExpand;
+ SvNumberFormatter* pFormatter = pDoc->GetNumberFormatter();
+ Color* pCol = 0;
+
+ // wegen Bug #60010
+ USHORT nFmtLng = ::lcl_GetLanguageOfFormat( nLng, nFmt, *pFormatter );
+
+ if( nFmt < SV_COUNTRY_LANGUAGE_OFFSET && LANGUAGE_SYSTEM != nFmtLng )
+ {
+ short nType = NUMBERFORMAT_DEFINED;
+ xub_StrLen nDummy;
+
+ const SvNumberformat* pEntry = pFormatter->GetEntry(nFmt);
+
+ if (pEntry && nLng != pEntry->GetLanguage())
+ {
+ sal_uInt32 nNewFormat = pFormatter->GetFormatForLanguageIfBuiltIn(nFmt,
+ (LanguageType)nFmtLng);
+
+ if (nNewFormat == nFmt)
+ {
+ // Warscheinlich benutzerdefiniertes Format
+ String sFmt(pEntry->GetFormatstring());
+
+ pFormatter->PutandConvertEntry(sFmt, nDummy, nType, nFmt,
+ pEntry->GetLanguage(), nFmtLng );
+ }
+ else
+ nFmt = nNewFormat;
+ }
+ ASSERT(pEntry, "Unbekanntes Zahlenformat!");
+ }
+
+ if( pFormatter->IsTextFormat( nFmt ) )
+ {
+ String sValue;
+ DoubleToString(sValue, rVal, nFmtLng);
+ pFormatter->GetOutputString(sValue, nFmt, sExpand, &pCol);
+ }
+ else
+ pFormatter->GetOutputString(rVal, nFmt, sExpand, &pCol);
+
+ return sExpand;
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung:
+ --------------------------------------------------------------------*/
+
+void SwValueFieldType::DoubleToString( String &rValue, const double &rVal,
+ sal_uInt32 nFmt) const
+{
+ SvNumberFormatter* pFormatter = pDoc->GetNumberFormatter();
+ const SvNumberformat* pEntry = pFormatter->GetEntry(nFmt);
+
+ if (pEntry)
+ DoubleToString(rValue, rVal, pEntry->GetLanguage());
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung:
+ --------------------------------------------------------------------*/
+
+void SwValueFieldType::DoubleToString( String &rValue, const double &rVal,
+ USHORT nLng ) const
+{
+ SvNumberFormatter* pFormatter = pDoc->GetNumberFormatter();
+
+ // wegen Bug #60010
+ if( nLng == LANGUAGE_NONE ) // wegen Bug #60010
+ nLng = LANGUAGE_SYSTEM;
+
+ pFormatter->ChangeIntl( nLng ); // Separator in der richtigen Sprache besorgen
+ rValue = ::rtl::math::doubleToUString( rVal, rtl_math_StringFormat_F, 12,
+ pFormatter->GetDecSep(), true );
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung: CTOR SwValueField
+ --------------------------------------------------------------------*/
+
+SwValueField::SwValueField( SwValueFieldType* pFldType, sal_uInt32 nFmt,
+ USHORT nLng, const double fVal )
+ : SwField(pFldType, nFmt, nLng),
+ fValue(fVal)
+{
+}
+
+SwValueField::SwValueField( const SwValueField& rFld )
+ : SwField(rFld),
+ fValue(rFld.GetValue())
+{
+}
+
+SwValueField::~SwValueField()
+{
+}
+/*--------------------------------------------------------------------
+ Beschreibung: neuen Typ setzen
+ (wird fuer das Kopieren zwischen Dokumenten benutzt)
+ muss immer vom gleichen Typ sein.
+ --------------------------------------------------------------------*/
+
+SwFieldType* SwValueField::ChgTyp( SwFieldType* pNewType )
+{
+ SwDoc* pNewDoc = ((SwValueFieldType *)pNewType)->GetDoc();
+ SwDoc* pDoc = GetDoc();
+
+ if( pNewDoc && pDoc && pDoc != pNewDoc)
+ {
+ SvNumberFormatter* pFormatter = pNewDoc->GetNumberFormatter();
+
+ if( pFormatter && pFormatter->HasMergeFmtTbl() &&
+ ((SwValueFieldType *)GetTyp())->UseFormat() )
+ SetFormat(pFormatter->GetMergeFmtIndex( GetFormat() ));
+ }
+
+ return SwField::ChgTyp(pNewType);
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung: Format in Office-Sprache ermitteln
+ --------------------------------------------------------------------*/
+
+sal_uInt32 SwValueField::GetSystemFormat(SvNumberFormatter* pFormatter, sal_uInt32 nFmt)
+{
+ const SvNumberformat* pEntry = pFormatter->GetEntry(nFmt);
+ USHORT nLng = SvxLocaleToLanguage( SvtSysLocale().GetLocaleData().getLocale() );
+
+ if (pEntry && nLng != pEntry->GetLanguage())
+ {
+ sal_uInt32 nNewFormat = pFormatter->GetFormatForLanguageIfBuiltIn(nFmt,
+ (LanguageType)nLng);
+
+ if (nNewFormat == nFmt)
+ {
+ // Warscheinlich benutzerdefiniertes Format
+ short nType = NUMBERFORMAT_DEFINED;
+ xub_StrLen nDummy;
+
+ String sFmt(pEntry->GetFormatstring());
+
+ sal_uInt32 nFormat = nFmt;
+ pFormatter->PutandConvertEntry(sFmt, nDummy, nType,
+ nFormat, pEntry->GetLanguage(), nLng);
+ nFmt = nFormat;
+ }
+ else
+ nFmt = nNewFormat;
+ }
+
+ return nFmt;
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung: Sprache im Format anpassen
+ --------------------------------------------------------------------*/
+
+void SwValueField::SetLanguage( USHORT nLng )
+{
+ if( IsAutomaticLanguage() &&
+ ((SwValueFieldType *)GetTyp())->UseFormat() &&
+ GetFormat() != SAL_MAX_UINT32 )
+ {
+ // wegen Bug #60010
+ SvNumberFormatter* pFormatter = GetDoc()->GetNumberFormatter();
+ USHORT nFmtLng = ::lcl_GetLanguageOfFormat( nLng, GetFormat(),
+ *pFormatter );
+
+ if( (GetFormat() >= SV_COUNTRY_LANGUAGE_OFFSET ||
+ LANGUAGE_SYSTEM != nFmtLng ) &&
+ !(Which() == RES_USERFLD && (GetSubType()&nsSwExtendedSubType::SUB_CMD) ) )
+ {
+ const SvNumberformat* pEntry = pFormatter->GetEntry(GetFormat());
+
+ if( pEntry && nFmtLng != pEntry->GetLanguage() )
+ {
+ sal_uInt32 nNewFormat = pFormatter->GetFormatForLanguageIfBuiltIn(
+ GetFormat(), (LanguageType)nFmtLng );
+
+ if( nNewFormat == GetFormat() )
+ {
+ // Warscheinlich benutzerdefiniertes Format
+ short nType = NUMBERFORMAT_DEFINED;
+ xub_StrLen nDummy;
+ String sFmt( pEntry->GetFormatstring() );
+ pFormatter->PutandConvertEntry( sFmt, nDummy, nType,
+ nNewFormat,
+ pEntry->GetLanguage(),
+ nFmtLng );
+ }
+ SetFormat( nNewFormat );
+ }
+ ASSERT(pEntry, "Unbekanntes Zahlenformat!");
+ }
+ }
+
+ SwField::SetLanguage(nLng);
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung:
+ --------------------------------------------------------------------*/
+
+double SwValueField::GetValue() const
+{
+ return fValue;
+}
+
+void SwValueField::SetValue( const double& rVal )
+{
+ fValue = rVal;
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung: SwFormulaField
+ --------------------------------------------------------------------*/
+
+SwFormulaField::SwFormulaField( SwValueFieldType* pFldType, sal_uInt32 nFmt, const double fVal)
+ : SwValueField(pFldType, nFmt, LANGUAGE_SYSTEM, fVal)
+{
+}
+
+SwFormulaField::SwFormulaField( const SwFormulaField& rFld )
+ : SwValueField((SwValueFieldType *)rFld.GetTyp(), rFld.GetFormat(),
+ rFld.GetLanguage(), rFld.GetValue())
+{
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung:
+ --------------------------------------------------------------------*/
+
+String SwFormulaField::GetFormula() const
+{
+ return sFormula;
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung:
+ --------------------------------------------------------------------*/
+
+void SwFormulaField::SetFormula(const String& rStr)
+{
+ sFormula = rStr;
+
+ ULONG nFmt(GetFormat());
+
+ if( nFmt && SAL_MAX_UINT32 != nFmt )
+ {
+ xub_StrLen nPos = 0;
+ double fTmpValue;
+ if( SwCalc::Str2Double( rStr, nPos, fTmpValue, GetDoc() ) )
+ SwValueField::SetValue( fTmpValue );
+ }
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung:
+ --------------------------------------------------------------------*/
+
+void SwFormulaField::SetExpandedFormula( const String& rStr )
+{
+ sal_uInt32 nFmt(GetFormat());
+
+ if (nFmt && nFmt != SAL_MAX_UINT32 && ((SwValueFieldType *)GetTyp())->UseFormat())
+ {
+ double fTmpValue;
+
+ SvNumberFormatter* pFormatter = GetDoc()->GetNumberFormatter();
+
+ if (pFormatter->IsNumberFormat(rStr, nFmt, fTmpValue))
+ {
+ SwValueField::SetValue(fTmpValue);
+ sFormula.Erase();
+
+ ((SwValueFieldType *)GetTyp())->DoubleToString(sFormula, fTmpValue, nFmt);
+ return;
+ }
+ }
+ sFormula = rStr;
+}
+
+/*--------------------------------------------------------------------
+ Beschreibung:
+ --------------------------------------------------------------------*/
+
+String SwFormulaField::GetExpandedFormula() const
+{
+ sal_uInt32 nFmt(GetFormat());
+
+ if (nFmt && nFmt != SAL_MAX_UINT32 && ((SwValueFieldType *)GetTyp())->UseFormat())
+ {
+ String sFormattedValue;
+ Color* pCol = 0;
+
+ SvNumberFormatter* pFormatter = GetDoc()->GetNumberFormatter();
+
+ if (pFormatter->IsTextFormat(nFmt))
+ {
+ String sValue;
+ ((SwValueFieldType *)GetTyp())->DoubleToString(sValue, GetValue(), nFmt);
+ pFormatter->GetOutputString(sValue, nFmt, sFormattedValue, &pCol);
+ }
+ else
+ pFormatter->GetOutputString(GetValue(), nFmt, sFormattedValue, &pCol);
+
+ return sFormattedValue;
+ }
+ else
+ return GetFormula();
+}
+
+String SwField::GetDescription() const
+{
+ return SW_RES(STR_FIELD);
+}
generated by cgit v1.2.3 (git 2.39.1) at 2024-05-14 12:11:41 +0000