Line data Source code
1 : /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 : /*
3 : * This file is part of the LibreOffice project.
4 : *
5 : * This Source Code Form is subject to the terms of the Mozilla Public
6 : * License, v. 2.0. If a copy of the MPL was not distributed with this
7 : * file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 : *
9 : * This file incorporates work covered by the following license notice:
10 : *
11 : * Licensed to the Apache Software Foundation (ASF) under one or more
12 : * contributor license agreements. See the NOTICE file distributed
13 : * with this work for additional information regarding copyright
14 : * ownership. The ASF licenses this file to you under the Apache
15 : * License, Version 2.0 (the "License"); you may not use this file
16 : * except in compliance with the License. You may obtain a copy of
17 : * the License at http://www.apache.org/licenses/LICENSE-2.0 .
18 : */
19 :
20 : #include "xepivot.hxx"
21 : #include <com/sun/star/sheet/DataPilotFieldSortInfo.hpp>
22 : #include <com/sun/star/sheet/DataPilotFieldAutoShowInfo.hpp>
23 : #include <com/sun/star/sheet/DataPilotFieldLayoutInfo.hpp>
24 : #include <com/sun/star/sheet/DataPilotFieldReference.hpp>
25 : #include <com/sun/star/sheet/DataPilotFieldGroupBy.hpp>
26 :
27 : #include <algorithm>
28 : #include <math.h>
29 :
30 : #include <rtl/math.hxx>
31 : #include <tools/date.hxx>
32 : #include <svl/zformat.hxx>
33 : #include <sot/storage.hxx>
34 : #include "document.hxx"
35 : #include "dpobject.hxx"
36 : #include "dpsave.hxx"
37 : #include "dpdimsave.hxx"
38 : #include "dpshttab.hxx"
39 : #include "globstr.hrc"
40 : #include "fapihelper.hxx"
41 : #include "xestring.hxx"
42 : #include "xelink.hxx"
43 : #include "dputil.hxx"
44 :
45 : using namespace ::oox;
46 :
47 : using ::com::sun::star::sheet::DataPilotFieldOrientation;
48 : using ::com::sun::star::sheet::DataPilotFieldOrientation_HIDDEN;
49 : using ::com::sun::star::sheet::DataPilotFieldOrientation_ROW;
50 : using ::com::sun::star::sheet::DataPilotFieldOrientation_COLUMN;
51 : using ::com::sun::star::sheet::DataPilotFieldOrientation_PAGE;
52 : using ::com::sun::star::sheet::DataPilotFieldOrientation_DATA;
53 : using ::com::sun::star::sheet::GeneralFunction;
54 : using ::com::sun::star::sheet::DataPilotFieldSortInfo;
55 : using ::com::sun::star::sheet::DataPilotFieldAutoShowInfo;
56 : using ::com::sun::star::sheet::DataPilotFieldLayoutInfo;
57 : using ::com::sun::star::sheet::DataPilotFieldReference;
58 :
59 : // Pivot cache
60 :
61 :
62 : namespace {
63 :
64 : // constants to track occurrence of specific data types
65 : const sal_uInt16 EXC_PCITEM_DATA_STRING = 0x0001; /// String, empty, boolean, error.
66 : const sal_uInt16 EXC_PCITEM_DATA_DOUBLE = 0x0002; /// Double with fraction.
67 : const sal_uInt16 EXC_PCITEM_DATA_INTEGER = 0x0004; /// Integer, double without fraction.
68 : const sal_uInt16 EXC_PCITEM_DATA_DATE = 0x0008; /// Date, time, date/time.
69 :
70 : /** Maps a bitfield consisting of EXC_PCITEM_DATA_* flags above to SXFIELD data type bitfield. */
71 : static const sal_uInt16 spnPCItemFlags[] =
72 : { // STR DBL INT DAT
73 : EXC_SXFIELD_DATA_NONE,
74 : EXC_SXFIELD_DATA_STR, // x
75 : EXC_SXFIELD_DATA_INT, // x
76 : EXC_SXFIELD_DATA_STR_INT, // x x
77 : EXC_SXFIELD_DATA_DBL, // x
78 : EXC_SXFIELD_DATA_STR_DBL, // x x
79 : EXC_SXFIELD_DATA_INT, // x x
80 : EXC_SXFIELD_DATA_STR_INT, // x x x
81 : EXC_SXFIELD_DATA_DATE, // x
82 : EXC_SXFIELD_DATA_DATE_STR, // x x
83 : EXC_SXFIELD_DATA_DATE_NUM, // x x
84 : EXC_SXFIELD_DATA_DATE_STR, // x x x
85 : EXC_SXFIELD_DATA_DATE_NUM, // x x
86 : EXC_SXFIELD_DATA_DATE_STR, // x x x
87 : EXC_SXFIELD_DATA_DATE_NUM, // x x x
88 : EXC_SXFIELD_DATA_DATE_STR // x x x x
89 : };
90 :
91 : } // namespace
92 :
93 0 : XclExpPCItem::XclExpPCItem( const OUString& rText ) :
94 0 : XclExpRecord( (!rText.isEmpty()) ? EXC_ID_SXSTRING : EXC_ID_SXEMPTY, 0 ),
95 0 : mnTypeFlag( EXC_PCITEM_DATA_STRING )
96 : {
97 0 : if( !rText.isEmpty() )
98 0 : SetText( rText );
99 : else
100 0 : SetEmpty();
101 0 : }
102 :
103 0 : XclExpPCItem::XclExpPCItem( double fValue ) :
104 0 : XclExpRecord( EXC_ID_SXDOUBLE, 8 )
105 : {
106 0 : SetDouble( fValue );
107 0 : mnTypeFlag = (fValue - floor( fValue ) == 0.0) ?
108 0 : EXC_PCITEM_DATA_INTEGER : EXC_PCITEM_DATA_DOUBLE;
109 0 : }
110 :
111 0 : XclExpPCItem::XclExpPCItem( const DateTime& rDateTime ) :
112 0 : XclExpRecord( EXC_ID_SXDATETIME, 8 )
113 : {
114 0 : SetDateTime( rDateTime );
115 0 : mnTypeFlag = EXC_PCITEM_DATA_DATE;
116 0 : }
117 :
118 0 : XclExpPCItem::XclExpPCItem( sal_Int16 nValue ) :
119 : XclExpRecord( EXC_ID_SXINTEGER, 2 ),
120 0 : mnTypeFlag( EXC_PCITEM_DATA_INTEGER )
121 : {
122 0 : SetInteger( nValue );
123 0 : }
124 :
125 0 : XclExpPCItem::XclExpPCItem( bool bValue ) :
126 : XclExpRecord( EXC_ID_SXBOOLEAN, 2 ),
127 0 : mnTypeFlag( EXC_PCITEM_DATA_STRING )
128 : {
129 0 : SetBool( bValue );
130 0 : }
131 :
132 0 : bool XclExpPCItem::EqualsText( const OUString& rText ) const
133 : {
134 0 : return rText.isEmpty() ? IsEmpty() : (GetText() && (*GetText() == rText));
135 : }
136 :
137 0 : bool XclExpPCItem::EqualsDouble( double fValue ) const
138 : {
139 0 : return GetDouble() && (*GetDouble() == fValue);
140 : }
141 :
142 0 : bool XclExpPCItem::EqualsDateTime( const DateTime& rDateTime ) const
143 : {
144 0 : return GetDateTime() && (*GetDateTime() == rDateTime);
145 : }
146 :
147 0 : bool XclExpPCItem::EqualsBool( bool bValue ) const
148 : {
149 0 : return GetBool() && (*GetBool() == bValue);
150 : }
151 :
152 0 : void XclExpPCItem::WriteBody( XclExpStream& rStrm )
153 : {
154 0 : if( const OUString* pText = GetText() )
155 : {
156 0 : rStrm << XclExpString( *pText );
157 : }
158 0 : else if( const double* pfValue = GetDouble() )
159 : {
160 0 : rStrm << *pfValue;
161 : }
162 0 : else if( const sal_Int16* pnValue = GetInteger() )
163 : {
164 0 : rStrm << *pnValue;
165 : }
166 0 : else if( const DateTime* pDateTime = GetDateTime() )
167 : {
168 0 : sal_uInt16 nYear = static_cast< sal_uInt16 >( pDateTime->GetYear() );
169 0 : sal_uInt16 nMonth = static_cast< sal_uInt16 >( pDateTime->GetMonth() );
170 0 : sal_uInt8 nDay = static_cast< sal_uInt8 >( pDateTime->GetDay() );
171 0 : sal_uInt8 nHour = static_cast< sal_uInt8 >( pDateTime->GetHour() );
172 0 : sal_uInt8 nMin = static_cast< sal_uInt8 >( pDateTime->GetMin() );
173 0 : sal_uInt8 nSec = static_cast< sal_uInt8 >( pDateTime->GetSec() );
174 0 : if( nYear < 1900 ) { nYear = 1900; nMonth = 1; nDay = 0; }
175 0 : rStrm << nYear << nMonth << nDay << nHour << nMin << nSec;
176 : }
177 0 : else if( const bool* pbValue = GetBool() )
178 : {
179 0 : rStrm << static_cast< sal_uInt16 >( *pbValue ? 1 : 0 );
180 : }
181 : else
182 : {
183 : // nothing to do for SXEMPTY
184 : OSL_ENSURE( IsEmpty(), "XclExpPCItem::WriteBody - no data found" );
185 : }
186 0 : }
187 :
188 0 : XclExpPCField::XclExpPCField(
189 : const XclExpRoot& rRoot, const XclExpPivotCache& rPCache, sal_uInt16 nFieldIdx,
190 : const ScDPObject& rDPObj, const ScRange& rRange ) :
191 : XclExpRecord( EXC_ID_SXFIELD ),
192 : XclPCField( EXC_PCFIELD_STANDARD, nFieldIdx ),
193 : XclExpRoot( rRoot ),
194 : mrPCache( rPCache ),
195 0 : mnTypeFlags( 0 )
196 : {
197 : // general settings for the standard field, insert all items from source range
198 0 : InitStandardField( rRange );
199 :
200 : // add special settings for inplace numeric grouping
201 0 : if( const ScDPSaveData* pSaveData = rDPObj.GetSaveData() )
202 : {
203 0 : if( const ScDPDimensionSaveData* pSaveDimData = pSaveData->GetExistingDimensionData() )
204 : {
205 0 : if( const ScDPSaveNumGroupDimension* pNumGroupDim = pSaveDimData->GetNumGroupDim( GetFieldName() ) )
206 : {
207 0 : const ScDPNumGroupInfo& rNumInfo = pNumGroupDim->GetInfo();
208 0 : const ScDPNumGroupInfo& rDateInfo = pNumGroupDim->GetDateInfo();
209 : OSL_ENSURE( !rNumInfo.mbEnable || !rDateInfo.mbEnable,
210 : "XclExpPCField::XclExpPCField - numeric and date grouping enabled" );
211 :
212 0 : if( rNumInfo.mbEnable )
213 0 : InitNumGroupField( rDPObj, rNumInfo );
214 0 : else if( rDateInfo.mbEnable )
215 0 : InitDateGroupField( rDPObj, rDateInfo, pNumGroupDim->GetDatePart() );
216 : }
217 : }
218 : }
219 :
220 : // final settings (flags, item numbers)
221 0 : Finalize();
222 0 : }
223 :
224 0 : XclExpPCField::XclExpPCField(
225 : const XclExpRoot& rRoot, const XclExpPivotCache& rPCache, sal_uInt16 nFieldIdx,
226 : const ScDPObject& rDPObj, const ScDPSaveGroupDimension& rGroupDim, const XclExpPCField& rBaseField ) :
227 : XclExpRecord( EXC_ID_SXFIELD ),
228 : XclPCField( EXC_PCFIELD_STDGROUP, nFieldIdx ),
229 : XclExpRoot( rRoot ),
230 : mrPCache( rPCache ),
231 0 : mnTypeFlags( 0 )
232 : {
233 : // add base field info (always using first base field, not predecessor of this field) ***
234 : OSL_ENSURE( rBaseField.GetFieldName() == rGroupDim.GetSourceDimName(),
235 : "XclExpPCField::FillFromGroup - wrong base cache field" );
236 0 : maFieldInfo.maName = rGroupDim.GetGroupDimName();
237 0 : maFieldInfo.mnGroupBase = rBaseField.GetFieldIndex();
238 :
239 : // add standard group info or date group info
240 0 : const ScDPNumGroupInfo& rDateInfo = rGroupDim.GetDateInfo();
241 0 : if( rDateInfo.mbEnable && (rGroupDim.GetDatePart() != 0) )
242 0 : InitDateGroupField( rDPObj, rDateInfo, rGroupDim.GetDatePart() );
243 : else
244 0 : InitStdGroupField( rBaseField, rGroupDim );
245 :
246 : // final settings (flags, item numbers)
247 0 : Finalize();
248 0 : }
249 :
250 0 : XclExpPCField::~XclExpPCField()
251 : {
252 0 : }
253 :
254 0 : void XclExpPCField::SetGroupChildField( const XclExpPCField& rChildField )
255 : {
256 : OSL_ENSURE( !::get_flag( maFieldInfo.mnFlags, EXC_SXFIELD_HASCHILD ),
257 : "XclExpPCField::SetGroupChildIndex - field already has a grouping child field" );
258 0 : ::set_flag( maFieldInfo.mnFlags, EXC_SXFIELD_HASCHILD );
259 0 : maFieldInfo.mnGroupChild = rChildField.GetFieldIndex();
260 0 : }
261 :
262 0 : sal_uInt16 XclExpPCField::GetItemCount() const
263 : {
264 0 : return static_cast< sal_uInt16 >( GetVisItemList().GetSize() );
265 : }
266 :
267 0 : const XclExpPCItem* XclExpPCField::GetItem( sal_uInt16 nItemIdx ) const
268 : {
269 0 : return GetVisItemList().GetRecord( nItemIdx ).get();
270 : }
271 :
272 0 : sal_uInt16 XclExpPCField::GetItemIndex( const OUString& rItemName ) const
273 : {
274 0 : const XclExpPCItemList& rItemList = GetVisItemList();
275 0 : for( size_t nPos = 0, nSize = rItemList.GetSize(); nPos < nSize; ++nPos )
276 0 : if( rItemList.GetRecord( nPos )->ConvertToText() == rItemName )
277 0 : return static_cast< sal_uInt16 >( nPos );
278 0 : return EXC_PC_NOITEM;
279 : }
280 :
281 0 : sal_Size XclExpPCField::GetIndexSize() const
282 : {
283 0 : return Has16BitIndexes() ? 2 : 1;
284 : }
285 :
286 0 : void XclExpPCField::WriteIndex( XclExpStream& rStrm, sal_uInt32 nSrcRow ) const
287 : {
288 : // only standard fields write item indexes
289 0 : if( nSrcRow < maIndexVec.size() )
290 : {
291 0 : sal_uInt16 nIndex = maIndexVec[ nSrcRow ];
292 0 : if( Has16BitIndexes() )
293 0 : rStrm << nIndex;
294 : else
295 0 : rStrm << static_cast< sal_uInt8 >( nIndex );
296 : }
297 0 : }
298 :
299 0 : void XclExpPCField::Save( XclExpStream& rStrm )
300 : {
301 : OSL_ENSURE( IsSupportedField(), "XclExpPCField::Save - unknown field type" );
302 : // SXFIELD
303 0 : XclExpRecord::Save( rStrm );
304 : // SXFDBTYPE
305 0 : XclExpUInt16Record( EXC_ID_SXFDBTYPE, EXC_SXFDBTYPE_DEFAULT ).Save( rStrm );
306 : // list of grouping items
307 0 : maGroupItemList.Save( rStrm );
308 : // SXGROUPINFO
309 0 : WriteSxgroupinfo( rStrm );
310 : // SXNUMGROUP and additional grouping items (grouping limit settings)
311 0 : WriteSxnumgroup( rStrm );
312 : // list of original items
313 0 : maOrigItemList.Save( rStrm );
314 0 : }
315 :
316 : // private --------------------------------------------------------------------
317 :
318 0 : const XclExpPCField::XclExpPCItemList& XclExpPCField::GetVisItemList() const
319 : {
320 : OSL_ENSURE( IsStandardField() == maGroupItemList.IsEmpty(),
321 : "XclExpPCField::GetVisItemList - unexpected additional items in standard field" );
322 0 : return IsStandardField() ? maOrigItemList : maGroupItemList;
323 : }
324 :
325 0 : void XclExpPCField::InitStandardField( const ScRange& rRange )
326 : {
327 : OSL_ENSURE( IsStandardField(), "XclExpPCField::InitStandardField - only for standard fields" );
328 : OSL_ENSURE( rRange.aStart.Col() == rRange.aEnd.Col(), "XclExpPCField::InitStandardField - cell range with multiple columns" );
329 :
330 0 : ScDocument& rDoc = GetDoc();
331 0 : SvNumberFormatter& rFormatter = GetFormatter();
332 :
333 : // field name is in top cell of the range
334 0 : ScAddress aPos( rRange.aStart );
335 0 : maFieldInfo.maName = rDoc.GetString(aPos.Col(), aPos.Row(), aPos.Tab());
336 : // #i76047# maximum field name length in pivot cache is 255
337 0 : if (maFieldInfo.maName.getLength() > EXC_PC_MAXSTRLEN)
338 0 : maFieldInfo.maName = maFieldInfo.maName.copy(0, EXC_PC_MAXSTRLEN);
339 :
340 : // loop over all cells, create pivot cache items
341 0 : for( aPos.IncRow(); (aPos.Row() <= rRange.aEnd.Row()) && (maOrigItemList.GetSize() < EXC_PC_MAXITEMCOUNT); aPos.IncRow() )
342 : {
343 0 : if( rDoc.HasValueData( aPos.Col(), aPos.Row(), aPos.Tab() ) )
344 : {
345 0 : double fValue = rDoc.GetValue( aPos );
346 0 : short nFmtType = rFormatter.GetType( rDoc.GetNumberFormat( aPos ) );
347 0 : if( nFmtType == NUMBERFORMAT_LOGICAL )
348 0 : InsertOrigBoolItem( fValue != 0 );
349 0 : else if( nFmtType & NUMBERFORMAT_DATETIME )
350 0 : InsertOrigDateTimeItem( GetDateTimeFromDouble( ::std::max( fValue, 0.0 ) ) );
351 : else
352 0 : InsertOrigDoubleItem( fValue );
353 : }
354 : else
355 : {
356 0 : OUString aText = rDoc.GetString(aPos.Col(), aPos.Row(), aPos.Tab());
357 0 : InsertOrigTextItem( aText );
358 : }
359 : }
360 0 : }
361 :
362 0 : void XclExpPCField::InitStdGroupField( const XclExpPCField& rBaseField, const ScDPSaveGroupDimension& rGroupDim )
363 : {
364 : OSL_ENSURE( IsGroupField(), "XclExpPCField::InitStdGroupField - only for standard grouping fields" );
365 :
366 0 : maFieldInfo.mnBaseItems = rBaseField.GetItemCount();
367 0 : maGroupOrder.resize( maFieldInfo.mnBaseItems, EXC_PC_NOITEM );
368 :
369 : // loop over all groups of this field
370 0 : for( long nGroupIdx = 0, nGroupCount = rGroupDim.GetGroupCount(); nGroupIdx < nGroupCount; ++nGroupIdx )
371 : {
372 0 : if( const ScDPSaveGroupItem* pGroupItem = rGroupDim.GetGroupByIndex( nGroupIdx ) )
373 : {
374 : // the index of the new item containing the grouping name
375 0 : sal_uInt16 nGroupItemIdx = EXC_PC_NOITEM;
376 : // loop over all elements of one group
377 0 : for( size_t nElemIdx = 0, nElemCount = pGroupItem->GetElementCount(); nElemIdx < nElemCount; ++nElemIdx )
378 : {
379 0 : if (const OUString* pElemName = pGroupItem->GetElementByIndex(nElemIdx))
380 : {
381 : // try to find the item that is part of the group in the base field
382 0 : sal_uInt16 nBaseItemIdx = rBaseField.GetItemIndex( *pElemName );
383 0 : if( nBaseItemIdx < maFieldInfo.mnBaseItems )
384 : {
385 : // add group name item only if there are any valid base items
386 0 : if( nGroupItemIdx == EXC_PC_NOITEM )
387 0 : nGroupItemIdx = InsertGroupItem( new XclExpPCItem( pGroupItem->GetGroupName() ) );
388 0 : maGroupOrder[ nBaseItemIdx ] = nGroupItemIdx;
389 : }
390 : }
391 : }
392 : }
393 : }
394 :
395 : // add items and base item indexes of all ungrouped elements
396 0 : for( sal_uInt16 nBaseItemIdx = 0; nBaseItemIdx < maFieldInfo.mnBaseItems; ++nBaseItemIdx )
397 : // items that are not part of a group still have the EXC_PC_NOITEM entry
398 0 : if( maGroupOrder[ nBaseItemIdx ] == EXC_PC_NOITEM )
399 : // try to find the base item
400 0 : if( const XclExpPCItem* pBaseItem = rBaseField.GetItem( nBaseItemIdx ) )
401 : // create a clone of the base item, insert its index into item order list
402 0 : maGroupOrder[ nBaseItemIdx ] = InsertGroupItem( new XclExpPCItem( *pBaseItem ) );
403 0 : }
404 :
405 0 : void XclExpPCField::InitNumGroupField( const ScDPObject& rDPObj, const ScDPNumGroupInfo& rNumInfo )
406 : {
407 : OSL_ENSURE( IsStandardField(), "XclExpPCField::InitNumGroupField - only for standard fields" );
408 : OSL_ENSURE( rNumInfo.mbEnable, "XclExpPCField::InitNumGroupField - numeric grouping not enabled" );
409 :
410 : // new field type, date type, limit settings (min/max/step/auto)
411 0 : if( rNumInfo.mbDateValues )
412 : {
413 : // special case: group by days with step count
414 0 : meFieldType = EXC_PCFIELD_DATEGROUP;
415 0 : maNumGroupInfo.SetScDateType( com::sun::star::sheet::DataPilotFieldGroupBy::DAYS );
416 0 : SetDateGroupLimit( rNumInfo, true );
417 : }
418 : else
419 : {
420 0 : meFieldType = EXC_PCFIELD_NUMGROUP;
421 0 : maNumGroupInfo.SetNumType();
422 0 : SetNumGroupLimit( rNumInfo );
423 : }
424 :
425 : // generate visible items
426 0 : InsertNumDateGroupItems( rDPObj, rNumInfo );
427 0 : }
428 :
429 0 : void XclExpPCField::InitDateGroupField( const ScDPObject& rDPObj, const ScDPNumGroupInfo& rDateInfo, sal_Int32 nDatePart )
430 : {
431 : OSL_ENSURE( IsStandardField() || IsStdGroupField(), "XclExpPCField::InitDateGroupField - only for standard fields" );
432 : OSL_ENSURE( rDateInfo.mbEnable, "XclExpPCField::InitDateGroupField - date grouping not enabled" );
433 :
434 : // new field type
435 0 : meFieldType = IsStandardField() ? EXC_PCFIELD_DATEGROUP : EXC_PCFIELD_DATECHILD;
436 :
437 : // date type, limit settings (min/max/step/auto)
438 0 : maNumGroupInfo.SetScDateType( nDatePart );
439 0 : SetDateGroupLimit( rDateInfo, false );
440 :
441 : // generate visible items
442 0 : InsertNumDateGroupItems( rDPObj, rDateInfo, nDatePart );
443 0 : }
444 :
445 0 : void XclExpPCField::InsertItemArrayIndex( size_t nListPos )
446 : {
447 : OSL_ENSURE( IsStandardField(), "XclExpPCField::InsertItemArrayIndex - only for standard fields" );
448 0 : maIndexVec.push_back( static_cast< sal_uInt16 >( nListPos ) );
449 0 : }
450 :
451 0 : void XclExpPCField::InsertOrigItem( XclExpPCItem* pNewItem )
452 : {
453 0 : size_t nItemIdx = maOrigItemList.GetSize();
454 0 : maOrigItemList.AppendNewRecord( pNewItem );
455 0 : InsertItemArrayIndex( nItemIdx );
456 0 : mnTypeFlags |= pNewItem->GetTypeFlag();
457 0 : }
458 :
459 0 : void XclExpPCField::InsertOrigTextItem( const OUString& rText )
460 : {
461 0 : size_t nPos = 0;
462 0 : bool bFound = false;
463 : // #i76047# maximum item text length in pivot cache is 255
464 0 : OUString aShortText = rText.copy( 0, ::std::min(rText.getLength(), EXC_PC_MAXSTRLEN ) );
465 0 : for( size_t nSize = maOrigItemList.GetSize(); !bFound && (nPos < nSize); ++nPos )
466 0 : if( (bFound = maOrigItemList.GetRecord( nPos )->EqualsText( aShortText )) == true )
467 0 : InsertItemArrayIndex( nPos );
468 0 : if( !bFound )
469 0 : InsertOrigItem( new XclExpPCItem( aShortText ) );
470 0 : }
471 :
472 0 : void XclExpPCField::InsertOrigDoubleItem( double fValue )
473 : {
474 0 : size_t nPos = 0;
475 0 : bool bFound = false;
476 0 : for( size_t nSize = maOrigItemList.GetSize(); !bFound && (nPos < nSize); ++nPos )
477 0 : if( (bFound = maOrigItemList.GetRecord( nPos )->EqualsDouble( fValue )) == true )
478 0 : InsertItemArrayIndex( nPos );
479 0 : if( !bFound )
480 0 : InsertOrigItem( new XclExpPCItem( fValue ) );
481 0 : }
482 :
483 0 : void XclExpPCField::InsertOrigDateTimeItem( const DateTime& rDateTime )
484 : {
485 0 : size_t nPos = 0;
486 0 : bool bFound = false;
487 0 : for( size_t nSize = maOrigItemList.GetSize(); !bFound && (nPos < nSize); ++nPos )
488 0 : if( (bFound = maOrigItemList.GetRecord( nPos )->EqualsDateTime( rDateTime )) == true )
489 0 : InsertItemArrayIndex( nPos );
490 0 : if( !bFound )
491 0 : InsertOrigItem( new XclExpPCItem( rDateTime ) );
492 0 : }
493 :
494 0 : void XclExpPCField::InsertOrigBoolItem( bool bValue )
495 : {
496 0 : size_t nPos = 0;
497 0 : bool bFound = false;
498 0 : for( size_t nSize = maOrigItemList.GetSize(); !bFound && (nPos < nSize); ++nPos )
499 0 : if( (bFound = maOrigItemList.GetRecord( nPos )->EqualsBool( bValue )) == true )
500 0 : InsertItemArrayIndex( nPos );
501 0 : if( !bFound )
502 0 : InsertOrigItem( new XclExpPCItem( bValue ) );
503 0 : }
504 :
505 0 : sal_uInt16 XclExpPCField::InsertGroupItem( XclExpPCItem* pNewItem )
506 : {
507 0 : maGroupItemList.AppendNewRecord( pNewItem );
508 0 : return static_cast< sal_uInt16 >( maGroupItemList.GetSize() - 1 );
509 : }
510 :
511 0 : void XclExpPCField::InsertNumDateGroupItems( const ScDPObject& rDPObj, const ScDPNumGroupInfo& rNumInfo, sal_Int32 nDatePart )
512 : {
513 : OSL_ENSURE( rDPObj.GetSheetDesc(), "XclExpPCField::InsertNumDateGroupItems - cannot generate element list" );
514 0 : if( const ScSheetSourceDesc* pSrcDesc = rDPObj.GetSheetDesc() )
515 : {
516 : // get the string collection with original source elements
517 0 : const ScDPSaveData* pSaveData = rDPObj.GetSaveData();
518 0 : const ScDPDimensionSaveData* pDimData = NULL;
519 0 : if (pSaveData)
520 0 : pDimData = pSaveData->GetExistingDimensionData();
521 :
522 0 : const ScDPCache* pCache = pSrcDesc->CreateCache(pDimData);
523 0 : if (!pCache)
524 0 : return;
525 :
526 0 : ScSheetDPData aDPData(GetDocPtr(), *pSrcDesc, *pCache);
527 0 : long nDim = GetFieldIndex();
528 : // get the string collection with generated grouping elements
529 0 : ScDPNumGroupDimension aTmpDim( rNumInfo );
530 0 : if( nDatePart != 0 )
531 0 : aTmpDim.SetDateDimension();
532 : const std::vector<SCROW>& aMemberIds = aTmpDim.GetNumEntries(
533 0 : static_cast<SCCOL>(nDim), pCache);
534 0 : for ( size_t nIdx = 0 ; nIdx < aMemberIds.size(); nIdx++ )
535 : {
536 0 : const ScDPItemData* pData = aDPData.GetMemberById(nDim , aMemberIds[nIdx]);
537 0 : if ( pData )
538 : {
539 0 : OUString aStr = pCache->GetFormattedString(nDim, *pData);
540 0 : InsertGroupItem(new XclExpPCItem(aStr));
541 : }
542 0 : }
543 : }
544 : }
545 :
546 0 : void XclExpPCField::SetNumGroupLimit( const ScDPNumGroupInfo& rNumInfo )
547 : {
548 0 : ::set_flag( maNumGroupInfo.mnFlags, EXC_SXNUMGROUP_AUTOMIN, rNumInfo.mbAutoStart );
549 0 : ::set_flag( maNumGroupInfo.mnFlags, EXC_SXNUMGROUP_AUTOMAX, rNumInfo.mbAutoEnd );
550 0 : maNumGroupLimits.AppendNewRecord( new XclExpPCItem( rNumInfo.mfStart ) );
551 0 : maNumGroupLimits.AppendNewRecord( new XclExpPCItem( rNumInfo.mfEnd ) );
552 0 : maNumGroupLimits.AppendNewRecord( new XclExpPCItem( rNumInfo.mfStep ) );
553 0 : }
554 :
555 0 : void XclExpPCField::SetDateGroupLimit( const ScDPNumGroupInfo& rDateInfo, bool bUseStep )
556 : {
557 0 : ::set_flag( maNumGroupInfo.mnFlags, EXC_SXNUMGROUP_AUTOMIN, rDateInfo.mbAutoStart );
558 0 : ::set_flag( maNumGroupInfo.mnFlags, EXC_SXNUMGROUP_AUTOMAX, rDateInfo.mbAutoEnd );
559 0 : maNumGroupLimits.AppendNewRecord( new XclExpPCItem( GetDateTimeFromDouble( rDateInfo.mfStart ) ) );
560 0 : maNumGroupLimits.AppendNewRecord( new XclExpPCItem( GetDateTimeFromDouble( rDateInfo.mfEnd ) ) );
561 0 : sal_Int16 nStep = bUseStep ? limit_cast< sal_Int16 >( rDateInfo.mfStep, 1, SAL_MAX_INT16 ) : 1;
562 0 : maNumGroupLimits.AppendNewRecord( new XclExpPCItem( nStep ) );
563 0 : }
564 :
565 0 : void XclExpPCField::Finalize()
566 : {
567 : // flags
568 0 : ::set_flag( maFieldInfo.mnFlags, EXC_SXFIELD_HASITEMS, !GetVisItemList().IsEmpty() );
569 : // Excel writes long indexes even for 0x0100 items (indexes from 0x00 to 0xFF)
570 0 : ::set_flag( maFieldInfo.mnFlags, EXC_SXFIELD_16BIT, maOrigItemList.GetSize() >= 0x0100 );
571 0 : ::set_flag( maFieldInfo.mnFlags, EXC_SXFIELD_NUMGROUP, IsNumGroupField() || IsDateGroupField() );
572 : /* mnTypeFlags is updated in all Insert***Item() functions. Now the flags
573 : for the current combination of item types is added to the flags. */
574 0 : ::set_flag( maFieldInfo.mnFlags, spnPCItemFlags[ mnTypeFlags ] );
575 :
576 : // item count fields
577 0 : maFieldInfo.mnVisItems = static_cast< sal_uInt16 >( GetVisItemList().GetSize() );
578 0 : maFieldInfo.mnGroupItems = static_cast< sal_uInt16 >( maGroupItemList.GetSize() );
579 : // maFieldInfo.mnBaseItems set in InitStdGroupField()
580 0 : maFieldInfo.mnOrigItems = static_cast< sal_uInt16 >( maOrigItemList.GetSize() );
581 0 : }
582 :
583 0 : void XclExpPCField::WriteSxnumgroup( XclExpStream& rStrm )
584 : {
585 0 : if( IsNumGroupField() || IsDateGroupField() )
586 : {
587 : // SXNUMGROUP record
588 0 : rStrm.StartRecord( EXC_ID_SXNUMGROUP, 2 );
589 0 : rStrm << maNumGroupInfo;
590 0 : rStrm.EndRecord();
591 :
592 : // limits (min/max/step) for numeric grouping
593 : OSL_ENSURE( maNumGroupLimits.GetSize() == 3,
594 : "XclExpPCField::WriteSxnumgroup - missing numeric grouping limits" );
595 0 : maNumGroupLimits.Save( rStrm );
596 : }
597 0 : }
598 :
599 0 : void XclExpPCField::WriteSxgroupinfo( XclExpStream& rStrm )
600 : {
601 : OSL_ENSURE( IsStdGroupField() != maGroupOrder.empty(),
602 : "XclExpPCField::WriteSxgroupinfo - missing grouping info" );
603 0 : if( IsStdGroupField() && !maGroupOrder.empty() )
604 : {
605 0 : rStrm.StartRecord( EXC_ID_SXGROUPINFO, 2 * maGroupOrder.size() );
606 0 : for( ScfUInt16Vec::const_iterator aIt = maGroupOrder.begin(), aEnd = maGroupOrder.end(); aIt != aEnd; ++aIt )
607 0 : rStrm << *aIt;
608 0 : rStrm.EndRecord();
609 : }
610 0 : }
611 :
612 0 : void XclExpPCField::WriteBody( XclExpStream& rStrm )
613 : {
614 0 : rStrm << maFieldInfo;
615 0 : }
616 :
617 0 : XclExpPivotCache::XclExpPivotCache( const XclExpRoot& rRoot, const ScDPObject& rDPObj, sal_uInt16 nListIdx ) :
618 : XclExpRoot( rRoot ),
619 : mnListIdx( nListIdx ),
620 0 : mbValid( false )
621 : {
622 : // source from sheet only
623 0 : if( const ScSheetSourceDesc* pSrcDesc = rDPObj.GetSheetDesc() )
624 : {
625 : /* maOrigSrcRange: Range received from the DataPilot object.
626 : maExpSrcRange: Range written to the DCONREF record.
627 : maDocSrcRange: Range used to get source data from Calc document.
628 : This range may be shorter than maExpSrcRange to improve export
629 : performance (#i22541#). */
630 0 : maOrigSrcRange = maExpSrcRange = maDocSrcRange = pSrcDesc->GetSourceRange();
631 0 : maSrcRangeName = pSrcDesc->GetRangeName();
632 :
633 : // internal sheet data only
634 0 : SCTAB nScTab = maExpSrcRange.aStart.Tab();
635 0 : if( (nScTab == maExpSrcRange.aEnd.Tab()) && GetTabInfo().IsExportTab( nScTab ) )
636 : {
637 : // ValidateRange() restricts source range to valid Excel limits
638 0 : if( GetAddressConverter().ValidateRange( maExpSrcRange, true ) )
639 : {
640 : // #i22541# skip empty cell areas (performance)
641 : SCCOL nDocCol1, nDocCol2;
642 : SCROW nDocRow1, nDocRow2;
643 0 : GetDoc().GetDataStart( nScTab, nDocCol1, nDocRow1 );
644 0 : GetDoc().GetPrintArea( nScTab, nDocCol2, nDocRow2, false );
645 0 : SCCOL nSrcCol1 = maExpSrcRange.aStart.Col();
646 0 : SCROW nSrcRow1 = maExpSrcRange.aStart.Row();
647 0 : SCCOL nSrcCol2 = maExpSrcRange.aEnd.Col();
648 0 : SCROW nSrcRow2 = maExpSrcRange.aEnd.Row();
649 :
650 : // #i22541# do not store index list for too big ranges
651 0 : if( 2 * (nDocRow2 - nDocRow1) < (nSrcRow2 - nSrcRow1) )
652 0 : ::set_flag( maPCInfo.mnFlags, EXC_SXDB_SAVEDATA, false );
653 :
654 : // adjust row indexes, keep one row of empty area to surely have the empty cache item
655 0 : if( nSrcRow1 < nDocRow1 )
656 0 : nSrcRow1 = nDocRow1 - 1;
657 0 : if( nSrcRow2 > nDocRow2 )
658 0 : nSrcRow2 = nDocRow2 + 1;
659 :
660 0 : maDocSrcRange.aStart.SetCol( ::std::max( nDocCol1, nSrcCol1 ) );
661 0 : maDocSrcRange.aStart.SetRow( nSrcRow1 );
662 0 : maDocSrcRange.aEnd.SetCol( ::std::min( nDocCol2, nSrcCol2 ) );
663 0 : maDocSrcRange.aEnd.SetRow( nSrcRow2 );
664 :
665 0 : GetDoc().GetName( nScTab, maTabName );
666 0 : maPCInfo.mnSrcRecs = static_cast< sal_uInt32 >( maExpSrcRange.aEnd.Row() - maExpSrcRange.aStart.Row() );
667 0 : maPCInfo.mnStrmId = nListIdx + 1;
668 0 : maPCInfo.mnSrcType = EXC_SXDB_SRC_SHEET;
669 :
670 0 : AddFields( rDPObj );
671 :
672 0 : mbValid = true;
673 : }
674 : }
675 : }
676 0 : }
677 :
678 0 : bool XclExpPivotCache::HasItemIndexList() const
679 : {
680 0 : return ::get_flag( maPCInfo.mnFlags, EXC_SXDB_SAVEDATA );
681 : }
682 :
683 0 : sal_uInt16 XclExpPivotCache::GetFieldCount() const
684 : {
685 0 : return static_cast< sal_uInt16 >( maFieldList.GetSize() );
686 : }
687 :
688 0 : const XclExpPCField* XclExpPivotCache::GetField( sal_uInt16 nFieldIdx ) const
689 : {
690 0 : return maFieldList.GetRecord( nFieldIdx ).get();
691 : }
692 :
693 0 : bool XclExpPivotCache::HasAddFields() const
694 : {
695 : // pivot cache can be shared, if there are no additional cache fields
696 0 : return maPCInfo.mnStdFields < maPCInfo.mnTotalFields;
697 : }
698 :
699 0 : bool XclExpPivotCache::HasEqualDataSource( const ScDPObject& rDPObj ) const
700 : {
701 : /* For now, only sheet sources are supported, therefore it is enough to
702 : compare the ScSheetSourceDesc. Later, there should be done more complicated
703 : comparisons regarding the source type of rDPObj and this cache. */
704 0 : if( const ScSheetSourceDesc* pSrcDesc = rDPObj.GetSheetDesc() )
705 0 : return pSrcDesc->GetSourceRange() == maOrigSrcRange;
706 0 : return false;
707 : }
708 :
709 0 : void XclExpPivotCache::Save( XclExpStream& rStrm )
710 : {
711 : OSL_ENSURE( mbValid, "XclExpPivotCache::Save - invalid pivot cache" );
712 : // SXIDSTM
713 0 : XclExpUInt16Record( EXC_ID_SXIDSTM, maPCInfo.mnStrmId ).Save( rStrm );
714 : // SXVS
715 0 : XclExpUInt16Record( EXC_ID_SXVS, EXC_SXVS_SHEET ).Save( rStrm );
716 :
717 0 : if (!maSrcRangeName.isEmpty())
718 : // DCONNAME
719 0 : WriteDConName(rStrm);
720 : else
721 : // DCONREF
722 0 : WriteDconref(rStrm);
723 :
724 : // create the pivot cache storage stream
725 0 : WriteCacheStream();
726 0 : }
727 :
728 0 : void XclExpPivotCache::SaveXml( XclExpXmlStream&
729 : #ifdef XLSX_PIVOT_CACHE
730 : rStrm
731 : #endif
732 : )
733 : {
734 : OSL_ENSURE( mbValid, "XclExpPivotCache::Save - invalid pivot cache" );
735 : #ifdef XLSX_PIVOT_CACHE /* <pivotCache> without xl/pivotCaches/ cacheStream
736 : results in a broken .xlsx */
737 : sax_fastparser::FSHelperPtr& rWorkbook = rStrm.GetCurrentStream();
738 : OUString sId = OUStringBuffer()
739 : .appendAscii("rId")
740 : .append( rStrm.GetUniqueIdOUString() )
741 : .makeStringAndClear();
742 : rWorkbook->startElement( XML_pivotCache,
743 : XML_cacheId, OString::number( maPCInfo.mnStrmId ).getStr(),
744 : FSNS( XML_r, XML_id ), XclXmlUtils::ToOString( sId ).getStr(),
745 : FSEND );
746 : // SXIDSTM
747 : XclExpUInt16Record( EXC_ID_SXIDSTM, maPCInfo.mnStrmId ).SaveXml( rStrm );
748 : // SXVS
749 : XclExpUInt16Record( EXC_ID_SXVS, EXC_SXVS_SHEET ).SaveXml( rStrm );
750 : // DCONREF
751 : // OOXTODO: WriteDconref( rStrm );
752 : // create the pivot cache storage stream
753 : // OOXTODO: WriteCacheStream();
754 : rWorkbook->endElement( XML_pivotCache );
755 : #endif /* XLSX_PIVOT_CACHE */
756 0 : }
757 :
758 : // private --------------------------------------------------------------------
759 :
760 0 : XclExpPCField* XclExpPivotCache::GetFieldAcc( sal_uInt16 nFieldIdx )
761 : {
762 0 : return maFieldList.GetRecord( nFieldIdx ).get();
763 : }
764 :
765 0 : void XclExpPivotCache::AddFields( const ScDPObject& rDPObj )
766 : {
767 0 : AddStdFields( rDPObj );
768 0 : maPCInfo.mnStdFields = GetFieldCount();
769 0 : AddGroupFields( rDPObj );
770 0 : AddCalcFields( rDPObj );
771 0 : maPCInfo.mnTotalFields = GetFieldCount();
772 0 : };
773 :
774 0 : void XclExpPivotCache::AddStdFields( const ScDPObject& rDPObj )
775 : {
776 : // if item index list is not written, used shortened source range (maDocSrcRange) for performance
777 0 : const ScRange& rRange = HasItemIndexList() ? maExpSrcRange : maDocSrcRange;
778 : // create a standard pivot cache field for each source column
779 0 : for( SCCOL nScCol = rRange.aStart.Col(), nEndScCol = rRange.aEnd.Col(); nScCol <= nEndScCol; ++nScCol )
780 : {
781 0 : ScRange aColRange( rRange );
782 0 : aColRange.aStart.SetCol( nScCol );
783 0 : aColRange.aEnd.SetCol( nScCol );
784 : maFieldList.AppendNewRecord( new XclExpPCField(
785 0 : GetRoot(), *this, GetFieldCount(), rDPObj, aColRange ) );
786 : }
787 0 : }
788 :
789 0 : void XclExpPivotCache::AddGroupFields( const ScDPObject& rDPObj )
790 : {
791 0 : if( const ScDPSaveData* pSaveData = rDPObj.GetSaveData() )
792 : {
793 0 : if( const ScDPDimensionSaveData* pSaveDimData = pSaveData->GetExistingDimensionData() )
794 : {
795 : // loop over all existing standard fields to find their group fields
796 0 : for( sal_uInt16 nFieldIdx = 0; nFieldIdx < maPCInfo.mnStdFields; ++nFieldIdx )
797 : {
798 0 : if( XclExpPCField* pCurrStdField = GetFieldAcc( nFieldIdx ) )
799 : {
800 0 : const ScDPSaveGroupDimension* pGroupDim = pSaveDimData->GetGroupDimForBase( pCurrStdField->GetFieldName() );
801 0 : XclExpPCField* pLastGroupField = pCurrStdField;
802 0 : while( pGroupDim )
803 : {
804 : // insert the new grouping field
805 : XclExpPCFieldRef xNewGroupField( new XclExpPCField(
806 0 : GetRoot(), *this, GetFieldCount(), rDPObj, *pGroupDim, *pCurrStdField ) );
807 0 : maFieldList.AppendRecord( xNewGroupField );
808 :
809 : // register new grouping field at current grouping field, building a chain
810 0 : pLastGroupField->SetGroupChildField( *xNewGroupField );
811 :
812 : // next grouping dimension
813 0 : pGroupDim = pSaveDimData->GetGroupDimForBase( pGroupDim->GetGroupDimName() );
814 0 : pLastGroupField = xNewGroupField.get();
815 0 : }
816 : }
817 : }
818 : }
819 : }
820 0 : }
821 :
822 0 : void XclExpPivotCache::AddCalcFields( const ScDPObject& /*rDPObj*/ )
823 : {
824 : // not supported
825 0 : }
826 :
827 0 : void XclExpPivotCache::WriteDconref( XclExpStream& rStrm ) const
828 : {
829 0 : XclExpString aRef( XclExpUrlHelper::EncodeUrl( GetRoot(), EMPTY_OUSTRING, &maTabName ) );
830 0 : rStrm.StartRecord( EXC_ID_DCONREF, 7 + aRef.GetSize() );
831 0 : rStrm << static_cast< sal_uInt16 >( maExpSrcRange.aStart.Row() )
832 0 : << static_cast< sal_uInt16 >( maExpSrcRange.aEnd.Row() )
833 0 : << static_cast< sal_uInt8 >( maExpSrcRange.aStart.Col() )
834 0 : << static_cast< sal_uInt8 >( maExpSrcRange.aEnd.Col() )
835 0 : << aRef
836 0 : << sal_uInt8( 0 );
837 0 : rStrm.EndRecord();
838 0 : }
839 :
840 0 : void XclExpPivotCache::WriteDConName( XclExpStream& rStrm ) const
841 : {
842 0 : XclExpString aName(maSrcRangeName);
843 0 : rStrm.StartRecord(EXC_ID_DCONNAME, aName.GetSize() + 2);
844 0 : rStrm << aName << sal_uInt16(0);
845 0 : rStrm.EndRecord();
846 0 : }
847 :
848 0 : void XclExpPivotCache::WriteCacheStream()
849 : {
850 0 : SotStorageRef xSvStrg = OpenStorage( EXC_STORAGE_PTCACHE );
851 0 : SotStorageStreamRef xSvStrm = OpenStream( xSvStrg, ScfTools::GetHexStr( maPCInfo.mnStrmId ) );
852 0 : if( xSvStrm.Is() )
853 : {
854 0 : XclExpStream aStrm( *xSvStrm, GetRoot() );
855 : // SXDB
856 0 : WriteSxdb( aStrm );
857 : // SXDBEX
858 0 : WriteSxdbex( aStrm );
859 : // field list (SXFIELD and items)
860 0 : maFieldList.Save( aStrm );
861 : // index table (list of SXINDEXLIST)
862 0 : WriteSxindexlistList( aStrm );
863 : // EOF
864 0 : XclExpEmptyRecord( EXC_ID_EOF ).Save( aStrm );
865 0 : }
866 0 : }
867 :
868 0 : void XclExpPivotCache::WriteSxdb( XclExpStream& rStrm ) const
869 : {
870 0 : rStrm.StartRecord( EXC_ID_SXDB, 21 );
871 0 : rStrm << maPCInfo;
872 0 : rStrm.EndRecord();
873 0 : }
874 :
875 0 : void XclExpPivotCache::WriteSxdbex( XclExpStream& rStrm ) const
876 : {
877 0 : rStrm.StartRecord( EXC_ID_SXDBEX, 12 );
878 0 : rStrm << EXC_SXDBEX_CREATION_DATE
879 0 : << sal_uInt32( 0 ); // number of SXFORMULA records
880 0 : rStrm.EndRecord();
881 0 : }
882 :
883 0 : void XclExpPivotCache::WriteSxindexlistList( XclExpStream& rStrm ) const
884 : {
885 0 : if( HasItemIndexList() )
886 : {
887 0 : sal_Size nRecSize = 0;
888 0 : size_t nPos, nSize = maFieldList.GetSize();
889 0 : for( nPos = 0; nPos < nSize; ++nPos )
890 0 : nRecSize += maFieldList.GetRecord( nPos )->GetIndexSize();
891 :
892 0 : for( sal_uInt32 nSrcRow = 0; nSrcRow < maPCInfo.mnSrcRecs; ++nSrcRow )
893 : {
894 0 : rStrm.StartRecord( EXC_ID_SXINDEXLIST, nRecSize );
895 0 : for( nPos = 0; nPos < nSize; ++nPos )
896 0 : maFieldList.GetRecord( nPos )->WriteIndex( rStrm, nSrcRow );
897 0 : rStrm.EndRecord();
898 : }
899 : }
900 0 : }
901 :
902 :
903 : // Pivot table
904 :
905 :
906 : namespace {
907 :
908 : /** Returns a display string for a data field containing the field name and aggregation function. */
909 0 : OUString lclGetDataFieldCaption( const OUString& rFieldName, GeneralFunction eFunc )
910 : {
911 0 : OUString aCaption;
912 :
913 0 : sal_uInt16 nResIdx = 0;
914 : using namespace ::com::sun::star::sheet;
915 0 : switch( eFunc )
916 : {
917 0 : case GeneralFunction_SUM: nResIdx = STR_FUN_TEXT_SUM; break;
918 0 : case GeneralFunction_COUNT: nResIdx = STR_FUN_TEXT_COUNT; break;
919 0 : case GeneralFunction_AVERAGE: nResIdx = STR_FUN_TEXT_AVG; break;
920 0 : case GeneralFunction_MAX: nResIdx = STR_FUN_TEXT_MAX; break;
921 0 : case GeneralFunction_MIN: nResIdx = STR_FUN_TEXT_MIN; break;
922 0 : case GeneralFunction_PRODUCT: nResIdx = STR_FUN_TEXT_PRODUCT; break;
923 0 : case GeneralFunction_COUNTNUMS: nResIdx = STR_FUN_TEXT_COUNT; break;
924 0 : case GeneralFunction_STDEV: nResIdx = STR_FUN_TEXT_STDDEV; break;
925 0 : case GeneralFunction_STDEVP: nResIdx = STR_FUN_TEXT_STDDEV; break;
926 0 : case GeneralFunction_VAR: nResIdx = STR_FUN_TEXT_VAR; break;
927 0 : case GeneralFunction_VARP: nResIdx = STR_FUN_TEXT_VAR; break;
928 : default:;
929 : }
930 0 : if( nResIdx )
931 0 : aCaption = ScGlobal::GetRscString( nResIdx ) + " - ";
932 0 : aCaption += rFieldName;
933 0 : return( aCaption );
934 : }
935 :
936 : } // namespace
937 :
938 0 : XclExpPTItem::XclExpPTItem( const XclExpPCField& rCacheField, sal_uInt16 nCacheIdx ) :
939 : XclExpRecord( EXC_ID_SXVI, 8 ),
940 0 : mpCacheItem( rCacheField.GetItem( nCacheIdx ) )
941 : {
942 0 : maItemInfo.mnType = EXC_SXVI_TYPE_DATA;
943 0 : maItemInfo.mnCacheIdx = nCacheIdx;
944 0 : maItemInfo.maVisName.mbUseCache = mpCacheItem != 0;
945 0 : }
946 :
947 0 : XclExpPTItem::XclExpPTItem( sal_uInt16 nItemType, sal_uInt16 nCacheIdx, bool bUseCache ) :
948 : XclExpRecord( EXC_ID_SXVI, 8 ),
949 0 : mpCacheItem( 0 )
950 : {
951 0 : maItemInfo.mnType = nItemType;
952 0 : maItemInfo.mnCacheIdx = nCacheIdx;
953 0 : maItemInfo.maVisName.mbUseCache = bUseCache;
954 0 : }
955 :
956 0 : OUString XclExpPTItem::GetItemName() const
957 : {
958 0 : return mpCacheItem ? mpCacheItem->ConvertToText() : OUString();
959 : }
960 :
961 0 : void XclExpPTItem::SetPropertiesFromMember( const ScDPSaveMember& rSaveMem )
962 : {
963 : // #i115659# GetIsVisible() is not valid if HasIsVisible() returns false, default is 'visible' then
964 0 : ::set_flag( maItemInfo.mnFlags, EXC_SXVI_HIDDEN, rSaveMem.HasIsVisible() && !rSaveMem.GetIsVisible() );
965 : // #i115659# GetShowDetails() is not valid if HasShowDetails() returns false, default is 'show detail' then
966 0 : ::set_flag( maItemInfo.mnFlags, EXC_SXVI_HIDEDETAIL, rSaveMem.HasShowDetails() && !rSaveMem.GetShowDetails() );
967 :
968 : // visible name
969 0 : const OUString* pVisName = rSaveMem.GetLayoutName();
970 0 : if (pVisName && !pVisName->equals(GetItemName()))
971 0 : maItemInfo.SetVisName(*pVisName);
972 0 : }
973 :
974 0 : void XclExpPTItem::WriteBody( XclExpStream& rStrm )
975 : {
976 0 : rStrm << maItemInfo;
977 0 : }
978 :
979 0 : XclExpPTField::XclExpPTField( const XclExpPivotTable& rPTable, sal_uInt16 nCacheIdx ) :
980 : mrPTable( rPTable ),
981 0 : mpCacheField( rPTable.GetCacheField( nCacheIdx ) )
982 : {
983 0 : maFieldInfo.mnCacheIdx = nCacheIdx;
984 :
985 : // create field items
986 0 : if( mpCacheField )
987 0 : for( sal_uInt16 nItemIdx = 0, nItemCount = mpCacheField->GetItemCount(); nItemIdx < nItemCount; ++nItemIdx )
988 0 : maItemList.AppendNewRecord( new XclExpPTItem( *mpCacheField, nItemIdx ) );
989 0 : maFieldInfo.mnItemCount = static_cast< sal_uInt16 >( maItemList.GetSize() );
990 0 : }
991 :
992 : // data access ----------------------------------------------------------------
993 :
994 0 : OUString XclExpPTField::GetFieldName() const
995 : {
996 0 : return mpCacheField ? mpCacheField->GetFieldName() : OUString();
997 : }
998 :
999 0 : sal_uInt16 XclExpPTField::GetFieldIndex() const
1000 : {
1001 : // field index always equal to cache index
1002 0 : return maFieldInfo.mnCacheIdx;
1003 : }
1004 :
1005 0 : sal_uInt16 XclExpPTField::GetLastDataInfoIndex() const
1006 : {
1007 : OSL_ENSURE( !maDataInfoVec.empty(), "XclExpPTField::GetLastDataInfoIndex - no data info found" );
1008 : // will return 0xFFFF for empty vector -> ok
1009 0 : return static_cast< sal_uInt16 >( maDataInfoVec.size() - 1 );
1010 : }
1011 :
1012 0 : sal_uInt16 XclExpPTField::GetItemIndex( const OUString& rName, sal_uInt16 nDefaultIdx ) const
1013 : {
1014 0 : for( size_t nPos = 0, nSize = maItemList.GetSize(); nPos < nSize; ++nPos )
1015 0 : if( maItemList.GetRecord( nPos )->GetItemName() == rName )
1016 0 : return static_cast< sal_uInt16 >( nPos );
1017 0 : return nDefaultIdx;
1018 : }
1019 :
1020 : // fill data --------------------------------------------------------------
1021 :
1022 : /**
1023 : * Calc's subtotal names are escaped with backslashes ('\'), while Excel's
1024 : * are not escaped at all.
1025 : */
1026 0 : static OUString lcl_convertCalcSubtotalName(const OUString& rName)
1027 : {
1028 0 : OUStringBuffer aBuf;
1029 0 : const sal_Unicode* p = rName.getStr();
1030 0 : sal_Int32 n = rName.getLength();
1031 0 : bool bEscaped = false;
1032 0 : for (sal_Int32 i = 0; i < n; ++i)
1033 : {
1034 0 : const sal_Unicode c = p[i];
1035 0 : if (!bEscaped && c == '\\')
1036 : {
1037 0 : bEscaped = true;
1038 0 : continue;
1039 : }
1040 :
1041 0 : aBuf.append(c);
1042 0 : bEscaped = false;
1043 : }
1044 0 : return aBuf.makeStringAndClear();
1045 : }
1046 :
1047 0 : void XclExpPTField::SetPropertiesFromDim( const ScDPSaveDimension& rSaveDim )
1048 : {
1049 : // orientation
1050 0 : DataPilotFieldOrientation eOrient = static_cast< DataPilotFieldOrientation >( rSaveDim.GetOrientation() );
1051 : OSL_ENSURE( eOrient != DataPilotFieldOrientation_DATA, "XclExpPTField::SetPropertiesFromDim - called for data field" );
1052 0 : maFieldInfo.AddApiOrient( eOrient );
1053 :
1054 : // show empty items (#i115659# GetShowEmpty() is not valid if HasShowEmpty() returns false, default is false then)
1055 0 : ::set_flag( maFieldExtInfo.mnFlags, EXC_SXVDEX_SHOWALL, rSaveDim.HasShowEmpty() && rSaveDim.GetShowEmpty() );
1056 :
1057 : // visible name
1058 0 : const OUString* pLayoutName = rSaveDim.GetLayoutName();
1059 0 : if (pLayoutName && !pLayoutName->equals(GetFieldName()))
1060 0 : maFieldInfo.SetVisName(*pLayoutName);
1061 :
1062 0 : const OUString* pSubtotalName = rSaveDim.GetSubtotalName();
1063 0 : if (pSubtotalName)
1064 : {
1065 0 : OUString aSubName = lcl_convertCalcSubtotalName(*pSubtotalName);
1066 0 : maFieldExtInfo.mpFieldTotalName.reset(new OUString(aSubName));
1067 : }
1068 :
1069 : // subtotals
1070 0 : XclPTSubtotalVec aSubtotals;
1071 0 : aSubtotals.reserve( static_cast< size_t >( rSaveDim.GetSubTotalsCount() ) );
1072 0 : for( long nSubtIdx = 0, nSubtCount = rSaveDim.GetSubTotalsCount(); nSubtIdx < nSubtCount; ++nSubtIdx )
1073 0 : aSubtotals.push_back( rSaveDim.GetSubTotalFunc( nSubtIdx ) );
1074 0 : maFieldInfo.SetSubtotals( aSubtotals );
1075 :
1076 : // sorting
1077 0 : if( const DataPilotFieldSortInfo* pSortInfo = rSaveDim.GetSortInfo() )
1078 : {
1079 0 : maFieldExtInfo.SetApiSortMode( pSortInfo->Mode );
1080 0 : if( pSortInfo->Mode == ::com::sun::star::sheet::DataPilotFieldSortMode::DATA )
1081 0 : maFieldExtInfo.mnSortField = mrPTable.GetDataFieldIndex( pSortInfo->Field, EXC_SXVDEX_SORT_OWN );
1082 0 : ::set_flag( maFieldExtInfo.mnFlags, EXC_SXVDEX_SORT_ASC, pSortInfo->IsAscending );
1083 : }
1084 :
1085 : // auto show
1086 0 : if( const DataPilotFieldAutoShowInfo* pShowInfo = rSaveDim.GetAutoShowInfo() )
1087 : {
1088 0 : ::set_flag( maFieldExtInfo.mnFlags, EXC_SXVDEX_AUTOSHOW, pShowInfo->IsEnabled );
1089 0 : maFieldExtInfo.SetApiAutoShowMode( pShowInfo->ShowItemsMode );
1090 0 : maFieldExtInfo.SetApiAutoShowCount( pShowInfo->ItemCount );
1091 0 : maFieldExtInfo.mnShowField = mrPTable.GetDataFieldIndex( pShowInfo->DataField, EXC_SXVDEX_SHOW_NONE );
1092 : }
1093 :
1094 : // layout
1095 0 : if( const DataPilotFieldLayoutInfo* pLayoutInfo = rSaveDim.GetLayoutInfo() )
1096 : {
1097 0 : maFieldExtInfo.SetApiLayoutMode( pLayoutInfo->LayoutMode );
1098 0 : ::set_flag( maFieldExtInfo.mnFlags, EXC_SXVDEX_LAYOUT_BLANK, pLayoutInfo->AddEmptyLines );
1099 : }
1100 :
1101 : // special page field properties
1102 0 : if( eOrient == DataPilotFieldOrientation_PAGE )
1103 : {
1104 0 : maPageInfo.mnField = GetFieldIndex();
1105 0 : maPageInfo.mnSelItem = EXC_SXPI_ALLITEMS;
1106 : }
1107 :
1108 : // item properties
1109 0 : const ScDPSaveDimension::MemberList &rMembers = rSaveDim.GetMembers();
1110 0 : for (ScDPSaveDimension::MemberList::const_iterator i=rMembers.begin(); i != rMembers.end() ; ++i)
1111 0 : if( XclExpPTItem* pItem = GetItemAcc( (*i)->GetName() ) )
1112 0 : pItem->SetPropertiesFromMember( **i );
1113 0 : }
1114 :
1115 0 : void XclExpPTField::SetDataPropertiesFromDim( const ScDPSaveDimension& rSaveDim )
1116 : {
1117 0 : maDataInfoVec.push_back( XclPTDataFieldInfo() );
1118 0 : XclPTDataFieldInfo& rDataInfo = maDataInfoVec.back();
1119 0 : rDataInfo.mnField = GetFieldIndex();
1120 :
1121 : // orientation
1122 0 : maFieldInfo.AddApiOrient( DataPilotFieldOrientation_DATA );
1123 :
1124 : // aggregation function
1125 0 : GeneralFunction eFunc = static_cast< GeneralFunction >( rSaveDim.GetFunction() );
1126 0 : rDataInfo.SetApiAggFunc( eFunc );
1127 :
1128 : // visible name
1129 0 : const OUString* pVisName = rSaveDim.GetLayoutName();
1130 0 : if (pVisName)
1131 0 : rDataInfo.SetVisName(*pVisName);
1132 : else
1133 0 : rDataInfo.SetVisName( lclGetDataFieldCaption( GetFieldName(), eFunc ) );
1134 :
1135 : // result field reference
1136 0 : if( const DataPilotFieldReference* pFieldRef = rSaveDim.GetReferenceValue() )
1137 : {
1138 0 : rDataInfo.SetApiRefType( pFieldRef->ReferenceType );
1139 0 : rDataInfo.SetApiRefItemType( pFieldRef->ReferenceItemType );
1140 0 : if( const XclExpPTField* pRefField = mrPTable.GetField( pFieldRef->ReferenceField ) )
1141 : {
1142 0 : rDataInfo.mnRefField = pRefField->GetFieldIndex();
1143 0 : if( pFieldRef->ReferenceItemType == ::com::sun::star::sheet::DataPilotFieldReferenceItemType::NAMED )
1144 0 : rDataInfo.mnRefItem = pRefField->GetItemIndex( pFieldRef->ReferenceItemName, 0 );
1145 : }
1146 : }
1147 0 : }
1148 :
1149 0 : void XclExpPTField::AppendSubtotalItems()
1150 : {
1151 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_DEFAULT ) AppendSubtotalItem( EXC_SXVI_TYPE_DEFAULT );
1152 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_SUM ) AppendSubtotalItem( EXC_SXVI_TYPE_SUM );
1153 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_COUNT ) AppendSubtotalItem( EXC_SXVI_TYPE_COUNT );
1154 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_AVERAGE ) AppendSubtotalItem( EXC_SXVI_TYPE_AVERAGE );
1155 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_MAX ) AppendSubtotalItem( EXC_SXVI_TYPE_MAX );
1156 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_MIN ) AppendSubtotalItem( EXC_SXVI_TYPE_MIN );
1157 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_PROD ) AppendSubtotalItem( EXC_SXVI_TYPE_PROD );
1158 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_COUNTNUM ) AppendSubtotalItem( EXC_SXVI_TYPE_COUNTNUM );
1159 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_STDDEV ) AppendSubtotalItem( EXC_SXVI_TYPE_STDDEV );
1160 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_STDDEVP ) AppendSubtotalItem( EXC_SXVI_TYPE_STDDEVP );
1161 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_VAR ) AppendSubtotalItem( EXC_SXVI_TYPE_VAR );
1162 0 : if( maFieldInfo.mnSubtotals & EXC_SXVD_SUBT_VARP ) AppendSubtotalItem( EXC_SXVI_TYPE_VARP );
1163 0 : }
1164 :
1165 : // records --------------------------------------------------------------------
1166 :
1167 0 : void XclExpPTField::WriteSxpiEntry( XclExpStream& rStrm ) const
1168 : {
1169 0 : rStrm << maPageInfo;
1170 0 : }
1171 :
1172 0 : void XclExpPTField::WriteSxdi( XclExpStream& rStrm, sal_uInt16 nDataInfoIdx ) const
1173 : {
1174 : OSL_ENSURE( nDataInfoIdx < maDataInfoVec.size(), "XclExpPTField::WriteSxdi - data field not found" );
1175 0 : if( nDataInfoIdx < maDataInfoVec.size() )
1176 : {
1177 0 : rStrm.StartRecord( EXC_ID_SXDI, 12 );
1178 0 : rStrm << maDataInfoVec[ nDataInfoIdx ];
1179 0 : rStrm.EndRecord();
1180 : }
1181 0 : }
1182 :
1183 0 : void XclExpPTField::Save( XclExpStream& rStrm )
1184 : {
1185 : // SXVD
1186 0 : WriteSxvd( rStrm );
1187 : // list of SXVI records
1188 0 : maItemList.Save( rStrm );
1189 : // SXVDEX
1190 0 : WriteSxvdex( rStrm );
1191 0 : }
1192 :
1193 : // private --------------------------------------------------------------------
1194 :
1195 0 : XclExpPTItem* XclExpPTField::GetItemAcc( const OUString& rName )
1196 : {
1197 0 : XclExpPTItem* pItem = 0;
1198 0 : for( size_t nPos = 0, nSize = maItemList.GetSize(); !pItem && (nPos < nSize); ++nPos )
1199 0 : if( maItemList.GetRecord( nPos )->GetItemName() == rName )
1200 0 : pItem = maItemList.GetRecord( nPos ).get();
1201 0 : return pItem;
1202 : }
1203 :
1204 0 : void XclExpPTField::AppendSubtotalItem( sal_uInt16 nItemType )
1205 : {
1206 0 : maItemList.AppendNewRecord( new XclExpPTItem( nItemType, EXC_SXVI_DEFAULT_CACHE, true ) );
1207 0 : ++maFieldInfo.mnItemCount;
1208 0 : }
1209 :
1210 0 : void XclExpPTField::WriteSxvd( XclExpStream& rStrm ) const
1211 : {
1212 0 : rStrm.StartRecord( EXC_ID_SXVD, 10 );
1213 0 : rStrm << maFieldInfo;
1214 0 : rStrm.EndRecord();
1215 0 : }
1216 :
1217 0 : void XclExpPTField::WriteSxvdex( XclExpStream& rStrm ) const
1218 : {
1219 0 : rStrm.StartRecord( EXC_ID_SXVDEX, 20 );
1220 0 : rStrm << maFieldExtInfo;
1221 0 : rStrm.EndRecord();
1222 0 : }
1223 :
1224 0 : XclExpPivotTable::XclExpPivotTable( const XclExpRoot& rRoot, const ScDPObject& rDPObj, const XclExpPivotCache& rPCache, size_t nId ) :
1225 : XclExpRoot( rRoot ),
1226 : mrPCache( rPCache ),
1227 : maDataOrientField( *this, EXC_SXIVD_DATA ),
1228 : mnOutScTab( 0 ),
1229 : mbValid( false ),
1230 : mbFilterBtn( false ),
1231 0 : mnId( nId )
1232 : {
1233 0 : const ScRange& rOutScRange = rDPObj.GetOutRange();
1234 0 : if( GetAddressConverter().ConvertRange( maPTInfo.maOutXclRange, rOutScRange, true ) )
1235 : {
1236 : // DataPilot properties -----------------------------------------------
1237 :
1238 : // pivot table properties from DP object
1239 0 : mnOutScTab = rOutScRange.aStart.Tab();
1240 0 : maPTInfo.maTableName = rDPObj.GetName();
1241 0 : maPTInfo.mnCacheIdx = mrPCache.GetCacheIndex();
1242 :
1243 0 : maPTViewEx9Info.Init( rDPObj );
1244 :
1245 0 : if( const ScDPSaveData* pSaveData = rDPObj.GetSaveData() )
1246 : {
1247 : // additional properties from ScDPSaveData
1248 0 : SetPropertiesFromDP( *pSaveData );
1249 :
1250 : // loop over all dimensions ---------------------------------------
1251 :
1252 : /* 1) Default-construct all pivot table fields for all pivot cache fields. */
1253 0 : for( sal_uInt16 nFieldIdx = 0, nFieldCount = mrPCache.GetFieldCount(); nFieldIdx < nFieldCount; ++nFieldIdx )
1254 0 : maFieldList.AppendNewRecord( new XclExpPTField( *this, nFieldIdx ) );
1255 :
1256 0 : boost::ptr_vector<ScDPSaveDimension>::const_iterator iter;
1257 0 : const ScDPSaveData::DimsType& rDimList = pSaveData->GetDimensions();
1258 :
1259 : /* 2) First process all data dimensions, they are needed for extended
1260 : settings of row/column/page fields (sorting/auto show). */
1261 0 : for (iter = rDimList.begin(); iter != rDimList.end(); ++iter)
1262 0 : if (iter->GetOrientation() == DataPilotFieldOrientation_DATA)
1263 0 : SetDataFieldPropertiesFromDim(*iter);
1264 :
1265 : /* 3) Row/column/page/hidden fields. */
1266 0 : for (iter = rDimList.begin(); iter != rDimList.end(); ++iter)
1267 0 : if (iter->GetOrientation() != DataPilotFieldOrientation_DATA)
1268 0 : SetFieldPropertiesFromDim(*iter);
1269 :
1270 : // Finalize -------------------------------------------------------
1271 :
1272 0 : Finalize();
1273 0 : mbValid = true;
1274 : }
1275 : }
1276 0 : }
1277 :
1278 0 : const XclExpPCField* XclExpPivotTable::GetCacheField( sal_uInt16 nCacheIdx ) const
1279 : {
1280 0 : return mrPCache.GetField( nCacheIdx );
1281 : }
1282 :
1283 0 : const XclExpPTField* XclExpPivotTable::GetField( sal_uInt16 nFieldIdx ) const
1284 : {
1285 0 : return (nFieldIdx == EXC_SXIVD_DATA) ? &maDataOrientField : maFieldList.GetRecord( nFieldIdx ).get();
1286 : }
1287 :
1288 0 : const XclExpPTField* XclExpPivotTable::GetField( const OUString& rName ) const
1289 : {
1290 0 : return const_cast< XclExpPivotTable* >( this )->GetFieldAcc( rName );
1291 : }
1292 :
1293 0 : sal_uInt16 XclExpPivotTable::GetDataFieldIndex( const OUString& rName, sal_uInt16 nDefaultIdx ) const
1294 : {
1295 0 : for( XclPTDataFieldPosVec::const_iterator aIt = maDataFields.begin(), aEnd = maDataFields.end(); aIt != aEnd; ++aIt )
1296 0 : if( const XclExpPTField* pField = GetField( aIt->first ) )
1297 0 : if( pField->GetFieldName() == rName )
1298 0 : return static_cast< sal_uInt16 >( aIt - maDataFields.begin() );
1299 0 : return nDefaultIdx;
1300 : }
1301 :
1302 0 : void XclExpPivotTable::Save( XclExpStream& rStrm )
1303 : {
1304 0 : if( mbValid )
1305 : {
1306 : // SXVIEW
1307 0 : WriteSxview( rStrm );
1308 : // pivot table fields (SXVD, SXVDEX, and item records)
1309 0 : maFieldList.Save( rStrm );
1310 : // SXIVD records for row and column fields
1311 0 : WriteSxivd( rStrm, maRowFields );
1312 0 : WriteSxivd( rStrm, maColFields );
1313 : // SXPI
1314 0 : WriteSxpi( rStrm );
1315 : // list of SXDI records containing data field info
1316 0 : WriteSxdiList( rStrm );
1317 : // SXLI records
1318 0 : WriteSxli( rStrm, maPTInfo.mnDataRows, maPTInfo.mnRowFields );
1319 0 : WriteSxli( rStrm, maPTInfo.mnDataCols, maPTInfo.mnColFields );
1320 : // SXEX
1321 0 : WriteSxex( rStrm );
1322 : // QSISXTAG
1323 0 : WriteQsiSxTag( rStrm );
1324 : // SXVIEWEX9
1325 0 : WriteSxViewEx9( rStrm );
1326 : }
1327 0 : }
1328 :
1329 0 : void XclExpPivotTable::SaveXml( XclExpXmlStream& rStrm )
1330 : {
1331 0 : if( !mbValid )
1332 0 : return;
1333 : sax_fastparser::FSHelperPtr aPivotTableDefinition = rStrm.CreateOutputStream(
1334 0 : XclXmlUtils::GetStreamName( "xl/", "pivotTables/pivotTable", mnId + 1),
1335 0 : XclXmlUtils::GetStreamName( "../", "pivotTables/pivotTable", mnId + 1),
1336 0 : rStrm.GetCurrentStream()->getOutputStream(),
1337 : "application/vnd.openxmlformats-officedocument.spreadsheetml.pivotTable+xml",
1338 0 : "http://schemas.openxmlformats.org/officeDocument/2006/relationships/pivotTable");
1339 0 : rStrm.PushStream( aPivotTableDefinition );
1340 :
1341 : aPivotTableDefinition->startElement( XML_pivotTableDefinition,
1342 : XML_xmlns, "http://schemas.openxmlformats.org/spreadsheetml/2006/main",
1343 : XML_name, XclXmlUtils::ToOString( maPTInfo.maTableName ).getStr(),
1344 : XML_cacheId, OString::number( maPTInfo.mnCacheIdx ).getStr(),
1345 : XML_dataOnRows, XclXmlUtils::ToPsz( maPTInfo.mnDataAxis == EXC_SXVD_AXIS_COL ),
1346 : XML_dataPosition, OString::number( maPTInfo.mnDataPos ).getStr(),
1347 : XML_autoFormatId, OString::number( maPTInfo.mnAutoFmtIdx ).getStr(),
1348 : // OOXTODO: XML_applyNumberFormats, [ SXVIEW fAtrNum (maPTInfo.mnFlags) ]
1349 : // OOXTODO: XML_applyBorderFormats, [ SXVIEW fAtrBdr (maPTInfo.mnFlags) ]
1350 : // OOXTODO: XML_applyFontFormats, [ SXVIEW fAtrFnt (maPTInfo.mnFlags) ]
1351 : // OOXTODO: XML_applyPatternFormats, [ SXVIEW fAtrPat (maPTInfo.mnFlags) ]
1352 : // OOXTODO: XML_applyAlignmentFormats, [ SXVIEW fAtrAlc (maPTInfo.mnFlags) ]
1353 : // OOXTODO: XML_applyWidthHeightFormats, [ SXVIEW fAtrProc (maPTInfo.mnFlags) ]
1354 : XML_dataCaption, XclXmlUtils::ToOString( maPTInfo.maDataName ).getStr(),
1355 : // OOXTODO: XML_grandTotalCaption, [ SxViewEx9 chGrand ]
1356 : // OOXTODO: XML_errorCaption, [ SXEx stError ]
1357 : // OOXTODO: XML_showError, [ SXEx fDisplayErrorString ]
1358 : // OOXTODO: XML_missingCaption, [ SXEx stDisplayNull ]
1359 : // OOXTODO: XML_showMissing, [ SXEx fDisplayNullString ]
1360 : // OOXTODO: XML_pageStyle, [ SXEx stPageFieldStyle ]
1361 : // OOXTODO: XML_pivotTableStyle, [ SXEx stTableStyle ]
1362 : // OOXTODO: XML_vacatedStyle, [ SXEx stVacateStyle ]
1363 : // OOXTODO: XML_tag, [ SXEx stTag ]
1364 : // OOXTODO: XML_updatedVersion, [ app-dependent ]
1365 : // OOXTODO: XML_minRefreshableVersion, [ app-dependent ]
1366 : // OOXTODO: XML_asteriskTotals, [ QsiSXTag/SXView9Save fHideTotAnnotation ]
1367 : // OOXTODO: XML_showItems, [ ??? ]
1368 : // OOXTODO: XML_editData, [ ??? ]
1369 : // OOXTODO: XML_disableFieldList, [ SXEx fEnableFieldDialog? ]
1370 : // OOXTODO: XML_showCalcMbrs, [ ??? ]
1371 : // OOXTODO: XML_visualTotals, [ ??? ]
1372 : // OOXTODO: XML_showMultipleLabel, [ SXEx fMergeLabels? ]
1373 : // OOXTODO: XML_showDataDropDown, [ SXEx fEnableDrillDown? ]
1374 : // OOXTODO: XML_showDrill, [ ??? ]
1375 : // OOXTODO: XML_printDrill, [ ??? ]
1376 : // OOXTODO: XML_showMemberPropertyTips,
1377 : // OOXTODO: XML_showDataTips,
1378 : // OOXTODO: XML_enableWizard,
1379 0 : XML_enableDrill, XclXmlUtils::ToPsz( (maPTExtInfo.mnFlags & EXC_SXEX_DRILLDOWN) != 0 ), // ???
1380 : // OOXTODO: XML_enableFieldProperties, [ SXEx fEnableFieldDialog (maPTExtInfo.mnFlags) ]
1381 : // OOXTODO: XML_preserveFormatting, [ SXEx fPreserveFormatting (maPTExtInfo.mnFlags) ]
1382 : // OOXTODO: XML_pageWrap, [ SXEx cWrapPage (maPTExtInfo.mnFlags) ]
1383 : // OOXTODO: XML_pageOverThenDown, [ SXEx fAcrossPageLay (maPTExtInfo.mnFlags) ]
1384 : // OOXTODO: XML_subtotalHiddenItems, [ SXEx fSubtotalHiddenPageItems (maPTExtInfo.mnFlags) ]
1385 0 : XML_rowGrandTotals, XclXmlUtils::ToPsz( (maPTInfo.mnFlags & EXC_SXVIEW_ROWGRAND) != 0 ),
1386 0 : XML_colGrandTotals, XclXmlUtils::ToPsz( (maPTInfo.mnFlags & EXC_SXVIEW_COLGRAND) != 0 ),
1387 : // OOXTODO: XML_fieldPrintTitles,
1388 : // OOXTODO: XML_itemPrintTitles,
1389 : // OOXTODO: XML_mergeItem,
1390 : // OOXTODO: XML_showDropZones,
1391 : // OOXTODO: XML_createdVersion,
1392 : // OOXTODO: XML_indent,
1393 : // OOXTODO: XML_showEmptyRow,
1394 : // OOXTODO: XML_showEmptyCol,
1395 : // OOXTODO: XML_showHeaders,
1396 : // OOXTODO: XML_compact,
1397 : // OOXTODO: XML_outline,
1398 : // OOXTODO: XML_outlineData,
1399 : // OOXTODO: XML_compactData,
1400 : // OOXTODO: XML_published,
1401 : // OOXTODO: XML_gridDropZones,
1402 : // OOXTODO: XML_immersive,
1403 : // OOXTODO: XML_multipleFieldFilters,
1404 : // OOXTODO: XML_chartFormat,
1405 : // OOXTODO: XML_rowHeaderCaption,
1406 : // OOXTODO: XML_colHeaderCaption,
1407 : // OOXTODO: XML_fieldListSortAscending,
1408 : // OOXTODO: XML_mdxSubqueries,
1409 : // OOXTODO: XML_customListSort,
1410 0 : FSEND );
1411 :
1412 : aPivotTableDefinition->singleElement( XML_location,
1413 : XML_ref, XclXmlUtils::ToOString( maPTInfo.maOutXclRange ).getStr(),
1414 : XML_firstHeaderRow, OString::number( maPTInfo.mnFirstHeadRow ).getStr(),
1415 : XML_firstDataRow, OString::number( maPTInfo.maDataXclPos.mnRow ).getStr(),
1416 : XML_firstDataCol, OString::number( maPTInfo.maDataXclPos.mnCol ).getStr(),
1417 : XML_rowPageCount, OString::number( maPTInfo.mnDataRows ).getStr(), // OOXTODO?
1418 : XML_colPageCount, OString::number( maPTInfo.mnDataCols ).getStr(), // OOXTODO?
1419 0 : FSEND );
1420 :
1421 : // OOXTODO: XML_pivotFields
1422 :
1423 : // Until we figure out how to fill these elements don't export them. It makes
1424 : // our documents invalid. The code below is correct so don't remove it!!!
1425 : #if 0
1426 : // maPTInfo.mnFields?
1427 : if( maPTInfo.mnRowFields )
1428 : {
1429 : aPivotTableDefinition->startElement( XML_rowFields,
1430 : XML_count, OString::number( maPTInfo.mnRowFields ).getStr(),
1431 : FSEND );
1432 : aPivotTableDefinition->endElement( XML_rowFields );
1433 : }
1434 :
1435 : // OOXTODO: XML_rowItems
1436 :
1437 : if( maPTInfo.mnColFields )
1438 : {
1439 : aPivotTableDefinition->startElement( XML_colFields,
1440 : XML_count, OString::number( maPTInfo.mnColFields ).getStr(),
1441 : FSEND );
1442 : aPivotTableDefinition->endElement( XML_colFields );
1443 : }
1444 :
1445 : // OOXTODO: XML_colItems
1446 :
1447 : if( maPTInfo.mnPageFields )
1448 : {
1449 : aPivotTableDefinition->startElement( XML_pageFields,
1450 : XML_count, OString::number( maPTInfo.mnPageFields ).getStr(),
1451 : FSEND );
1452 : aPivotTableDefinition->endElement( XML_pageFields );
1453 : }
1454 :
1455 : if( maPTInfo.mnDataFields )
1456 : {
1457 : aPivotTableDefinition->startElement( XML_dataFields,
1458 : XML_count, OString::number( maPTInfo.mnDataFields ).getStr(),
1459 : FSEND );
1460 : aPivotTableDefinition->endElement( XML_dataFields );
1461 : }
1462 : #endif
1463 :
1464 : // OOXTODO: XML_formats, XML_conditionalFormats, XML_chartFormats,
1465 : // XML_pivotHierarchies, XML_pivotTableStyleInfo, XML_filters,
1466 : // XML_rowHierarchiesUsage, XML_colHierarchiesUsage, XML_ext
1467 :
1468 0 : aPivotTableDefinition->endElement( XML_pivotTableDefinition );
1469 :
1470 0 : rStrm.PopStream();
1471 : }
1472 :
1473 : // private --------------------------------------------------------------------
1474 :
1475 0 : XclExpPTField* XclExpPivotTable::GetFieldAcc( const OUString& rName )
1476 : {
1477 0 : XclExpPTField* pField = 0;
1478 0 : for( size_t nPos = 0, nSize = maFieldList.GetSize(); !pField && (nPos < nSize); ++nPos )
1479 0 : if( maFieldList.GetRecord( nPos )->GetFieldName() == rName )
1480 0 : pField = maFieldList.GetRecord( nPos ).get();
1481 0 : return pField;
1482 : }
1483 :
1484 0 : XclExpPTField* XclExpPivotTable::GetFieldAcc( const ScDPSaveDimension& rSaveDim )
1485 : {
1486 : // data field orientation field?
1487 0 : if( rSaveDim.IsDataLayout() )
1488 0 : return &maDataOrientField;
1489 :
1490 : // a real dimension
1491 0 : OUString aFieldName = ScDPUtil::getSourceDimensionName(rSaveDim.GetName());
1492 0 : return aFieldName.isEmpty() ? NULL : GetFieldAcc(aFieldName);
1493 : }
1494 :
1495 : // fill data --------------------------------------------------------------
1496 :
1497 0 : void XclExpPivotTable::SetPropertiesFromDP( const ScDPSaveData& rSaveData )
1498 : {
1499 0 : ::set_flag( maPTInfo.mnFlags, EXC_SXVIEW_ROWGRAND, rSaveData.GetRowGrand() );
1500 0 : ::set_flag( maPTInfo.mnFlags, EXC_SXVIEW_COLGRAND, rSaveData.GetColumnGrand() );
1501 0 : ::set_flag( maPTExtInfo.mnFlags, EXC_SXEX_DRILLDOWN, rSaveData.GetDrillDown() );
1502 0 : mbFilterBtn = rSaveData.GetFilterButton();
1503 0 : const ScDPSaveDimension* pDim = rSaveData.GetExistingDataLayoutDimension();
1504 0 : if (!pDim)
1505 0 : return;
1506 :
1507 0 : const OUString* pLayoutName = pDim->GetLayoutName();
1508 0 : if (pLayoutName)
1509 0 : maPTInfo.maDataName = *pLayoutName;
1510 : else
1511 0 : maPTInfo.maDataName = ScGlobal::GetRscString(STR_PIVOT_DATA);
1512 : }
1513 :
1514 0 : void XclExpPivotTable::SetFieldPropertiesFromDim( const ScDPSaveDimension& rSaveDim )
1515 : {
1516 0 : if( XclExpPTField* pField = GetFieldAcc( rSaveDim ) )
1517 : {
1518 : // field properties
1519 0 : pField->SetPropertiesFromDim( rSaveDim );
1520 :
1521 : // update the corresponding field position list
1522 0 : DataPilotFieldOrientation eOrient = static_cast< DataPilotFieldOrientation >( rSaveDim.GetOrientation() );
1523 0 : sal_uInt16 nFieldIdx = pField->GetFieldIndex();
1524 0 : bool bDataLayout = nFieldIdx == EXC_SXIVD_DATA;
1525 0 : bool bMultiData = maDataFields.size() > 1;
1526 :
1527 0 : if( !bDataLayout || bMultiData ) switch( eOrient )
1528 : {
1529 : case DataPilotFieldOrientation_ROW:
1530 0 : maRowFields.push_back( nFieldIdx );
1531 0 : if( bDataLayout )
1532 0 : maPTInfo.mnDataAxis = EXC_SXVD_AXIS_ROW;
1533 0 : break;
1534 : case DataPilotFieldOrientation_COLUMN:
1535 0 : maColFields.push_back( nFieldIdx );
1536 0 : if( bDataLayout )
1537 0 : maPTInfo.mnDataAxis = EXC_SXVD_AXIS_COL;
1538 0 : break;
1539 : case DataPilotFieldOrientation_PAGE:
1540 0 : maPageFields.push_back( nFieldIdx );
1541 : OSL_ENSURE( !bDataLayout, "XclExpPivotTable::SetFieldPropertiesFromDim - wrong orientation for data fields" );
1542 0 : break;
1543 : case DataPilotFieldOrientation_DATA:
1544 : OSL_FAIL( "XclExpPivotTable::SetFieldPropertiesFromDim - called for data field" );
1545 0 : break;
1546 : default:;
1547 : }
1548 : }
1549 0 : }
1550 :
1551 0 : void XclExpPivotTable::SetDataFieldPropertiesFromDim( const ScDPSaveDimension& rSaveDim )
1552 : {
1553 0 : if( XclExpPTField* pField = GetFieldAcc( rSaveDim ) )
1554 : {
1555 : // field properties
1556 0 : pField->SetDataPropertiesFromDim( rSaveDim );
1557 : // update the data field position list
1558 0 : maDataFields.push_back( XclPTDataFieldPos( pField->GetFieldIndex(), pField->GetLastDataInfoIndex() ) );
1559 : }
1560 0 : }
1561 :
1562 0 : void XclExpPivotTable::Finalize()
1563 : {
1564 : // field numbers
1565 0 : maPTInfo.mnFields = static_cast< sal_uInt16 >( maFieldList.GetSize() );
1566 0 : maPTInfo.mnRowFields = static_cast< sal_uInt16 >( maRowFields.size() );
1567 0 : maPTInfo.mnColFields = static_cast< sal_uInt16 >( maColFields.size() );
1568 0 : maPTInfo.mnPageFields = static_cast< sal_uInt16 >( maPageFields.size() );
1569 0 : maPTInfo.mnDataFields = static_cast< sal_uInt16 >( maDataFields.size() );
1570 :
1571 0 : maPTExtInfo.mnPagePerRow = maPTInfo.mnPageFields;
1572 0 : maPTExtInfo.mnPagePerCol = (maPTInfo.mnPageFields > 0) ? 1 : 0;
1573 :
1574 : // subtotal items
1575 0 : for( size_t nPos = 0, nSize = maFieldList.GetSize(); nPos < nSize; ++nPos )
1576 0 : maFieldList.GetRecord( nPos )->AppendSubtotalItems();
1577 :
1578 : // find data field orientation field
1579 0 : maPTInfo.mnDataPos = EXC_SXVIEW_DATALAST;
1580 0 : const ScfUInt16Vec* pFieldVec = 0;
1581 0 : switch( maPTInfo.mnDataAxis )
1582 : {
1583 0 : case EXC_SXVD_AXIS_ROW: pFieldVec = &maRowFields; break;
1584 0 : case EXC_SXVD_AXIS_COL: pFieldVec = &maColFields; break;
1585 : }
1586 :
1587 0 : if( pFieldVec && !pFieldVec->empty() && (pFieldVec->back() != EXC_SXIVD_DATA) )
1588 : {
1589 0 : ScfUInt16Vec::const_iterator aIt = ::std::find( pFieldVec->begin(), pFieldVec->end(), EXC_SXIVD_DATA );
1590 0 : if( aIt != pFieldVec->end() )
1591 0 : maPTInfo.mnDataPos = static_cast< sal_uInt16 >( aIt - pFieldVec->begin() );
1592 : }
1593 :
1594 : // single data field is always row oriented
1595 0 : if( maPTInfo.mnDataAxis == EXC_SXVD_AXIS_NONE )
1596 0 : maPTInfo.mnDataAxis = EXC_SXVD_AXIS_ROW;
1597 :
1598 : // update output range (initialized in ctor)
1599 0 : sal_uInt16& rnXclCol1 = maPTInfo.maOutXclRange.maFirst.mnCol;
1600 0 : sal_uInt32& rnXclRow1 = maPTInfo.maOutXclRange.maFirst.mnRow;
1601 0 : sal_uInt16& rnXclCol2 = maPTInfo.maOutXclRange.maLast.mnCol;
1602 0 : sal_uInt32& rnXclRow2 = maPTInfo.maOutXclRange.maLast.mnRow;
1603 : // exclude page fields from output range
1604 0 : rnXclRow1 = rnXclRow1 + maPTInfo.mnPageFields;
1605 : // exclude filter button from output range
1606 0 : if( mbFilterBtn )
1607 0 : ++rnXclRow1;
1608 : // exclude empty row between (filter button and/or page fields) and table
1609 0 : if( mbFilterBtn || maPTInfo.mnPageFields )
1610 0 : ++rnXclRow1;
1611 :
1612 : // data area
1613 0 : sal_uInt16& rnDataXclCol = maPTInfo.maDataXclPos.mnCol;
1614 0 : sal_uInt32& rnDataXclRow = maPTInfo.maDataXclPos.mnRow;
1615 0 : rnDataXclCol = rnXclCol1 + maPTInfo.mnRowFields;
1616 0 : rnDataXclRow = rnXclRow1 + maPTInfo.mnColFields + 1;
1617 0 : if( maDataFields.empty() )
1618 0 : ++rnDataXclRow;
1619 :
1620 0 : bool bExtraHeaderRow = (0 == maPTViewEx9Info.mnGridLayout && maPTInfo.mnColFields == 0);
1621 0 : if (bExtraHeaderRow)
1622 : // Insert an extra row only when there is no column field.
1623 0 : ++rnDataXclRow;
1624 :
1625 0 : rnXclCol2 = ::std::max( rnXclCol2, rnDataXclCol );
1626 0 : rnXclRow2 = ::std::max( rnXclRow2, rnDataXclRow );
1627 0 : maPTInfo.mnDataCols = rnXclCol2 - rnDataXclCol + 1;
1628 0 : maPTInfo.mnDataRows = rnXclRow2 - rnDataXclRow + 1;
1629 :
1630 : // first heading
1631 0 : maPTInfo.mnFirstHeadRow = rnXclRow1;
1632 0 : if (bExtraHeaderRow)
1633 0 : maPTInfo.mnFirstHeadRow += 2;
1634 0 : }
1635 :
1636 : // records ----------------------------------------------------------------
1637 :
1638 0 : void XclExpPivotTable::WriteSxview( XclExpStream& rStrm ) const
1639 : {
1640 0 : rStrm.StartRecord( EXC_ID_SXVIEW, 46 + maPTInfo.maTableName.getLength() + maPTInfo.maDataName.getLength() );
1641 0 : rStrm << maPTInfo;
1642 0 : rStrm.EndRecord();
1643 0 : }
1644 :
1645 0 : void XclExpPivotTable::WriteSxivd( XclExpStream& rStrm, const ScfUInt16Vec& rFields ) const
1646 : {
1647 0 : if( !rFields.empty() )
1648 : {
1649 0 : rStrm.StartRecord( EXC_ID_SXIVD, rFields.size() * 2 );
1650 0 : for( ScfUInt16Vec::const_iterator aIt = rFields.begin(), aEnd = rFields.end(); aIt != aEnd; ++aIt )
1651 0 : rStrm << *aIt;
1652 0 : rStrm.EndRecord();
1653 : }
1654 0 : }
1655 :
1656 0 : void XclExpPivotTable::WriteSxpi( XclExpStream& rStrm ) const
1657 : {
1658 0 : if( !maPageFields.empty() )
1659 : {
1660 0 : rStrm.StartRecord( EXC_ID_SXPI, maPageFields.size() * 6 );
1661 0 : rStrm.SetSliceSize( 6 );
1662 0 : for( ScfUInt16Vec::const_iterator aIt = maPageFields.begin(), aEnd = maPageFields.end(); aIt != aEnd; ++aIt )
1663 : {
1664 0 : XclExpPTFieldRef xField = maFieldList.GetRecord( *aIt );
1665 0 : if( xField )
1666 0 : xField->WriteSxpiEntry( rStrm );
1667 0 : }
1668 0 : rStrm.EndRecord();
1669 : }
1670 0 : }
1671 :
1672 0 : void XclExpPivotTable::WriteSxdiList( XclExpStream& rStrm ) const
1673 : {
1674 0 : for( XclPTDataFieldPosVec::const_iterator aIt = maDataFields.begin(), aEnd = maDataFields.end(); aIt != aEnd; ++aIt )
1675 : {
1676 0 : XclExpPTFieldRef xField = maFieldList.GetRecord( aIt->first );
1677 0 : if( xField )
1678 0 : xField->WriteSxdi( rStrm, aIt->second );
1679 0 : }
1680 0 : }
1681 :
1682 0 : void XclExpPivotTable::WriteSxli( XclExpStream& rStrm, sal_uInt16 nLineCount, sal_uInt16 nIndexCount ) const
1683 : {
1684 0 : if( nLineCount > 0 )
1685 : {
1686 0 : sal_uInt16 nLineSize = 8 + 2 * nIndexCount;
1687 0 : rStrm.StartRecord( EXC_ID_SXLI, nLineSize * nLineCount );
1688 :
1689 : /* Excel expects the records to be filled completely, do not
1690 : set a segment size... */
1691 : // rStrm.SetSliceSize( nLineSize );
1692 :
1693 0 : for( sal_uInt16 nLine = 0; nLine < nLineCount; ++nLine )
1694 : {
1695 : // Excel XP needs a partly initialized SXLI record
1696 0 : rStrm << sal_uInt16( 0 ) // number of equal index entries
1697 0 : << EXC_SXVI_TYPE_DATA
1698 0 : << nIndexCount
1699 0 : << EXC_SXLI_DEFAULTFLAGS;
1700 0 : rStrm.WriteZeroBytes( 2 * nIndexCount );
1701 : }
1702 0 : rStrm.EndRecord();
1703 : }
1704 0 : }
1705 :
1706 0 : void XclExpPivotTable::WriteSxex( XclExpStream& rStrm ) const
1707 : {
1708 0 : rStrm.StartRecord( EXC_ID_SXEX, 24 );
1709 0 : rStrm << maPTExtInfo;
1710 0 : rStrm.EndRecord();
1711 0 : }
1712 :
1713 0 : void XclExpPivotTable::WriteQsiSxTag( XclExpStream& rStrm ) const
1714 : {
1715 0 : rStrm.StartRecord( 0x0802, 32 );
1716 :
1717 0 : sal_uInt16 nRecordType = 0x0802;
1718 0 : sal_uInt16 nDummyFlags = 0x0000;
1719 0 : sal_uInt16 nTableType = 1; // 0 = query table : 1 = pivot table
1720 :
1721 0 : rStrm << nRecordType << nDummyFlags << nTableType;
1722 :
1723 : // General flags
1724 0 : bool bEnableRefresh = true;
1725 0 : bool bPCacheInvalid = false;
1726 0 : bool bOlapPTReport = false;
1727 :
1728 0 : sal_uInt16 nFlags = 0x0000;
1729 0 : if (bEnableRefresh) nFlags |= 0x0001;
1730 0 : if (bPCacheInvalid) nFlags |= 0x0002;
1731 0 : if (bOlapPTReport) nFlags |= 0x0004;
1732 0 : rStrm << nFlags;
1733 :
1734 : // Feature-specific options. The value differs depending on the table
1735 : // type, but we assume the table type is always pivot table.
1736 0 : sal_uInt32 nOptions = 0x00000000;
1737 0 : bool bNoStencil = false;
1738 0 : bool bHideTotal = false;
1739 0 : bool bEmptyRows = false;
1740 0 : bool bEmptyCols = false;
1741 0 : if (bNoStencil) nOptions |= 0x00000001;
1742 0 : if (bHideTotal) nOptions |= 0x00000002;
1743 0 : if (bEmptyRows) nOptions |= 0x00000008;
1744 0 : if (bEmptyCols) nOptions |= 0x00000010;
1745 0 : rStrm << nOptions;
1746 :
1747 : enum ExcelVersion
1748 : {
1749 : Excel2000 = 0,
1750 : ExcelXP = 1,
1751 : Excel2003 = 2,
1752 : Excel2007 = 3
1753 : };
1754 0 : ExcelVersion eXclVer = Excel2000;
1755 0 : sal_uInt8 nOffsetBytes = 16;
1756 0 : rStrm << static_cast<sal_uInt8>(eXclVer) // version table last refreshed
1757 0 : << static_cast<sal_uInt8>(eXclVer) // minimum version to refresh
1758 0 : << nOffsetBytes
1759 0 : << static_cast<sal_uInt8>(eXclVer); // first version created
1760 :
1761 0 : rStrm << XclExpString(maPTInfo.maTableName);
1762 0 : rStrm << static_cast<sal_uInt16>(0x0001); // no idea what this is for.
1763 :
1764 0 : rStrm.EndRecord();
1765 0 : }
1766 :
1767 0 : void XclExpPivotTable::WriteSxViewEx9( XclExpStream& rStrm ) const
1768 : {
1769 : // Until we sync the autoformat ids only export if using grid header layout
1770 : // That could only have been set via xls import so far.
1771 0 : if ( 0 == maPTViewEx9Info.mnGridLayout )
1772 : {
1773 0 : rStrm.StartRecord( EXC_ID_SXVIEWEX9, 17 );
1774 0 : rStrm << maPTViewEx9Info;
1775 0 : rStrm.EndRecord();
1776 : }
1777 0 : }
1778 :
1779 : namespace {
1780 :
1781 : const SCTAB EXC_PTMGR_PIVOTCACHES = SCTAB_MAX;
1782 :
1783 : /** Record wrapper class to write the pivot caches or pivot tables. */
1784 0 : class XclExpPivotRecWrapper : public XclExpRecordBase
1785 : {
1786 : public:
1787 : explicit XclExpPivotRecWrapper( XclExpPivotTableManager& rPTMgr, SCTAB nScTab );
1788 : virtual void Save( XclExpStream& rStrm ) SAL_OVERRIDE;
1789 : virtual void SaveXml( XclExpXmlStream& rStrm ) SAL_OVERRIDE;
1790 : private:
1791 : XclExpPivotTableManager& mrPTMgr;
1792 : SCTAB mnScTab;
1793 : };
1794 :
1795 0 : XclExpPivotRecWrapper::XclExpPivotRecWrapper( XclExpPivotTableManager& rPTMgr, SCTAB nScTab ) :
1796 : mrPTMgr( rPTMgr ),
1797 0 : mnScTab( nScTab )
1798 : {
1799 0 : }
1800 :
1801 0 : void XclExpPivotRecWrapper::Save( XclExpStream& rStrm )
1802 : {
1803 0 : if( mnScTab == EXC_PTMGR_PIVOTCACHES )
1804 0 : mrPTMgr.WritePivotCaches( rStrm );
1805 : else
1806 0 : mrPTMgr.WritePivotTables( rStrm, mnScTab );
1807 0 : }
1808 :
1809 0 : void XclExpPivotRecWrapper::SaveXml( XclExpXmlStream& rStrm )
1810 : {
1811 0 : if( mnScTab == EXC_PTMGR_PIVOTCACHES )
1812 0 : mrPTMgr.WritePivotCachesXml( rStrm );
1813 : else
1814 0 : mrPTMgr.WritePivotTablesXml( rStrm, mnScTab );
1815 0 : }
1816 :
1817 : } // namespace
1818 :
1819 0 : XclExpPivotTableManager::XclExpPivotTableManager( const XclExpRoot& rRoot ) :
1820 : XclExpRoot( rRoot ),
1821 0 : mbShareCaches( true )
1822 : {
1823 0 : }
1824 :
1825 0 : void XclExpPivotTableManager::CreatePivotTables()
1826 : {
1827 0 : if( ScDPCollection* pDPColl = GetDoc().GetDPCollection() )
1828 0 : for( size_t nDPObj = 0, nCount = pDPColl->GetCount(); nDPObj < nCount; ++nDPObj )
1829 0 : if( ScDPObject* pDPObj = (*pDPColl)[ nDPObj ] )
1830 0 : if( const XclExpPivotCache* pPCache = CreatePivotCache( *pDPObj ) )
1831 0 : maPTableList.AppendNewRecord( new XclExpPivotTable( GetRoot(), *pDPObj, *pPCache, nDPObj ) );
1832 0 : }
1833 :
1834 0 : XclExpRecordRef XclExpPivotTableManager::CreatePivotCachesRecord()
1835 : {
1836 0 : return XclExpRecordRef( new XclExpPivotRecWrapper( *this, EXC_PTMGR_PIVOTCACHES ) );
1837 : }
1838 :
1839 0 : XclExpRecordRef XclExpPivotTableManager::CreatePivotTablesRecord( SCTAB nScTab )
1840 : {
1841 0 : return XclExpRecordRef( new XclExpPivotRecWrapper( *this, nScTab ) );
1842 : }
1843 :
1844 0 : void XclExpPivotTableManager::WritePivotCaches( XclExpStream& rStrm )
1845 : {
1846 0 : maPCacheList.Save( rStrm );
1847 0 : }
1848 :
1849 0 : void XclExpPivotTableManager::WritePivotCachesXml( XclExpXmlStream&
1850 : #ifdef XLSX_PIVOT_CACHE
1851 : rStrm
1852 : #endif
1853 : )
1854 : {
1855 : #ifdef XLSX_PIVOT_CACHE /* <pivotCache> without xl/pivotCaches/ cacheStream
1856 : results in a broken .xlsx */
1857 : if( maPCacheList.IsEmpty() )
1858 : return;
1859 : sax_fastparser::FSHelperPtr& rWorkbook = rStrm.GetCurrentStream();
1860 : rWorkbook->startElement( XML_pivotCaches, FSEND );
1861 : maPCacheList.SaveXml( rStrm );
1862 : rWorkbook->endElement( XML_pivotCaches );
1863 : #endif /* XLSX_PIVOT_CACHE */
1864 0 : }
1865 :
1866 0 : void XclExpPivotTableManager::WritePivotTables( XclExpStream& rStrm, SCTAB nScTab )
1867 : {
1868 0 : for( size_t nPos = 0, nSize = maPTableList.GetSize(); nPos < nSize; ++nPos )
1869 : {
1870 0 : XclExpPivotTableRef xPTable = maPTableList.GetRecord( nPos );
1871 0 : if( xPTable->GetScTab() == nScTab )
1872 0 : xPTable->Save( rStrm );
1873 0 : }
1874 0 : }
1875 :
1876 0 : void XclExpPivotTableManager::WritePivotTablesXml( XclExpXmlStream& rStrm, SCTAB nScTab )
1877 : {
1878 0 : for( size_t nPos = 0, nSize = maPTableList.GetSize(); nPos < nSize; ++nPos )
1879 : {
1880 0 : XclExpPivotTableRef xPTable = maPTableList.GetRecord( nPos );
1881 0 : if( xPTable->GetScTab() == nScTab )
1882 0 : xPTable->SaveXml( rStrm );
1883 0 : }
1884 0 : }
1885 :
1886 : // private --------------------------------------------------------------------
1887 :
1888 0 : const XclExpPivotCache* XclExpPivotTableManager::CreatePivotCache( const ScDPObject& rDPObj )
1889 : {
1890 : // try to find a pivot cache with the same data source
1891 : /* #i25110# In Excel, the pivot cache contains additional fields
1892 : (i.e. grouping info, calculated fields). If the passed DataPilot object
1893 : or the found cache contains this data, do not share the cache with
1894 : multiple pivot tables. */
1895 0 : if( mbShareCaches )
1896 : {
1897 0 : if( const ScDPSaveData* pSaveData = rDPObj.GetSaveData() )
1898 : {
1899 0 : const ScDPDimensionSaveData* pDimSaveData = pSaveData->GetExistingDimensionData();
1900 : // no dimension save data at all or save data does not contain grouping info
1901 0 : if( !pDimSaveData || !pDimSaveData->HasGroupDimensions() )
1902 : {
1903 : // check all existing pivot caches
1904 0 : for( size_t nPos = 0, nSize = maPCacheList.GetSize(); nPos < nSize; ++nPos )
1905 : {
1906 0 : XclExpPivotCacheRef xPCache = maPCacheList.GetRecord( nPos );
1907 : // pivot cache does not have grouping info and source data is equal
1908 0 : if( !xPCache->HasAddFields() && xPCache->HasEqualDataSource( rDPObj ) )
1909 0 : return xPCache.get();
1910 0 : }
1911 : }
1912 : }
1913 : }
1914 :
1915 : // create a new pivot cache
1916 0 : sal_uInt16 nNewCacheIdx = static_cast< sal_uInt16 >( maPCacheList.GetSize() );
1917 0 : XclExpPivotCacheRef xNewPCache( new XclExpPivotCache( GetRoot(), rDPObj, nNewCacheIdx ) );
1918 0 : if( xNewPCache->IsValid() )
1919 : {
1920 0 : maPCacheList.AppendRecord( xNewPCache );
1921 0 : return xNewPCache.get();
1922 : }
1923 :
1924 0 : return 0;
1925 0 : }
1926 :
1927 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|