sc/source/filter/excel/xipivot.cxx

   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 "xipivot.hxx"
  21
  22 #include <com/sun/star/sheet/DataPilotFieldSortInfo.hpp>
  23 #include <com/sun/star/sheet/DataPilotFieldAutoShowInfo.hpp>
  24 #include <com/sun/star/sheet/DataPilotFieldLayoutInfo.hpp>
  25 #include <com/sun/star/sheet/DataPilotFieldReference.hpp>
  26
  27 #include <tools/datetime.hxx>
  28 #include <svl/zformat.hxx>
  29 #include <svl/intitem.hxx>
  30
  31 #include "document.hxx"
  32 #include "formulacell.hxx"
  33 #include "dpsave.hxx"
  34 #include "dpdimsave.hxx"
  35 #include "dpobject.hxx"
  36 #include "dpshttab.hxx"
  37 #include "dpoutputgeometry.hxx"
  38 #include "scitems.hxx"
  39 #include "attrib.hxx"
  40
  41 #include "xltracer.hxx"
  42 #include "xistream.hxx"
  43 #include "xihelper.hxx"
  44 #include "xilink.hxx"
  45 #include "xiescher.hxx"
  46
  47 //TODO ExcelToSc usage
  48 #include "excform.hxx"
  49 #include "xltable.hxx"
  50 #include "documentimport.hxx"
  51
  52 #include <vector>
  53
  54 using namespace com::sun::star;
  55
  56 using ::com::sun::star::sheet::DataPilotFieldOrientation;
  57 using ::com::sun::star::sheet::DataPilotFieldOrientation_DATA;
  58 using ::com::sun::star::sheet::DataPilotFieldSortInfo;
  59 using ::com::sun::star::sheet::DataPilotFieldAutoShowInfo;
  60 using ::com::sun::star::sheet::DataPilotFieldLayoutInfo;
  61 using ::com::sun::star::sheet::DataPilotFieldReference;
  62 using ::std::vector;
  63
  64 // Pivot cache
  65
  66 XclImpPCItem::XclImpPCItem( XclImpStream& rStrm )
  67 {
  68     switch( rStrm.GetRecId() )
  69     {
  70         case EXC_ID_SXDOUBLE:   ReadSxdouble( rStrm );      break;
  71         case EXC_ID_SXBOOLEAN:  ReadSxboolean( rStrm );     break;
  72         case EXC_ID_SXERROR:    ReadSxerror( rStrm );       break;
  73         case EXC_ID_SXINTEGER:  ReadSxinteger( rStrm );     break;
  74         case EXC_ID_SXSTRING:   ReadSxstring( rStrm );      break;
  75         case EXC_ID_SXDATETIME: ReadSxdatetime( rStrm );    break;
  76         case EXC_ID_SXEMPTY:    ReadSxempty( rStrm );       break;
  77         default:    OSL_FAIL( "XclImpPCItem::XclImpPCItem - unknown record id" );
  78     }
  79 }
  80
  81 namespace {
  82
  83 void lclSetValue( XclImpRoot& rRoot, const ScAddress& rScPos, double fValue, short nFormatType )
  84 {
  85     ScDocumentImport& rDoc = rRoot.GetDocImport();
  86     rDoc.setNumericCell(rScPos, fValue);
  87     sal_uInt32 nScNumFmt = rRoot.GetFormatter().GetStandardFormat( nFormatType, rRoot.GetDocLanguage() );
  88     rDoc.getDoc().ApplyAttr(
  89         rScPos.Col(), rScPos.Row(), rScPos.Tab(), SfxUInt32Item(ATTR_VALUE_FORMAT, nScNumFmt));
  90 }
  91
  92 } // namespace
  93
  94 void XclImpPCItem::WriteToSource( XclImpRoot& rRoot, const ScAddress& rScPos ) const
  95 {
  96     ScDocumentImport& rDoc = rRoot.GetDocImport();
  97     if( const OUString* pText = GetText() )
  98         rDoc.setStringCell(rScPos, *pText);
  99     else if( const double* pfValue = GetDouble() )
 100         rDoc.setNumericCell(rScPos, *pfValue);
 101     else if( const sal_Int16* pnValue = GetInteger() )
 102         rDoc.setNumericCell(rScPos, *pnValue);
 103     else if( const bool* pbValue = GetBool() )
 104         lclSetValue( rRoot, rScPos, *pbValue ? 1.0 : 0.0, css::util::NumberFormat::LOGICAL );
 105     else if( const DateTime* pDateTime = GetDateTime() )
 106     {
 107         // set number format date, time, or date/time, depending on the value
 108         double fValue = rRoot.GetDoubleFromDateTime( *pDateTime );
 109         double fInt = 0.0;
 110         double fFrac = modf( fValue, &fInt );
 111         short nFormatType = ((fFrac == 0.0) && (fInt != 0.0)) ? css::util::NumberFormat::DATE :
 112             ((fInt == 0.0) ? css::util::NumberFormat::TIME : css::util::NumberFormat::DATETIME);
 113         lclSetValue( rRoot, rScPos, fValue, nFormatType );
 114     }
 115     else if( const sal_uInt16* pnError = GetError() )
 116     {
 117         double fValue;
 118         sal_uInt8 nErrCode = static_cast< sal_uInt8 >( *pnError );
 119         const ScTokenArray* pScTokArr = rRoot.GetOldFmlaConverter().GetBoolErr(
 120             XclTools::ErrorToEnum( fValue, true, nErrCode ) );
 121         ScFormulaCell* pCell = pScTokArr ? new ScFormulaCell(&rDoc.getDoc(), rScPos, *pScTokArr) : new ScFormulaCell(&rDoc.getDoc(), rScPos);
 122         pCell->SetHybridDouble( fValue );
 123         rDoc.setFormulaCell(rScPos, pCell);
 124     }
 125 }
 126
 127 void XclImpPCItem::ReadSxdouble( XclImpStream& rStrm )
 128 {
 129     OSL_ENSURE( rStrm.GetRecSize() == 8, "XclImpPCItem::ReadSxdouble - wrong record size" );
 130     SetDouble( rStrm.ReadDouble() );
 131 }
 132
 133 void XclImpPCItem::ReadSxboolean( XclImpStream& rStrm )
 134 {
 135     OSL_ENSURE( rStrm.GetRecSize() == 2, "XclImpPCItem::ReadSxboolean - wrong record size" );
 136     SetBool( rStrm.ReaduInt16() != 0 );
 137 }
 138
 139 void XclImpPCItem::ReadSxerror( XclImpStream& rStrm )
 140 {
 141     OSL_ENSURE( rStrm.GetRecSize() == 2, "XclImpPCItem::ReadSxerror - wrong record size" );
 142     SetError( rStrm.ReaduInt16() );
 143 }
 144
 145 void XclImpPCItem::ReadSxinteger( XclImpStream& rStrm )
 146 {
 147     OSL_ENSURE( rStrm.GetRecSize() == 2, "XclImpPCItem::ReadSxinteger - wrong record size" );
 148     SetInteger( rStrm.ReadInt16() );
 149 }
 150
 151 void XclImpPCItem::ReadSxstring( XclImpStream& rStrm )
 152 {
 153     OSL_ENSURE( rStrm.GetRecSize() >= 3, "XclImpPCItem::ReadSxstring - wrong record size" );
 154     SetText( rStrm.ReadUniString() );
 155 }
 156
 157 void XclImpPCItem::ReadSxdatetime( XclImpStream& rStrm )
 158 {
 159     OSL_ENSURE( rStrm.GetRecSize() == 8, "XclImpPCItem::ReadSxdatetime - wrong record size" );
 160     sal_uInt16 nYear, nMonth;
 161     sal_uInt8 nDay, nHour, nMin, nSec;
 162     nYear = rStrm.ReaduInt16();
 163     nMonth = rStrm.ReaduInt16();
 164     nDay = rStrm.ReaduInt8();
 165     nHour = rStrm.ReaduInt8();
 166     nMin = rStrm.ReaduInt8();
 167     nSec = rStrm.ReaduInt8();
 168     SetDateTime( DateTime( Date( nDay, nMonth, nYear ), tools::Time( nHour, nMin, nSec ) ) );
 169 }
 170
 171 void XclImpPCItem::ReadSxempty( XclImpStream& rStrm )
 172 {
 173     (void)rStrm;    // avoid compiler warning
 174     OSL_ENSURE( rStrm.GetRecSize() == 0, "XclImpPCItem::ReadSxempty - wrong record size" );
 175     SetEmpty();
 176 }
 177
 178 XclImpPCField::XclImpPCField( const XclImpRoot& rRoot, XclImpPivotCache& rPCache, sal_uInt16 nFieldIdx ) :
 179     XclPCField( EXC_PCFIELD_UNKNOWN, nFieldIdx ),
 180     XclImpRoot( rRoot ),
 181     mrPCache( rPCache ),
 182     mnSourceScCol( -1 ),
 183     mbNumGroupInfoRead( false )
 184 {
 185 }
 186
 187 XclImpPCField::~XclImpPCField()
 188 {
 189 }
 190
 191 // general field/item access --------------------------------------------------
 192
 193 const OUString& XclImpPCField::GetFieldName( const ScfStringVec& rVisNames ) const
 194 {
 195     if( IsGroupChildField() && (mnFieldIdx < rVisNames.size()) )
 196     {
 197         const OUString& rVisName = rVisNames[ mnFieldIdx ];
 198         if (!rVisName.isEmpty())
 199             return rVisName;
 200     }
 201     return maFieldInfo.maName;
 202 }
 203
 204 const XclImpPCField* XclImpPCField::GetGroupBaseField() const
 205 {
 206     OSL_ENSURE( IsGroupChildField(), "XclImpPCField::GetGroupBaseField - this field type does not have a base field" );
 207     return IsGroupChildField() ? mrPCache.GetField( maFieldInfo.mnGroupBase ) : 0;
 208 }
 209
 210 const XclImpPCItem* XclImpPCField::GetItem( sal_uInt16 nItemIdx ) const
 211 {
 212     return (nItemIdx < maItems.size()) ? maItems[ nItemIdx ].get() : 0;
 213 }
 214
 215 const XclImpPCItem* XclImpPCField::GetLimitItem( sal_uInt16 nItemIdx ) const
 216 {
 217     OSL_ENSURE( nItemIdx < 3, "XclImpPCField::GetLimitItem - invalid item index" );
 218     OSL_ENSURE( nItemIdx < maNumGroupItems.size(), "XclImpPCField::GetLimitItem - no item found" );
 219     return (nItemIdx < maNumGroupItems.size()) ? maNumGroupItems[ nItemIdx ].get() : 0;
 220 }
 221
 222 void XclImpPCField::WriteFieldNameToSource( SCCOL nScCol, SCTAB nScTab )
 223 {
 224     OSL_ENSURE( HasOrigItems(), "XclImpPCField::WriteFieldNameToSource - only for standard fields" );
 225     GetDocImport().setStringCell(ScAddress(nScCol, 0, nScTab), maFieldInfo.maName);
 226     mnSourceScCol = nScCol;
 227 }
 228
 229 void XclImpPCField::WriteOrigItemToSource( SCROW nScRow, SCTAB nScTab, sal_uInt16 nItemIdx )
 230 {
 231     if( nItemIdx < maOrigItems.size() )
 232         maOrigItems[ nItemIdx ]->WriteToSource( GetRoot(), ScAddress( mnSourceScCol, nScRow, nScTab ) );
 233 }
 234
 235 void XclImpPCField::WriteLastOrigItemToSource( SCROW nScRow, SCTAB nScTab )
 236 {
 237     if( !maOrigItems.empty() )
 238         maOrigItems.back()->WriteToSource( GetRoot(), ScAddress( mnSourceScCol, nScRow, nScTab ) );
 239 }
 240
 241 // records --------------------------------------------------------------------
 242
 243 void XclImpPCField::ReadSxfield( XclImpStream& rStrm )
 244 {
 245     rStrm >> maFieldInfo;
 246
 247     /*  Detect the type of this field. This is done very restrictive to detect
 248         any unexpected state. */
 249     meFieldType = EXC_PCFIELD_UNKNOWN;
 250
 251     bool bItems  = ::get_flag( maFieldInfo.mnFlags, EXC_SXFIELD_HASITEMS );
 252     bool bPostp  = ::get_flag( maFieldInfo.mnFlags, EXC_SXFIELD_POSTPONE );
 253     bool bCalced = ::get_flag( maFieldInfo.mnFlags, EXC_SXFIELD_CALCED );
 254     bool bChild  = ::get_flag( maFieldInfo.mnFlags, EXC_SXFIELD_HASCHILD );
 255     bool bNum    = ::get_flag( maFieldInfo.mnFlags, EXC_SXFIELD_NUMGROUP );
 256
 257     sal_uInt16 nVisC   = maFieldInfo.mnVisItems;
 258     sal_uInt16 nGroupC = maFieldInfo.mnGroupItems;
 259     sal_uInt16 nBaseC  = maFieldInfo.mnBaseItems;
 260     sal_uInt16 nOrigC  = maFieldInfo.mnOrigItems;
 261     OSL_ENSURE( nVisC > 0, "XclImpPCField::ReadSxfield - field without visible items" );
 262
 263     sal_uInt16 nType = maFieldInfo.mnFlags & EXC_SXFIELD_DATA_MASK;
 264     bool bType =
 265         (nType == EXC_SXFIELD_DATA_STR) ||
 266         (nType == EXC_SXFIELD_DATA_INT) ||
 267         (nType == EXC_SXFIELD_DATA_DBL) ||
 268         (nType == EXC_SXFIELD_DATA_STR_INT) ||
 269         (nType == EXC_SXFIELD_DATA_STR_DBL) ||
 270         (nType == EXC_SXFIELD_DATA_DATE) ||
 271         (nType == EXC_SXFIELD_DATA_DATE_EMP) ||
 272         (nType == EXC_SXFIELD_DATA_DATE_NUM) ||
 273         (nType == EXC_SXFIELD_DATA_DATE_STR);
 274     bool bTypeNone =
 275         (nType == EXC_SXFIELD_DATA_NONE);
 276     // for now, ignore data type of calculated fields
 277     OSL_ENSURE( bCalced || bType || bTypeNone, "XclImpPCField::ReadSxfield - unknown item data type" );
 278
 279     if( nVisC > 0 || bPostp )
 280     {
 281         if( bItems && !bPostp )
 282         {
 283             if( !bCalced )
 284             {
 285                 // 1) standard fields and standard grouping fields
 286                 if( !bNum )
 287                 {
 288                     // 1a) standard field without grouping
 289                     if( bType && (nGroupC == 0) && (nBaseC == 0) && (nOrigC == nVisC) )
 290                         meFieldType = EXC_PCFIELD_STANDARD;
 291
 292                     // 1b) standard grouping field
 293                     else if( bTypeNone && (nGroupC == nVisC) && (nBaseC > 0) && (nOrigC == 0) )
 294                         meFieldType = EXC_PCFIELD_STDGROUP;
 295                 }
 296                 // 2) numerical grouping fields
 297                 else if( (nGroupC == nVisC) && (nBaseC == 0) )
 298                 {
 299                     // 2a) single num/date grouping field without child grouping field
 300                     if( !bChild && bType && (nOrigC > 0) )
 301                     {
 302                         switch( nType )
 303                         {
 304                             case EXC_SXFIELD_DATA_INT:
 305                             case EXC_SXFIELD_DATA_DBL:  meFieldType = EXC_PCFIELD_NUMGROUP;     break;
 306                             case EXC_SXFIELD_DATA_DATE: meFieldType = EXC_PCFIELD_DATEGROUP;    break;
 307                             default:    OSL_FAIL( "XclImpPCField::ReadSxfield - numeric group with wrong data type" );
 308                         }
 309                     }
 310
 311                     // 2b) first date grouping field with child grouping field
 312                     else if( bChild && (nType == EXC_SXFIELD_DATA_DATE) && (nOrigC > 0) )
 313                         meFieldType = EXC_PCFIELD_DATEGROUP;
 314
 315                     // 2c) additional date grouping field
 316                     else if( bTypeNone && (nOrigC == 0) )
 317                         meFieldType = EXC_PCFIELD_DATECHILD;
 318                 }
 319                 OSL_ENSURE( meFieldType != EXC_PCFIELD_UNKNOWN, "XclImpPCField::ReadSxfield - invalid standard or grouped field" );
 320             }
 321
 322             // 3) calculated field
 323             else
 324             {
 325                 if( !bChild && !bNum && (nGroupC == 0) && (nBaseC == 0) && (nOrigC == 0) )
 326                     meFieldType = EXC_PCFIELD_CALCED;
 327                 OSL_ENSURE( meFieldType == EXC_PCFIELD_CALCED, "XclImpPCField::ReadSxfield - invalid calculated field" );
 328             }
 329         }
 330
 331         else if( !bItems && bPostp )
 332         {
 333             // 4) standard field with postponed items
 334             if( !bCalced && !bChild && !bNum && bType && (nGroupC == 0) && (nBaseC == 0) && (nOrigC == 0) )
 335                 meFieldType = EXC_PCFIELD_STANDARD;
 336             OSL_ENSURE( meFieldType == EXC_PCFIELD_STANDARD, "XclImpPCField::ReadSxfield - invalid postponed field" );
 337         }
 338     }
 339 }
 340
 341 void XclImpPCField::ReadItem( XclImpStream& rStrm )
 342 {
 343     OSL_ENSURE( HasInlineItems() || HasPostponedItems(), "XclImpPCField::ReadItem - field does not expect items" );
 344
 345     // read the item
 346     XclImpPCItemRef xItem( new XclImpPCItem( rStrm ) );
 347
 348     // try to insert into an item list
 349     if( mbNumGroupInfoRead )
 350     {
 351         // there are 3 items after SXNUMGROUP that contain grouping limits and step count
 352         if( maNumGroupItems.size() < 3 )
 353             maNumGroupItems.push_back( xItem );
 354         else
 355             maOrigItems.push_back( xItem );
 356     }
 357     else if( HasInlineItems() || HasPostponedItems() )
 358     {
 359         maItems.push_back( xItem );
 360         // visible item is original item in standard fields
 361         if( IsStandardField() )
 362             maOrigItems.push_back( xItem );
 363     }
 364 }
 365
 366 void XclImpPCField::ReadSxnumgroup( XclImpStream& rStrm )
 367 {
 368     OSL_ENSURE( IsNumGroupField() || IsDateGroupField(), "XclImpPCField::ReadSxnumgroup - SXNUMGROUP outside numeric grouping field" );
 369     OSL_ENSURE( !mbNumGroupInfoRead, "XclImpPCField::ReadSxnumgroup - multiple SXNUMGROUP records" );
 370     OSL_ENSURE( maItems.size() == maFieldInfo.mnGroupItems, "XclImpPCField::ReadSxnumgroup - SXNUMGROUP out of record order" );
 371     rStrm >> maNumGroupInfo;
 372     mbNumGroupInfoRead = IsNumGroupField() || IsDateGroupField();
 373 }
 374
 375 void XclImpPCField::ReadSxgroupinfo( XclImpStream& rStrm )
 376 {
 377     OSL_ENSURE( IsStdGroupField(), "XclImpPCField::ReadSxgroupinfo - SXGROUPINFO outside grouping field" );
 378     OSL_ENSURE( maGroupOrder.empty(), "XclImpPCField::ReadSxgroupinfo - multiple SXGROUPINFO records" );
 379     OSL_ENSURE( maItems.size() == maFieldInfo.mnGroupItems, "XclImpPCField::ReadSxgroupinfo - SXGROUPINFO out of record order" );
 380     OSL_ENSURE( (rStrm.GetRecLeft() / 2) == maFieldInfo.mnBaseItems, "XclImpPCField::ReadSxgroupinfo - wrong SXGROUPINFO size" );
 381     maGroupOrder.clear();
 382     size_t nSize = rStrm.GetRecLeft() / 2;
 383     maGroupOrder.resize( nSize, 0 );
 384     for( size_t nIdx = 0; nIdx < nSize; ++nIdx )
 385         maGroupOrder[ nIdx ] = rStrm.ReaduInt16();
 386 }
 387
 388 // grouping -------------------------------------------------------------------
 389
 390 void XclImpPCField::ConvertGroupField( ScDPSaveData& rSaveData, const ScfStringVec& rVisNames ) const
 391 {
 392     if (!GetFieldName(rVisNames).isEmpty())
 393     {
 394         if( IsStdGroupField() )
 395             ConvertStdGroupField( rSaveData, rVisNames );
 396         else if( IsNumGroupField() )
 397             ConvertNumGroupField( rSaveData, rVisNames );
 398         else if( IsDateGroupField() )
 399             ConvertDateGroupField( rSaveData, rVisNames );
 400     }
 401 }
 402
 403 // private --------------------------------------------------------------------
 404
 405 void XclImpPCField::ConvertStdGroupField( ScDPSaveData& rSaveData, const ScfStringVec& rVisNames ) const
 406 {
 407     if( const XclImpPCField* pBaseField = GetGroupBaseField() )
 408     {
 409         const OUString& rBaseFieldName = pBaseField->GetFieldName( rVisNames );
 410         if( !rBaseFieldName.isEmpty() )
 411         {
 412             // *** create a ScDPSaveGroupItem for each own item, they collect base item names ***
 413             ScDPSaveGroupItemVec aGroupItems;
 414             aGroupItems.reserve( maItems.size() );
 415             // initialize with own item names
 416             for( XclImpPCItemVec::const_iterator aIt = maItems.begin(), aEnd = maItems.end(); aIt != aEnd; ++aIt )
 417                 aGroupItems.push_back( ScDPSaveGroupItem( (*aIt)->ConvertToText() ) );
 418
 419             // *** iterate over all base items, set their names at corresponding own items ***
 420             for( sal_uInt16 nItemIdx = 0, nItemCount = static_cast< sal_uInt16 >( maGroupOrder.size() ); nItemIdx < nItemCount; ++nItemIdx )
 421                 if( maGroupOrder[ nItemIdx ] < aGroupItems.size() )
 422                     if( const XclImpPCItem* pBaseItem = pBaseField->GetItem( nItemIdx ) )
 423                         if( const XclImpPCItem* pGroupItem = GetItem( maGroupOrder[ nItemIdx ] ) )
 424                             if( *pBaseItem != *pGroupItem )
 425                                 aGroupItems[ maGroupOrder[ nItemIdx ] ].AddElement( pBaseItem->ConvertToText() );
 426
 427             // *** create the ScDPSaveGroupDimension object, fill with grouping info ***
 428             ScDPSaveGroupDimension aGroupDim( rBaseFieldName, GetFieldName( rVisNames ) );
 429             for( ScDPSaveGroupItemVec::const_iterator aIt = aGroupItems.begin(), aEnd = aGroupItems.end(); aIt != aEnd; ++aIt )
 430                 if( !aIt->IsEmpty() )
 431                     aGroupDim.AddGroupItem( *aIt );
 432             rSaveData.GetDimensionData()->AddGroupDimension( aGroupDim );
 433         }
 434     }
 435 }
 436
 437 void XclImpPCField::ConvertNumGroupField( ScDPSaveData& rSaveData, const ScfStringVec& rVisNames ) const
 438 {
 439     ScDPNumGroupInfo aNumInfo( GetScNumGroupInfo() );
 440     ScDPSaveNumGroupDimension aNumGroupDim( GetFieldName( rVisNames ), aNumInfo );
 441     rSaveData.GetDimensionData()->AddNumGroupDimension( aNumGroupDim );
 442 }
 443
 444 void XclImpPCField::ConvertDateGroupField( ScDPSaveData& rSaveData, const ScfStringVec& rVisNames ) const
 445 {
 446     ScDPNumGroupInfo aDateInfo( GetScDateGroupInfo() );
 447     sal_Int32 nScDateType = maNumGroupInfo.GetScDateType();
 448
 449     switch( meFieldType )
 450     {
 451         case EXC_PCFIELD_DATEGROUP:
 452         {
 453             if( aDateInfo.mbDateValues )
 454             {
 455                 // special case for days only with step value - create numeric grouping
 456                 ScDPSaveNumGroupDimension aNumGroupDim( GetFieldName( rVisNames ), aDateInfo );
 457                 rSaveData.GetDimensionData()->AddNumGroupDimension( aNumGroupDim );
 458             }
 459             else
 460             {
 461                 ScDPSaveNumGroupDimension aNumGroupDim( GetFieldName( rVisNames ), ScDPNumGroupInfo() );
 462                 aNumGroupDim.SetDateInfo( aDateInfo, nScDateType );
 463                 rSaveData.GetDimensionData()->AddNumGroupDimension( aNumGroupDim );
 464             }
 465         }
 466         break;
 467
 468         case EXC_PCFIELD_DATECHILD:
 469         {
 470             if( const XclImpPCField* pBaseField = GetGroupBaseField() )
 471             {
 472                 const OUString& rBaseFieldName = pBaseField->GetFieldName( rVisNames );
 473                 if( !rBaseFieldName.isEmpty() )
 474                 {
 475                     ScDPSaveGroupDimension aGroupDim( rBaseFieldName, GetFieldName( rVisNames ) );
 476                     aGroupDim.SetDateInfo( aDateInfo, nScDateType );
 477                     rSaveData.GetDimensionData()->AddGroupDimension( aGroupDim );
 478                 }
 479             }
 480         }
 481         break;
 482
 483         default:
 484             OSL_FAIL( "XclImpPCField::ConvertDateGroupField - unknown date field type" );
 485     }
 486 }
 487
 488 ScDPNumGroupInfo XclImpPCField::GetScNumGroupInfo() const
 489 {
 490     ScDPNumGroupInfo aNumInfo;
 491     aNumInfo.mbEnable = true;
 492     aNumInfo.mbDateValues = false;
 493     aNumInfo.mbAutoStart = true;
 494     aNumInfo.mbAutoEnd = true;
 495
 496     if( const double* pfMinValue = GetNumGroupLimit( EXC_SXFIELD_INDEX_MIN ) )
 497     {
 498         aNumInfo.mfStart = *pfMinValue;
 499         aNumInfo.mbAutoStart = ::get_flag( maNumGroupInfo.mnFlags, EXC_SXNUMGROUP_AUTOMIN );
 500     }
 501     if( const double* pfMaxValue = GetNumGroupLimit( EXC_SXFIELD_INDEX_MAX ) )
 502     {
 503         aNumInfo.mfEnd = *pfMaxValue;
 504         aNumInfo.mbAutoEnd = ::get_flag( maNumGroupInfo.mnFlags, EXC_SXNUMGROUP_AUTOMAX );
 505     }
 506     if( const double* pfStepValue = GetNumGroupLimit( EXC_SXFIELD_INDEX_STEP ) )
 507         aNumInfo.mfStep = *pfStepValue;
 508
 509     return aNumInfo;
 510 }
 511
 512 ScDPNumGroupInfo XclImpPCField::GetScDateGroupInfo() const
 513 {
 514     ScDPNumGroupInfo aDateInfo;
 515     aDateInfo.mbEnable = true;
 516     aDateInfo.mbDateValues = false;
 517     aDateInfo.mbAutoStart = true;
 518     aDateInfo.mbAutoEnd = true;
 519
 520     if( const DateTime* pMinDate = GetDateGroupLimit( EXC_SXFIELD_INDEX_MIN ) )
 521     {
 522         aDateInfo.mfStart = GetDoubleFromDateTime( *pMinDate );
 523         aDateInfo.mbAutoStart = ::get_flag( maNumGroupInfo.mnFlags, EXC_SXNUMGROUP_AUTOMIN );
 524     }
 525     if( const DateTime* pMaxDate = GetDateGroupLimit( EXC_SXFIELD_INDEX_MAX ) )
 526     {
 527         aDateInfo.mfEnd = GetDoubleFromDateTime( *pMaxDate );
 528         aDateInfo.mbAutoEnd = ::get_flag( maNumGroupInfo.mnFlags, EXC_SXNUMGROUP_AUTOMAX );
 529     }
 530     // GetDateGroupStep() returns a value for date type "day" in single date groups only
 531     if( const sal_Int16* pnStepValue = GetDateGroupStep() )
 532     {
 533         aDateInfo.mfStep = *pnStepValue;
 534         aDateInfo.mbDateValues = true;
 535     }
 536
 537     return aDateInfo;
 538 }
 539
 540 const double* XclImpPCField::GetNumGroupLimit( sal_uInt16 nLimitIdx ) const
 541 {
 542     OSL_ENSURE( IsNumGroupField(), "XclImpPCField::GetNumGroupLimit - only for numeric grouping fields" );
 543     if( const XclImpPCItem* pItem = GetLimitItem( nLimitIdx ) )
 544     {
 545         OSL_ENSURE( pItem->GetDouble(), "XclImpPCField::GetNumGroupLimit - SXDOUBLE item expected" );
 546         return pItem->GetDouble();
 547     }
 548     return 0;
 549 }
 550
 551 const DateTime* XclImpPCField::GetDateGroupLimit( sal_uInt16 nLimitIdx ) const
 552 {
 553     OSL_ENSURE( IsDateGroupField(), "XclImpPCField::GetDateGroupLimit - only for date grouping fields" );
 554     if( const XclImpPCItem* pItem = GetLimitItem( nLimitIdx ) )
 555     {
 556         OSL_ENSURE( pItem->GetDateTime(), "XclImpPCField::GetDateGroupLimit - SXDATETIME item expected" );
 557         return pItem->GetDateTime();
 558     }
 559     return 0;
 560 }
 561
 562 const sal_Int16* XclImpPCField::GetDateGroupStep() const
 563 {
 564     // only for single date grouping fields, not for grouping chains
 565     if( !IsGroupBaseField() && !IsGroupChildField() )
 566     {
 567         // only days may have a step value, return 0 for all other date types
 568         if( maNumGroupInfo.GetXclDataType() == EXC_SXNUMGROUP_TYPE_DAY )
 569         {
 570             if( const XclImpPCItem* pItem = GetLimitItem( EXC_SXFIELD_INDEX_STEP ) )
 571             {
 572                 OSL_ENSURE( pItem->GetInteger(), "XclImpPCField::GetDateGroupStep - SXINTEGER item expected" );
 573                 if( const sal_Int16* pnStep = pItem->GetInteger() )
 574                 {
 575                     OSL_ENSURE( *pnStep > 0, "XclImpPCField::GetDateGroupStep - invalid step count" );
 576                     // return nothing for step count 1 - this is also a standard date group in Excel
 577                     return (*pnStep > 1) ? pnStep : 0;
 578                 }
 579             }
 580         }
 581     }
 582     return 0;
 583 }
 584
 585 XclImpPivotCache::XclImpPivotCache( const XclImpRoot& rRoot ) :
 586     XclImpRoot( rRoot ),
 587     maSrcRange( ScAddress::INITIALIZE_INVALID ),
 588     mnStrmId( 0 ),
 589     mnSrcType( EXC_SXVS_UNKNOWN ),
 590     mbSelfRef( false )
 591 {
 592 }
 593
 594 XclImpPivotCache::~XclImpPivotCache()
 595 {
 596 }
 597
 598 // data access ----------------------------------------------------------------
 599
 600 sal_uInt16 XclImpPivotCache::GetFieldCount() const
 601 {
 602     return static_cast< sal_uInt16 >( maFields.size() );
 603 }
 604
 605 const XclImpPCField* XclImpPivotCache::GetField( sal_uInt16 nFieldIdx ) const
 606 {
 607     return (nFieldIdx < maFields.size()) ? maFields[ nFieldIdx ].get() : 0;
 608 }
 609
 610 // records --------------------------------------------------------------------
 611
 612 void XclImpPivotCache::ReadSxidstm( XclImpStream& rStrm )
 613 {
 614     mnStrmId = rStrm.ReaduInt16();
 615 }
 616
 617 void XclImpPivotCache::ReadSxvs( XclImpStream& rStrm )
 618 {
 619     mnSrcType = rStrm.ReaduInt16();
 620     GetTracer().TracePivotDataSource( mnSrcType != EXC_SXVS_SHEET );
 621 }
 622
 623 void XclImpPivotCache::ReadDconref( XclImpStream& rStrm )
 624 {
 625     /*  Read DCONREF only once (by checking maTabName), there may be other
 626         DCONREF records in another context. Read reference only if a leading
 627         SXVS record is present (by checking mnSrcType). */
 628     if( !maTabName.isEmpty() || (mnSrcType != EXC_SXVS_SHEET) )
 629         return;
 630
 631     XclRange aXclRange( ScAddress::UNINITIALIZED );
 632     aXclRange.Read( rStrm, false );
 633     OUString aEncUrl = rStrm.ReadUniString();
 634
 635     XclImpUrlHelper::DecodeUrl( maUrl, maTabName, mbSelfRef, GetRoot(), aEncUrl );
 636
 637     /*  Do not convert maTabName to Calc sheet name -> original name is used to
 638         find the sheet in the document. Sheet index of source range will be
 639         found later in XclImpPivotCache::ReadPivotCacheStream(), because sheet
 640         may not exist yet. */
 641     if( mbSelfRef )
 642         GetAddressConverter().ConvertRange( maSrcRange, aXclRange, 0, 0, true );
 643 }
 644
 645 void XclImpPivotCache::ReadDConName( XclImpStream& rStrm )
 646 {
 647     maSrcRangeName = rStrm.ReadUniString();
 648
 649     // This 2-byte value equals the length of string that follows, or if 0 it
 650     // indicates that the name has a workbook scope.  For now, we only support
 651     // internal defined name with a workbook scope.
 652     sal_uInt16 nFlag;
 653     nFlag = rStrm.ReaduInt16();
 654     mbSelfRef = (nFlag == 0);
 655
 656     if (!mbSelfRef)
 657         // External name is not supported yet.
 658         maSrcRangeName.clear();
 659 }
 660
 661 void XclImpPivotCache::ReadPivotCacheStream( XclImpStream& rStrm )
 662 {
 663     if( (mnSrcType != EXC_SXVS_SHEET) && (mnSrcType != EXC_SXVS_EXTERN) )
 664         return;
 665
 666     ScDocument& rDoc = GetDoc();
 667     SCCOL nFieldScCol = 0;              // column index of source data for next field
 668     SCROW nItemScRow = 0;               // row index of source data for current items
 669     SCTAB nScTab = 0;                   // sheet index of source data
 670     bool bGenerateSource = false;       // true = write source data from cache to dummy table
 671
 672     if( mbSelfRef )
 673     {
 674         if (maSrcRangeName.isEmpty())
 675         {
 676             // try to find internal sheet containing the source data
 677             nScTab = GetTabInfo().GetScTabFromXclName( maTabName );
 678             if( rDoc.HasTable( nScTab ) )
 679             {
 680                 // set sheet index to source range
 681                 maSrcRange.aStart.SetTab( nScTab );
 682                 maSrcRange.aEnd.SetTab( nScTab );
 683             }
 684             else
 685             {
 686                 // create dummy sheet for deleted internal sheet
 687                 bGenerateSource = true;
 688             }
 689         }
 690     }
 691     else
 692     {
 693         // create dummy sheet for external sheet
 694         bGenerateSource = true;
 695     }
 696
 697     // create dummy sheet for source data from external or deleted sheet
 698     if( bGenerateSource )
 699     {
 700         if( rDoc.GetTableCount() >= MAXTABCOUNT )
 701             // cannot create more sheets -> exit
 702             return;
 703
 704         nScTab = rDoc.GetTableCount();
 705         rDoc.MakeTable( nScTab );
 706         OUStringBuffer aDummyName("DPCache");
 707         if( maTabName.getLength() > 0 )
 708             aDummyName.append( '_' ).append( maTabName );
 709         OUString aName = aDummyName.makeStringAndClear();
 710         rDoc.CreateValidTabName( aName );
 711         rDoc.RenameTab( nScTab, aName );
 712         // set sheet index to source range
 713         maSrcRange.aStart.SetTab( nScTab );
 714         maSrcRange.aEnd.SetTab( nScTab );
 715     }
 716
 717     // open pivot cache storage stream
 718     tools::SvRef<SotStorage> xSvStrg = OpenStorage( EXC_STORAGE_PTCACHE );
 719     tools::SvRef<SotStorageStream> xSvStrm = OpenStream( xSvStrg, ScfTools::GetHexStr( mnStrmId ) );
 720     if( !xSvStrm.Is() )
 721         return;
 722
 723     // create Excel record stream object
 724     XclImpStream aPCStrm( *xSvStrm, GetRoot() );
 725     aPCStrm.CopyDecrypterFrom( rStrm );     // pivot cache streams are encrypted
 726
 727     XclImpPCFieldRef xCurrField;    // current field for new items
 728     XclImpPCFieldVec aOrigFields;   // all standard fields with inline original  items
 729     XclImpPCFieldVec aPostpFields;  // all standard fields with postponed original items
 730     size_t nPostpIdx = 0;           // index to current field with postponed items
 731     bool bLoop = true;              // true = continue loop
 732
 733     while( bLoop && aPCStrm.StartNextRecord() )
 734     {
 735         switch( aPCStrm.GetRecId() )
 736         {
 737             case EXC_ID_EOF:
 738                 bLoop = false;
 739             break;
 740
 741             case EXC_ID_SXDB:
 742                 aPCStrm >> maPCInfo;
 743             break;
 744
 745             case EXC_ID_SXFIELD:
 746             {
 747                 xCurrField.reset();
 748                 sal_uInt16 nNewFieldIdx = GetFieldCount();
 749                 if( nNewFieldIdx < EXC_PC_MAXFIELDCOUNT )
 750                 {
 751                     xCurrField.reset( new XclImpPCField( GetRoot(), *this, nNewFieldIdx ) );
 752                     maFields.push_back( xCurrField );
 753                     xCurrField->ReadSxfield( aPCStrm );
 754                     if( xCurrField->HasOrigItems() )
 755                     {
 756                         if( xCurrField->HasPostponedItems() )
 757                             aPostpFields.push_back( xCurrField );
 758                         else
 759                             aOrigFields.push_back( xCurrField );
 760                         // insert field name into generated source data, field remembers its column index
 761                         if( bGenerateSource && (nFieldScCol <= MAXCOL) )
 762                             xCurrField->WriteFieldNameToSource( nFieldScCol++, nScTab );
 763                     }
 764                     // do not read items into invalid/postponed fields
 765                     if( !xCurrField->HasInlineItems() )
 766                         xCurrField.reset();
 767                 }
 768             }
 769             break;
 770
 771             case EXC_ID_SXINDEXLIST:
 772                 // read index list and insert all items into generated source data
 773                 if( bGenerateSource && (nItemScRow <= MAXROW) && (++nItemScRow <= MAXROW) )
 774                 {
 775                     for( XclImpPCFieldVec::const_iterator aIt = aOrigFields.begin(), aEnd = aOrigFields.end(); aIt != aEnd; ++aIt )
 776                     {
 777                         sal_uInt16 nItemIdx = (*aIt)->Has16BitIndexes() ? aPCStrm.ReaduInt16() : aPCStrm.ReaduInt8();
 778                         (*aIt)->WriteOrigItemToSource( nItemScRow, nScTab, nItemIdx );
 779                     }
 780                 }
 781                 xCurrField.reset();
 782             break;
 783
 784             case EXC_ID_SXDOUBLE:
 785             case EXC_ID_SXBOOLEAN:
 786             case EXC_ID_SXERROR:
 787             case EXC_ID_SXINTEGER:
 788             case EXC_ID_SXSTRING:
 789             case EXC_ID_SXDATETIME:
 790             case EXC_ID_SXEMPTY:
 791                 if( xCurrField )                   // inline items
 792                 {
 793                     xCurrField->ReadItem( aPCStrm );
 794                 }
 795                 else if( !aPostpFields.empty() )        // postponed items
 796                 {
 797                     // read postponed item
 798                     aPostpFields[ nPostpIdx ]->ReadItem( aPCStrm );
 799                     // write item to source
 800                     if( bGenerateSource && (nItemScRow <= MAXROW) )
 801                     {
 802                         // start new row, if there are only postponed fields
 803                         if( aOrigFields.empty() && (nPostpIdx == 0) )
 804                             ++nItemScRow;
 805                         if( nItemScRow <= MAXROW )
 806                             aPostpFields[ nPostpIdx ]->WriteLastOrigItemToSource( nItemScRow, nScTab );
 807                     }
 808                     // get index of next postponed field
 809                     ++nPostpIdx;
 810                     if( nPostpIdx >= aPostpFields.size() )
 811                         nPostpIdx = 0;
 812                 }
 813             break;
 814
 815             case EXC_ID_SXNUMGROUP:
 816                 if( xCurrField )
 817                     xCurrField->ReadSxnumgroup( aPCStrm );
 818             break;
 819
 820             case EXC_ID_SXGROUPINFO:
 821                 if( xCurrField )
 822                     xCurrField->ReadSxgroupinfo( aPCStrm );
 823             break;
 824
 825             // known but ignored records
 826             case EXC_ID_SXRULE:
 827             case EXC_ID_SXFILT:
 828             case EXC_ID_00F5:
 829             case EXC_ID_SXNAME:
 830             case EXC_ID_SXPAIR:
 831             case EXC_ID_SXFMLA:
 832             case EXC_ID_SXFORMULA:
 833             case EXC_ID_SXDBEX:
 834             case EXC_ID_SXFDBTYPE:
 835             break;
 836
 837             default:
 838                 OSL_TRACE( "XclImpPivotCache::ReadPivotCacheStream - unknown record 0x%04hX", aPCStrm.GetRecId() );
 839         }
 840     }
 841
 842     OSL_ENSURE( maPCInfo.mnTotalFields == maFields.size(),
 843         "XclImpPivotCache::ReadPivotCacheStream - field count mismatch" );
 844
 845     if (HasCacheRecords())
 846     {
 847         SCROW nNewEnd = maSrcRange.aStart.Row() + maPCInfo.mnSrcRecs;
 848         maSrcRange.aEnd.SetRow(nNewEnd);
 849     }
 850
 851     // set source range for external source data
 852     if( bGenerateSource && (nFieldScCol > 0) )
 853     {
 854         maSrcRange.aStart.SetCol( 0 );
 855         maSrcRange.aStart.SetRow( 0 );
 856         // nFieldScCol points to first unused column
 857         maSrcRange.aEnd.SetCol( nFieldScCol - 1 );
 858         // nItemScRow points to last used row
 859         maSrcRange.aEnd.SetRow( nItemScRow );
 860     }
 861 }
 862
 863 bool XclImpPivotCache::HasCacheRecords() const
 864 {
 865     return static_cast<bool>(maPCInfo.mnFlags & EXC_SXDB_SAVEDATA);
 866 }
 867
 868 bool XclImpPivotCache::IsRefreshOnLoad() const
 869 {
 870     return static_cast<bool>(maPCInfo.mnFlags & EXC_SXDB_REFRESH_LOAD);
 871 }
 872
 873 bool XclImpPivotCache::IsValid() const
 874 {
 875     if (!maSrcRangeName.isEmpty())
 876         return true;
 877
 878     return maSrcRange.IsValid();
 879 }
 880
 881 // Pivot table
 882
 883 XclImpPTItem::XclImpPTItem( const XclImpPCField* pCacheField ) :
 884     mpCacheField( pCacheField )
 885 {
 886 }
 887
 888 const OUString* XclImpPTItem::GetItemName() const
 889 {
 890     if( mpCacheField )
 891         if( const XclImpPCItem* pCacheItem = mpCacheField->GetItem( maItemInfo.mnCacheIdx ) )
 892             //TODO: use XclImpPCItem::ConvertToText(), if all conversions are available
 893             return pCacheItem->IsEmpty() ? NULL : pCacheItem->GetText();
 894     return 0;
 895 }
 896
 897 void XclImpPTItem::ReadSxvi( XclImpStream& rStrm )
 898 {
 899     rStrm >> maItemInfo;
 900 }
 901
 902 void XclImpPTItem::ConvertItem( ScDPSaveDimension& rSaveDim ) const
 903 {
 904     if (const OUString* pItemName = GetItemName())
 905     {
 906         ScDPSaveMember& rMember = *rSaveDim.GetMemberByName( *pItemName );
 907         rMember.SetIsVisible( !::get_flag( maItemInfo.mnFlags, EXC_SXVI_HIDDEN ) );
 908         rMember.SetShowDetails( !::get_flag( maItemInfo.mnFlags, EXC_SXVI_HIDEDETAIL ) );
 909         if (maItemInfo.HasVisName())
 910             rMember.SetLayoutName(*maItemInfo.GetVisName());
 911     }
 912 }
 913
 914 XclImpPTField::XclImpPTField( const XclImpPivotTable& rPTable, sal_uInt16 nCacheIdx ) :
 915     mrPTable( rPTable )
 916 {
 917     maFieldInfo.mnCacheIdx = nCacheIdx;
 918 }
 919
 920 // general field/item access --------------------------------------------------
 921
 922 const XclImpPCField* XclImpPTField::GetCacheField() const
 923 {
 924     XclImpPivotCacheRef xPCache = mrPTable.GetPivotCache();
 925     return xPCache ? xPCache->GetField( maFieldInfo.mnCacheIdx ) : 0;
 926 }
 927
 928 OUString XclImpPTField::GetFieldName() const
 929 {
 930     const XclImpPCField* pField = GetCacheField();
 931     return pField ? pField->GetFieldName( mrPTable.GetVisFieldNames() ) : OUString();
 932 }
 933
 934 OUString XclImpPTField::GetVisFieldName() const
 935 {
 936     const OUString* pVisName = maFieldInfo.GetVisName();
 937     return pVisName ? *pVisName : OUString();
 938 }
 939
 940 const XclImpPTItem* XclImpPTField::GetItem( sal_uInt16 nItemIdx ) const
 941 {
 942     return (nItemIdx < maItems.size()) ? maItems[ nItemIdx ].get() : 0;
 943 }
 944
 945 const OUString* XclImpPTField::GetItemName( sal_uInt16 nItemIdx ) const
 946 {
 947     const XclImpPTItem* pItem = GetItem( nItemIdx );
 948     return pItem ? pItem->GetItemName() : 0;
 949 }
 950
 951 // records --------------------------------------------------------------------
 952
 953 void XclImpPTField::ReadSxvd( XclImpStream& rStrm )
 954 {
 955     rStrm >> maFieldInfo;
 956 }
 957
 958 void XclImpPTField::ReadSxvdex( XclImpStream& rStrm )
 959 {
 960     rStrm >> maFieldExtInfo;
 961 }
 962
 963 void XclImpPTField::ReadSxvi( XclImpStream& rStrm )
 964 {
 965     XclImpPTItemRef xItem( new XclImpPTItem( GetCacheField() ) );
 966     maItems.push_back( xItem );
 967     xItem->ReadSxvi( rStrm );
 968 }
 969
 970 // row/column fields ----------------------------------------------------------
 971
 972 void XclImpPTField::ConvertRowColField( ScDPSaveData& rSaveData ) const
 973 {
 974     OSL_ENSURE( maFieldInfo.mnAxes & EXC_SXVD_AXIS_ROWCOL, "XclImpPTField::ConvertRowColField - no row/column field" );
 975     // special data orientation field?
 976     if( maFieldInfo.mnCacheIdx == EXC_SXIVD_DATA )
 977         rSaveData.GetDataLayoutDimension()->SetOrientation( static_cast< sal_uInt16 >( maFieldInfo.GetApiOrient( EXC_SXVD_AXIS_ROWCOL ) ) );
 978     else
 979         ConvertRCPField( rSaveData );
 980 }
 981
 982 // page fields ----------------------------------------------------------------
 983
 984 void XclImpPTField::SetPageFieldInfo( const XclPTPageFieldInfo& rPageInfo )
 985 {
 986     maPageInfo = rPageInfo;
 987 }
 988
 989 void XclImpPTField::ConvertPageField( ScDPSaveData& rSaveData ) const
 990 {
 991     OSL_ENSURE( maFieldInfo.mnAxes & EXC_SXVD_AXIS_PAGE, "XclImpPTField::ConvertPageField - no page field" );
 992     if( ScDPSaveDimension* pSaveDim = ConvertRCPField( rSaveData ) )
 993     {
 994         const OUString* pName = GetItemName( maPageInfo.mnSelItem );
 995         if (pName)
 996             pSaveDim->SetCurrentPage(pName);
 997     }
 998 }
 999
1000 // hidden fields --------------------------------------------------------------
1001
1002 void XclImpPTField::ConvertHiddenField( ScDPSaveData& rSaveData ) const
1003 {
1004     OSL_ENSURE( (maFieldInfo.mnAxes & EXC_SXVD_AXIS_ROWCOLPAGE) == 0, "XclImpPTField::ConvertHiddenField - field not hidden" );
1005     ConvertRCPField( rSaveData );
1006 }
1007
1008 // data fields ----------------------------------------------------------------
1009
1010 bool XclImpPTField::HasDataFieldInfo() const
1011 {
1012     return !maDataInfoList.empty();
1013 }
1014
1015 void XclImpPTField::AddDataFieldInfo( const XclPTDataFieldInfo& rDataInfo )
1016 {
1017     OSL_ENSURE( maFieldInfo.mnAxes & EXC_SXVD_AXIS_DATA, "XclImpPTField::AddDataFieldInfo - no data field" );
1018     maDataInfoList.push_back( rDataInfo );
1019 }
1020
1021 void XclImpPTField::ConvertDataField( ScDPSaveData& rSaveData ) const
1022 {
1023     OSL_ENSURE( maFieldInfo.mnAxes & EXC_SXVD_AXIS_DATA, "XclImpPTField::ConvertDataField - no data field" );
1024     OSL_ENSURE( !maDataInfoList.empty(), "XclImpPTField::ConvertDataField - no data field info" );
1025     if (maDataInfoList.empty())
1026         return;
1027
1028     OUString aFieldName = GetFieldName();
1029     if (aFieldName.isEmpty())
1030         return;
1031
1032     XclPTDataFieldInfoList::const_iterator aIt = maDataInfoList.begin(), aEnd = maDataInfoList.end();
1033
1034     ScDPSaveDimension* pSaveDim = rSaveData.GetNewDimensionByName(aFieldName);
1035     if (!pSaveDim)
1036     {
1037         SAL_WARN("sc.filter","XclImpPTField::ConvertDataField - field name not found: " << aFieldName);
1038         return;
1039     }
1040
1041     ConvertDataField( *pSaveDim, *aIt );
1042
1043     // multiple data fields -> clone dimension
1044     for( ++aIt; aIt != aEnd; ++aIt )
1045     {
1046         ScDPSaveDimension& rDupDim = rSaveData.DuplicateDimension( *pSaveDim );
1047         ConvertDataFieldInfo( rDupDim, *aIt );
1048     }
1049 }
1050
1051 // private --------------------------------------------------------------------
1052
1053 /**
1054  * Convert Excel-encoded subtotal name to a Calc-encoded one.
1055  */
1056 static OUString lcl_convertExcelSubtotalName(const OUString& rName)
1057 {
1058     OUStringBuffer aBuf;
1059     const sal_Unicode* p = rName.getStr();
1060     sal_Int32 n = rName.getLength();
1061     for (sal_Int32 i = 0; i < n; ++i)
1062     {
1063         const sal_Unicode c = p[i];
1064         if (c == '\\')
1065         {
1066             aBuf.append(c);
1067             aBuf.append(c);
1068         }
1069         else
1070             aBuf.append(c);
1071     }
1072     return aBuf.makeStringAndClear();
1073 }
1074
1075 ScDPSaveDimension* XclImpPTField::ConvertRCPField( ScDPSaveData& rSaveData ) const
1076 {
1077     const OUString& rFieldName = GetFieldName();
1078     if( rFieldName.isEmpty() )
1079         return 0;
1080
1081     const XclImpPCField* pCacheField = GetCacheField();
1082     if( !pCacheField || !pCacheField->IsSupportedField() )
1083         return 0;
1084
1085     ScDPSaveDimension* pTest = rSaveData.GetNewDimensionByName(rFieldName);
1086     if (!pTest)
1087         return NULL;
1088
1089     ScDPSaveDimension& rSaveDim = *pTest;
1090
1091     // orientation
1092     rSaveDim.SetOrientation( static_cast< sal_uInt16 >( maFieldInfo.GetApiOrient( EXC_SXVD_AXIS_ROWCOLPAGE ) ) );
1093
1094     // general field info
1095     ConvertFieldInfo( rSaveDim );
1096
1097     // visible name
1098     if (const OUString* pVisName = maFieldInfo.GetVisName())
1099         if (!pVisName->isEmpty())
1100             rSaveDim.SetLayoutName( *pVisName );
1101
1102     // subtotal function(s)
1103     XclPTSubtotalVec aSubtotalVec;
1104     maFieldInfo.GetSubtotals( aSubtotalVec );
1105     if( !aSubtotalVec.empty() )
1106         rSaveDim.SetSubTotals( static_cast< long >( aSubtotalVec.size() ), &aSubtotalVec[ 0 ] );
1107
1108     // sorting
1109     DataPilotFieldSortInfo aSortInfo;
1110     aSortInfo.Field = mrPTable.GetDataFieldName( maFieldExtInfo.mnSortField );
1111     aSortInfo.IsAscending = ::get_flag( maFieldExtInfo.mnFlags, EXC_SXVDEX_SORT_ASC );
1112     aSortInfo.Mode = maFieldExtInfo.GetApiSortMode();
1113     rSaveDim.SetSortInfo( &aSortInfo );
1114
1115     // auto show
1116     DataPilotFieldAutoShowInfo aShowInfo;
1117     aShowInfo.IsEnabled = ::get_flag( maFieldExtInfo.mnFlags, EXC_SXVDEX_AUTOSHOW );
1118     aShowInfo.ShowItemsMode = maFieldExtInfo.GetApiAutoShowMode();
1119     aShowInfo.ItemCount = maFieldExtInfo.GetApiAutoShowCount();
1120     aShowInfo.DataField = mrPTable.GetDataFieldName( maFieldExtInfo.mnShowField );
1121     rSaveDim.SetAutoShowInfo( &aShowInfo );
1122
1123     // layout
1124     DataPilotFieldLayoutInfo aLayoutInfo;
1125     aLayoutInfo.LayoutMode = maFieldExtInfo.GetApiLayoutMode();
1126     aLayoutInfo.AddEmptyLines = ::get_flag( maFieldExtInfo.mnFlags, EXC_SXVDEX_LAYOUT_BLANK );
1127     rSaveDim.SetLayoutInfo( &aLayoutInfo );
1128
1129     // grouping info
1130     pCacheField->ConvertGroupField( rSaveData, mrPTable.GetVisFieldNames() );
1131
1132     // custom subtotal name
1133     if (maFieldExtInfo.mpFieldTotalName.get())
1134     {
1135         OUString aSubName = lcl_convertExcelSubtotalName(*maFieldExtInfo.mpFieldTotalName);
1136         rSaveDim.SetSubtotalName(aSubName);
1137     }
1138
1139     return &rSaveDim;
1140 }
1141
1142 void XclImpPTField::ConvertFieldInfo( ScDPSaveDimension& rSaveDim ) const
1143 {
1144     rSaveDim.SetShowEmpty( ::get_flag( maFieldExtInfo.mnFlags, EXC_SXVDEX_SHOWALL ) );
1145     ConvertItems( rSaveDim );
1146 }
1147
1148 void XclImpPTField::ConvertDataField( ScDPSaveDimension& rSaveDim, const XclPTDataFieldInfo& rDataInfo ) const
1149 {
1150     // orientation
1151     rSaveDim.SetOrientation( DataPilotFieldOrientation_DATA );
1152     // general field info
1153     ConvertFieldInfo( rSaveDim );
1154     // extended data field info
1155     ConvertDataFieldInfo( rSaveDim, rDataInfo );
1156 }
1157
1158 void XclImpPTField::ConvertDataFieldInfo( ScDPSaveDimension& rSaveDim, const XclPTDataFieldInfo& rDataInfo ) const
1159 {
1160     // visible name
1161     const OUString* pVisName = rDataInfo.GetVisName();
1162     if (pVisName && !pVisName->isEmpty())
1163         rSaveDim.SetLayoutName(*pVisName);
1164
1165     // aggregation function
1166     rSaveDim.SetFunction( static_cast< sal_uInt16 >( rDataInfo.GetApiAggFunc() ) );
1167
1168     // result field reference
1169     sal_Int32 nRefType = rDataInfo.GetApiRefType();
1170     DataPilotFieldReference aFieldRef;
1171     aFieldRef.ReferenceType = nRefType;
1172     const XclImpPTField* pRefField = mrPTable.GetField(rDataInfo.mnRefField);
1173     if (pRefField)
1174     {
1175         aFieldRef.ReferenceField = pRefField->GetFieldName();
1176         aFieldRef.ReferenceItemType = rDataInfo.GetApiRefItemType();
1177         if (aFieldRef.ReferenceItemType == sheet::DataPilotFieldReferenceItemType::NAMED)
1178         {
1179             const OUString* pRefItemName = pRefField->GetItemName(rDataInfo.mnRefItem);
1180             if (pRefItemName)
1181                 aFieldRef.ReferenceItemName = *pRefItemName;
1182         }
1183     }
1184
1185     rSaveDim.SetReferenceValue(&aFieldRef);
1186 }
1187
1188 void XclImpPTField::ConvertItems( ScDPSaveDimension& rSaveDim ) const
1189 {
1190     for( XclImpPTItemVec::const_iterator aIt = maItems.begin(), aEnd = maItems.end(); aIt != aEnd; ++aIt )
1191         (*aIt)->ConvertItem( rSaveDim );
1192 }
1193
1194 XclImpPivotTable::XclImpPivotTable( const XclImpRoot& rRoot ) :
1195     XclImpRoot( rRoot ),
1196     maDataOrientField( *this, EXC_SXIVD_DATA ),
1197     mpDPObj(NULL)
1198 {
1199 }
1200
1201 XclImpPivotTable::~XclImpPivotTable()
1202 {
1203 }
1204
1205 // cache/field access, misc. --------------------------------------------------
1206
1207 sal_uInt16 XclImpPivotTable::GetFieldCount() const
1208 {
1209     return static_cast< sal_uInt16 >( maFields.size() );
1210 }
1211
1212 const XclImpPTField* XclImpPivotTable::GetField( sal_uInt16 nFieldIdx ) const
1213 {
1214     return (nFieldIdx == EXC_SXIVD_DATA) ? &maDataOrientField :
1215         ((nFieldIdx < maFields.size()) ? maFields[ nFieldIdx ].get() : 0);
1216 }
1217
1218 XclImpPTField* XclImpPivotTable::GetFieldAcc( sal_uInt16 nFieldIdx )
1219 {
1220     // do not return maDataOrientField
1221     return (nFieldIdx < maFields.size()) ? maFields[ nFieldIdx ].get() : 0;
1222 }
1223
1224 const XclImpPTField* XclImpPivotTable::GetDataField( sal_uInt16 nDataFieldIdx ) const
1225 {
1226     if( nDataFieldIdx < maOrigDataFields.size() )
1227         return GetField( maOrigDataFields[ nDataFieldIdx ] );
1228     return 0;
1229 }
1230
1231 OUString XclImpPivotTable::GetDataFieldName( sal_uInt16 nDataFieldIdx ) const
1232 {
1233     if( const XclImpPTField* pField = GetDataField( nDataFieldIdx ) )
1234         return pField->GetFieldName();
1235     return OUString();
1236 }
1237
1238 // records --------------------------------------------------------------------
1239
1240 void XclImpPivotTable::ReadSxview( XclImpStream& rStrm )
1241 {
1242     rStrm >> maPTInfo;
1243
1244     GetAddressConverter().ConvertRange(
1245         maOutScRange, maPTInfo.maOutXclRange, GetCurrScTab(), GetCurrScTab(), true );
1246
1247     mxPCache = GetPivotTableManager().GetPivotCache( maPTInfo.mnCacheIdx );
1248     mxCurrField.reset();
1249 }
1250
1251 void XclImpPivotTable::ReadSxvd( XclImpStream& rStrm )
1252 {
1253     sal_uInt16 nFieldCount = GetFieldCount();
1254     if( nFieldCount < EXC_PT_MAXFIELDCOUNT )
1255     {
1256         // cache index for the field is equal to the SXVD record index
1257         mxCurrField.reset( new XclImpPTField( *this, nFieldCount ) );
1258         maFields.push_back( mxCurrField );
1259         mxCurrField->ReadSxvd( rStrm );
1260         // add visible name of new field to list of visible names
1261         maVisFieldNames.push_back( mxCurrField->GetVisFieldName() );
1262         OSL_ENSURE( maFields.size() == maVisFieldNames.size(),
1263             "XclImpPivotTable::ReadSxvd - wrong size of visible name array" );
1264     }
1265     else
1266         mxCurrField.reset();
1267 }
1268
1269 void XclImpPivotTable::ReadSxvi( XclImpStream& rStrm )
1270 {
1271     if( mxCurrField )
1272         mxCurrField->ReadSxvi( rStrm );
1273 }
1274
1275 void XclImpPivotTable::ReadSxvdex( XclImpStream& rStrm )
1276 {
1277     if( mxCurrField )
1278         mxCurrField->ReadSxvdex( rStrm );
1279 }
1280
1281 void XclImpPivotTable::ReadSxivd( XclImpStream& rStrm )
1282 {
1283     mxCurrField.reset();
1284
1285     // find the index vector to fill (row SXIVD doesn't exist without row fields)
1286     ScfUInt16Vec* pFieldVec = 0;
1287     if( maRowFields.empty() && (maPTInfo.mnRowFields > 0) )
1288         pFieldVec = &maRowFields;
1289     else if( maColFields.empty() && (maPTInfo.mnColFields > 0) )
1290         pFieldVec = &maColFields;
1291
1292     // fill the vector from record data
1293     if( pFieldVec )
1294     {
1295         sal_uInt16 nSize = ulimit_cast< sal_uInt16 >( rStrm.GetRecSize() / 2, EXC_PT_MAXROWCOLCOUNT );
1296         pFieldVec->reserve( nSize );
1297         for( sal_uInt16 nIdx = 0; nIdx < nSize; ++nIdx )
1298         {
1299             sal_uInt16 nFieldIdx;
1300             nFieldIdx = rStrm.ReaduInt16();
1301             pFieldVec->push_back( nFieldIdx );
1302
1303             // set orientation at special data orientation field
1304             if( nFieldIdx == EXC_SXIVD_DATA )
1305             {
1306                 sal_uInt16 nAxis = (pFieldVec == &maRowFields) ? EXC_SXVD_AXIS_ROW : EXC_SXVD_AXIS_COL;
1307                 maDataOrientField.SetAxes( nAxis );
1308             }
1309         }
1310     }
1311 }
1312
1313 void XclImpPivotTable::ReadSxpi( XclImpStream& rStrm )
1314 {
1315     mxCurrField.reset();
1316
1317     sal_uInt16 nSize = ulimit_cast< sal_uInt16 >( rStrm.GetRecSize() / 6 );
1318     for( sal_uInt16 nEntry = 0; nEntry < nSize; ++nEntry )
1319     {
1320         XclPTPageFieldInfo aPageInfo;
1321         rStrm >> aPageInfo;
1322         if( XclImpPTField* pField = GetFieldAcc( aPageInfo.mnField ) )
1323         {
1324             maPageFields.push_back( aPageInfo.mnField );
1325             pField->SetPageFieldInfo( aPageInfo );
1326         }
1327         GetCurrSheetDrawing().SetSkipObj( aPageInfo.mnObjId );
1328     }
1329 }
1330
1331 void XclImpPivotTable::ReadSxdi( XclImpStream& rStrm )
1332 {
1333     mxCurrField.reset();
1334
1335     XclPTDataFieldInfo aDataInfo;
1336     rStrm >> aDataInfo;
1337     if( XclImpPTField* pField = GetFieldAcc( aDataInfo.mnField ) )
1338     {
1339         maOrigDataFields.push_back( aDataInfo.mnField );
1340         // DataPilot does not support double data fields -> add first appearance to index list only
1341         if( !pField->HasDataFieldInfo() )
1342             maFiltDataFields.push_back( aDataInfo.mnField );
1343         pField->AddDataFieldInfo( aDataInfo );
1344     }
1345 }
1346
1347 void XclImpPivotTable::ReadSxex( XclImpStream& rStrm )
1348 {
1349     rStrm >> maPTExtInfo;
1350 }
1351
1352 void XclImpPivotTable::ReadSxViewEx9( XclImpStream& rStrm )
1353 {
1354     rStrm >> maPTViewEx9Info;
1355 }
1356
1357 void XclImpPivotTable::Convert()
1358 {
1359     if( !mxPCache || !mxPCache->IsValid() )
1360         return;
1361
1362     ScDPSaveData aSaveData;
1363
1364     // *** global settings ***
1365
1366     aSaveData.SetRowGrand( ::get_flag( maPTInfo.mnFlags, EXC_SXVIEW_ROWGRAND ) );
1367     aSaveData.SetColumnGrand( ::get_flag( maPTInfo.mnFlags, EXC_SXVIEW_COLGRAND ) );
1368     aSaveData.SetFilterButton( false );
1369     aSaveData.SetDrillDown( ::get_flag( maPTExtInfo.mnFlags, EXC_SXEX_DRILLDOWN ) );
1370
1371     // *** fields ***
1372
1373     ScfUInt16Vec::const_iterator aIt, aEnd;
1374
1375     // row fields
1376     for( aIt = maRowFields.begin(), aEnd = maRowFields.end(); aIt != aEnd; ++aIt )
1377         if( const XclImpPTField* pField = GetField( *aIt ) )
1378             pField->ConvertRowColField( aSaveData );
1379
1380     // column fields
1381     for( aIt = maColFields.begin(), aEnd = maColFields.end(); aIt != aEnd; ++aIt )
1382         if( const XclImpPTField* pField = GetField( *aIt ) )
1383             pField->ConvertRowColField( aSaveData );
1384
1385     // page fields
1386     for( aIt = maPageFields.begin(), aEnd = maPageFields.end(); aIt != aEnd; ++aIt )
1387         if( const XclImpPTField* pField = GetField( *aIt ) )
1388             pField->ConvertPageField( aSaveData );
1389
1390     // We need to import hidden fields because hidden fields may contain
1391     // special settings for subtotals (aggregation function, filters, custom
1392     // name etc.) and members (hidden, custom name etc.).
1393
1394     // hidden fields
1395     for( sal_uInt16 nField = 0, nCount = GetFieldCount(); nField < nCount; ++nField )
1396         if( const XclImpPTField* pField = GetField( nField ) )
1397             if (!pField->GetAxes())
1398                 pField->ConvertHiddenField( aSaveData );
1399
1400     // data fields
1401     for( aIt = maFiltDataFields.begin(), aEnd = maFiltDataFields.end(); aIt != aEnd; ++aIt )
1402         if( const XclImpPTField* pField = GetField( *aIt ) )
1403             pField->ConvertDataField( aSaveData );
1404
1405     // *** insert into Calc document ***
1406
1407     // create source descriptor
1408     ScSheetSourceDesc aDesc(GetDocPtr());
1409     const OUString& rSrcName = mxPCache->GetSourceRangeName();
1410     if (!rSrcName.isEmpty())
1411         // Range name is the data source.
1412         aDesc.SetRangeName(rSrcName);
1413     else
1414         // Normal cell range.
1415         aDesc.SetSourceRange(mxPCache->GetSourceRange());
1416
1417     // adjust output range to include the page fields
1418     ScRange aOutRange( maOutScRange );
1419     if( !maPageFields.empty() )
1420     {
1421         SCsROW nDecRows = ::std::min< SCsROW >( aOutRange.aStart.Row(), maPageFields.size() + 1 );
1422         aOutRange.aStart.IncRow( -nDecRows );
1423     }
1424
1425     // create the DataPilot
1426     ScDPObject* pDPObj = new ScDPObject( GetDocPtr() );
1427     pDPObj->SetName( maPTInfo.maTableName );
1428     if (!maPTInfo.maDataName.isEmpty())
1429         aSaveData.GetDataLayoutDimension()->SetLayoutName(maPTInfo.maDataName);
1430
1431     if (!maPTViewEx9Info.maGrandTotalName.isEmpty())
1432         aSaveData.SetGrandTotalName(maPTViewEx9Info.maGrandTotalName);
1433
1434     pDPObj->SetSaveData( aSaveData );
1435     pDPObj->SetSheetDesc( aDesc );
1436     pDPObj->SetOutRange( aOutRange );
1437     pDPObj->SetHeaderLayout( maPTViewEx9Info.mnGridLayout == 0 );
1438
1439     GetDoc().GetDPCollection()->InsertNewTable(pDPObj);
1440     mpDPObj = pDPObj;
1441
1442     ApplyMergeFlags(aOutRange, aSaveData);
1443 }
1444
1445 void XclImpPivotTable::MaybeRefresh()
1446 {
1447     if (mpDPObj && mxPCache->IsRefreshOnLoad())
1448     {
1449         // 'refresh table on load' flag is set.  Refresh the table now.  Some
1450         // Excel files contain partial table output when this flag is set.
1451         ScRange aOutRange = mpDPObj->GetOutRange();
1452         mpDPObj->Output(aOutRange.aStart);
1453     }
1454 }
1455
1456 void XclImpPivotTable::ApplyMergeFlags(const ScRange& rOutRange, const ScDPSaveData& rSaveData)
1457 {
1458     // Apply merge flags for varoius datapilot controls.
1459
1460     ScDPOutputGeometry aGeometry(rOutRange, false);
1461     aGeometry.setColumnFieldCount(maPTInfo.mnColFields);
1462     aGeometry.setPageFieldCount(maPTInfo.mnPageFields);
1463     aGeometry.setDataFieldCount(maPTInfo.mnDataFields);
1464     aGeometry.setRowFieldCount(maPTInfo.mnRowFields);
1465
1466     ScDocument& rDoc = GetDoc();
1467
1468     vector<const ScDPSaveDimension*> aFieldDims;
1469     vector<ScAddress> aFieldBtns;
1470
1471     aGeometry.getPageFieldPositions(aFieldBtns);
1472     vector<ScAddress>::const_iterator itr = aFieldBtns.begin(), itrEnd = aFieldBtns.end();
1473     for (; itr != itrEnd; ++itr)
1474     {
1475         rDoc.ApplyFlagsTab(itr->Col(), itr->Row(), itr->Col(), itr->Row(), itr->Tab(), SC_MF_BUTTON);
1476
1477         sal_uInt16 nMFlag = SC_MF_BUTTON_POPUP;
1478         OUString aName = rDoc.GetString(itr->Col(), itr->Row(), itr->Tab());
1479         if (rSaveData.HasInvisibleMember(aName))
1480             nMFlag |= SC_MF_HIDDEN_MEMBER;
1481
1482         rDoc.ApplyFlagsTab(itr->Col()+1, itr->Row(), itr->Col()+1, itr->Row(), itr->Tab(), nMFlag);
1483     }
1484
1485     aGeometry.getColumnFieldPositions(aFieldBtns);
1486     rSaveData.GetAllDimensionsByOrientation(sheet::DataPilotFieldOrientation_COLUMN, aFieldDims);
1487     if (aFieldBtns.size() == aFieldDims.size())
1488     {
1489         itr    = aFieldBtns.begin();
1490         itrEnd = aFieldBtns.end();
1491         vector<const ScDPSaveDimension*>::const_iterator itDim = aFieldDims.begin();
1492         for (; itr != itrEnd; ++itr, ++itDim)
1493         {
1494             sal_Int16 nMFlag = SC_MF_BUTTON;
1495             const ScDPSaveDimension* pDim = *itDim;
1496             if (pDim->HasInvisibleMember())
1497                 nMFlag |= SC_MF_HIDDEN_MEMBER;
1498             if (!pDim->IsDataLayout())
1499                 nMFlag |= SC_MF_BUTTON_POPUP;
1500             rDoc.ApplyFlagsTab(itr->Col(), itr->Row(), itr->Col(), itr->Row(), itr->Tab(), nMFlag);
1501         }
1502     }
1503
1504     aGeometry.getRowFieldPositions(aFieldBtns);
1505     rSaveData.GetAllDimensionsByOrientation(sheet::DataPilotFieldOrientation_ROW, aFieldDims);
1506     if (aFieldBtns.size() == aFieldDims.size())
1507     {
1508         itr    = aFieldBtns.begin();
1509         itrEnd = aFieldBtns.end();
1510         vector<const ScDPSaveDimension*>::const_iterator itDim = aFieldDims.begin();
1511         for (; itr != itrEnd; ++itr, ++itDim)
1512         {
1513             sal_Int16 nMFlag = SC_MF_BUTTON;
1514             const ScDPSaveDimension* pDim = *itDim;
1515             if (pDim->HasInvisibleMember())
1516                 nMFlag |= SC_MF_HIDDEN_MEMBER;
1517             if (!pDim->IsDataLayout())
1518                 nMFlag |= SC_MF_BUTTON_POPUP;
1519             rDoc.ApplyFlagsTab(itr->Col(), itr->Row(), itr->Col(), itr->Row(), itr->Tab(), nMFlag);
1520         }
1521     }
1522 }
1523
1524 XclImpPivotTableManager::XclImpPivotTableManager( const XclImpRoot& rRoot ) :
1525     XclImpRoot( rRoot )
1526 {
1527 }
1528
1529 XclImpPivotTableManager::~XclImpPivotTableManager()
1530 {
1531 }
1532
1533 // pivot cache records --------------------------------------------------------
1534
1535 XclImpPivotCacheRef XclImpPivotTableManager::GetPivotCache( sal_uInt16 nCacheIdx )
1536 {
1537     XclImpPivotCacheRef xPCache;
1538     if( nCacheIdx < maPCaches.size() )
1539         xPCache = maPCaches[ nCacheIdx ];
1540     return xPCache;
1541 }
1542
1543 void XclImpPivotTableManager::ReadSxidstm( XclImpStream& rStrm )
1544 {
1545     XclImpPivotCacheRef xPCache( new XclImpPivotCache( GetRoot() ) );
1546     maPCaches.push_back( xPCache );
1547     xPCache->ReadSxidstm( rStrm );
1548 }
1549
1550 void XclImpPivotTableManager::ReadSxvs( XclImpStream& rStrm )
1551 {
1552     if( !maPCaches.empty() )
1553         maPCaches.back()->ReadSxvs( rStrm );
1554 }
1555
1556 void XclImpPivotTableManager::ReadDconref( XclImpStream& rStrm )
1557 {
1558     if( !maPCaches.empty() )
1559         maPCaches.back()->ReadDconref( rStrm );
1560 }
1561
1562 void XclImpPivotTableManager::ReadDConName( XclImpStream& rStrm )
1563 {
1564     if( !maPCaches.empty() )
1565         maPCaches.back()->ReadDConName( rStrm );
1566 }
1567
1568 // pivot table records --------------------------------------------------------
1569
1570 void XclImpPivotTableManager::ReadSxview( XclImpStream& rStrm )
1571 {
1572     XclImpPivotTableRef xPTable( new XclImpPivotTable( GetRoot() ) );
1573     maPTables.push_back( xPTable );
1574     xPTable->ReadSxview( rStrm );
1575 }
1576
1577 void XclImpPivotTableManager::ReadSxvd( XclImpStream& rStrm )
1578 {
1579     if( !maPTables.empty() )
1580         maPTables.back()->ReadSxvd( rStrm );
1581 }
1582
1583 void XclImpPivotTableManager::ReadSxvdex( XclImpStream& rStrm )
1584 {
1585     if( !maPTables.empty() )
1586         maPTables.back()->ReadSxvdex( rStrm );
1587 }
1588
1589 void XclImpPivotTableManager::ReadSxivd( XclImpStream& rStrm )
1590 {
1591     if( !maPTables.empty() )
1592         maPTables.back()->ReadSxivd( rStrm );
1593 }
1594
1595 void XclImpPivotTableManager::ReadSxpi( XclImpStream& rStrm )
1596 {
1597     if( !maPTables.empty() )
1598         maPTables.back()->ReadSxpi( rStrm );
1599 }
1600
1601 void XclImpPivotTableManager::ReadSxdi( XclImpStream& rStrm )
1602 {
1603     if( !maPTables.empty() )
1604         maPTables.back()->ReadSxdi( rStrm );
1605 }
1606
1607 void XclImpPivotTableManager::ReadSxvi( XclImpStream& rStrm )
1608 {
1609     if( !maPTables.empty() )
1610         maPTables.back()->ReadSxvi( rStrm );
1611 }
1612
1613 void XclImpPivotTableManager::ReadSxex( XclImpStream& rStrm )
1614 {
1615     if( !maPTables.empty() )
1616         maPTables.back()->ReadSxex( rStrm );
1617 }
1618
1619 void XclImpPivotTableManager::ReadSxViewEx9( XclImpStream& rStrm )
1620 {
1621     if( !maPTables.empty() )
1622         maPTables.back()->ReadSxViewEx9( rStrm );
1623 }
1624
1625 void XclImpPivotTableManager::ReadPivotCaches( XclImpStream& rStrm )
1626 {
1627     for( XclImpPivotCacheVec::iterator aIt = maPCaches.begin(), aEnd = maPCaches.end(); aIt != aEnd; ++aIt )
1628         (*aIt)->ReadPivotCacheStream( rStrm );
1629 }
1630
1631 void XclImpPivotTableManager::ConvertPivotTables()
1632 {
1633     for( XclImpPivotTableVec::iterator aIt = maPTables.begin(), aEnd = maPTables.end(); aIt != aEnd; ++aIt )
1634         (*aIt)->Convert();
1635 }
1636
1637 void XclImpPivotTableManager::MaybeRefreshPivotTables()
1638 {
1639     for( XclImpPivotTableVec::iterator aIt = maPTables.begin(), aEnd = maPTables.end(); aIt != aEnd; ++aIt )
1640         (*aIt)->MaybeRefresh();
1641 }
1642
1643 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */