xref: /trunk/main/xmloff/source/style/xmlnumfe.cxx (revision 86e1cf34)
1 /**************************************************************
2  *
3  * Licensed to the Apache Software Foundation (ASF) under one
4  * or more contributor license agreements.  See the NOTICE file
5  * distributed with this work for additional information
6  * regarding copyright ownership.  The ASF licenses this file
7  * to you under the Apache License, Version 2.0 (the
8  * "License"); you may not use this file except in compliance
9  * with the License.  You may obtain a copy of the License at
10  *
11  *   http://www.apache.org/licenses/LICENSE-2.0
12  *
13  * Unless required by applicable law or agreed to in writing,
14  * software distributed under the License is distributed on an
15  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16  * KIND, either express or implied.  See the License for the
17  * specific language governing permissions and limitations
18  * under the License.
19  *
20  *************************************************************/
21 
22 
23 
24 // MARKER(update_precomp.py): autogen include statement, do not remove
25 #include "precompiled_xmloff.hxx"
26 
27 #define _SVSTDARR_ULONGS
28 #define _ZFORLIST_DECLARE_TABLE
29 
30 #include <svl/svstdarr.hxx>
31 #include <svl/zforlist.hxx>
32 #include <svl/zformat.hxx>
33 #include <svl/numuno.hxx>
34 #include <i18npool/mslangid.hxx>
35 #include <tools/debug.hxx>
36 #include <rtl/math.hxx>
37 #include <unotools/calendarwrapper.hxx>
38 #include <unotools/charclass.hxx>
39 #include <com/sun/star/lang/Locale.hpp>
40 #include <rtl/ustrbuf.hxx>
41 
42 // #110680#
43 //#include <comphelper/processfactory.hxx>
44 
45 #include <com/sun/star/i18n/NativeNumberXmlAttributes.hpp>
46 
47 #include <xmloff/xmlnumfe.hxx>
48 #include "xmloff/xmlnmspe.hxx"
49 #include <xmloff/xmluconv.hxx>
50 #include <xmloff/attrlist.hxx>
51 #include <xmloff/nmspmap.hxx>
52 #include <xmloff/families.hxx>
53 #include <xmloff/xmlnumfi.hxx>		// SvXMLNumFmtDefaults
54 
55 #define _SVSTDARR_USHORTS
56 #include <svl/svstdarr.hxx>
57 #include <svl/nfsymbol.hxx>
58 #include <xmloff/xmltoken.hxx>
59 #include <xmloff/xmlexp.hxx>
60 
61 #include <set>
62 
63 using ::rtl::OUString;
64 using ::rtl::OUStringBuffer;
65 
66 using namespace ::com::sun::star;
67 using namespace ::xmloff::token;
68 using namespace ::svt;
69 
70 //-------------------------------------------------------------------------
71 
72 //	4th condition for text formats doesn't work
73 //#define XMLNUM_MAX_PARTS	4
74 #define XMLNUM_MAX_PARTS	3
75 
76 //-------------------------------------------------------------------------
77 
78 struct LessuInt32
79 {
operator ()LessuInt3280 	sal_Bool operator() (const sal_uInt32 rValue1, const sal_uInt32 rValue2) const
81 	{
82 		return rValue1 < rValue2;
83 	}
84 };
85 
86 typedef std::set< sal_uInt32, LessuInt32 >	SvXMLuInt32Set;
87 
88 class SvXMLNumUsedList_Impl
89 {
90 	SvXMLuInt32Set				aUsed;
91 	SvXMLuInt32Set				aWasUsed;
92 	SvXMLuInt32Set::iterator	aCurrentUsedPos;
93 	sal_uInt32					nUsedCount;
94 	sal_uInt32					nWasUsedCount;
95 
96 public:
97 			SvXMLNumUsedList_Impl();
98 			~SvXMLNumUsedList_Impl();
99 
100 	void		SetUsed( sal_uInt32 nKey );
101 	sal_Bool	IsUsed( sal_uInt32 nKey ) const;
102 	sal_Bool	IsWasUsed( sal_uInt32 nKey ) const;
103 	void		Export();
104 
105 	sal_Bool	GetFirstUsed(sal_uInt32& nKey);
106 	sal_Bool	GetNextUsed(sal_uInt32& nKey);
107 
108 	void GetWasUsed(uno::Sequence<sal_Int32>& rWasUsed);
109 	void SetWasUsed(const uno::Sequence<sal_Int32>& rWasUsed);
110 };
111 
112 //-------------------------------------------------------------------------
113 
114 struct SvXMLEmbeddedTextEntry
115 {
116 	sal_uInt16		nSourcePos;		// position in NumberFormat (to skip later)
117 	sal_Int32		nFormatPos;		// resulting position in embedded-text element
118 	rtl::OUString	aText;
119 
SvXMLEmbeddedTextEntrySvXMLEmbeddedTextEntry120 	SvXMLEmbeddedTextEntry( sal_uInt16 nSP, sal_Int32 nFP, const rtl::OUString& rT ) :
121 		nSourcePos(nSP), nFormatPos(nFP), aText(rT) {}
122 };
123 
124 typedef SvXMLEmbeddedTextEntry* SvXMLEmbeddedTextEntryPtr;
125 SV_DECL_PTRARR_DEL( SvXMLEmbeddedTextEntryArr, SvXMLEmbeddedTextEntryPtr, 4, 4 )
126 
127 //-------------------------------------------------------------------------
128 
129 SV_IMPL_PTRARR( SvXMLEmbeddedTextEntryArr, SvXMLEmbeddedTextEntryPtr );
130 
131 //-------------------------------------------------------------------------
132 
133 //
134 //!	SvXMLNumUsedList_Impl should be optimized!
135 //
136 
SvXMLNumUsedList_Impl()137 SvXMLNumUsedList_Impl::SvXMLNumUsedList_Impl() :
138 	nUsedCount(0),
139 	nWasUsedCount(0)
140 {
141 }
142 
~SvXMLNumUsedList_Impl()143 SvXMLNumUsedList_Impl::~SvXMLNumUsedList_Impl()
144 {
145 }
146 
SetUsed(sal_uInt32 nKey)147 void SvXMLNumUsedList_Impl::SetUsed( sal_uInt32 nKey )
148 {
149 	if ( !IsWasUsed(nKey) )
150 	{
151 		std::pair<SvXMLuInt32Set::iterator, bool> aPair = aUsed.insert( nKey );
152 		if (aPair.second)
153 			nUsedCount++;
154 	}
155 }
156 
IsUsed(sal_uInt32 nKey) const157 sal_Bool SvXMLNumUsedList_Impl::IsUsed( sal_uInt32 nKey ) const
158 {
159 	SvXMLuInt32Set::const_iterator aItr = aUsed.find(nKey);
160 	return (aItr != aUsed.end());
161 }
162 
IsWasUsed(sal_uInt32 nKey) const163 sal_Bool SvXMLNumUsedList_Impl::IsWasUsed( sal_uInt32 nKey ) const
164 {
165 	SvXMLuInt32Set::const_iterator aItr = aWasUsed.find(nKey);
166 	return (aItr != aWasUsed.end());
167 }
168 
Export()169 void SvXMLNumUsedList_Impl::Export()
170 {
171 	SvXMLuInt32Set::iterator aItr = aUsed.begin();
172 	while (aItr != aUsed.end())
173 	{
174 		std::pair<SvXMLuInt32Set::iterator, bool> aPair = aWasUsed.insert( *aItr );
175 		if (aPair.second)
176 			nWasUsedCount++;
177 		aItr++;
178 	}
179 	aUsed.clear();
180 	nUsedCount = 0;
181 }
182 
GetFirstUsed(sal_uInt32 & nKey)183 sal_Bool SvXMLNumUsedList_Impl::GetFirstUsed(sal_uInt32& nKey)
184 {
185 	sal_Bool bRet(sal_False);
186 	aCurrentUsedPos = aUsed.begin();
187 	if(nUsedCount)
188 	{
189 		DBG_ASSERT(aCurrentUsedPos != aUsed.end(), "something went wrong");
190 		nKey = *aCurrentUsedPos;
191 		bRet = sal_True;
192 	}
193 	return bRet;
194 }
195 
GetNextUsed(sal_uInt32 & nKey)196 sal_Bool SvXMLNumUsedList_Impl::GetNextUsed(sal_uInt32& nKey)
197 {
198 	sal_Bool bRet(sal_False);
199 	if (aCurrentUsedPos != aUsed.end())
200 	{
201 		aCurrentUsedPos++;
202 		if (aCurrentUsedPos != aUsed.end())
203 		{
204 			nKey = *aCurrentUsedPos;
205 			bRet = sal_True;
206 		}
207 	}
208 	return bRet;
209 }
210 
GetWasUsed(uno::Sequence<sal_Int32> & rWasUsed)211 void SvXMLNumUsedList_Impl::GetWasUsed(uno::Sequence<sal_Int32>& rWasUsed)
212 {
213 	rWasUsed.realloc(nWasUsedCount);
214 	sal_Int32* pWasUsed = rWasUsed.getArray();
215 	if (pWasUsed)
216 	{
217 		SvXMLuInt32Set::iterator aItr = aWasUsed.begin();
218 		while (aItr != aWasUsed.end())
219 		{
220 			*pWasUsed = *aItr;
221 			aItr++;
222 			pWasUsed++;
223 		}
224 	}
225 }
226 
SetWasUsed(const uno::Sequence<sal_Int32> & rWasUsed)227 void SvXMLNumUsedList_Impl::SetWasUsed(const uno::Sequence<sal_Int32>& rWasUsed)
228 {
229 	DBG_ASSERT(nWasUsedCount == 0, "WasUsed should be empty");
230 	sal_Int32 nCount(rWasUsed.getLength());
231 	const sal_Int32* pWasUsed = rWasUsed.getConstArray();
232 	for (sal_uInt16 i = 0; i < nCount; i++, pWasUsed++)
233 	{
234 		std::pair<SvXMLuInt32Set::iterator, bool> aPair = aWasUsed.insert( *pWasUsed );
235 		if (aPair.second)
236 			nWasUsedCount++;
237 	}
238 }
239 
240 //-------------------------------------------------------------------------
241 
SvXMLNumFmtExport(SvXMLExport & rExp,const uno::Reference<util::XNumberFormatsSupplier> & rSupp)242 SvXMLNumFmtExport::SvXMLNumFmtExport(
243             SvXMLExport& rExp,
244 			const uno::Reference< util::XNumberFormatsSupplier >& rSupp ) :
245 	rExport( rExp ),
246 	sPrefix( OUString::createFromAscii( "N" ) ),
247 	pFormatter( NULL ),
248 	pCharClass( NULL ),
249 	pLocaleData( NULL )
250 {
251 	//	supplier must be SvNumberFormatsSupplierObj
252 	SvNumberFormatsSupplierObj* pObj =
253 					SvNumberFormatsSupplierObj::getImplementation( rSupp );
254 	if (pObj)
255 		pFormatter = pObj->GetNumberFormatter();
256 
257 	if ( pFormatter )
258 	{
259 		pCharClass = new CharClass( pFormatter->GetServiceManager(),
260 			pFormatter->GetLocale() );
261 		pLocaleData = new LocaleDataWrapper( pFormatter->GetServiceManager(),
262 			pFormatter->GetLocale() );
263 	}
264 	else
265 	{
266 		lang::Locale aLocale( MsLangId::convertLanguageToLocale( MsLangId::getSystemLanguage() ) );
267 
268 		// #110680#
269 		// pCharClass = new CharClass( ::comphelper::getProcessServiceFactory(), aLocale );
270 		// pLocaleData = new LocaleDataWrapper( ::comphelper::getProcessServiceFactory(), aLocale );
271 		pCharClass = new CharClass( rExport.getServiceFactory(), aLocale );
272 		pLocaleData = new LocaleDataWrapper( rExport.getServiceFactory(), aLocale );
273 	}
274 
275 	pUsedList = new SvXMLNumUsedList_Impl;
276 }
277 
SvXMLNumFmtExport(SvXMLExport & rExp,const::com::sun::star::uno::Reference<::com::sun::star::util::XNumberFormatsSupplier> & rSupp,const rtl::OUString & rPrefix)278 SvXMLNumFmtExport::SvXMLNumFmtExport(
279                        SvXMLExport& rExp,
280 					   const ::com::sun::star::uno::Reference<
281 						::com::sun::star::util::XNumberFormatsSupplier >& rSupp,
282 					   const rtl::OUString& rPrefix ) :
283 	rExport( rExp ),
284 	sPrefix( rPrefix ),
285 	pFormatter( NULL ),
286 	pCharClass( NULL ),
287 	pLocaleData( NULL )
288 {
289 	//	supplier must be SvNumberFormatsSupplierObj
290 	SvNumberFormatsSupplierObj* pObj =
291 					SvNumberFormatsSupplierObj::getImplementation( rSupp );
292 	if (pObj)
293 		pFormatter = pObj->GetNumberFormatter();
294 
295 	if ( pFormatter )
296 	{
297 		pCharClass = new CharClass( pFormatter->GetServiceManager(),
298 			pFormatter->GetLocale() );
299 		pLocaleData = new LocaleDataWrapper( pFormatter->GetServiceManager(),
300 			pFormatter->GetLocale() );
301 	}
302 	else
303 	{
304 		lang::Locale aLocale( MsLangId::convertLanguageToLocale( MsLangId::getSystemLanguage() ) );
305 
306 		// #110680#
307 		// pCharClass = new CharClass( ::comphelper::getProcessServiceFactory(), aLocale );
308 		// pLocaleData = new LocaleDataWrapper( ::comphelper::getProcessServiceFactory(), aLocale );
309 		pCharClass = new CharClass( rExport.getServiceFactory(), aLocale );
310 		pLocaleData = new LocaleDataWrapper( rExport.getServiceFactory(), aLocale );
311 	}
312 
313 	pUsedList = new SvXMLNumUsedList_Impl;
314 }
315 
~SvXMLNumFmtExport()316 SvXMLNumFmtExport::~SvXMLNumFmtExport()
317 {
318 	delete pUsedList;
319 	delete pLocaleData;
320 	delete pCharClass;
321 }
322 
323 //-------------------------------------------------------------------------
324 
325 //
326 //	helper methods
327 //
328 
lcl_CreateStyleName(sal_Int32 nKey,sal_Int32 nPart,sal_Bool bDefPart,const rtl::OUString & rPrefix)329 OUString lcl_CreateStyleName( sal_Int32 nKey, sal_Int32 nPart, sal_Bool bDefPart, const rtl::OUString& rPrefix )
330 {
331 	OUStringBuffer aFmtName( 10L );
332 	aFmtName.append( rPrefix );
333 	aFmtName.append( nKey );
334 	if (!bDefPart)
335 	{
336 		aFmtName.append( (sal_Unicode)'P' );
337 		aFmtName.append( nPart );
338 	}
339 	return aFmtName.makeStringAndClear();
340 }
341 
AddCalendarAttr_Impl(const OUString & rCalendar)342 void SvXMLNumFmtExport::AddCalendarAttr_Impl( const OUString& rCalendar )
343 {
344 	if ( rCalendar.getLength() )
345 	{
346 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_CALENDAR, rCalendar );
347 	}
348 }
349 
AddTextualAttr_Impl(sal_Bool bText)350 void SvXMLNumFmtExport::AddTextualAttr_Impl( sal_Bool bText )
351 {
352 	if ( bText )			// non-textual
353 	{
354 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_TEXTUAL, XML_TRUE );
355 	}
356 }
357 
AddStyleAttr_Impl(sal_Bool bLong)358 void SvXMLNumFmtExport::AddStyleAttr_Impl( sal_Bool bLong )
359 {
360 	if ( bLong )			// short is default
361 	{
362 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_STYLE, XML_LONG );
363 	}
364 }
365 
AddLanguageAttr_Impl(sal_Int32 nLang)366 void SvXMLNumFmtExport::AddLanguageAttr_Impl( sal_Int32 nLang )
367 {
368 	if ( nLang != LANGUAGE_SYSTEM )
369 	{
370 		OUString aLangStr, aCountryStr;
371         MsLangId::convertLanguageToIsoNames( (LanguageType)nLang, aLangStr, aCountryStr );
372 
373 		if (aLangStr.getLength())
374 			rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_LANGUAGE, aLangStr );
375 		if (aCountryStr.getLength())
376 			rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_COUNTRY, aCountryStr );
377 	}
378 }
379 
380 //-------------------------------------------------------------------------
381 
382 //
383 //	methods to write individual elements within a format
384 //
385 
AddToTextElement_Impl(const OUString & rString)386 void SvXMLNumFmtExport::AddToTextElement_Impl( const OUString& rString )
387 {
388 	//	append to sTextContent, write element in FinishTextElement_Impl
389 	//	to avoid several text elements following each other
390 
391 	sTextContent.append( rString );
392 }
393 
FinishTextElement_Impl()394 void SvXMLNumFmtExport::FinishTextElement_Impl()
395 {
396 	if ( sTextContent.getLength() )
397 	{
398         SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_TEXT,
399                                   sal_True, sal_False );
400 		rExport.Characters( sTextContent.makeStringAndClear() );
401 	}
402 }
403 
WriteColorElement_Impl(const Color & rColor)404 void SvXMLNumFmtExport::WriteColorElement_Impl( const Color& rColor )
405 {
406 	FinishTextElement_Impl();
407 
408 	OUStringBuffer aColStr( 7 );
409 	SvXMLUnitConverter::convertColor( aColStr, rColor );
410 	rExport.AddAttribute( XML_NAMESPACE_FO, XML_COLOR,
411                           aColStr.makeStringAndClear() );
412 
413     SvXMLElementExport aElem( rExport, XML_NAMESPACE_STYLE, XML_TEXT_PROPERTIES,
414                               sal_True, sal_False );
415 }
416 
WriteCurrencyElement_Impl(const OUString & rString,const OUString & rExt)417 void SvXMLNumFmtExport::WriteCurrencyElement_Impl( const OUString& rString,
418 													const OUString& rExt )
419 {
420 	FinishTextElement_Impl();
421 
422 	if ( rExt.getLength() )
423 	{
424 		sal_Int32 nLang = rExt.toInt32(16);		// hex
425 		if ( nLang < 0 )						// extension string may contain "-" separator
426 			nLang = -nLang;
427 		AddLanguageAttr_Impl( nLang );			// adds to pAttrList
428 	}
429 
430     SvXMLElementExport aElem( rExport,
431                               XML_NAMESPACE_NUMBER, XML_CURRENCY_SYMBOL,
432                               sal_True, sal_False );
433 	rExport.Characters( rString );
434 }
435 
WriteBooleanElement_Impl()436 void SvXMLNumFmtExport::WriteBooleanElement_Impl()
437 {
438 	FinishTextElement_Impl();
439 
440     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_BOOLEAN,
441                               sal_True, sal_False );
442 }
443 
WriteTextContentElement_Impl()444 void SvXMLNumFmtExport::WriteTextContentElement_Impl()
445 {
446 	FinishTextElement_Impl();
447 
448     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_TEXT_CONTENT,
449                               sal_True, sal_False );
450 }
451 
452 //	date elements
453 
WriteDayElement_Impl(const OUString & rCalendar,sal_Bool bLong)454 void SvXMLNumFmtExport::WriteDayElement_Impl( const OUString& rCalendar, sal_Bool bLong )
455 {
456 	FinishTextElement_Impl();
457 
458 	AddCalendarAttr_Impl( rCalendar ); // adds to pAttrList
459 	AddStyleAttr_Impl( bLong );		// adds to pAttrList
460 
461     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_DAY,
462                               sal_True, sal_False );
463 }
464 
WriteMonthElement_Impl(const OUString & rCalendar,sal_Bool bLong,sal_Bool bText)465 void SvXMLNumFmtExport::WriteMonthElement_Impl( const OUString& rCalendar, sal_Bool bLong, sal_Bool bText )
466 {
467 	FinishTextElement_Impl();
468 
469 	AddCalendarAttr_Impl( rCalendar ); // adds to pAttrList
470 	AddStyleAttr_Impl( bLong );		// adds to pAttrList
471 	AddTextualAttr_Impl( bText );	// adds to pAttrList
472 
473     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_MONTH,
474                               sal_True, sal_False );
475 }
476 
WriteYearElement_Impl(const OUString & rCalendar,sal_Bool bLong)477 void SvXMLNumFmtExport::WriteYearElement_Impl( const OUString& rCalendar, sal_Bool bLong )
478 {
479 	FinishTextElement_Impl();
480 
481 	AddCalendarAttr_Impl( rCalendar ); // adds to pAttrList
482 	AddStyleAttr_Impl( bLong );		// adds to pAttrList
483 
484     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_YEAR,
485                               sal_True, sal_False );
486 }
487 
WriteEraElement_Impl(const OUString & rCalendar,sal_Bool bLong)488 void SvXMLNumFmtExport::WriteEraElement_Impl( const OUString& rCalendar, sal_Bool bLong )
489 {
490 	FinishTextElement_Impl();
491 
492 	AddCalendarAttr_Impl( rCalendar ); // adds to pAttrList
493 	AddStyleAttr_Impl( bLong );		// adds to pAttrList
494 
495     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_ERA,
496                               sal_True, sal_False );
497 }
498 
WriteDayOfWeekElement_Impl(const OUString & rCalendar,sal_Bool bLong)499 void SvXMLNumFmtExport::WriteDayOfWeekElement_Impl( const OUString& rCalendar, sal_Bool bLong )
500 {
501 	FinishTextElement_Impl();
502 
503 	AddCalendarAttr_Impl( rCalendar ); // adds to pAttrList
504 	AddStyleAttr_Impl( bLong );		// adds to pAttrList
505 
506     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_DAY_OF_WEEK,
507                               sal_True, sal_False );
508 }
509 
WriteWeekElement_Impl(const OUString & rCalendar)510 void SvXMLNumFmtExport::WriteWeekElement_Impl( const OUString& rCalendar )
511 {
512 	FinishTextElement_Impl();
513 
514 	AddCalendarAttr_Impl( rCalendar ); // adds to pAttrList
515 
516     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_WEEK_OF_YEAR,
517                               sal_True, sal_False );
518 }
519 
WriteQuarterElement_Impl(const OUString & rCalendar,sal_Bool bLong)520 void SvXMLNumFmtExport::WriteQuarterElement_Impl( const OUString& rCalendar, sal_Bool bLong )
521 {
522 	FinishTextElement_Impl();
523 
524 	AddCalendarAttr_Impl( rCalendar ); // adds to pAttrList
525 	AddStyleAttr_Impl( bLong );		// adds to pAttrList
526 
527     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_QUARTER,
528                               sal_True, sal_False );
529 }
530 
531 //	time elements
532 
WriteHoursElement_Impl(sal_Bool bLong)533 void SvXMLNumFmtExport::WriteHoursElement_Impl( sal_Bool bLong )
534 {
535 	FinishTextElement_Impl();
536 
537 	AddStyleAttr_Impl( bLong );		// adds to pAttrList
538 
539     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_HOURS,
540                               sal_True, sal_False );
541 }
542 
WriteMinutesElement_Impl(sal_Bool bLong)543 void SvXMLNumFmtExport::WriteMinutesElement_Impl( sal_Bool bLong )
544 {
545 	FinishTextElement_Impl();
546 
547 	AddStyleAttr_Impl( bLong );		// adds to pAttrList
548 
549     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_MINUTES,
550                               sal_True, sal_False );
551 }
552 
WriteSecondsElement_Impl(sal_Bool bLong,sal_uInt16 nDecimals)553 void SvXMLNumFmtExport::WriteSecondsElement_Impl( sal_Bool bLong, sal_uInt16 nDecimals )
554 {
555 	FinishTextElement_Impl();
556 
557 	AddStyleAttr_Impl( bLong );		// adds to pAttrList
558 	if ( nDecimals > 0 )
559 	{
560 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_DECIMAL_PLACES,
561                               OUString::valueOf( (sal_Int32) nDecimals ) );
562 	}
563 
564     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_SECONDS,
565                               sal_True, sal_False );
566 }
567 
WriteAMPMElement_Impl()568 void SvXMLNumFmtExport::WriteAMPMElement_Impl()
569 {
570 	FinishTextElement_Impl();
571 
572     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_AM_PM,
573                               sal_True, sal_False );
574 }
575 
576 //	numbers
577 
WriteNumberElement_Impl(sal_Int32 nDecimals,sal_Int32 nInteger,const OUString & rDashStr,sal_Bool bVarDecimals,sal_Bool bGrouping,sal_Int32 nTrailingThousands,const SvXMLEmbeddedTextEntryArr & rEmbeddedEntries)578 void SvXMLNumFmtExport::WriteNumberElement_Impl(
579 							sal_Int32 nDecimals, sal_Int32 nInteger,
580 							const OUString& rDashStr, sal_Bool bVarDecimals,
581 							sal_Bool bGrouping, sal_Int32 nTrailingThousands,
582 							const SvXMLEmbeddedTextEntryArr& rEmbeddedEntries )
583 {
584 	FinishTextElement_Impl();
585 
586 	//	decimals
587 	if ( nDecimals >= 0 )	// negative = automatic
588 	{
589         rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_DECIMAL_PLACES,
590                               OUString::valueOf( nDecimals ) );
591 	}
592 
593 	//	integer digits
594 	if ( nInteger >= 0 )	// negative = automatic
595 	{
596         rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_MIN_INTEGER_DIGITS,
597                               OUString::valueOf( nInteger ) );
598 	}
599 
600 	//	decimal replacement (dashes) or variable decimals (#)
601 	if ( rDashStr.getLength() || bVarDecimals )
602 	{
603 		//	variable decimals means an empty replacement string
604 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_DECIMAL_REPLACEMENT,
605                               rDashStr );
606 	}
607 
608 	//	(automatic) grouping separator
609 	if ( bGrouping )
610 	{
611 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_GROUPING, XML_TRUE );
612 	}
613 
614 	//	display-factor if there are trailing thousands separators
615 	if ( nTrailingThousands )
616 	{
617 		//	each separator character removes three digits
618 		double fFactor = ::rtl::math::pow10Exp( 1.0, 3 * nTrailingThousands );
619 
620 		OUStringBuffer aFactStr;
621 		SvXMLUnitConverter::convertDouble( aFactStr, fFactor );
622 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_DISPLAY_FACTOR, aFactStr.makeStringAndClear() );
623 	}
624 
625     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_NUMBER,
626                               sal_True, sal_True );
627 
628 	//	number:embedded-text as child elements
629 
630 	sal_uInt16 nEntryCount = rEmbeddedEntries.Count();
631 	for (sal_uInt16 nEntry=0; nEntry<nEntryCount; nEntry++)
632 	{
633 		SvXMLEmbeddedTextEntry* pObj = rEmbeddedEntries[nEntry];
634 
635 		//	position attribute
636 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_POSITION,
637 								OUString::valueOf( pObj->nFormatPos ) );
638 	    SvXMLElementExport aChildElem( rExport, XML_NAMESPACE_NUMBER, XML_EMBEDDED_TEXT,
639 			                              sal_True, sal_False );
640 
641 		//	text as element content
642         rtl::OUString aContent( pObj->aText );
643         while ( nEntry+1 < nEntryCount && rEmbeddedEntries[nEntry+1]->nFormatPos == pObj->nFormatPos )
644         {
645             // The array can contain several elements for the same position in the number
646             // (for example, literal text and space from underscores). They must be merged
647             // into a single embedded-text element.
648             aContent += rEmbeddedEntries[nEntry+1]->aText;
649             ++nEntry;
650         }
651         rExport.Characters( aContent );
652 	}
653 }
654 
WriteScientificElement_Impl(sal_Int32 nDecimals,sal_Int32 nInteger,sal_Bool bGrouping,sal_Int32 nExp)655 void SvXMLNumFmtExport::WriteScientificElement_Impl(
656 							sal_Int32 nDecimals, sal_Int32 nInteger,
657 							sal_Bool bGrouping, sal_Int32 nExp )
658 {
659 	FinishTextElement_Impl();
660 
661 	//	decimals
662 	if ( nDecimals >= 0 )	// negative = automatic
663 	{
664 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_DECIMAL_PLACES,
665                               OUString::valueOf( nDecimals ) );
666 	}
667 
668 	//	integer digits
669 	if ( nInteger >= 0 )	// negative = automatic
670 	{
671         rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_MIN_INTEGER_DIGITS,
672                               OUString::valueOf( nInteger ) );
673 	}
674 
675 	//	(automatic) grouping separator
676 	if ( bGrouping )
677 	{
678 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_GROUPING, XML_TRUE );
679 	}
680 
681 	//	exponent digits
682 	if ( nExp >= 0 )
683 	{
684         rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_MIN_EXPONENT_DIGITS,
685                               OUString::valueOf( nExp ) );
686 	}
687 
688     SvXMLElementExport aElem( rExport,
689                               XML_NAMESPACE_NUMBER, XML_SCIENTIFIC_NUMBER,
690                               sal_True, sal_False );
691 }
692 
WriteFractionElement_Impl(sal_Int32 nInteger,sal_Bool bGrouping,sal_Int32 nNumerator,sal_Int32 nDenominator)693 void SvXMLNumFmtExport::WriteFractionElement_Impl(
694 							sal_Int32 nInteger, sal_Bool bGrouping,
695 							sal_Int32 nNumerator, sal_Int32 nDenominator )
696 {
697 	FinishTextElement_Impl();
698 
699 	//	integer digits
700 	if ( nInteger >= 0 )		// negative = default (no integer part)
701 	{
702 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_MIN_INTEGER_DIGITS,
703                               OUString::valueOf( nInteger ) );
704 	}
705 
706 	//	(automatic) grouping separator
707 	if ( bGrouping )
708 	{
709 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_GROUPING, XML_TRUE );
710 	}
711 
712 	//	numerator digits
713 	if ( nNumerator >= 0 )
714 	{
715 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_MIN_NUMERATOR_DIGITS,
716                                  OUString::valueOf( nNumerator ) );
717 	}
718 
719 	//	denominator digits
720 	if ( nDenominator >= 0 )
721 	{
722 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_MIN_DENOMINATOR_DIGITS,
723                               OUString::valueOf( nDenominator ) );
724 	}
725 
726     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, XML_FRACTION,
727                               sal_True, sal_False );
728 }
729 
730 //	mapping (condition)
731 
WriteMapElement_Impl(sal_Int32 nOp,double fLimit,sal_Int32 nKey,sal_Int32 nPart)732 void SvXMLNumFmtExport::WriteMapElement_Impl( sal_Int32 nOp, double fLimit,
733 												sal_Int32 nKey, sal_Int32 nPart )
734 {
735 	FinishTextElement_Impl();
736 
737 	if ( nOp != NUMBERFORMAT_OP_NO )
738 	{
739 		// style namespace
740 
741 		OUStringBuffer aCondStr( 20L );
742 		aCondStr.appendAscii( "value()" );			//! define constant
743 		switch ( nOp )
744 		{
745 			case NUMBERFORMAT_OP_EQ: aCondStr.append( (sal_Unicode) '=' );	break;
746 			case NUMBERFORMAT_OP_NE: aCondStr.appendAscii( "<>" );			break;
747 			case NUMBERFORMAT_OP_LT: aCondStr.append( (sal_Unicode) '<' );	break;
748 			case NUMBERFORMAT_OP_LE: aCondStr.appendAscii( "<=" );			break;
749 			case NUMBERFORMAT_OP_GT: aCondStr.append( (sal_Unicode) '>' );	break;
750 			case NUMBERFORMAT_OP_GE: aCondStr.appendAscii( ">=" );			break;
751 			default:
752 				DBG_ERROR("unknown operator");
753 		}
754         ::rtl::math::doubleToUStringBuffer( aCondStr, fLimit,
755                 rtl_math_StringFormat_Automatic, rtl_math_DecimalPlaces_Max,
756                 '.', true );
757 
758 		rExport.AddAttribute( XML_NAMESPACE_STYLE, XML_CONDITION,
759                               aCondStr.makeStringAndClear() );
760 
761 		rExport.AddAttribute( XML_NAMESPACE_STYLE, XML_APPLY_STYLE_NAME,
762                               rExport.EncodeStyleName( lcl_CreateStyleName( nKey, nPart, sal_False,
763                                                    sPrefix ) ) );
764 
765         SvXMLElementExport aElem( rExport, XML_NAMESPACE_STYLE, XML_MAP,
766                                   sal_True, sal_False );
767 	}
768 }
769 
770 //-------------------------------------------------------------------------
771 //	for old (automatic) currency formats: parse currency symbol from text
772 
lcl_FindSymbol(const String & sUpperStr,const String & sCurString)773 xub_StrLen lcl_FindSymbol( const String& sUpperStr, const String& sCurString )
774 {
775 	//	search for currency symbol
776 	//	Quoting as in ImpSvNumberformatScan::Symbol_Division
777 
778 	xub_StrLen nCPos = 0;
779 	while (nCPos != STRING_NOTFOUND)
780 	{
781 		nCPos = sUpperStr.Search( sCurString, nCPos );
782 		if (nCPos != STRING_NOTFOUND)
783 		{
784 			// in Quotes?
785 			xub_StrLen nQ = SvNumberformat::GetQuoteEnd( sUpperStr, nCPos );
786 			if ( nQ == STRING_NOTFOUND )
787 			{
788 				//	dm can be escaped as "dm or \d
789 				sal_Unicode c;
790 				if ( nCPos == 0 ||
791 					((c = sUpperStr.GetChar(xub_StrLen(nCPos-1))) != '"'
792 							&& c != '\\') )
793 				{
794 					return nCPos;					// found
795 				}
796 				else
797 					nCPos++;						// continue
798 			}
799 			else
800 				nCPos = nQ + 1;						// continue after quote end
801 		}
802 	}
803 	return STRING_NOTFOUND;							// not found
804 }
805 
WriteTextWithCurrency_Impl(const OUString & rString,const::com::sun::star::lang::Locale & rLocale)806 sal_Bool SvXMLNumFmtExport::WriteTextWithCurrency_Impl( const OUString& rString,
807 							const ::com::sun::star::lang::Locale& rLocale )
808 {
809 	//	returns sal_True if currency element was written
810 
811 	sal_Bool bRet = sal_False;
812 
813 //	pLocaleData->setLocale( rLocale );
814 //	String sCurString = pLocaleData->getCurrSymbol();
815 
816 	LanguageType nLang = MsLangId::convertLocaleToLanguage( rLocale );
817 	pFormatter->ChangeIntl( nLang );
818 	String sCurString, sDummy;
819 	pFormatter->GetCompatibilityCurrency( sCurString, sDummy );
820 
821 	pCharClass->setLocale( rLocale );
822 	String sUpperStr = pCharClass->upper(rString);
823 	xub_StrLen nPos = lcl_FindSymbol( sUpperStr, sCurString );
824 	if ( nPos != STRING_NOTFOUND )
825 	{
826 		sal_Int32 nLength = rString.getLength();
827 		sal_Int32 nCurLen = sCurString.Len();
828 		sal_Int32 nCont = nPos + nCurLen;
829 
830 		//	text before currency symbol
831 		if ( nPos > 0 )
832 			AddToTextElement_Impl( rString.copy( 0, nPos ) );
833 
834 		//	currency symbol (empty string -> default)
835 		OUString sEmpty;
836 		WriteCurrencyElement_Impl( sEmpty, sEmpty );
837 		bRet = sal_True;
838 
839 		//	text after currency symbol
840 		if ( nCont < nLength )
841 			AddToTextElement_Impl( rString.copy( nCont, nLength-nCont ) );
842 	}
843 	else
844 		AddToTextElement_Impl( rString );		// simple text
845 
846 	return bRet;		// sal_True: currency element written
847 }
848 
849 //-------------------------------------------------------------------------
850 
lcl_GetDefaultCalendar(SvNumberFormatter * pFormatter,LanguageType nLang)851 OUString lcl_GetDefaultCalendar( SvNumberFormatter* pFormatter, LanguageType nLang )
852 {
853 	//	get name of first non-gregorian calendar for the language
854 
855 	OUString aCalendar;
856 	CalendarWrapper* pCalendar = pFormatter->GetCalendar();
857 	if (pCalendar)
858 	{
859 		lang::Locale aLocale( MsLangId::convertLanguageToLocale( nLang ) );
860 
861 		uno::Sequence<OUString> aCals = pCalendar->getAllCalendars( aLocale );
862 		sal_Int32 nCnt = aCals.getLength();
863 		sal_Bool bFound = sal_False;
864 		for ( sal_Int32 j=0; j < nCnt && !bFound; j++ )
865 		{
866 			if ( !aCals[j].equalsAsciiL( RTL_CONSTASCII_STRINGPARAM("gregorian") ) )
867 			{
868 				aCalendar = aCals[j];
869 				bFound = sal_True;
870 			}
871 		}
872 	}
873 	return aCalendar;
874 }
875 
876 //-------------------------------------------------------------------------
877 
lcl_IsInEmbedded(const SvXMLEmbeddedTextEntryArr & rEmbeddedEntries,sal_uInt16 nPos)878 sal_Bool lcl_IsInEmbedded( const SvXMLEmbeddedTextEntryArr& rEmbeddedEntries, sal_uInt16 nPos )
879 {
880 	sal_uInt16 nCount = rEmbeddedEntries.Count();
881 	for (sal_uInt16 i=0; i<nCount; i++)
882 		if ( rEmbeddedEntries[i]->nSourcePos == nPos )
883 			return sal_True;
884 
885 	return sal_False;		// not found
886 }
887 
lcl_IsDefaultDateFormat(const SvNumberformat & rFormat,sal_Bool bSystemDate,NfIndexTableOffset eBuiltIn)888 sal_Bool lcl_IsDefaultDateFormat( const SvNumberformat& rFormat, sal_Bool bSystemDate, NfIndexTableOffset eBuiltIn )
889 {
890 	//	make an extra loop to collect date elements, to check if it is a default format
891 	//	before adding the automatic-order attribute
892 
893 	SvXMLDateElementAttributes eDateDOW = XML_DEA_NONE;
894 	SvXMLDateElementAttributes eDateDay = XML_DEA_NONE;
895 	SvXMLDateElementAttributes eDateMonth = XML_DEA_NONE;
896 	SvXMLDateElementAttributes eDateYear = XML_DEA_NONE;
897 	SvXMLDateElementAttributes eDateHours = XML_DEA_NONE;
898 	SvXMLDateElementAttributes eDateMins = XML_DEA_NONE;
899 	SvXMLDateElementAttributes eDateSecs = XML_DEA_NONE;
900 	sal_Bool bDateNoDefault = sal_False;
901 
902 	sal_uInt16 nPos = 0;
903 	sal_Bool bEnd = sal_False;
904 	short nLastType = 0;
905 	while (!bEnd)
906 	{
907 		short nElemType = rFormat.GetNumForType( 0, nPos, sal_False );
908 		switch ( nElemType )
909 		{
910 			case 0:
911 				if ( nLastType == NF_SYMBOLTYPE_STRING )
912 					bDateNoDefault = sal_True;	// text at the end -> no default date format
913 				bEnd = sal_True;				// end of format reached
914 				break;
915 			case NF_SYMBOLTYPE_STRING:
916 			case NF_SYMBOLTYPE_DATESEP:
917 			case NF_SYMBOLTYPE_TIMESEP:
918 			case NF_SYMBOLTYPE_TIME100SECSEP:
919 				// text is ignored, except at the end
920 				break;
921 			// same mapping as in SvXMLNumFormatContext::AddNfKeyword:
922 			case NF_KEY_NN:		eDateDOW = XML_DEA_SHORT;		break;
923 			case NF_KEY_NNN:
924 			case NF_KEY_NNNN:	eDateDOW = XML_DEA_LONG;		break;
925 			case NF_KEY_D:		eDateDay = XML_DEA_SHORT;		break;
926 			case NF_KEY_DD:		eDateDay = XML_DEA_LONG;		break;
927 			case NF_KEY_M:		eDateMonth = XML_DEA_SHORT;		break;
928 			case NF_KEY_MM:		eDateMonth = XML_DEA_LONG;		break;
929 			case NF_KEY_MMM:	eDateMonth = XML_DEA_TEXTSHORT;	break;
930 			case NF_KEY_MMMM:	eDateMonth = XML_DEA_TEXTLONG;	break;
931 			case NF_KEY_YY:		eDateYear = XML_DEA_SHORT;		break;
932 			case NF_KEY_YYYY:	eDateYear = XML_DEA_LONG;		break;
933 			case NF_KEY_H:		eDateHours = XML_DEA_SHORT;		break;
934 			case NF_KEY_HH:		eDateHours = XML_DEA_LONG;		break;
935 			case NF_KEY_MI:		eDateMins = XML_DEA_SHORT;		break;
936 			case NF_KEY_MMI:	eDateMins = XML_DEA_LONG;		break;
937 			case NF_KEY_S:		eDateSecs = XML_DEA_SHORT;		break;
938 			case NF_KEY_SS:		eDateSecs = XML_DEA_LONG;		break;
939 			case NF_KEY_AP:
940 			case NF_KEY_AMPM:	break;			// AM/PM may or may not be in date/time formats -> ignore by itself
941 			default:
942 				bDateNoDefault = sal_True;		// any other element -> no default format
943 		}
944 		nLastType = nElemType;
945 		++nPos;
946 	}
947 
948 	if ( bDateNoDefault )
949 		return sal_False;						// additional elements
950 	else
951 	{
952 		NfIndexTableOffset eFound = (NfIndexTableOffset) SvXMLNumFmtDefaults::GetDefaultDateFormat(
953 				eDateDOW, eDateDay, eDateMonth, eDateYear, eDateHours, eDateMins, eDateSecs, bSystemDate );
954 
955 		return ( eFound == eBuiltIn );
956 	}
957 }
958 
959 //
960 //	export one part (condition)
961 //
962 
ExportPart_Impl(const SvNumberformat & rFormat,sal_uInt32 nKey,sal_uInt16 nPart,sal_Bool bDefPart)963 void SvXMLNumFmtExport::ExportPart_Impl( const SvNumberformat& rFormat, sal_uInt32 nKey,
964 											sal_uInt16 nPart, sal_Bool bDefPart )
965 {
966 	//!	for the default part, pass the coditions from the other parts!
967 
968 	//
969 	//	element name
970 	//
971 
972 	NfIndexTableOffset eBuiltIn = pFormatter->GetIndexTableOffset( nKey );
973 
974 	short nFmtType = 0;
975 	sal_Bool bThousand = sal_False;
976 	sal_uInt16 nPrecision = 0;
977 	sal_uInt16 nLeading = 0;
978 	rFormat.GetNumForInfo( nPart, nFmtType, bThousand, nPrecision, nLeading);
979 	nFmtType &= ~NUMBERFORMAT_DEFINED;
980 
981 	//	special treatment of builtin formats that aren't detected by normal parsing
982 	//	(the same formats that get the type set in SvNumberFormatter::ImpGenerateFormats)
983 	if ( eBuiltIn == NF_NUMBER_STANDARD )
984 		nFmtType = NUMBERFORMAT_NUMBER;
985 	else if ( eBuiltIn == NF_BOOLEAN )
986 		nFmtType = NUMBERFORMAT_LOGICAL;
987 	else if ( eBuiltIn == NF_TEXT )
988 		nFmtType = NUMBERFORMAT_TEXT;
989 
990     // #101606# An empty subformat is a valid number-style resulting in an
991     // empty display string for the condition of the subformat.
992     if ( nFmtType == NUMBERFORMAT_UNDEFINED && rFormat.GetNumForType( nPart,
993                 0, sal_False ) == 0 )
994         nFmtType = 0;
995 
996 	XMLTokenEnum eType = XML_TOKEN_INVALID;
997 	switch ( nFmtType )
998 	{
999 		// type is 0 if a format contains no recognized elements
1000 		// (like text only) - this is handled as a number-style.
1001 		case 0:
1002 		case NUMBERFORMAT_NUMBER:
1003 		case NUMBERFORMAT_SCIENTIFIC:
1004 		case NUMBERFORMAT_FRACTION:
1005 			eType = XML_NUMBER_STYLE;
1006 			break;
1007 		case NUMBERFORMAT_PERCENT:
1008 			eType = XML_PERCENTAGE_STYLE;
1009 			break;
1010 		case NUMBERFORMAT_CURRENCY:
1011 			eType = XML_CURRENCY_STYLE;
1012 			break;
1013 		case NUMBERFORMAT_DATE:
1014 		case NUMBERFORMAT_DATETIME:
1015 			eType = XML_DATE_STYLE;
1016 			break;
1017 		case NUMBERFORMAT_TIME:
1018 			eType = XML_TIME_STYLE;
1019 			break;
1020 		case NUMBERFORMAT_TEXT:
1021 			eType = XML_TEXT_STYLE;
1022 			break;
1023 		case NUMBERFORMAT_LOGICAL:
1024 			eType = XML_BOOLEAN_STYLE;
1025 			break;
1026 	}
1027     DBG_ASSERT( eType != XML_TOKEN_INVALID, "unknown format type" );
1028 
1029 	OUString sAttrValue;
1030 	sal_Bool bUserDef = ( ( rFormat.GetType() & NUMBERFORMAT_DEFINED ) != 0 );
1031 
1032 	//
1033 	//	common attributes for format
1034 	//
1035 
1036 	//	format name (generated from key) - style namespace
1037 	rExport.AddAttribute( XML_NAMESPACE_STYLE, XML_NAME,
1038                         lcl_CreateStyleName( nKey, nPart, bDefPart, sPrefix ) );
1039 
1040 	//	"volatile" attribute for styles used only in maps
1041 	if ( !bDefPart )
1042 		rExport.AddAttribute( XML_NAMESPACE_STYLE, XML_VOLATILE, XML_TRUE );
1043 
1044 	//	language / country
1045 	LanguageType nLang = rFormat.GetLanguage();
1046 	AddLanguageAttr_Impl( nLang );					// adds to pAttrList
1047 
1048 	//	title (comment)
1049 	//	titles for builtin formats are not written
1050 	sAttrValue = rFormat.GetComment();
1051 	if ( sAttrValue.getLength() && bUserDef && bDefPart )
1052 	{
1053 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_TITLE, sAttrValue );
1054 	}
1055 
1056 	//	automatic ordering for currency and date formats
1057 	//	only used for some built-in formats
1058 	sal_Bool bAutoOrder = ( eBuiltIn == NF_CURRENCY_1000INT     || eBuiltIn == NF_CURRENCY_1000DEC2 ||
1059 						eBuiltIn == NF_CURRENCY_1000INT_RED || eBuiltIn == NF_CURRENCY_1000DEC2_RED ||
1060 						eBuiltIn == NF_CURRENCY_1000DEC2_DASHED ||
1061 						eBuiltIn == NF_DATE_SYSTEM_SHORT	|| eBuiltIn == NF_DATE_SYSTEM_LONG ||
1062 						eBuiltIn == NF_DATE_SYS_MMYY		|| eBuiltIn == NF_DATE_SYS_DDMMM ||
1063 						eBuiltIn == NF_DATE_SYS_DDMMYYYY	|| eBuiltIn == NF_DATE_SYS_DDMMYY ||
1064 						eBuiltIn == NF_DATE_SYS_DMMMYY		|| eBuiltIn == NF_DATE_SYS_DMMMYYYY ||
1065 						eBuiltIn == NF_DATE_SYS_DMMMMYYYY	|| eBuiltIn == NF_DATE_SYS_NNDMMMYY ||
1066 						eBuiltIn == NF_DATE_SYS_NNDMMMMYYYY || eBuiltIn == NF_DATE_SYS_NNNNDMMMMYYYY ||
1067 						eBuiltIn == NF_DATETIME_SYSTEM_SHORT_HHMM || eBuiltIn == NF_DATETIME_SYS_DDMMYYYY_HHMMSS );
1068 
1069 	//	format source (for date and time formats)
1070 	//	only used for some built-in formats
1071 	sal_Bool bSystemDate = ( eBuiltIn == NF_DATE_SYSTEM_SHORT ||
1072 						 eBuiltIn == NF_DATE_SYSTEM_LONG  ||
1073 						 eBuiltIn == NF_DATETIME_SYSTEM_SHORT_HHMM );
1074 	sal_Bool bLongSysDate = ( eBuiltIn == NF_DATE_SYSTEM_LONG );
1075 
1076 	// check if the format definition matches the key
1077 	if ( bAutoOrder && ( nFmtType == NUMBERFORMAT_DATE || nFmtType == NUMBERFORMAT_DATETIME ) &&
1078 			!lcl_IsDefaultDateFormat( rFormat, bSystemDate, eBuiltIn ) )
1079 	{
1080 		bAutoOrder = bSystemDate = bLongSysDate = sal_False;		// don't write automatic-order attribute then
1081 	}
1082 
1083 	if ( bAutoOrder &&
1084 		( nFmtType == NUMBERFORMAT_CURRENCY || nFmtType == NUMBERFORMAT_DATE || nFmtType == NUMBERFORMAT_DATETIME ) )
1085 	{
1086 		//	#85109# format type must be checked to avoid dtd errors if
1087 		//	locale data contains other format types at the built-in positions
1088 
1089 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_AUTOMATIC_ORDER,
1090                               XML_TRUE );
1091 	}
1092 
1093 	if ( bSystemDate && bAutoOrder &&
1094 		( nFmtType == NUMBERFORMAT_DATE || nFmtType == NUMBERFORMAT_DATETIME ) )
1095 	{
1096 		//	#85109# format type must be checked to avoid dtd errors if
1097 		//	locale data contains other format types at the built-in positions
1098 
1099 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_FORMAT_SOURCE,
1100                               XML_LANGUAGE );
1101 	}
1102 
1103 	//	overflow for time formats as in [hh]:mm
1104 	//	controlled by bThousand from number format info
1105 	//	default for truncate-on-overflow is true
1106 	if ( nFmtType == NUMBERFORMAT_TIME && bThousand )
1107 	{
1108 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_TRUNCATE_ON_OVERFLOW,
1109                               XML_FALSE );
1110 	}
1111 
1112     //
1113     // Native number transliteration
1114     //
1115     ::com::sun::star::i18n::NativeNumberXmlAttributes aAttr;
1116     rFormat.GetNatNumXml( aAttr, nPart );
1117     if ( aAttr.Format.getLength() )
1118     {
1119 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_TRANSLITERATION_FORMAT,
1120                               aAttr.Format );
1121 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_TRANSLITERATION_LANGUAGE,
1122                               aAttr.Locale.Language );
1123 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_TRANSLITERATION_COUNTRY,
1124                               aAttr.Locale.Country );
1125 		rExport.AddAttribute( XML_NAMESPACE_NUMBER, XML_TRANSLITERATION_STYLE,
1126                               aAttr.Style );
1127     }
1128 
1129     //
1130     // The element
1131     //
1132     SvXMLElementExport aElem( rExport, XML_NAMESPACE_NUMBER, eType,
1133                               sal_True, sal_True );
1134 
1135 	//
1136 	//	color (properties element)
1137 	//
1138 
1139 	const Color* pCol = rFormat.GetColor( nPart );
1140 	if (pCol)
1141 		WriteColorElement_Impl(*pCol);
1142 
1143 
1144 	//	detect if there is "real" content, excluding color and maps
1145 	//!	move to implementation of Write... methods?
1146 	sal_Bool bAnyContent = sal_False;
1147 
1148 	//
1149 	//	format elements
1150 	//
1151 
1152 	SvXMLEmbeddedTextEntryArr aEmbeddedEntries(0);
1153 	if ( eBuiltIn == NF_NUMBER_STANDARD )
1154 	{
1155 		//	default number format contains just one number element
1156 		WriteNumberElement_Impl( -1, 1, OUString(), sal_False, sal_False, 0, aEmbeddedEntries );
1157 		bAnyContent = sal_True;
1158 	}
1159 	else if ( eBuiltIn == NF_BOOLEAN )
1160 	{
1161 		//	boolean format contains just one boolean element
1162 		WriteBooleanElement_Impl();
1163 		bAnyContent = sal_True;
1164 	}
1165 	else
1166 	{
1167 		//	first loop to collect attributes
1168 
1169 		sal_Bool bDecDashes  = sal_False;
1170 		sal_Bool bVarDecimals = sal_False;
1171 		sal_Bool bExpFound   = sal_False;
1172 		sal_Bool bCurrFound  = sal_False;
1173 		sal_Bool bInInteger  = sal_True;
1174 		sal_Int32 nExpDigits = 0;
1175 		sal_Int32 nIntegerSymbols = 0;			// for embedded-text, including "#"
1176 		sal_Int32 nTrailingThousands = 0;		// thousands-separators after all digits
1177 		OUString sCurrExt;
1178 		OUString aCalendar;
1179 		sal_uInt16 nPos = 0;
1180 		sal_Bool bEnd = sal_False;
1181 		while (!bEnd)
1182 		{
1183 			short nElemType = rFormat.GetNumForType( nPart, nPos, sal_False );
1184 			const XubString* pElemStr = rFormat.GetNumForString( nPart, nPos, sal_False );
1185 
1186 			switch ( nElemType )
1187 			{
1188 				case 0:
1189 					bEnd = sal_True;				// end of format reached
1190 					break;
1191 				case NF_SYMBOLTYPE_DIGIT:
1192 					if ( bExpFound && pElemStr )
1193 						nExpDigits += pElemStr->Len();
1194 					else if ( !bDecDashes && pElemStr && pElemStr->GetChar(0) == '-' )
1195 						bDecDashes = sal_True;
1196 					else if ( !bVarDecimals && !bInInteger && pElemStr && pElemStr->GetChar(0) == '#' )
1197 					{
1198 						//	If the decimal digits string starts with a '#', variable
1199 						//	decimals is assumed (for 0.###, but not 0.0##).
1200 						bVarDecimals = sal_True;
1201 					}
1202 					if ( bInInteger && pElemStr )
1203 						nIntegerSymbols += pElemStr->Len();
1204 					nTrailingThousands = 0;
1205 					break;
1206 				case NF_SYMBOLTYPE_DECSEP:
1207 					bInInteger = sal_False;
1208 					break;
1209 				case NF_SYMBOLTYPE_THSEP:
1210 					if (pElemStr)
1211 						nTrailingThousands += pElemStr->Len();		// is reset to 0 if digits follow
1212 					break;
1213 				case NF_SYMBOLTYPE_EXP:
1214 					bExpFound = sal_True;			// following digits are exponent digits
1215 					bInInteger = sal_False;
1216 					break;
1217 				case NF_SYMBOLTYPE_CURRENCY:
1218 					bCurrFound = sal_True;
1219 					break;
1220 				case NF_SYMBOLTYPE_CURREXT:
1221 					if (pElemStr)
1222 						sCurrExt = *pElemStr;
1223 					break;
1224 
1225 				// E, EE, R, RR: select non-gregorian calendar
1226 				// AAA, AAAA: calendar is switched at the position of the element
1227 				case NF_KEY_EC:
1228 				case NF_KEY_EEC:
1229 				case NF_KEY_R:
1230 				case NF_KEY_RR:
1231 					if (!aCalendar.getLength())
1232 						aCalendar = lcl_GetDefaultCalendar( pFormatter, nLang );
1233 					break;
1234 			}
1235 			++nPos;
1236 		}
1237 
1238 		//	collect strings for embedded-text (must be known before number element is written)
1239 
1240 		sal_Bool bAllowEmbedded = ( nFmtType == 0 || nFmtType == NUMBERFORMAT_NUMBER ||
1241 										nFmtType == NUMBERFORMAT_CURRENCY ||
1242 										nFmtType == NUMBERFORMAT_PERCENT );
1243 		if ( bAllowEmbedded )
1244 		{
1245 			sal_Int32 nDigitsPassed = 0;
1246 			nPos = 0;
1247 			bEnd = sal_False;
1248 			while (!bEnd)
1249 			{
1250 				short nElemType = rFormat.GetNumForType( nPart, nPos, sal_False );
1251 				const XubString* pElemStr = rFormat.GetNumForString( nPart, nPos, sal_False );
1252 
1253 				switch ( nElemType )
1254 				{
1255 					case 0:
1256 						bEnd = sal_True;				// end of format reached
1257 						break;
1258 					case NF_SYMBOLTYPE_DIGIT:
1259 						if ( pElemStr )
1260 							nDigitsPassed += pElemStr->Len();
1261 						break;
1262 					case NF_SYMBOLTYPE_STRING:
1263                     case NF_SYMBOLTYPE_BLANK:
1264                     case NF_SYMBOLTYPE_PERCENT:
1265 						if ( nDigitsPassed > 0 && nDigitsPassed < nIntegerSymbols && pElemStr )
1266 						{
1267                             //	text (literal or underscore) within the integer part of a number:number element
1268 
1269                             String aEmbeddedStr;
1270                             if ( nElemType == NF_SYMBOLTYPE_STRING || nElemType == NF_SYMBOLTYPE_PERCENT )
1271                                 aEmbeddedStr = *pElemStr;
1272                             else
1273                                 SvNumberformat::InsertBlanks( aEmbeddedStr, 0, pElemStr->GetChar(1) );
1274 
1275 							sal_Int32 nEmbedPos = nIntegerSymbols - nDigitsPassed;
1276 
1277 							SvXMLEmbeddedTextEntry* pObj = new SvXMLEmbeddedTextEntry( nPos, nEmbedPos, aEmbeddedStr );
1278 							aEmbeddedEntries.Insert( pObj, aEmbeddedEntries.Count() );
1279 						}
1280 						break;
1281 				}
1282 				++nPos;
1283 			}
1284 		}
1285 
1286 		//	final loop to write elements
1287 
1288 		sal_Bool bNumWritten = sal_False;
1289 		sal_Bool bCurrencyWritten = sal_False;
1290 		short nPrevType = 0;
1291 		nPos = 0;
1292 		bEnd = sal_False;
1293 		while (!bEnd)
1294 		{
1295 			short nElemType = rFormat.GetNumForType( nPart, nPos, sal_False );
1296 			const XubString* pElemStr = rFormat.GetNumForString( nPart, nPos, sal_False );
1297 
1298 			switch ( nElemType )
1299 			{
1300 				case 0:
1301 					bEnd = sal_True;				// end of format reached
1302 					break;
1303 				case NF_SYMBOLTYPE_STRING:
1304                 case NF_SYMBOLTYPE_DATESEP:
1305                 case NF_SYMBOLTYPE_TIMESEP:
1306                 case NF_SYMBOLTYPE_TIME100SECSEP:
1307                 case NF_SYMBOLTYPE_PERCENT:
1308 					if (pElemStr)
1309 					{
1310 						if ( ( nPrevType == NF_KEY_S || nPrevType == NF_KEY_SS ) &&
1311 							 ( nElemType == NF_SYMBOLTYPE_TIME100SECSEP ) &&
1312 							 nPrecision > 0 )
1313 						{
1314 							//	decimal separator after seconds is implied by
1315 							//	"decimal-places" attribute and must not be written
1316 							//	as text element
1317 							//!	difference between '.' and ',' is lost here
1318 						}
1319 						else if ( lcl_IsInEmbedded( aEmbeddedEntries, nPos ) )
1320 						{
1321 							//	text is written as embedded-text child of the number,
1322 							//	don't create a text element
1323 						}
1324 						else if ( nFmtType == NUMBERFORMAT_CURRENCY && !bCurrFound && !bCurrencyWritten )
1325 						{
1326 							//	automatic currency symbol is implemented as part of
1327 							//	normal text -> search for the symbol
1328 							bCurrencyWritten = WriteTextWithCurrency_Impl( *pElemStr,
1329 								MsLangId::convertLanguageToLocale( nLang ) );
1330 							bAnyContent = sal_True;
1331 						}
1332 						else
1333 							AddToTextElement_Impl( *pElemStr );
1334 					}
1335 					break;
1336 				case NF_SYMBOLTYPE_BLANK:
1337 					if ( pElemStr && !lcl_IsInEmbedded( aEmbeddedEntries, nPos ) )
1338 					{
1339 						//	turn "_x" into the number of spaces used for x in InsertBlanks in the NumberFormat
1340                         //  (#i20396# the spaces may also be in embedded-text elements)
1341 
1342 						String aBlanks;
1343 						SvNumberformat::InsertBlanks( aBlanks, 0, pElemStr->GetChar(1) );
1344 						AddToTextElement_Impl( aBlanks );
1345 					}
1346 					break;
1347                 case NF_KEY_GENERAL :
1348                         WriteNumberElement_Impl( -1, 1, OUString(), sal_False, sal_False, 0, aEmbeddedEntries );
1349                     break;
1350 				case NF_KEY_CCC:
1351 					if (pElemStr)
1352 					{
1353 						if ( bCurrencyWritten )
1354 							AddToTextElement_Impl( *pElemStr );		// never more than one currency element
1355 						else
1356 						{
1357 							//!	must be different from short automatic format
1358 							//!	but should still be empty (meaning automatic)
1359 							//	pElemStr is "CCC"
1360 
1361 							WriteCurrencyElement_Impl( *pElemStr, OUString() );
1362 							bAnyContent = sal_True;
1363 							bCurrencyWritten = sal_True;
1364 						}
1365 					}
1366 					break;
1367 				case NF_SYMBOLTYPE_CURRENCY:
1368 					if (pElemStr)
1369 					{
1370 						if ( bCurrencyWritten )
1371 							AddToTextElement_Impl( *pElemStr );		// never more than one currency element
1372 						else
1373 						{
1374 							WriteCurrencyElement_Impl( *pElemStr, sCurrExt );
1375 							bAnyContent = sal_True;
1376 							bCurrencyWritten = sal_True;
1377 						}
1378 					}
1379 					break;
1380 				case NF_SYMBOLTYPE_DIGIT:
1381 					if (!bNumWritten)			// write number part
1382 					{
1383 						switch ( nFmtType )
1384 						{
1385 							// for type 0 (not recognized as a special type),
1386 							// write a "normal" number
1387 							case 0:
1388 							case NUMBERFORMAT_NUMBER:
1389 							case NUMBERFORMAT_CURRENCY:
1390 							case NUMBERFORMAT_PERCENT:
1391 								{
1392 									//	decimals
1393 									//	only some built-in formats have automatic decimals
1394 									sal_Int32 nDecimals = nPrecision;	// from GetFormatSpecialInfo
1395 									if ( eBuiltIn == NF_NUMBER_STANDARD ||
1396 										 eBuiltIn == NF_CURRENCY_1000DEC2 ||
1397 										 eBuiltIn == NF_CURRENCY_1000DEC2_RED ||
1398 										 eBuiltIn == NF_CURRENCY_1000DEC2_CCC ||
1399 										 eBuiltIn == NF_CURRENCY_1000DEC2_DASHED )
1400 										nDecimals = -1;
1401 
1402 									//	integer digits
1403 									//	only one built-in format has automatic integer digits
1404 									sal_Int32 nInteger = nLeading;
1405 									if ( eBuiltIn == NF_NUMBER_SYSTEM )
1406 										nInteger = -1;
1407 
1408 									//	string for decimal replacement
1409 									//	has to be taken from nPrecision
1410 									//	(positive number even for automatic decimals)
1411 									String sDashStr;
1412 									if ( bDecDashes && nPrecision > 0 )
1413 										sDashStr.Fill( nPrecision, '-' );
1414 
1415 									WriteNumberElement_Impl( nDecimals, nInteger, sDashStr, bVarDecimals,
1416 														bThousand, nTrailingThousands, aEmbeddedEntries );
1417 									bAnyContent = sal_True;
1418 								}
1419 								break;
1420 							case NUMBERFORMAT_SCIENTIFIC:
1421                                 // #i43959# for scientific numbers, count all integer symbols ("0" and "#")
1422                                 // as integer digits: use nIntegerSymbols instead of nLeading
1423                                 // (use of '#' to select multiples in exponent might be added later)
1424                                 WriteScientificElement_Impl( nPrecision, nIntegerSymbols, bThousand, nExpDigits );
1425 								bAnyContent = sal_True;
1426 								break;
1427 							case NUMBERFORMAT_FRACTION:
1428                                 {
1429                                     sal_Int32 nInteger = nLeading;
1430                                     if ( pElemStr && pElemStr->GetChar(0) == '?' )
1431                                     {
1432                                         //  If the first digit character is a question mark,
1433                                         //  the fraction doesn't have an integer part, and no
1434                                         //  min-integer-digits attribute must be written.
1435                                         nInteger = -1;
1436                                     }
1437                                     WriteFractionElement_Impl( nInteger, bThousand, nPrecision, nPrecision );
1438                                     bAnyContent = sal_True;
1439                                 }
1440 								break;
1441 						}
1442 
1443 						bNumWritten = sal_True;
1444 					}
1445 					break;
1446                 case NF_SYMBOLTYPE_DECSEP:
1447                     if ( pElemStr && nPrecision == 0 )
1448                     {
1449                         //  A decimal separator after the number, without following decimal digits,
1450                         //  isn't modelled as part of the number element, so it's written as text
1451                         //  (the distinction between a quoted and non-quoted, locale-dependent
1452                         //  character is lost here).
1453 
1454                         AddToTextElement_Impl( *pElemStr );
1455                     }
1456                     break;
1457 				case NF_SYMBOLTYPE_DEL:
1458 					if ( pElemStr && *pElemStr == XubString('@') )
1459 					{
1460 						WriteTextContentElement_Impl();
1461 						bAnyContent = sal_True;
1462 					}
1463 					break;
1464 
1465 				case NF_SYMBOLTYPE_CALENDAR:
1466 					if ( pElemStr )
1467 						aCalendar = *pElemStr;
1468 					break;
1469 
1470 				// date elements:
1471 
1472 				case NF_KEY_D:
1473 				case NF_KEY_DD:
1474 					{
1475 						sal_Bool bLong = ( nElemType == NF_KEY_DD );
1476 						WriteDayElement_Impl( aCalendar, ( bSystemDate ? bLongSysDate : bLong ) );
1477 						bAnyContent = sal_True;
1478 					}
1479 					break;
1480 				case NF_KEY_DDD:
1481 				case NF_KEY_DDDD:
1482 				case NF_KEY_NN:
1483 				case NF_KEY_NNN:
1484 				case NF_KEY_NNNN:
1485 				case NF_KEY_AAA:
1486 				case NF_KEY_AAAA:
1487 					{
1488 						OUString aCalAttr = aCalendar;
1489 						if ( nElemType == NF_KEY_AAA || nElemType == NF_KEY_AAAA )
1490 						{
1491 							//	calendar attribute for AAA and AAAA is switched only for this element
1492 							if (!aCalAttr.getLength())
1493 								aCalAttr = lcl_GetDefaultCalendar( pFormatter, nLang );
1494 						}
1495 
1496 						sal_Bool bLong = ( nElemType == NF_KEY_NNN || nElemType == NF_KEY_NNNN ||
1497 										   nElemType == NF_KEY_DDDD || nElemType == NF_KEY_AAAA );
1498 						WriteDayOfWeekElement_Impl( aCalAttr, ( bSystemDate ? bLongSysDate : bLong ) );
1499 						bAnyContent = sal_True;
1500 						if ( nElemType == NF_KEY_NNNN )
1501 						{
1502 							//	write additional text element for separator
1503 							pLocaleData->setLocale( MsLangId::convertLanguageToLocale( nLang ) );
1504 							AddToTextElement_Impl( pLocaleData->getLongDateDayOfWeekSep() );
1505 						}
1506 					}
1507 					break;
1508 				case NF_KEY_M:
1509 				case NF_KEY_MM:
1510 				case NF_KEY_MMM:
1511 				case NF_KEY_MMMM:
1512 				case NF_KEY_MMMMM:		//! first letter of month name, no attribute available
1513 					{
1514 						sal_Bool bLong = ( nElemType == NF_KEY_MM  || nElemType == NF_KEY_MMMM );
1515 						sal_Bool bText = ( nElemType == NF_KEY_MMM || nElemType == NF_KEY_MMMM ||
1516 											nElemType == NF_KEY_MMMMM );
1517 						WriteMonthElement_Impl( aCalendar, ( bSystemDate ? bLongSysDate : bLong ), bText );
1518 						bAnyContent = sal_True;
1519 					}
1520 					break;
1521 				case NF_KEY_YY:
1522 				case NF_KEY_YYYY:
1523 				case NF_KEY_EC:
1524 				case NF_KEY_EEC:
1525 				case NF_KEY_R:		//! R acts as EE, no attribute available
1526 					{
1527 						//! distinguish EE and R
1528 						//	calendar attribute for E and EE and R is set in first loop
1529 						sal_Bool bLong = ( nElemType == NF_KEY_YYYY || nElemType == NF_KEY_EEC ||
1530 											nElemType == NF_KEY_R );
1531 						WriteYearElement_Impl( aCalendar, ( bSystemDate ? bLongSysDate : bLong ) );
1532 						bAnyContent = sal_True;
1533 					}
1534 					break;
1535 				case NF_KEY_G:
1536 				case NF_KEY_GG:
1537 				case NF_KEY_GGG:
1538 				case NF_KEY_RR:		//! RR acts as GGGEE, no attribute available
1539 					{
1540 						//!	distinguish GG and GGG and RR
1541 						sal_Bool bLong = ( nElemType == NF_KEY_GGG || nElemType == NF_KEY_RR );
1542 						WriteEraElement_Impl( aCalendar, ( bSystemDate ? bLongSysDate : bLong ) );
1543 						bAnyContent = sal_True;
1544 						if ( nElemType == NF_KEY_RR )
1545 						{
1546 							//	calendar attribute for RR is set in first loop
1547 							WriteYearElement_Impl( aCalendar, ( bSystemDate ? bLongSysDate : sal_True ) );
1548 						}
1549 					}
1550 					break;
1551 				case NF_KEY_Q:
1552 				case NF_KEY_QQ:
1553 					{
1554 						sal_Bool bLong = ( nElemType == NF_KEY_QQ );
1555 						WriteQuarterElement_Impl( aCalendar, ( bSystemDate ? bLongSysDate : bLong ) );
1556 						bAnyContent = sal_True;
1557 					}
1558 					break;
1559 				case NF_KEY_WW:
1560 					WriteWeekElement_Impl( aCalendar );
1561 					bAnyContent = sal_True;
1562 					break;
1563 
1564 				// time elements (bSystemDate is not used):
1565 
1566 				case NF_KEY_H:
1567 				case NF_KEY_HH:
1568 					WriteHoursElement_Impl( nElemType == NF_KEY_HH );
1569 					bAnyContent = sal_True;
1570 					break;
1571 				case NF_KEY_MI:
1572 				case NF_KEY_MMI:
1573 					WriteMinutesElement_Impl( nElemType == NF_KEY_MMI );
1574 					bAnyContent = sal_True;
1575 					break;
1576 				case NF_KEY_S:
1577 				case NF_KEY_SS:
1578 					WriteSecondsElement_Impl( ( nElemType == NF_KEY_SS ), nPrecision );
1579 					bAnyContent = sal_True;
1580 					break;
1581 				case NF_KEY_AMPM:
1582 				case NF_KEY_AP:
1583 					WriteAMPMElement_Impl();		// short/long?
1584 					bAnyContent = sal_True;
1585 					break;
1586 			}
1587 			nPrevType = nElemType;
1588 			++nPos;
1589 		}
1590 	}
1591 
1592 	if ( sTextContent.getLength() )
1593 		bAnyContent = sal_True;		// element written in FinishTextElement_Impl
1594 
1595 	FinishTextElement_Impl();		// final text element - before maps
1596 
1597 	if ( !bAnyContent )
1598 	{
1599 		//	for an empty format, write an empty text element
1600         SvXMLElementExport aTElem( rExport, XML_NAMESPACE_NUMBER, XML_TEXT,
1601                                    sal_True, sal_False );
1602 	}
1603 
1604 	//
1605 	//	mapping (conditions) must be last elements
1606 	//
1607 
1608 	if (bDefPart)
1609 	{
1610 		SvNumberformatLimitOps eOp1, eOp2;
1611 		double fLimit1, fLimit2;
1612 		rFormat.GetConditions( eOp1, fLimit1, eOp2, fLimit2 );
1613 
1614 		WriteMapElement_Impl( eOp1, fLimit1, nKey, 0 );
1615 		WriteMapElement_Impl( eOp2, fLimit2, nKey, 1 );
1616 
1617 		if ( rFormat.HasTextFormat() )
1618 		{
1619 			//	4th part is for text -> make an "all other numbers" condition for the 3rd part
1620 			//	by reversing the 2nd condition
1621 
1622 			SvNumberformatLimitOps eOp3 = NUMBERFORMAT_OP_NO;
1623 			double fLimit3 = fLimit2;
1624 			switch ( eOp2 )
1625 			{
1626 				case NUMBERFORMAT_OP_EQ: eOp3 = NUMBERFORMAT_OP_NE; break;
1627 				case NUMBERFORMAT_OP_NE: eOp3 = NUMBERFORMAT_OP_EQ; break;
1628 				case NUMBERFORMAT_OP_LT: eOp3 = NUMBERFORMAT_OP_GE; break;
1629 				case NUMBERFORMAT_OP_LE: eOp3 = NUMBERFORMAT_OP_GT; break;
1630 				case NUMBERFORMAT_OP_GT: eOp3 = NUMBERFORMAT_OP_LE; break;
1631 				case NUMBERFORMAT_OP_GE: eOp3 = NUMBERFORMAT_OP_LT; break;
1632 				default:
1633 					break;
1634 			}
1635 
1636 			if ( fLimit1 == fLimit2 &&
1637 					( ( eOp1 == NUMBERFORMAT_OP_LT && eOp2 == NUMBERFORMAT_OP_GT ) ||
1638 					  ( eOp1 == NUMBERFORMAT_OP_GT && eOp2 == NUMBERFORMAT_OP_LT ) ) )
1639 			{
1640 				//	For <x and >x, add =x as last condition
1641 				//	(just for readability, <=x would be valid, too)
1642 
1643 				eOp3 = NUMBERFORMAT_OP_EQ;
1644 			}
1645 
1646 			WriteMapElement_Impl( eOp3, fLimit3, nKey, 2 );
1647 		}
1648 	}
1649 }
1650 
1651 //-------------------------------------------------------------------------
1652 
1653 //
1654 //	export one format
1655 //
1656 
ExportFormat_Impl(const SvNumberformat & rFormat,sal_uInt32 nKey)1657 void SvXMLNumFmtExport::ExportFormat_Impl( const SvNumberformat& rFormat, sal_uInt32 nKey )
1658 {
1659 	sal_uInt16 nUsedParts = 0;
1660 	sal_uInt16 nPart;
1661 	for (nPart=0; nPart<XMLNUM_MAX_PARTS; nPart++)
1662 		if (rFormat.GetNumForType( nPart, 0, sal_False ) != 0)
1663 			nUsedParts = nPart+1;
1664 
1665 	SvNumberformatLimitOps eOp1, eOp2;
1666 	double fLimit1, fLimit2;
1667 	rFormat.GetConditions( eOp1, fLimit1, eOp2, fLimit2 );
1668 
1669 	//	if conditions are set, even empty formats must be written
1670 
1671 	if ( eOp1 != NUMBERFORMAT_OP_NO && nUsedParts < 2 )
1672 		nUsedParts = 2;
1673 	if ( eOp2 != NUMBERFORMAT_OP_NO && nUsedParts < 3 )
1674 		nUsedParts = 3;
1675 	if ( rFormat.HasTextFormat() && nUsedParts < 4 )
1676 		nUsedParts = 4;
1677 
1678 	for (nPart=0; nPart<nUsedParts; nPart++)
1679 	{
1680 		sal_Bool bDefault = ( nPart+1 == nUsedParts );			// last = default
1681 		ExportPart_Impl( rFormat, nKey, nPart, bDefault );
1682 	}
1683 }
1684 
1685 //-------------------------------------------------------------------------
1686 
1687 //
1688 //	export method called by application
1689 //
1690 
Export(sal_Bool bIsAutoStyle)1691 void SvXMLNumFmtExport::Export( sal_Bool bIsAutoStyle )
1692 {
1693 	if ( !pFormatter )
1694 		return;							// no formatter -> no entries
1695 
1696 	sal_uInt32 nKey;
1697 	const SvNumberformat* pFormat = NULL;
1698 	sal_Bool bNext(pUsedList->GetFirstUsed(nKey));
1699 	while(bNext)
1700 	{
1701 		pFormat = pFormatter->GetEntry(nKey);
1702 		if(pFormat)
1703 			ExportFormat_Impl( *pFormat, nKey );
1704 		bNext = pUsedList->GetNextUsed(nKey);
1705 	}
1706 	if (!bIsAutoStyle)
1707 	{
1708 		SvUShorts aLanguages;
1709 		pFormatter->GetUsedLanguages( aLanguages );
1710 		sal_uInt16 nLangCount = aLanguages.Count();
1711 		for (sal_uInt16 nLangPos=0; nLangPos<nLangCount; nLangPos++)
1712 		{
1713 			LanguageType nLang = aLanguages[nLangPos];
1714 
1715 			sal_uInt32 nDefaultIndex = 0;
1716 			SvNumberFormatTable& rTable = pFormatter->GetEntryTable(
1717 											NUMBERFORMAT_DEFINED, nDefaultIndex, nLang );
1718 			pFormat = rTable.First();
1719 			while (pFormat)
1720 			{
1721 				nKey = rTable.GetCurKey();
1722 				if (!pUsedList->IsUsed(nKey))
1723 				{
1724 					DBG_ASSERT((pFormat->GetType() & NUMBERFORMAT_DEFINED) != 0, "a not user defined numberformat found");
1725 					//	user-defined and used formats are exported
1726 					ExportFormat_Impl( *pFormat, nKey );
1727 					// if it is a user-defined Format it will be added else nothing will happen
1728 					pUsedList->SetUsed(nKey);
1729 				}
1730 
1731 				pFormat = rTable.Next();
1732 			}
1733 		}
1734 	}
1735 	pUsedList->Export();
1736 }
1737 
GetStyleName(sal_uInt32 nKey)1738 OUString SvXMLNumFmtExport::GetStyleName( sal_uInt32 nKey )
1739 {
1740 	if(pUsedList->IsUsed(nKey) || pUsedList->IsWasUsed(nKey))
1741 		return lcl_CreateStyleName( nKey, 0, sal_True, sPrefix );
1742 	else
1743 	{
1744 		DBG_ERROR("There is no written Data-Style");
1745 		return rtl::OUString();
1746 	}
1747 }
1748 
SetUsed(sal_uInt32 nKey)1749 void SvXMLNumFmtExport::SetUsed( sal_uInt32 nKey )
1750 {
1751     DBG_ASSERT( pFormatter != NULL, "missing formatter" );
1752     if( !pFormatter )
1753         return;
1754 
1755 	if (pFormatter->GetEntry(nKey))
1756 		pUsedList->SetUsed( nKey );
1757 	else {
1758 		DBG_ERROR("no existing Numberformat found with this key");
1759     }
1760 }
1761 
GetWasUsed(uno::Sequence<sal_Int32> & rWasUsed)1762 void SvXMLNumFmtExport::GetWasUsed(uno::Sequence<sal_Int32>& rWasUsed)
1763 {
1764 	if (pUsedList)
1765 		pUsedList->GetWasUsed(rWasUsed);
1766 }
1767 
SetWasUsed(const uno::Sequence<sal_Int32> & rWasUsed)1768 void SvXMLNumFmtExport::SetWasUsed(const uno::Sequence<sal_Int32>& rWasUsed)
1769 {
1770 	if (pUsedList)
1771 		pUsedList->SetWasUsed(rWasUsed);
1772 }
1773 
1774 
1775 
lcl_GetFormat(SvNumberFormatter * pFormatter,sal_uInt32 nKey)1776 const SvNumberformat* lcl_GetFormat( SvNumberFormatter* pFormatter,
1777                            sal_uInt32 nKey )
1778 {
1779     return ( pFormatter != NULL ) ? pFormatter->GetEntry( nKey ) : NULL;
1780 }
1781 
ForceSystemLanguage(sal_uInt32 nKey)1782 sal_uInt32 SvXMLNumFmtExport::ForceSystemLanguage( sal_uInt32 nKey )
1783 {
1784     sal_uInt32 nRet = nKey;
1785 
1786     const SvNumberformat* pFormat = lcl_GetFormat( pFormatter, nKey );
1787     if( pFormat != NULL )
1788     {
1789         DBG_ASSERT( pFormatter != NULL, "format without formatter?" );
1790 
1791         xub_StrLen nErrorPos;
1792         short nType = pFormat->GetType();
1793 
1794         sal_uInt32 nNewKey = pFormatter->GetFormatForLanguageIfBuiltIn(
1795                        nKey, LANGUAGE_SYSTEM );
1796 
1797         if( nNewKey != nKey )
1798         {
1799             nRet = nNewKey;
1800         }
1801         else
1802         {
1803             String aFormatString( pFormat->GetFormatstring() );
1804             pFormatter->PutandConvertEntry(
1805                             aFormatString,
1806                             nErrorPos, nType, nNewKey,
1807                             pFormat->GetLanguage(), LANGUAGE_SYSTEM );
1808 
1809             // success? Then use new key.
1810             if( nErrorPos == 0 )
1811                 nRet = nNewKey;
1812         }
1813     }
1814 
1815     return nRet;
1816 }
1817