2305 lines
83 KiB
C++
2305 lines
83 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*
|
|
* This file is part of the LibreOffice project.
|
|
*
|
|
* This Source Code Form is subject to the terms of the Mozilla Public
|
|
* License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
*
|
|
* This file incorporates work covered by the following license notice:
|
|
*
|
|
* Licensed to the Apache Software Foundation (ASF) under one or more
|
|
* contributor license agreements. See the NOTICE file distributed
|
|
* with this work for additional information regarding copyright
|
|
* ownership. The ASF licenses this file to you under the Apache
|
|
* License, Version 2.0 (the "License"); you may not use this file
|
|
* except in compliance with the License. You may obtain a copy of
|
|
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
|
|
*/
|
|
|
|
#include <dbfunc.hxx>
|
|
#include <scitems.hxx>
|
|
#include <vcl/svapp.hxx>
|
|
#include <vcl/weld.hxx>
|
|
#include <svl/numformat.hxx>
|
|
#include <svl/zforlist.hxx>
|
|
#include <sfx2/app.hxx>
|
|
#include <unotools/collatorwrapper.hxx>
|
|
#include <com/sun/star/beans/XPropertySet.hpp>
|
|
#include <com/sun/star/container/XNameAccess.hpp>
|
|
#include <com/sun/star/sheet/DataPilotFieldFilter.hpp>
|
|
#include <com/sun/star/sheet/DataPilotFieldGroupBy.hpp>
|
|
#include <com/sun/star/sheet/DataPilotFieldOrientation.hpp>
|
|
#include <com/sun/star/sheet/DataPilotFieldSortMode.hpp>
|
|
#include <com/sun/star/sheet/DataPilotTableHeaderData.hpp>
|
|
#include <com/sun/star/sheet/MemberResultFlags.hpp>
|
|
#include <com/sun/star/sheet/XDimensionsSupplier.hpp>
|
|
#include <com/sun/star/sheet/XDrillDownDataSupplier.hpp>
|
|
|
|
#include <global.hxx>
|
|
#include <scresid.hxx>
|
|
#include <globstr.hrc>
|
|
#include <undotab.hxx>
|
|
#include <undodat.hxx>
|
|
#include <dbdata.hxx>
|
|
#include <rangenam.hxx>
|
|
#include <docsh.hxx>
|
|
#include <olinetab.hxx>
|
|
#include <olinefun.hxx>
|
|
#include <dpobject.hxx>
|
|
#include <dpsave.hxx>
|
|
#include <dpdimsave.hxx>
|
|
#include <dbdocfun.hxx>
|
|
#include <dpoutput.hxx>
|
|
#include <editable.hxx>
|
|
#include <patattr.hxx>
|
|
#include <unonames.hxx>
|
|
#include <userlist.hxx>
|
|
#include <queryentry.hxx>
|
|
#include <markdata.hxx>
|
|
#include <tabvwsh.hxx>
|
|
#include <generalfunction.hxx>
|
|
#include <sortparam.hxx>
|
|
|
|
#include <comphelper/lok.hxx>
|
|
#include <osl/diagnose.h>
|
|
|
|
#include <memory>
|
|
#include <string_view>
|
|
#include <unordered_set>
|
|
#include <unordered_map>
|
|
#include <vector>
|
|
#include <algorithm>
|
|
|
|
using namespace com::sun::star;
|
|
using ::com::sun::star::uno::Any;
|
|
using ::com::sun::star::uno::Sequence;
|
|
using ::com::sun::star::uno::Reference;
|
|
using ::com::sun::star::uno::UNO_QUERY;
|
|
using ::com::sun::star::beans::XPropertySet;
|
|
using ::com::sun::star::container::XNameAccess;
|
|
using ::com::sun::star::sheet::XDimensionsSupplier;
|
|
using ::std::vector;
|
|
|
|
// outliner
|
|
|
|
// create outline grouping
|
|
|
|
void ScDBFunc::MakeOutline( bool bColumns, bool bRecord )
|
|
{
|
|
ScRange aRange;
|
|
if (GetViewData().GetSimpleArea(aRange) == SC_MARK_SIMPLE)
|
|
{
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScOutlineDocFunc aFunc(*pDocSh);
|
|
aFunc.MakeOutline( aRange, bColumns, bRecord, false );
|
|
|
|
ScTabViewShell::notifyAllViewsHeaderInvalidation(GetViewData().GetViewShell(), bColumns ? COLUMN_HEADER : ROW_HEADER, GetViewData().GetTabNo());
|
|
ScTabViewShell::notifyAllViewsSheetGeomInvalidation(GetViewData().GetViewShell(),
|
|
bColumns, !bColumns, false /* bSizes*/,
|
|
false /* bHidden */, false /* bFiltered */,
|
|
true /* bGroups */, GetViewData().GetTabNo());
|
|
}
|
|
else
|
|
ErrorMessage(STR_NOMULTISELECT);
|
|
}
|
|
|
|
// delete outline grouping
|
|
|
|
void ScDBFunc::RemoveOutline( bool bColumns, bool bRecord )
|
|
{
|
|
ScRange aRange;
|
|
if (GetViewData().GetSimpleArea(aRange) == SC_MARK_SIMPLE)
|
|
{
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScOutlineDocFunc aFunc(*pDocSh);
|
|
aFunc.RemoveOutline( aRange, bColumns, bRecord, false );
|
|
|
|
ScTabViewShell::notifyAllViewsHeaderInvalidation(GetViewData().GetViewShell(), bColumns ? COLUMN_HEADER : ROW_HEADER, GetViewData().GetTabNo());
|
|
ScTabViewShell::notifyAllViewsSheetGeomInvalidation(GetViewData().GetViewShell(),
|
|
bColumns, !bColumns, false /* bSizes*/,
|
|
true /* bHidden */, true /* bFiltered */,
|
|
true /* bGroups */, GetViewData().GetTabNo());
|
|
}
|
|
else
|
|
ErrorMessage(STR_NOMULTISELECT);
|
|
}
|
|
|
|
// menu status: delete outlines
|
|
|
|
void ScDBFunc::TestRemoveOutline( bool& rCol, bool& rRow )
|
|
{
|
|
bool bColFound = false;
|
|
bool bRowFound = false;
|
|
|
|
SCCOL nStartCol, nEndCol;
|
|
SCROW nStartRow, nEndRow;
|
|
SCTAB nStartTab, nEndTab;
|
|
if (GetViewData().GetSimpleArea(nStartCol,nStartRow,nStartTab,nEndCol,nEndRow,nEndTab) == SC_MARK_SIMPLE)
|
|
{
|
|
SCTAB nTab = nStartTab;
|
|
ScDocument& rDoc = GetViewData().GetDocument();
|
|
ScOutlineTable* pTable = rDoc.GetOutlineTable( nTab );
|
|
if (pTable)
|
|
{
|
|
ScOutlineEntry* pEntry;
|
|
SCCOLROW nStart;
|
|
SCCOLROW nEnd;
|
|
bool bColMarked = ( nStartRow == 0 && nEndRow == rDoc.MaxRow() );
|
|
bool bRowMarked = ( nStartCol == 0 && nEndCol == rDoc.MaxCol() );
|
|
|
|
// columns
|
|
|
|
if ( !bRowMarked || bColMarked ) // not when entire rows are marked
|
|
{
|
|
ScOutlineArray& rArray = pTable->GetColArray();
|
|
ScSubOutlineIterator aColIter( &rArray );
|
|
while (!bColFound)
|
|
{
|
|
pEntry=aColIter.GetNext();
|
|
if (!pEntry)
|
|
break;
|
|
nStart = pEntry->GetStart();
|
|
nEnd = pEntry->GetEnd();
|
|
if ( nStartCol<=static_cast<SCCOL>(nEnd) && nEndCol>=static_cast<SCCOL>(nStart) )
|
|
bColFound = true;
|
|
}
|
|
}
|
|
|
|
// rows
|
|
|
|
if ( !bColMarked || bRowMarked ) // not when entire columns are marked
|
|
{
|
|
ScOutlineArray& rArray = pTable->GetRowArray();
|
|
ScSubOutlineIterator aRowIter( &rArray );
|
|
while (!bRowFound)
|
|
{
|
|
pEntry=aRowIter.GetNext();
|
|
if (!pEntry)
|
|
break;
|
|
nStart = pEntry->GetStart();
|
|
nEnd = pEntry->GetEnd();
|
|
if ( nStartRow<=nEnd && nEndRow>=nStart )
|
|
bRowFound = true;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
rCol = bColFound;
|
|
rRow = bRowFound;
|
|
}
|
|
|
|
void ScDBFunc::RemoveAllOutlines( bool bRecord )
|
|
{
|
|
SCTAB nTab = GetViewData().GetTabNo();
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScOutlineDocFunc aFunc(*pDocSh);
|
|
|
|
bool bOk = aFunc.RemoveAllOutlines( nTab, bRecord );
|
|
|
|
if (bOk)
|
|
{
|
|
ScTabViewShell::notifyAllViewsSheetGeomInvalidation(GetViewData().GetViewShell(),
|
|
true /* bColumns */, true /* bRows */, false /* bSizes*/,
|
|
true /* bHidden */, true /* bFiltered */,
|
|
true /* bGroups */, nTab);
|
|
UpdateScrollBars(BOTH_HEADERS);
|
|
}
|
|
}
|
|
|
|
// auto outlines
|
|
|
|
void ScDBFunc::AutoOutline( )
|
|
{
|
|
ScDocument& rDoc = GetViewData().GetDocument();
|
|
SCTAB nTab = GetViewData().GetTabNo();
|
|
ScRange aRange( 0,0,nTab, rDoc.MaxCol(),rDoc.MaxRow(),nTab ); // the complete sheet, if nothing is marked
|
|
ScMarkData& rMark = GetViewData().GetMarkData();
|
|
if ( rMark.IsMarked() || rMark.IsMultiMarked() )
|
|
{
|
|
rMark.MarkToMulti();
|
|
aRange = rMark.GetMultiMarkArea();
|
|
}
|
|
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScOutlineDocFunc aFunc(*pDocSh);
|
|
aFunc.AutoOutline( aRange, true );
|
|
}
|
|
|
|
// select outline level
|
|
|
|
void ScDBFunc::SelectLevel( bool bColumns, sal_uInt16 nLevel, bool bRecord )
|
|
{
|
|
SCTAB nTab = GetViewData().GetTabNo();
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScOutlineDocFunc aFunc(*pDocSh);
|
|
|
|
bool bOk = aFunc.SelectLevel( nTab, bColumns, nLevel, bRecord, true/*bPaint*/ );
|
|
|
|
if (bOk)
|
|
{
|
|
ScTabViewShell::notifyAllViewsSheetGeomInvalidation(GetViewData().GetViewShell(),
|
|
bColumns, !bColumns, false /* bSizes*/,
|
|
true /* bHidden */, true /* bFiltered */,
|
|
true /* bGroups */, nTab);
|
|
UpdateScrollBars(bColumns ? COLUMN_HEADER : ROW_HEADER);
|
|
}
|
|
}
|
|
|
|
// show individual outline groups
|
|
|
|
void ScDBFunc::SetOutlineState( bool bColumns, sal_uInt16 nLevel, sal_uInt16 nEntry, bool bHidden)
|
|
{
|
|
const sal_uInt16 nHeadEntry = static_cast< sal_uInt16 >( -1 );
|
|
if ( nEntry == nHeadEntry)
|
|
SelectLevel( bColumns, sal::static_int_cast<sal_uInt16>(nLevel) );
|
|
else
|
|
{
|
|
if ( !bHidden )
|
|
ShowOutline( bColumns, sal::static_int_cast<sal_uInt16>(nLevel), sal::static_int_cast<sal_uInt16>(nEntry) );
|
|
else
|
|
HideOutline( bColumns, sal::static_int_cast<sal_uInt16>(nLevel), sal::static_int_cast<sal_uInt16>(nEntry) );
|
|
}
|
|
}
|
|
|
|
void ScDBFunc::ShowOutline( bool bColumns, sal_uInt16 nLevel, sal_uInt16 nEntry, bool bRecord, bool bPaint )
|
|
{
|
|
SCTAB nTab = GetViewData().GetTabNo();
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScOutlineDocFunc aFunc(*pDocSh);
|
|
|
|
aFunc.ShowOutline( nTab, bColumns, nLevel, nEntry, bRecord, bPaint );
|
|
|
|
if ( bPaint )
|
|
{
|
|
ScTabViewShell::notifyAllViewsSheetGeomInvalidation(GetViewData().GetViewShell(),
|
|
bColumns, !bColumns, false /* bSizes*/,
|
|
true /* bHidden */, true /* bFiltered */,
|
|
true /* bGroups */, nTab);
|
|
UpdateScrollBars(bColumns ? COLUMN_HEADER : ROW_HEADER);
|
|
}
|
|
}
|
|
|
|
// hide individual outline groups
|
|
|
|
void ScDBFunc::HideOutline( bool bColumns, sal_uInt16 nLevel, sal_uInt16 nEntry, bool bRecord, bool bPaint )
|
|
{
|
|
SCTAB nTab = GetViewData().GetTabNo();
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScOutlineDocFunc aFunc(*pDocSh);
|
|
|
|
bool bOk = aFunc.HideOutline( nTab, bColumns, nLevel, nEntry, bRecord, bPaint );
|
|
|
|
if ( bOk && bPaint )
|
|
{
|
|
ScTabViewShell::notifyAllViewsSheetGeomInvalidation(GetViewData().GetViewShell(),
|
|
bColumns, !bColumns, false /* bSizes*/,
|
|
true /* bHidden */, true /* bFiltered */,
|
|
true /* bGroups */, nTab);
|
|
UpdateScrollBars(bColumns ? COLUMN_HEADER : ROW_HEADER);
|
|
}
|
|
}
|
|
|
|
// menu status: show/hide marked range
|
|
|
|
bool ScDBFunc::OutlinePossible(bool bHide)
|
|
{
|
|
bool bEnable = false;
|
|
|
|
SCCOL nStartCol;
|
|
SCROW nStartRow;
|
|
SCTAB nStartTab;
|
|
SCCOL nEndCol;
|
|
SCROW nEndRow;
|
|
SCTAB nEndTab;
|
|
|
|
if (GetViewData().GetSimpleArea(nStartCol,nStartRow,nStartTab,nEndCol,nEndRow,nEndTab) == SC_MARK_SIMPLE)
|
|
{
|
|
ScDocument& rDoc = GetViewData().GetDocument();
|
|
SCTAB nTab = GetViewData().GetTabNo();
|
|
ScOutlineTable* pTable = rDoc.GetOutlineTable( nTab );
|
|
if (pTable)
|
|
{
|
|
SCCOLROW nStart;
|
|
SCCOLROW nEnd;
|
|
|
|
// columns
|
|
|
|
ScOutlineArray& rColArray = pTable->GetColArray();
|
|
ScSubOutlineIterator aColIter( &rColArray );
|
|
while (!bEnable)
|
|
{
|
|
ScOutlineEntry* pEntry = aColIter.GetNext();
|
|
if (!pEntry)
|
|
break;
|
|
nStart = pEntry->GetStart();
|
|
nEnd = pEntry->GetEnd();
|
|
if ( bHide )
|
|
{
|
|
if ( nStartCol<=static_cast<SCCOL>(nEnd) && nEndCol>=static_cast<SCCOL>(nStart) )
|
|
if (!pEntry->IsHidden())
|
|
bEnable = true;
|
|
}
|
|
else
|
|
{
|
|
if ( nStart>=nStartCol && nEnd<=nEndCol )
|
|
if (pEntry->IsHidden())
|
|
bEnable = true;
|
|
}
|
|
}
|
|
|
|
// rows
|
|
|
|
ScOutlineArray& rRowArray = pTable->GetRowArray();
|
|
ScSubOutlineIterator aRowIter( &rRowArray );
|
|
for (;;)
|
|
{
|
|
ScOutlineEntry* pEntry = aRowIter.GetNext();
|
|
if (!pEntry)
|
|
break;
|
|
nStart = pEntry->GetStart();
|
|
nEnd = pEntry->GetEnd();
|
|
if ( bHide )
|
|
{
|
|
if ( nStartRow<=nEnd && nEndRow>=nStart )
|
|
if (!pEntry->IsHidden())
|
|
bEnable = true;
|
|
}
|
|
else
|
|
{
|
|
if ( nStart>=nStartRow && nEnd<=nEndRow )
|
|
if (pEntry->IsHidden())
|
|
bEnable = true;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
return bEnable;
|
|
}
|
|
|
|
// show marked range
|
|
|
|
void ScDBFunc::ShowMarkedOutlines( bool bRecord )
|
|
{
|
|
ScRange aRange;
|
|
if (GetViewData().GetSimpleArea(aRange) == SC_MARK_SIMPLE)
|
|
{
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScOutlineDocFunc aFunc(*pDocSh);
|
|
bool bDone = aFunc.ShowMarkedOutlines( aRange, bRecord );
|
|
if (bDone)
|
|
{
|
|
ScTabViewShell::notifyAllViewsSheetGeomInvalidation(
|
|
GetViewData().GetViewShell(), true, true,
|
|
false /* bSizes*/, true /* bHidden */, true /* bFiltered */,
|
|
true /* bGroups */, GetViewData().GetTabNo());
|
|
UpdateScrollBars();
|
|
}
|
|
}
|
|
else
|
|
ErrorMessage(STR_NOMULTISELECT);
|
|
}
|
|
|
|
// hide marked range
|
|
|
|
void ScDBFunc::HideMarkedOutlines( bool bRecord )
|
|
{
|
|
ScRange aRange;
|
|
if (GetViewData().GetSimpleArea(aRange) == SC_MARK_SIMPLE)
|
|
{
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScOutlineDocFunc aFunc(*pDocSh);
|
|
bool bDone = aFunc.HideMarkedOutlines( aRange, bRecord );
|
|
if (bDone)
|
|
{
|
|
ScTabViewShell::notifyAllViewsSheetGeomInvalidation(
|
|
GetViewData().GetViewShell(), true, true,
|
|
false /* bSizes*/, true /* bHidden */, true /* bFiltered */,
|
|
true /* bGroups */, GetViewData().GetTabNo());
|
|
UpdateScrollBars();
|
|
}
|
|
}
|
|
else
|
|
ErrorMessage(STR_NOMULTISELECT);
|
|
}
|
|
|
|
// sub totals
|
|
|
|
void ScDBFunc::DoSubTotals( const ScSubTotalParam& rParam, bool bRecord,
|
|
const ScSortParam* pForceNewSort )
|
|
{
|
|
bool bDo = !rParam.bRemoveOnly; // sal_False = only delete
|
|
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScDocument& rDoc = pDocSh->GetDocument();
|
|
ScMarkData& rMark = GetViewData().GetMarkData();
|
|
SCTAB nTab = GetViewData().GetTabNo();
|
|
if (bRecord && !rDoc.IsUndoEnabled())
|
|
bRecord = false;
|
|
|
|
ScDBData* pDBData = rDoc.GetDBAtArea( nTab, rParam.nCol1, rParam.nRow1,
|
|
rParam.nCol2, rParam.nRow2 );
|
|
if (!pDBData)
|
|
{
|
|
OSL_FAIL( "SubTotals: no DBData" );
|
|
return;
|
|
}
|
|
|
|
ScEditableTester aTester( rDoc, nTab, 0,rParam.nRow1+1, rDoc.MaxCol(),rDoc.MaxRow() );
|
|
if (!aTester.IsEditable())
|
|
{
|
|
ErrorMessage(aTester.GetMessageId());
|
|
return;
|
|
}
|
|
|
|
if (rDoc.HasAttrib( rParam.nCol1, rParam.nRow1+1, nTab,
|
|
rParam.nCol2, rParam.nRow2, nTab, HasAttrFlags::Merged | HasAttrFlags::Overlapped ))
|
|
{
|
|
ErrorMessage(STR_MSSG_INSERTCELLS_0); // do not insert into merged
|
|
return;
|
|
}
|
|
|
|
weld::WaitObject aWait(GetViewData().GetDialogParent());
|
|
bool bOk = true;
|
|
if (rParam.bReplace)
|
|
{
|
|
if (rDoc.TestRemoveSubTotals( nTab, rParam ))
|
|
{
|
|
std::unique_ptr<weld::MessageDialog> xBox(Application::CreateMessageDialog(GetViewData().GetDialogParent(),
|
|
VclMessageType::Question, VclButtonsType::YesNo,
|
|
ScResId(STR_MSSG_DOSUBTOTALS_1))); // "delete data?"
|
|
xBox->set_title(ScResId(STR_MSSG_DOSUBTOTALS_0)); // "StarCalc"
|
|
xBox->set_default_response(RET_YES);
|
|
bOk = xBox->run() == RET_YES;
|
|
}
|
|
}
|
|
|
|
if (!bOk)
|
|
return;
|
|
|
|
ScDocShellModificator aModificator( *pDocSh );
|
|
|
|
ScSubTotalParam aNewParam( rParam ); // change end of range
|
|
ScDocumentUniquePtr pUndoDoc;
|
|
std::unique_ptr<ScOutlineTable> pUndoTab;
|
|
std::unique_ptr<ScRangeName> pUndoRange;
|
|
std::unique_ptr<ScDBCollection> pUndoDB;
|
|
|
|
if (bRecord) // record old data
|
|
{
|
|
bool bOldFilter = bDo && rParam.bDoSort;
|
|
SCTAB nTabCount = rDoc.GetTableCount();
|
|
pUndoDoc.reset(new ScDocument( SCDOCMODE_UNDO ));
|
|
ScOutlineTable* pTable = rDoc.GetOutlineTable( nTab );
|
|
if (pTable)
|
|
{
|
|
pUndoTab.reset(new ScOutlineTable( *pTable ));
|
|
|
|
SCCOLROW nOutStartCol; // row/column status
|
|
SCCOLROW nOutStartRow;
|
|
SCCOLROW nOutEndCol;
|
|
SCCOLROW nOutEndRow;
|
|
pTable->GetColArray().GetRange( nOutStartCol, nOutEndCol );
|
|
pTable->GetRowArray().GetRange( nOutStartRow, nOutEndRow );
|
|
|
|
pUndoDoc->InitUndo( rDoc, nTab, nTab, true, true );
|
|
rDoc.CopyToDocument( static_cast<SCCOL>(nOutStartCol), 0, nTab, static_cast<SCCOL>(nOutEndCol), rDoc.MaxRow(), nTab, InsertDeleteFlags::NONE, false, *pUndoDoc );
|
|
rDoc.CopyToDocument( 0, nOutStartRow, nTab, rDoc.MaxCol(), nOutEndRow, nTab, InsertDeleteFlags::NONE, false, *pUndoDoc );
|
|
}
|
|
else
|
|
pUndoDoc->InitUndo( rDoc, nTab, nTab, false, bOldFilter );
|
|
|
|
// record data range - including filter results
|
|
rDoc.CopyToDocument( 0,rParam.nRow1+1,nTab, rDoc.MaxCol(),rParam.nRow2,nTab,
|
|
InsertDeleteFlags::ALL, false, *pUndoDoc );
|
|
|
|
// all formulas for reference
|
|
rDoc.CopyToDocument( 0,0,0, rDoc.MaxCol(),rDoc.MaxRow(),nTabCount-1,
|
|
InsertDeleteFlags::FORMULA, false, *pUndoDoc );
|
|
|
|
// database and other ranges
|
|
ScRangeName* pDocRange = rDoc.GetRangeName();
|
|
if (!pDocRange->empty())
|
|
pUndoRange.reset(new ScRangeName( *pDocRange ));
|
|
ScDBCollection* pDocDB = rDoc.GetDBCollection();
|
|
if (!pDocDB->empty())
|
|
pUndoDB.reset(new ScDBCollection( *pDocDB ));
|
|
}
|
|
|
|
ScOutlineTable* pOut = rDoc.GetOutlineTable( nTab );
|
|
if (pOut)
|
|
{
|
|
// Remove all existing outlines in the specified range.
|
|
ScOutlineArray& rRowArray = pOut->GetRowArray();
|
|
sal_uInt16 nDepth = rRowArray.GetDepth();
|
|
for (sal_uInt16 i = 0; i < nDepth; ++i)
|
|
{
|
|
bool bSize;
|
|
rRowArray.Remove(aNewParam.nRow1, aNewParam.nRow2, bSize);
|
|
}
|
|
}
|
|
|
|
if (rParam.bReplace)
|
|
rDoc.RemoveSubTotals( nTab, aNewParam );
|
|
bool bSuccess = true;
|
|
if (bDo)
|
|
{
|
|
// Sort
|
|
if ( rParam.bDoSort || pForceNewSort )
|
|
{
|
|
pDBData->SetArea( nTab, aNewParam.nCol1,aNewParam.nRow1, aNewParam.nCol2,aNewParam.nRow2 );
|
|
|
|
// set subtotal fields before sorting
|
|
// (duplicate values are dropped, so that they can be called again)
|
|
|
|
ScSortParam aOldSort;
|
|
pDBData->GetSortParam( aOldSort );
|
|
ScSortParam aSortParam( aNewParam, pForceNewSort ? *pForceNewSort : aOldSort );
|
|
Sort( aSortParam, false, false );
|
|
}
|
|
|
|
bSuccess = rDoc.DoSubTotals( nTab, aNewParam );
|
|
}
|
|
ScRange aDirtyRange( aNewParam.nCol1, aNewParam.nRow1, nTab,
|
|
aNewParam.nCol2, aNewParam.nRow2, nTab );
|
|
rDoc.SetDirty( aDirtyRange, true );
|
|
|
|
if (bRecord)
|
|
{
|
|
pDocSh->GetUndoManager()->AddUndoAction(
|
|
std::make_unique<ScUndoSubTotals>( pDocSh, nTab,
|
|
rParam, aNewParam.nRow2,
|
|
std::move(pUndoDoc), std::move(pUndoTab), // pUndoDBData,
|
|
std::move(pUndoRange), std::move(pUndoDB) ) );
|
|
}
|
|
|
|
if (!bSuccess)
|
|
{
|
|
// "Can not insert any rows"
|
|
ErrorMessage(STR_MSSG_DOSUBTOTALS_2);
|
|
}
|
|
|
|
// store
|
|
pDBData->SetSubTotalParam( aNewParam );
|
|
pDBData->SetArea( nTab, aNewParam.nCol1,aNewParam.nRow1, aNewParam.nCol2,aNewParam.nRow2 );
|
|
rDoc.CompileDBFormula();
|
|
|
|
const ScRange aMarkRange( aNewParam.nCol1, aNewParam.nRow1, nTab, aNewParam.nCol2, aNewParam.nRow2, nTab);
|
|
DoneBlockMode();
|
|
InitOwnBlockMode( aMarkRange );
|
|
rMark.SetMarkArea( aMarkRange );
|
|
MarkDataChanged();
|
|
|
|
pDocSh->PostPaint(ScRange(0, 0, nTab, rDoc.MaxCol(), rDoc.MaxRow(), nTab),
|
|
PaintPartFlags::Grid | PaintPartFlags::Left | PaintPartFlags::Top | PaintPartFlags::Size);
|
|
|
|
aModificator.SetDocumentModified();
|
|
|
|
SelectionChanged();
|
|
}
|
|
|
|
// consolidate
|
|
|
|
void ScDBFunc::Consolidate( const ScConsolidateParam& rParam )
|
|
{
|
|
ScDocShell* pDocShell = GetViewData().GetDocShell();
|
|
pDocShell->DoConsolidate( rParam );
|
|
SetTabNo( rParam.nTab, true );
|
|
}
|
|
|
|
// pivot
|
|
|
|
static OUString lcl_MakePivotTabName( std::u16string_view rPrefix, SCTAB nNumber )
|
|
{
|
|
OUString aName = rPrefix + OUString::number( nNumber );
|
|
return aName;
|
|
}
|
|
|
|
bool ScDBFunc::MakePivotTable(
|
|
const ScDPSaveData& rData, const ScRange& rDest, bool bNewTable,
|
|
const ScDPObject& rSource )
|
|
{
|
|
// error message if no fields are set
|
|
// this must be removed when drag&drop of fields from a toolbox is available
|
|
|
|
if ( rData.IsEmpty() )
|
|
{
|
|
ErrorMessage(STR_PIVOT_NODATA);
|
|
return false;
|
|
}
|
|
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScDocument& rDoc = GetViewData().GetDocument();
|
|
bool bUndo = rDoc.IsUndoEnabled();
|
|
|
|
ScRange aDestRange = rDest;
|
|
if ( bNewTable )
|
|
{
|
|
SCTAB nSrcTab = GetViewData().GetTabNo();
|
|
|
|
OUString aName( ScResId(STR_PIVOT_TABLE) );
|
|
OUString aStr;
|
|
|
|
rDoc.GetName( nSrcTab, aStr );
|
|
aName += "_" + aStr + "_";
|
|
|
|
SCTAB nNewTab = nSrcTab+1;
|
|
|
|
SCTAB i=1;
|
|
while ( !rDoc.InsertTab( nNewTab, lcl_MakePivotTabName( aName, i ) ) && i <= MAXTAB )
|
|
i++;
|
|
|
|
bool bAppend = ( nNewTab+1 == rDoc.GetTableCount() );
|
|
if (bUndo)
|
|
{
|
|
pDocSh->GetUndoManager()->AddUndoAction(
|
|
std::make_unique<ScUndoInsertTab>( pDocSh, nNewTab, bAppend, lcl_MakePivotTabName( aName, i ) ));
|
|
}
|
|
|
|
GetViewData().InsertTab( nNewTab );
|
|
SetTabNo(nNewTab, true);
|
|
|
|
aDestRange = ScRange( 0, 0, nNewTab );
|
|
}
|
|
|
|
ScDPObject* pDPObj = rDoc.GetDPAtCursor(
|
|
aDestRange.aStart.Col(), aDestRange.aStart.Row(), aDestRange.aStart.Tab() );
|
|
|
|
ScDPObject aObj( rSource );
|
|
aObj.SetOutRange( aDestRange );
|
|
if ( pDPObj && !rData.GetExistingDimensionData() )
|
|
{
|
|
// copy dimension data from old object - lost in the dialog
|
|
//! change the dialog to keep the dimension data
|
|
|
|
ScDPSaveData aNewData( rData );
|
|
const ScDPSaveData* pOldData = pDPObj->GetSaveData();
|
|
if ( pOldData )
|
|
{
|
|
const ScDPDimensionSaveData* pDimSave = pOldData->GetExistingDimensionData();
|
|
aNewData.SetDimensionData( pDimSave );
|
|
}
|
|
aObj.SetSaveData( aNewData );
|
|
}
|
|
else
|
|
aObj.SetSaveData( rData );
|
|
|
|
bool bAllowMove = (pDPObj != nullptr); // allow re-positioning when editing existing table
|
|
|
|
ScDBDocFunc aFunc( *pDocSh );
|
|
bool bSuccess = aFunc.DataPilotUpdate(pDPObj, &aObj, true, false, bAllowMove);
|
|
|
|
CursorPosChanged(); // shells may be switched
|
|
|
|
if ( bNewTable )
|
|
{
|
|
pDocSh->PostPaintExtras();
|
|
SfxGetpApp()->Broadcast( SfxHint( SfxHintId::ScTablesChanged ) );
|
|
}
|
|
|
|
return bSuccess;
|
|
}
|
|
|
|
void ScDBFunc::DeletePivotTable()
|
|
{
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScDocument& rDoc = pDocSh->GetDocument();
|
|
ScDPObject* pDPObj = rDoc.GetDPAtCursor( GetViewData().GetCurX(),
|
|
GetViewData().GetCurY(),
|
|
GetViewData().GetTabNo() );
|
|
if ( pDPObj )
|
|
{
|
|
ScDBDocFunc aFunc( *pDocSh );
|
|
aFunc.RemovePivotTable(*pDPObj, true, false);
|
|
CursorPosChanged(); // shells may be switched
|
|
}
|
|
else
|
|
ErrorMessage(STR_PIVOT_NOTFOUND);
|
|
}
|
|
|
|
void ScDBFunc::RecalcPivotTable()
|
|
{
|
|
ScDocShell* pDocSh = GetViewData().GetDocShell();
|
|
ScDocument& rDoc = GetViewData().GetDocument();
|
|
|
|
ScDPObject* pDPObj = rDoc.GetDPAtCursor( GetViewData().GetCurX(),
|
|
GetViewData().GetCurY(),
|
|
GetViewData().GetTabNo() );
|
|
if (pDPObj)
|
|
{
|
|
// Remove existing data cache for the data that this datapilot uses,
|
|
// to force re-build data cache.
|
|
ScDBDocFunc aFunc(*pDocSh);
|
|
aFunc.RefreshPivotTables(pDPObj, false);
|
|
|
|
CursorPosChanged(); // shells may be switched
|
|
}
|
|
else
|
|
ErrorMessage(STR_PIVOT_NOTFOUND);
|
|
}
|
|
|
|
void ScDBFunc::GetSelectedMemberList(ScDPUniqueStringSet& rEntries, tools::Long& rDimension)
|
|
{
|
|
ScDPObject* pDPObj = GetViewData().GetDocument().GetDPAtCursor( GetViewData().GetCurX(),
|
|
GetViewData().GetCurY(), GetViewData().GetTabNo() );
|
|
if ( !pDPObj )
|
|
return;
|
|
|
|
tools::Long nStartDimension = -1;
|
|
tools::Long nStartHierarchy = -1;
|
|
tools::Long nStartLevel = -1;
|
|
|
|
ScRangeListRef xRanges;
|
|
GetViewData().GetMultiArea( xRanges ); // incl. cursor if nothing is selected
|
|
size_t nRangeCount = xRanges->size();
|
|
bool bContinue = true;
|
|
|
|
for (size_t nRangePos=0; nRangePos < nRangeCount && bContinue; nRangePos++)
|
|
{
|
|
ScRange const & rRange = (*xRanges)[nRangePos];
|
|
SCCOL nStartCol = rRange.aStart.Col();
|
|
SCROW nStartRow = rRange.aStart.Row();
|
|
SCCOL nEndCol = rRange.aEnd.Col();
|
|
SCROW nEndRow = rRange.aEnd.Row();
|
|
SCTAB nTab = rRange.aStart.Tab();
|
|
|
|
for (SCROW nRow=nStartRow; nRow<=nEndRow && bContinue; nRow++)
|
|
for (SCCOL nCol=nStartCol; nCol<=nEndCol && bContinue; nCol++)
|
|
{
|
|
sheet::DataPilotTableHeaderData aData;
|
|
pDPObj->GetHeaderPositionData(ScAddress(nCol, nRow, nTab), aData);
|
|
if ( aData.Dimension < 0 )
|
|
bContinue = false; // not part of any dimension
|
|
else
|
|
{
|
|
if ( nStartDimension < 0 ) // first member?
|
|
{
|
|
nStartDimension = aData.Dimension;
|
|
nStartHierarchy = aData.Hierarchy;
|
|
nStartLevel = aData.Level;
|
|
}
|
|
if ( aData.Dimension != nStartDimension ||
|
|
aData.Hierarchy != nStartHierarchy ||
|
|
aData.Level != nStartLevel )
|
|
{
|
|
bContinue = false; // cannot mix dimensions
|
|
}
|
|
}
|
|
if ( bContinue )
|
|
{
|
|
// accept any part of a member description, also subtotals,
|
|
// but don't stop if empty parts are contained
|
|
if ( aData.Flags & sheet::MemberResultFlags::HASMEMBER )
|
|
rEntries.insert(aData.MemberName);
|
|
}
|
|
}
|
|
}
|
|
|
|
rDimension = nStartDimension; // dimension from which the found members came
|
|
if (!bContinue)
|
|
rEntries.clear(); // remove all if not valid
|
|
}
|
|
|
|
bool ScDBFunc::HasSelectionForDateGroup( ScDPNumGroupInfo& rOldInfo, sal_Int32& rParts )
|
|
{
|
|
// determine if the date group dialog has to be shown for the current selection
|
|
|
|
bool bFound = false;
|
|
|
|
SCCOL nCurX = GetViewData().GetCurX();
|
|
SCROW nCurY = GetViewData().GetCurY();
|
|
SCTAB nTab = GetViewData().GetTabNo();
|
|
ScDocument& rDoc = GetViewData().GetDocument();
|
|
|
|
ScDPObject* pDPObj = rDoc.GetDPAtCursor( nCurX, nCurY, nTab );
|
|
if ( pDPObj )
|
|
{
|
|
ScDPUniqueStringSet aEntries;
|
|
tools::Long nSelectDimension = -1;
|
|
GetSelectedMemberList( aEntries, nSelectDimension );
|
|
|
|
if (!aEntries.empty())
|
|
{
|
|
bool bIsDataLayout;
|
|
OUString aDimName = pDPObj->GetDimName( nSelectDimension, bIsDataLayout );
|
|
OUString aBaseDimName( aDimName );
|
|
|
|
bool bInGroupDim = false;
|
|
bool bFoundParts = false;
|
|
|
|
ScDPDimensionSaveData* pDimData =
|
|
const_cast<ScDPDimensionSaveData*>( pDPObj->GetSaveData()->GetExistingDimensionData() );
|
|
if ( pDimData )
|
|
{
|
|
const ScDPSaveNumGroupDimension* pNumGroupDim = pDimData->GetNumGroupDim( aDimName );
|
|
const ScDPSaveGroupDimension* pGroupDim = pDimData->GetNamedGroupDim( aDimName );
|
|
if ( pNumGroupDim )
|
|
{
|
|
// existing num group dimension
|
|
|
|
if ( pNumGroupDim->GetDatePart() != 0 )
|
|
{
|
|
// dimension has date info -> edit settings of this dimension
|
|
// (parts are collected below)
|
|
|
|
rOldInfo = pNumGroupDim->GetDateInfo();
|
|
bFound = true;
|
|
}
|
|
else if ( pNumGroupDim->GetInfo().mbDateValues )
|
|
{
|
|
// Numerical grouping with DateValues flag is used for grouping
|
|
// of days with a "Number of days" value.
|
|
|
|
rOldInfo = pNumGroupDim->GetInfo();
|
|
rParts = css::sheet::DataPilotFieldGroupBy::DAYS; // not found in CollectDateParts
|
|
bFoundParts = true;
|
|
bFound = true;
|
|
}
|
|
bInGroupDim = true;
|
|
}
|
|
else if ( pGroupDim )
|
|
{
|
|
// existing additional group dimension
|
|
|
|
if ( pGroupDim->GetDatePart() != 0 )
|
|
{
|
|
// dimension has date info -> edit settings of this dimension
|
|
// (parts are collected below)
|
|
|
|
rOldInfo = pGroupDim->GetDateInfo();
|
|
aBaseDimName = pGroupDim->GetSourceDimName();
|
|
bFound = true;
|
|
}
|
|
bInGroupDim = true;
|
|
}
|
|
}
|
|
if ( bFound && !bFoundParts )
|
|
{
|
|
// collect date parts from all group dimensions
|
|
rParts = pDimData->CollectDateParts( aBaseDimName );
|
|
}
|
|
if ( !bFound && !bInGroupDim )
|
|
{
|
|
// create new date group dimensions if the selection is a single cell
|
|
// in a normal dimension with date content
|
|
|
|
ScRange aSelRange;
|
|
if ( (GetViewData().GetSimpleArea( aSelRange ) == SC_MARK_SIMPLE) &&
|
|
aSelRange.aStart == aSelRange.aEnd )
|
|
{
|
|
SCCOL nSelCol = aSelRange.aStart.Col();
|
|
SCROW nSelRow = aSelRange.aStart.Row();
|
|
SCTAB nSelTab = aSelRange.aStart.Tab();
|
|
if ( rDoc.HasValueData( nSelCol, nSelRow, nSelTab ) )
|
|
{
|
|
sal_uLong nIndex = rDoc.GetAttr(
|
|
nSelCol, nSelRow, nSelTab, ATTR_VALUE_FORMAT)->GetValue();
|
|
SvNumFormatType nType = rDoc.GetFormatTable()->GetType(nIndex);
|
|
if ( nType == SvNumFormatType::DATE || nType == SvNumFormatType::TIME || nType == SvNumFormatType::DATETIME )
|
|
{
|
|
bFound = true;
|
|
// use currently selected value for automatic limits
|
|
if( rOldInfo.mbAutoStart )
|
|
rOldInfo.mfStart = rDoc.GetValue( aSelRange.aStart );
|
|
if( rOldInfo.mbAutoEnd )
|
|
rOldInfo.mfEnd = rDoc.GetValue( aSelRange.aStart );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
return bFound;
|
|
}
|
|
|
|
bool ScDBFunc::HasSelectionForNumGroup( ScDPNumGroupInfo& rOldInfo )
|
|
{
|
|
// determine if the numeric group dialog has to be shown for the current selection
|
|
|
|
bool bFound = false;
|
|
|
|
SCCOL nCurX = GetViewData().GetCurX();
|
|
SCROW nCurY = GetViewData().GetCurY();
|
|
SCTAB nTab = GetViewData().GetTabNo();
|
|
ScDocument& rDoc = GetViewData().GetDocument();
|
|
|
|
ScDPObject* pDPObj = rDoc.GetDPAtCursor( nCurX, nCurY, nTab );
|
|
if ( pDPObj )
|
|
{
|
|
ScDPUniqueStringSet aEntries;
|
|
tools::Long nSelectDimension = -1;
|
|
GetSelectedMemberList( aEntries, nSelectDimension );
|
|
|
|
if (!aEntries.empty())
|
|
{
|
|
bool bIsDataLayout;
|
|
OUString aDimName = pDPObj->GetDimName( nSelectDimension, bIsDataLayout );
|
|
|
|
bool bInGroupDim = false;
|
|
|
|
ScDPDimensionSaveData* pDimData =
|
|
const_cast<ScDPDimensionSaveData*>( pDPObj->GetSaveData()->GetExistingDimensionData() );
|
|
if ( pDimData )
|
|
{
|
|
const ScDPSaveNumGroupDimension* pNumGroupDim = pDimData->GetNumGroupDim( aDimName );
|
|
if ( pNumGroupDim )
|
|
{
|
|
// existing num group dimension
|
|
// -> edit settings of this dimension
|
|
|
|
rOldInfo = pNumGroupDim->GetInfo();
|
|
bFound = true;
|
|
}
|
|
else if ( pDimData->GetNamedGroupDim( aDimName ) )
|
|
bInGroupDim = true; // in a group dimension
|
|
}
|
|
if ( !bFound && !bInGroupDim )
|
|
{
|
|
// create a new num group dimension if the selection is a single cell
|
|
// in a normal dimension with numeric content
|
|
|
|
ScRange aSelRange;
|
|
if ( (GetViewData().GetSimpleArea( aSelRange ) == SC_MARK_SIMPLE) &&
|
|
aSelRange.aStart == aSelRange.aEnd )
|
|
{
|
|
if ( rDoc.HasValueData( aSelRange.aStart.Col(), aSelRange.aStart.Row(),
|
|
aSelRange.aStart.Tab() ) )
|
|
{
|
|
bFound = true;
|
|
// use currently selected value for automatic limits
|
|
if( rOldInfo.mbAutoStart )
|
|
rOldInfo.mfStart = rDoc.GetValue( aSelRange.aStart );
|
|
if( rOldInfo.mbAutoEnd )
|
|
rOldInfo.mfEnd = rDoc.GetValue( aSelRange.aStart );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
return bFound;
|
|
}
|
|
|
|
void ScDBFunc::DateGroupDataPilot( const ScDPNumGroupInfo& rInfo, sal_Int32 nParts )
|
|
{
|
|
ScDPObject* pDPObj = GetViewData().GetDocument().GetDPAtCursor( GetViewData().GetCurX(),
|
|
GetViewData().GetCurY(), GetViewData().GetTabNo() );
|
|
if (!pDPObj)
|
|
return;
|
|
|
|
ScDPUniqueStringSet aEntries;
|
|
tools::Long nSelectDimension = -1;
|
|
GetSelectedMemberList( aEntries, nSelectDimension );
|
|
|
|
if (aEntries.empty())
|
|
return;
|
|
|
|
std::vector<OUString> aDeletedNames;
|
|
bool bIsDataLayout;
|
|
OUString aDimName = pDPObj->GetDimName( nSelectDimension, bIsDataLayout );
|
|
|
|
ScDPSaveData aData( *pDPObj->GetSaveData() );
|
|
ScDPDimensionSaveData* pDimData = aData.GetDimensionData(); // created if not there
|
|
|
|
// find the source dimension name.
|
|
OUString aBaseDimName = aDimName;
|
|
if( const ScDPSaveGroupDimension* pBaseGroupDim = pDimData->GetNamedGroupDim( aDimName ) )
|
|
aBaseDimName = pBaseGroupDim->GetSourceDimName();
|
|
|
|
// Remove all group dimensions associated with this source dimension. For
|
|
// date grouping, we need to remove all existing groups for the affected
|
|
// source dimension and build new one(s) from scratch. Keep the deleted
|
|
// names so that they can be reused during re-construction.
|
|
aData.RemoveAllGroupDimensions(aBaseDimName, &aDeletedNames);
|
|
|
|
if ( nParts )
|
|
{
|
|
// create date group dimensions
|
|
|
|
bool bFirst = true;
|
|
sal_Int32 nMask = 1;
|
|
for (sal_uInt16 nBit=0; nBit<32; nBit++)
|
|
{
|
|
if ( nParts & nMask )
|
|
{
|
|
if ( bFirst )
|
|
{
|
|
// innermost part: create NumGroupDimension (replacing original values)
|
|
// Dimension name is left unchanged
|
|
|
|
if ( (nParts == sheet::DataPilotFieldGroupBy::DAYS) && (rInfo.mfStep >= 1.0) )
|
|
{
|
|
// only days, and a step value specified: use numerical grouping
|
|
// with DateValues flag, not date grouping
|
|
|
|
ScDPNumGroupInfo aNumInfo( rInfo );
|
|
aNumInfo.mbDateValues = true;
|
|
|
|
ScDPSaveNumGroupDimension aNumGroupDim( aBaseDimName, aNumInfo );
|
|
pDimData->AddNumGroupDimension( aNumGroupDim );
|
|
}
|
|
else
|
|
{
|
|
ScDPSaveNumGroupDimension aNumGroupDim( aBaseDimName, rInfo, nMask );
|
|
pDimData->AddNumGroupDimension( aNumGroupDim );
|
|
}
|
|
|
|
bFirst = false;
|
|
}
|
|
else
|
|
{
|
|
// additional parts: create GroupDimension (shown as additional dimensions)
|
|
OUString aGroupDimName =
|
|
pDimData->CreateDateGroupDimName(nMask, *pDPObj, true, &aDeletedNames);
|
|
ScDPSaveGroupDimension aGroupDim( aBaseDimName, aGroupDimName );
|
|
aGroupDim.SetDateInfo( rInfo, nMask );
|
|
pDimData->AddGroupDimension( aGroupDim );
|
|
|
|
// set orientation
|
|
ScDPSaveDimension* pSaveDimension = aData.GetDimensionByName( aGroupDimName );
|
|
if ( pSaveDimension->GetOrientation() == sheet::DataPilotFieldOrientation_HIDDEN )
|
|
{
|
|
ScDPSaveDimension* pOldDimension = aData.GetDimensionByName( aBaseDimName );
|
|
pSaveDimension->SetOrientation( pOldDimension->GetOrientation() );
|
|
aData.SetPosition( pSaveDimension, 0 ); //! before (immediate) base
|
|
}
|
|
}
|
|
}
|
|
nMask *= 2;
|
|
}
|
|
}
|
|
|
|
// apply changes
|
|
ScDBDocFunc aFunc( *GetViewData().GetDocShell() );
|
|
pDPObj->SetSaveData( aData );
|
|
aFunc.RefreshPivotTableGroups(pDPObj);
|
|
|
|
// unmark cell selection
|
|
Unmark();
|
|
}
|
|
|
|
void ScDBFunc::NumGroupDataPilot( const ScDPNumGroupInfo& rInfo )
|
|
{
|
|
ScDPObject* pDPObj = GetViewData().GetDocument().GetDPAtCursor( GetViewData().GetCurX(),
|
|
GetViewData().GetCurY(), GetViewData().GetTabNo() );
|
|
if (!pDPObj)
|
|
return;
|
|
|
|
ScDPUniqueStringSet aEntries;
|
|
tools::Long nSelectDimension = -1;
|
|
GetSelectedMemberList( aEntries, nSelectDimension );
|
|
|
|
if (aEntries.empty())
|
|
return;
|
|
|
|
bool bIsDataLayout;
|
|
OUString aDimName = pDPObj->GetDimName( nSelectDimension, bIsDataLayout );
|
|
|
|
ScDPSaveData aData( *pDPObj->GetSaveData() );
|
|
ScDPDimensionSaveData* pDimData = aData.GetDimensionData(); // created if not there
|
|
|
|
ScDPSaveNumGroupDimension* pExisting = pDimData->GetNumGroupDimAcc( aDimName );
|
|
if ( pExisting )
|
|
{
|
|
// modify existing group dimension
|
|
pExisting->SetGroupInfo( rInfo );
|
|
}
|
|
else
|
|
{
|
|
// create new group dimension
|
|
ScDPSaveNumGroupDimension aNumGroupDim( aDimName, rInfo );
|
|
pDimData->AddNumGroupDimension( aNumGroupDim );
|
|
}
|
|
|
|
// apply changes
|
|
ScDBDocFunc aFunc( *GetViewData().GetDocShell() );
|
|
pDPObj->SetSaveData( aData );
|
|
aFunc.RefreshPivotTableGroups(pDPObj);
|
|
|
|
// unmark cell selection
|
|
Unmark();
|
|
}
|
|
|
|
void ScDBFunc::GroupDataPilot()
|
|
{
|
|
ScDPObject* pDPObj = GetViewData().GetDocument().GetDPAtCursor( GetViewData().GetCurX(),
|
|
GetViewData().GetCurY(), GetViewData().GetTabNo() );
|
|
if (!pDPObj)
|
|
return;
|
|
|
|
ScDPUniqueStringSet aEntries;
|
|
tools::Long nSelectDimension = -1;
|
|
GetSelectedMemberList( aEntries, nSelectDimension );
|
|
|
|
if (aEntries.empty())
|
|
return;
|
|
|
|
bool bIsDataLayout;
|
|
OUString aDimName = pDPObj->GetDimName( nSelectDimension, bIsDataLayout );
|
|
|
|
ScDPSaveData aData( *pDPObj->GetSaveData() );
|
|
ScDPDimensionSaveData* pDimData = aData.GetDimensionData(); // created if not there
|
|
|
|
// find original base
|
|
OUString aBaseDimName = aDimName;
|
|
const ScDPSaveGroupDimension* pBaseGroupDim = pDimData->GetNamedGroupDim( aDimName );
|
|
if ( pBaseGroupDim )
|
|
{
|
|
// any entry's SourceDimName is the original base
|
|
aBaseDimName = pBaseGroupDim->GetSourceDimName();
|
|
}
|
|
|
|
// find existing group dimension
|
|
// (using the selected dim, can be intermediate group dim)
|
|
ScDPSaveGroupDimension* pGroupDimension = pDimData->GetGroupDimAccForBase( aDimName );
|
|
|
|
// remove the selected items from their groups
|
|
// (empty groups are removed, too)
|
|
if ( pGroupDimension )
|
|
{
|
|
for (const OUString& aEntryName : aEntries)
|
|
{
|
|
if ( pBaseGroupDim )
|
|
{
|
|
// for each selected (intermediate) group, remove all its items
|
|
// (same logic as for adding, below)
|
|
const ScDPSaveGroupItem* pBaseGroup = pBaseGroupDim->GetNamedGroup( aEntryName );
|
|
if ( pBaseGroup )
|
|
pBaseGroup->RemoveElementsFromGroups( *pGroupDimension ); // remove all elements
|
|
else
|
|
pGroupDimension->RemoveFromGroups( aEntryName );
|
|
}
|
|
else
|
|
pGroupDimension->RemoveFromGroups( aEntryName );
|
|
}
|
|
}
|
|
|
|
std::unique_ptr<ScDPSaveGroupDimension> pNewGroupDim;
|
|
if ( !pGroupDimension )
|
|
{
|
|
// create a new group dimension
|
|
OUString aGroupDimName =
|
|
pDimData->CreateGroupDimName(aBaseDimName, *pDPObj, false, nullptr);
|
|
pNewGroupDim.reset(new ScDPSaveGroupDimension( aBaseDimName, aGroupDimName ));
|
|
|
|
pGroupDimension = pNewGroupDim.get(); // make changes to the new dim if none existed
|
|
|
|
if ( pBaseGroupDim )
|
|
{
|
|
// If it's a higher-order group dimension, pre-allocate groups for all
|
|
// non-selected original groups, so the individual base members aren't
|
|
// used for automatic groups (this would make the original groups hard
|
|
// to find).
|
|
//! Also do this when removing groups?
|
|
//! Handle this case dynamically with automatic groups?
|
|
|
|
tools::Long nGroupCount = pBaseGroupDim->GetGroupCount();
|
|
for ( tools::Long nGroup = 0; nGroup < nGroupCount; nGroup++ )
|
|
{
|
|
const ScDPSaveGroupItem& rBaseGroup = pBaseGroupDim->GetGroupByIndex( nGroup );
|
|
|
|
if (!aEntries.count(rBaseGroup.GetGroupName()))
|
|
{
|
|
// add an additional group for each item that is not in the selection
|
|
ScDPSaveGroupItem aGroup( rBaseGroup.GetGroupName() );
|
|
aGroup.AddElementsFromGroup( rBaseGroup );
|
|
pGroupDimension->AddGroupItem( aGroup );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
OUString aGroupDimName = pGroupDimension->GetGroupDimName();
|
|
|
|
ScDPSaveGroupItem aGroup(pGroupDimension->CreateGroupName(ScResId(STR_PIVOT_GROUP)));
|
|
for (const OUString& aEntryName : aEntries)
|
|
{
|
|
if ( pBaseGroupDim )
|
|
{
|
|
// for each selected (intermediate) group, add all its items
|
|
const ScDPSaveGroupItem* pBaseGroup = pBaseGroupDim->GetNamedGroup( aEntryName );
|
|
if ( pBaseGroup )
|
|
aGroup.AddElementsFromGroup( *pBaseGroup );
|
|
else
|
|
aGroup.AddElement( aEntryName ); // no group found -> automatic group, add the item itself
|
|
}
|
|
else
|
|
aGroup.AddElement( aEntryName ); // no group dimension, add all items directly
|
|
}
|
|
|
|
pGroupDimension->AddGroupItem( aGroup );
|
|
|
|
if ( pNewGroupDim )
|
|
{
|
|
pDimData->AddGroupDimension( *pNewGroupDim );
|
|
pNewGroupDim.reset(); // AddGroupDimension copies the object
|
|
// don't access pGroupDimension after here
|
|
}
|
|
pGroupDimension = nullptr;
|
|
|
|
// set orientation
|
|
ScDPSaveDimension* pSaveDimension = aData.GetDimensionByName( aGroupDimName );
|
|
if ( pSaveDimension->GetOrientation() == sheet::DataPilotFieldOrientation_HIDDEN )
|
|
{
|
|
ScDPSaveDimension* pOldDimension = aData.GetDimensionByName( aDimName );
|
|
pSaveDimension->SetOrientation( pOldDimension->GetOrientation() );
|
|
aData.SetPosition( pSaveDimension, 0 ); //! before (immediate) base
|
|
}
|
|
|
|
// apply changes
|
|
ScDBDocFunc aFunc( *GetViewData().GetDocShell() );
|
|
pDPObj->SetSaveData( aData );
|
|
aFunc.RefreshPivotTableGroups(pDPObj);
|
|
|
|
// unmark cell selection
|
|
Unmark();
|
|
}
|
|
|
|
void ScDBFunc::UngroupDataPilot()
|
|
{
|
|
ScDPObject* pDPObj = GetViewData().GetDocument().GetDPAtCursor( GetViewData().GetCurX(),
|
|
GetViewData().GetCurY(), GetViewData().GetTabNo() );
|
|
if (!pDPObj)
|
|
return;
|
|
|
|
ScDPUniqueStringSet aEntries;
|
|
tools::Long nSelectDimension = -1;
|
|
GetSelectedMemberList( aEntries, nSelectDimension );
|
|
|
|
if (aEntries.empty())
|
|
return;
|
|
|
|
bool bIsDataLayout;
|
|
OUString aDimName = pDPObj->GetDimName( nSelectDimension, bIsDataLayout );
|
|
|
|
ScDPSaveData aData( *pDPObj->GetSaveData() );
|
|
if (!aData.GetExistingDimensionData())
|
|
// There is nothing to ungroup.
|
|
return;
|
|
|
|
ScDPDimensionSaveData* pDimData = aData.GetDimensionData();
|
|
|
|
ScDPSaveGroupDimension* pGroupDim = pDimData->GetNamedGroupDimAcc( aDimName );
|
|
const ScDPSaveNumGroupDimension* pNumGroupDim = pDimData->GetNumGroupDim( aDimName );
|
|
if ( ( pGroupDim && pGroupDim->GetDatePart() != 0 ) ||
|
|
( pNumGroupDim && pNumGroupDim->GetDatePart() != 0 ) )
|
|
{
|
|
// Date grouping: need to remove all affected group dimensions.
|
|
// This is done using DateGroupDataPilot with nParts=0.
|
|
|
|
DateGroupDataPilot( ScDPNumGroupInfo(), 0 );
|
|
return;
|
|
}
|
|
|
|
if ( pGroupDim )
|
|
{
|
|
for (const auto& rEntry : aEntries)
|
|
pGroupDim->RemoveGroup(rEntry);
|
|
|
|
// remove group dimension if empty
|
|
bool bEmptyDim = pGroupDim->IsEmpty();
|
|
if ( !bEmptyDim )
|
|
{
|
|
// If all remaining groups in the dimension aren't shown, remove
|
|
// the dimension too, as if it was completely empty.
|
|
ScDPUniqueStringSet aVisibleEntries;
|
|
pDPObj->GetMemberResultNames( aVisibleEntries, nSelectDimension );
|
|
bEmptyDim = pGroupDim->HasOnlyHidden( aVisibleEntries );
|
|
}
|
|
if ( bEmptyDim )
|
|
{
|
|
pDimData->RemoveGroupDimension( aDimName ); // pGroupDim is deleted
|
|
|
|
// also remove SaveData settings for the dimension that no longer exists
|
|
aData.RemoveDimensionByName( aDimName );
|
|
}
|
|
}
|
|
else if ( pNumGroupDim )
|
|
{
|
|
// remove the numerical grouping
|
|
pDimData->RemoveNumGroupDimension( aDimName );
|
|
// SaveData settings can remain unchanged - the same dimension still exists
|
|
}
|
|
|
|
// apply changes
|
|
ScDBDocFunc aFunc( *GetViewData().GetDocShell() );
|
|
pDPObj->SetSaveData( aData );
|
|
aFunc.RefreshPivotTableGroups(pDPObj);
|
|
|
|
// unmark cell selection
|
|
Unmark();
|
|
}
|
|
|
|
static OUString lcl_replaceMemberNameInSubtotal(const OUString& rSubtotal, std::u16string_view rMemberName)
|
|
{
|
|
sal_Int32 n = rSubtotal.getLength();
|
|
const sal_Unicode* p = rSubtotal.getStr();
|
|
OUStringBuffer aBuf, aWordBuf;
|
|
for (sal_Int32 i = 0; i < n; ++i)
|
|
{
|
|
sal_Unicode c = p[i];
|
|
if (c == ' ')
|
|
{
|
|
OUString aWord = aWordBuf.makeStringAndClear();
|
|
if (aWord == rMemberName)
|
|
aBuf.append('?');
|
|
else
|
|
aBuf.append(aWord);
|
|
aBuf.append(c);
|
|
}
|
|
else if (c == '\\')
|
|
{
|
|
// Escape a backslash character.
|
|
aWordBuf.append(OUStringChar(c) + OUStringChar(c));
|
|
}
|
|
else if (c == '?')
|
|
{
|
|
// A literal '?' must be escaped with a backslash ('\');
|
|
aWordBuf.append("\\" + OUStringChar(c));
|
|
}
|
|
else
|
|
aWordBuf.append(c);
|
|
}
|
|
|
|
if (!aWordBuf.isEmpty())
|
|
{
|
|
OUString aWord = aWordBuf.makeStringAndClear();
|
|
if (aWord == rMemberName)
|
|
aBuf.append('?');
|
|
else
|
|
aBuf.append(aWord);
|
|
}
|
|
|
|
return aBuf.makeStringAndClear();
|
|
}
|
|
|
|
void ScDBFunc::DataPilotInput( const ScAddress& rPos, const OUString& rString )
|
|
{
|
|
using namespace ::com::sun::star::sheet;
|
|
|
|
ScDocument& rDoc = GetViewData().GetDocument();
|
|
ScDPObject* pDPObj = rDoc.GetDPAtCursor( rPos.Col(), rPos.Row(), rPos.Tab() );
|
|
if (!pDPObj)
|
|
return;
|
|
|
|
OUString aOldText = rDoc.GetString(rPos.Col(), rPos.Row(), rPos.Tab());
|
|
|
|
if ( aOldText == rString )
|
|
{
|
|
// nothing to do: silently exit
|
|
return;
|
|
}
|
|
|
|
TranslateId pErrorId;
|
|
|
|
pDPObj->BuildAllDimensionMembers();
|
|
ScDPSaveData aData( *pDPObj->GetSaveData() );
|
|
bool bChange = false;
|
|
bool bNeedReloadGroups = false;
|
|
|
|
DataPilotFieldOrientation nOrient = DataPilotFieldOrientation_HIDDEN;
|
|
tools::Long nField = pDPObj->GetHeaderDim( rPos, nOrient );
|
|
if ( nField >= 0 )
|
|
{
|
|
// changing a field title
|
|
if ( aData.GetExistingDimensionData() )
|
|
{
|
|
// only group dimensions can be renamed
|
|
|
|
ScDPDimensionSaveData* pDimData = aData.GetDimensionData();
|
|
ScDPSaveGroupDimension* pGroupDim = pDimData->GetNamedGroupDimAcc( aOldText );
|
|
if ( pGroupDim )
|
|
{
|
|
// valid name: not empty, no existing dimension (group or other)
|
|
if (!rString.isEmpty() && !pDPObj->IsDimNameInUse(rString))
|
|
{
|
|
pGroupDim->Rename( rString );
|
|
|
|
// also rename in SaveData to preserve the field settings
|
|
ScDPSaveDimension* pSaveDim = aData.GetDimensionByName( aOldText );
|
|
pSaveDim->SetName( rString );
|
|
|
|
bChange = true;
|
|
}
|
|
else
|
|
pErrorId = STR_INVALIDNAME;
|
|
}
|
|
}
|
|
else if (nOrient == DataPilotFieldOrientation_COLUMN || nOrient == DataPilotFieldOrientation_ROW)
|
|
{
|
|
bool bDataLayout = false;
|
|
OUString aDimName = pDPObj->GetDimName(nField, bDataLayout);
|
|
ScDPSaveDimension* pDim = bDataLayout ? aData.GetDataLayoutDimension() : aData.GetDimensionByName(aDimName);
|
|
if (pDim)
|
|
{
|
|
if (!rString.isEmpty())
|
|
{
|
|
if (rString.equalsIgnoreAsciiCase(aDimName))
|
|
{
|
|
pDim->RemoveLayoutName();
|
|
bChange = true;
|
|
}
|
|
else if (!pDPObj->IsDimNameInUse(rString))
|
|
{
|
|
pDim->SetLayoutName(rString);
|
|
bChange = true;
|
|
}
|
|
else
|
|
pErrorId = STR_INVALIDNAME;
|
|
}
|
|
else
|
|
pErrorId = STR_INVALIDNAME;
|
|
}
|
|
}
|
|
}
|
|
else if (pDPObj->IsDataDescriptionCell(rPos))
|
|
{
|
|
// There is only one data dimension.
|
|
ScDPSaveDimension* pDim = aData.GetFirstDimension(sheet::DataPilotFieldOrientation_DATA);
|
|
if (pDim)
|
|
{
|
|
if (!rString.isEmpty())
|
|
{
|
|
if (pDim->GetName().equalsIgnoreAsciiCase(rString))
|
|
{
|
|
pDim->RemoveLayoutName();
|
|
bChange = true;
|
|
}
|
|
else if (!pDPObj->IsDimNameInUse(rString))
|
|
{
|
|
pDim->SetLayoutName(rString);
|
|
bChange = true;
|
|
}
|
|
else
|
|
pErrorId = STR_INVALIDNAME;
|
|
}
|
|
else
|
|
pErrorId = STR_INVALIDNAME;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
// This is not a field header.
|
|
sheet::DataPilotTableHeaderData aPosData;
|
|
pDPObj->GetHeaderPositionData(rPos, aPosData);
|
|
|
|
if ((aPosData.Flags & MemberResultFlags::HASMEMBER) && !aOldText.isEmpty())
|
|
{
|
|
if ( aData.GetExistingDimensionData() && !(aPosData.Flags & MemberResultFlags::SUBTOTAL))
|
|
{
|
|
bool bIsDataLayout;
|
|
OUString aDimName = pDPObj->GetDimName( aPosData.Dimension, bIsDataLayout );
|
|
|
|
ScDPDimensionSaveData* pDimData = aData.GetDimensionData();
|
|
ScDPSaveGroupDimension* pGroupDim = pDimData->GetNamedGroupDimAcc( aDimName );
|
|
if ( pGroupDim )
|
|
{
|
|
// valid name: not empty, no existing group in this dimension
|
|
//! ignore case?
|
|
if (!rString.isEmpty() && !pGroupDim->GetNamedGroup(rString))
|
|
{
|
|
ScDPSaveGroupItem* pGroup = pGroupDim->GetNamedGroupAcc( aOldText );
|
|
if ( pGroup )
|
|
pGroup->Rename( rString ); // rename the existing group
|
|
else
|
|
{
|
|
// create a new group to replace the automatic group
|
|
ScDPSaveGroupItem aGroup( rString );
|
|
aGroup.AddElement( aOldText );
|
|
pGroupDim->AddGroupItem( aGroup );
|
|
}
|
|
|
|
// in both cases also adjust savedata, to preserve member settings (show details)
|
|
ScDPSaveDimension* pSaveDim = aData.GetDimensionByName( aDimName );
|
|
ScDPSaveMember* pSaveMember = pSaveDim->GetExistingMemberByName( aOldText );
|
|
if ( pSaveMember )
|
|
pSaveMember->SetName( rString );
|
|
|
|
bChange = true;
|
|
bNeedReloadGroups = true;
|
|
}
|
|
else
|
|
pErrorId = STR_INVALIDNAME;
|
|
}
|
|
}
|
|
else if (aPosData.Flags & MemberResultFlags::GRANDTOTAL)
|
|
{
|
|
aData.SetGrandTotalName(rString);
|
|
bChange = true;
|
|
}
|
|
else if (aPosData.Dimension >= 0 && !aPosData.MemberName.isEmpty())
|
|
{
|
|
bool bDataLayout = false;
|
|
OUString aDimName = pDPObj->GetDimName(static_cast<tools::Long>(aPosData.Dimension), bDataLayout);
|
|
if (bDataLayout)
|
|
{
|
|
// data dimension
|
|
do
|
|
{
|
|
if (aPosData.Flags & MemberResultFlags::SUBTOTAL)
|
|
break;
|
|
|
|
ScDPSaveDimension* pDim = aData.GetDimensionByName(aPosData.MemberName);
|
|
if (!pDim)
|
|
break;
|
|
|
|
if (rString.isEmpty())
|
|
{
|
|
pErrorId = STR_INVALIDNAME;
|
|
break;
|
|
}
|
|
|
|
if (aPosData.MemberName.equalsIgnoreAsciiCase(rString))
|
|
{
|
|
pDim->RemoveLayoutName();
|
|
bChange = true;
|
|
}
|
|
else if (!pDPObj->IsDimNameInUse(rString))
|
|
{
|
|
pDim->SetLayoutName(rString);
|
|
bChange = true;
|
|
}
|
|
else
|
|
pErrorId = STR_INVALIDNAME;
|
|
}
|
|
while (false);
|
|
}
|
|
else
|
|
{
|
|
// field member
|
|
do
|
|
{
|
|
ScDPSaveDimension* pDim = aData.GetDimensionByName(aDimName);
|
|
if (!pDim)
|
|
break;
|
|
|
|
ScDPSaveMember* pMem = pDim->GetExistingMemberByName(aPosData.MemberName);
|
|
if (!pMem)
|
|
break;
|
|
|
|
if (aPosData.Flags & MemberResultFlags::SUBTOTAL)
|
|
{
|
|
// Change subtotal only when the table has one data dimension.
|
|
if (aData.GetDataDimensionCount() > 1)
|
|
break;
|
|
|
|
// display name for subtotal is allowed only if the subtotal type is 'Automatic'.
|
|
if (pDim->GetSubTotalsCount() != 1)
|
|
break;
|
|
|
|
if (pDim->GetSubTotalFunc(0) != ScGeneralFunction::AUTO)
|
|
break;
|
|
|
|
const std::optional<OUString> & pLayoutName = pMem->GetLayoutName();
|
|
OUString aMemberName;
|
|
if (pLayoutName)
|
|
aMemberName = *pLayoutName;
|
|
else
|
|
aMemberName = aPosData.MemberName;
|
|
|
|
OUString aNew = lcl_replaceMemberNameInSubtotal(rString, aMemberName);
|
|
pDim->SetSubtotalName(aNew);
|
|
bChange = true;
|
|
}
|
|
else
|
|
{
|
|
// Check to make sure the member name isn't
|
|
// already used.
|
|
if (!rString.isEmpty())
|
|
{
|
|
if (rString.equalsIgnoreAsciiCase(pMem->GetName()))
|
|
{
|
|
pMem->RemoveLayoutName();
|
|
bChange = true;
|
|
}
|
|
else if (!pDim->IsMemberNameInUse(rString))
|
|
{
|
|
pMem->SetLayoutName(rString);
|
|
bChange = true;
|
|
}
|
|
else
|
|
pErrorId = STR_INVALIDNAME;
|
|
}
|
|
else
|
|
pErrorId = STR_INVALIDNAME;
|
|
}
|
|
}
|
|
while (false);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if ( bChange )
|
|
{
|
|
// apply changes
|
|
ScDBDocFunc aFunc( *GetViewData().GetDocShell() );
|
|
pDPObj->SetSaveData( aData );
|
|
if (bNeedReloadGroups)
|
|
{
|
|
ScDPCollection* pDPs = rDoc.GetDPCollection();
|
|
if (pDPs)
|
|
{
|
|
o3tl::sorted_vector<ScDPObject*> aRefs;
|
|
// tdf#111305: Reload groups in cache after modifications.
|
|
pDPs->ReloadGroupsInCache(pDPObj, aRefs);
|
|
} // pDPs
|
|
} // bNeedReloadGroups
|
|
aFunc.UpdatePivotTable(*pDPObj, true, false);
|
|
}
|
|
else
|
|
{
|
|
if (!pErrorId)
|
|
pErrorId = STR_ERR_DATAPILOT_INPUT;
|
|
ErrorMessage(pErrorId);
|
|
}
|
|
}
|
|
|
|
static void lcl_MoveToEnd( ScDPSaveDimension& rDim, const OUString& rItemName )
|
|
{
|
|
std::unique_ptr<ScDPSaveMember> pNewMember;
|
|
const ScDPSaveMember* pOldMember = rDim.GetExistingMemberByName( rItemName );
|
|
if ( pOldMember )
|
|
pNewMember.reset(new ScDPSaveMember( *pOldMember ));
|
|
else
|
|
pNewMember.reset(new ScDPSaveMember( rItemName ));
|
|
rDim.AddMember( std::move(pNewMember) );
|
|
// AddMember takes ownership of the new pointer,
|
|
// puts it to the end of the list even if it was in the list before.
|
|
}
|
|
|
|
namespace {
|
|
|
|
struct ScOUStringCollate
|
|
{
|
|
CollatorWrapper* mpCollator;
|
|
|
|
explicit ScOUStringCollate(CollatorWrapper* pColl) : mpCollator(pColl) {}
|
|
|
|
bool operator()(const OUString& rStr1, const OUString& rStr2) const
|
|
{
|
|
return ( mpCollator->compareString(rStr1, rStr2) < 0 );
|
|
}
|
|
};
|
|
|
|
}
|
|
|
|
void ScDBFunc::DataPilotSort(ScDPObject* pDPObj, tools::Long nDimIndex, bool bAscending, const sal_uInt16* pUserListId)
|
|
{
|
|
if (!pDPObj)
|
|
return;
|
|
|
|
// We need to run this to get all members later.
|
|
if ( pUserListId )
|
|
pDPObj->BuildAllDimensionMembers();
|
|
|
|
if (nDimIndex < 0)
|
|
// Invalid dimension index. Bail out.
|
|
return;
|
|
|
|
ScDPSaveData* pSaveData = pDPObj->GetSaveData();
|
|
if (!pSaveData)
|
|
return;
|
|
|
|
ScDPSaveData aNewSaveData(*pSaveData);
|
|
bool bDataLayout;
|
|
OUString aDimName = pDPObj->GetDimName(nDimIndex, bDataLayout);
|
|
ScDPSaveDimension* pSaveDim = aNewSaveData.GetDimensionByName(aDimName);
|
|
if (!pSaveDim)
|
|
return;
|
|
|
|
// manual evaluation of sort order is only needed if a user list id is given
|
|
if ( pUserListId )
|
|
{
|
|
typedef ScDPSaveDimension::MemberList MemList;
|
|
const MemList& rDimMembers = pSaveDim->GetMembers();
|
|
vector<OUString> aMembers;
|
|
std::unordered_set<OUString> aMemberSet;
|
|
size_t nMemberCount = 0;
|
|
for (ScDPSaveMember* pMem : rDimMembers)
|
|
{
|
|
aMembers.push_back(pMem->GetName());
|
|
aMemberSet.insert(pMem->GetName());
|
|
++nMemberCount;
|
|
}
|
|
|
|
// Sort the member list in ascending order.
|
|
ScOUStringCollate aCollate( &ScGlobal::GetCollator() );
|
|
std::stable_sort(aMembers.begin(), aMembers.end(), aCollate);
|
|
|
|
// Collect and rank those custom sort strings that also exist in the member name list.
|
|
|
|
typedef std::unordered_map<OUString, sal_uInt16> UserSortMap;
|
|
UserSortMap aSubStrs;
|
|
sal_uInt16 nSubCount = 0;
|
|
ScUserList& rUserList = ScGlobal::GetUserList();
|
|
size_t nUserListSize = rUserList.size();
|
|
if (!nUserListSize || *pUserListId >= static_cast<sal_uInt16>(nUserListSize))
|
|
return;
|
|
|
|
const ScUserListData& rData = rUserList[*pUserListId];
|
|
sal_uInt16 n = rData.GetSubCount();
|
|
for (sal_uInt16 i = 0; i < n; ++i)
|
|
{
|
|
OUString aSub = rData.GetSubStr(i);
|
|
if (!aMemberSet.count(aSub))
|
|
// This string doesn't exist in the member name set. Don't add this.
|
|
continue;
|
|
|
|
aSubStrs.emplace(aSub, nSubCount++);
|
|
}
|
|
|
|
// Rank all members.
|
|
|
|
vector<OUString> aRankedNames(nMemberCount);
|
|
sal_uInt16 nCurStrId = 0;
|
|
for (auto const& aMemberName : aMembers)
|
|
{
|
|
sal_uInt16 nRank = 0;
|
|
UserSortMap::const_iterator itrSub = aSubStrs.find(aMemberName);
|
|
if (itrSub == aSubStrs.end())
|
|
nRank = nSubCount + nCurStrId++;
|
|
else
|
|
nRank = itrSub->second;
|
|
|
|
if (!bAscending)
|
|
nRank = static_cast< sal_uInt16 >( nMemberCount - nRank - 1 );
|
|
|
|
aRankedNames[nRank] = aMemberName;
|
|
}
|
|
|
|
// Re-order ScDPSaveMember instances with the new ranks.
|
|
for (auto const& aRankedName : aRankedNames)
|
|
{
|
|
const ScDPSaveMember* pOldMem = pSaveDim->GetExistingMemberByName(aRankedName);
|
|
if (!pOldMem)
|
|
// All members are supposed to be present.
|
|
continue;
|
|
|
|
pSaveDim->AddMember(std::unique_ptr<ScDPSaveMember>(new ScDPSaveMember(*pOldMem)));
|
|
}
|
|
|
|
// Set the sorting mode to manual for now. We may introduce a new sorting
|
|
// mode later on.
|
|
|
|
sheet::DataPilotFieldSortInfo aSortInfo;
|
|
aSortInfo.Mode = sheet::DataPilotFieldSortMode::MANUAL;
|
|
pSaveDim->SetSortInfo(&aSortInfo);
|
|
}
|
|
else
|
|
{
|
|
// without user list id, just apply sorting mode
|
|
|
|
sheet::DataPilotFieldSortInfo aSortInfo;
|
|
aSortInfo.Mode = sheet::DataPilotFieldSortMode::NAME;
|
|
aSortInfo.IsAscending = bAscending;
|
|
pSaveDim->SetSortInfo(&aSortInfo);
|
|
}
|
|
|
|
// Update the datapilot with the newly sorted field members.
|
|
|
|
std::unique_ptr<ScDPObject> pNewObj(new ScDPObject(*pDPObj));
|
|
pNewObj->SetSaveData(aNewSaveData);
|
|
ScDBDocFunc aFunc(*GetViewData().GetDocShell());
|
|
|
|
aFunc.DataPilotUpdate(pDPObj, pNewObj.get(), true, false);
|
|
}
|
|
|
|
bool ScDBFunc::DataPilotMove( const ScRange& rSource, const ScAddress& rDest )
|
|
{
|
|
bool bRet = false;
|
|
ScDocument& rDoc = GetViewData().GetDocument();
|
|
ScDPObject* pDPObj = rDoc.GetDPAtCursor( rSource.aStart.Col(), rSource.aStart.Row(), rSource.aStart.Tab() );
|
|
if ( pDPObj && pDPObj == rDoc.GetDPAtCursor( rDest.Col(), rDest.Row(), rDest.Tab() ) )
|
|
{
|
|
sheet::DataPilotTableHeaderData aDestData;
|
|
pDPObj->GetHeaderPositionData( rDest, aDestData );
|
|
bool bValid = ( aDestData.Dimension >= 0 ); // dropping onto a field
|
|
|
|
// look through the source range
|
|
std::unordered_set< OUString > aMembersSet; // for lookup
|
|
std::vector< OUString > aMembersVector; // members in original order, for inserting
|
|
aMembersVector.reserve( std::max( static_cast<SCSIZE>( rSource.aEnd.Col() - rSource.aStart.Col() + 1 ),
|
|
static_cast<SCSIZE>( rSource.aEnd.Row() - rSource.aStart.Row() + 1 ) ) );
|
|
for (SCROW nRow = rSource.aStart.Row(); bValid && nRow <= rSource.aEnd.Row(); ++nRow )
|
|
for (SCCOL nCol = rSource.aStart.Col(); bValid && nCol <= rSource.aEnd.Col(); ++nCol )
|
|
{
|
|
sheet::DataPilotTableHeaderData aSourceData;
|
|
pDPObj->GetHeaderPositionData( ScAddress( nCol, nRow, rSource.aStart.Tab() ), aSourceData );
|
|
if ( aSourceData.Dimension == aDestData.Dimension && !aSourceData.MemberName.isEmpty() )
|
|
{
|
|
if ( aMembersSet.insert( aSourceData.MemberName ).second )
|
|
{
|
|
aMembersVector.push_back( aSourceData.MemberName );
|
|
}
|
|
// duplicates are ignored
|
|
}
|
|
else
|
|
bValid = false; // empty (subtotal) or different field
|
|
}
|
|
|
|
if ( bValid )
|
|
{
|
|
bool bIsDataLayout;
|
|
OUString aDimName = pDPObj->GetDimName( aDestData.Dimension, bIsDataLayout );
|
|
if ( !bIsDataLayout )
|
|
{
|
|
ScDPSaveData aData( *pDPObj->GetSaveData() );
|
|
ScDPSaveDimension* pDim = aData.GetDimensionByName( aDimName );
|
|
|
|
// get all member names in source order
|
|
uno::Sequence<OUString> aMemberNames;
|
|
pDPObj->GetMemberNames( aDestData.Dimension, aMemberNames );
|
|
|
|
bool bInserted = false;
|
|
|
|
for (const OUString& aMemberStr : aMemberNames)
|
|
{
|
|
if ( !bInserted && aMemberStr == aDestData.MemberName )
|
|
{
|
|
// insert dragged items before this item
|
|
for ( const auto& rMember : aMembersVector )
|
|
lcl_MoveToEnd( *pDim, rMember );
|
|
bInserted = true;
|
|
}
|
|
|
|
if ( aMembersSet.find( aMemberStr ) == aMembersSet.end() ) // skip dragged items
|
|
lcl_MoveToEnd( *pDim, aMemberStr );
|
|
}
|
|
// insert dragged item at end if dest wasn't found (for example, empty)
|
|
if ( !bInserted )
|
|
for ( const auto& rMember : aMembersVector )
|
|
lcl_MoveToEnd( *pDim, rMember );
|
|
|
|
// Items that were in SaveData, but not in the source, end up at the start of the list.
|
|
|
|
// set flag for manual sorting
|
|
sheet::DataPilotFieldSortInfo aSortInfo;
|
|
aSortInfo.Mode = sheet::DataPilotFieldSortMode::MANUAL;
|
|
pDim->SetSortInfo( &aSortInfo );
|
|
|
|
// apply changes
|
|
ScDBDocFunc aFunc( *GetViewData().GetDocShell() );
|
|
std::unique_ptr<ScDPObject> pNewObj(new ScDPObject( *pDPObj ));
|
|
pNewObj->SetSaveData( aData );
|
|
aFunc.DataPilotUpdate( pDPObj, pNewObj.get(), true, false ); //! bApi for drag&drop?
|
|
pNewObj.reset();
|
|
|
|
Unmark(); // entry was moved - no use in leaving the old cell selected
|
|
|
|
bRet = true;
|
|
}
|
|
}
|
|
}
|
|
|
|
return bRet;
|
|
}
|
|
|
|
bool ScDBFunc::HasSelectionForDrillDown( css::sheet::DataPilotFieldOrientation& rOrientation )
|
|
{
|
|
bool bRet = false;
|
|
|
|
ScDPObject* pDPObj = GetViewData().GetDocument().GetDPAtCursor( GetViewData().GetCurX(),
|
|
GetViewData().GetCurY(), GetViewData().GetTabNo() );
|
|
if ( pDPObj )
|
|
{
|
|
ScDPUniqueStringSet aEntries;
|
|
tools::Long nSelectDimension = -1;
|
|
GetSelectedMemberList( aEntries, nSelectDimension );
|
|
|
|
if (!aEntries.empty())
|
|
{
|
|
bool bIsDataLayout;
|
|
OUString aDimName = pDPObj->GetDimName( nSelectDimension, bIsDataLayout );
|
|
if ( !bIsDataLayout )
|
|
{
|
|
ScDPSaveData* pSaveData = pDPObj->GetSaveData();
|
|
ScDPSaveDimension* pDim = pSaveData->GetExistingDimensionByName( aDimName );
|
|
if ( pDim )
|
|
{
|
|
css::sheet::DataPilotFieldOrientation nDimOrient = pDim->GetOrientation();
|
|
ScDPSaveDimension* pInner = pSaveData->GetInnermostDimension( nDimOrient );
|
|
if ( pDim == pInner )
|
|
{
|
|
rOrientation = nDimOrient;
|
|
bRet = true;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
return bRet;
|
|
}
|
|
|
|
void ScDBFunc::SetDataPilotDetails(bool bShow, const OUString* pNewDimensionName)
|
|
{
|
|
ScDPObject* pDPObj = GetViewData().GetDocument().GetDPAtCursor( GetViewData().GetCurX(),
|
|
GetViewData().GetCurY(), GetViewData().GetTabNo() );
|
|
if ( !pDPObj )
|
|
return;
|
|
|
|
ScDPUniqueStringSet aEntries;
|
|
tools::Long nSelectDimension = -1;
|
|
GetSelectedMemberList( aEntries, nSelectDimension );
|
|
|
|
if (aEntries.empty())
|
|
return;
|
|
|
|
bool bIsDataLayout;
|
|
OUString aDimName = pDPObj->GetDimName( nSelectDimension, bIsDataLayout );
|
|
if ( bIsDataLayout )
|
|
return;
|
|
|
|
ScDPSaveData aData( *pDPObj->GetSaveData() );
|
|
ScDPSaveDimension* pDim = aData.GetDimensionByName( aDimName );
|
|
|
|
if ( bShow && pNewDimensionName )
|
|
{
|
|
// add the new dimension with the same orientation, at the end
|
|
|
|
ScDPSaveDimension* pNewDim = aData.GetDimensionByName( *pNewDimensionName );
|
|
ScDPSaveDimension* pDuplicated = nullptr;
|
|
if ( pNewDim->GetOrientation() == sheet::DataPilotFieldOrientation_DATA )
|
|
{
|
|
// Need to duplicate the dimension, create column/row in addition to data:
|
|
// The duplicated dimension inherits the existing settings, pNewDim is modified below.
|
|
pDuplicated = aData.DuplicateDimension( *pNewDimensionName );
|
|
}
|
|
|
|
css::sheet::DataPilotFieldOrientation nOrientation = pDim->GetOrientation();
|
|
pNewDim->SetOrientation( nOrientation );
|
|
|
|
tools::Long nPosition = LONG_MAX;
|
|
aData.SetPosition( pNewDim, nPosition );
|
|
|
|
ScDPSaveDimension* pDataLayout = aData.GetDataLayoutDimension();
|
|
if ( pDataLayout->GetOrientation() == nOrientation &&
|
|
aData.GetDataDimensionCount() <= 1 )
|
|
{
|
|
// If there is only one data dimension, the data layout dimension
|
|
// must still be the last one in its orientation.
|
|
aData.SetPosition( pDataLayout, nPosition );
|
|
}
|
|
|
|
if ( pDuplicated )
|
|
{
|
|
// The duplicated (data) dimension needs to be behind the original dimension
|
|
aData.SetPosition( pDuplicated, nPosition );
|
|
}
|
|
|
|
// Hide details for all visible members (selected are changed below).
|
|
//! Use all members from source level instead (including non-visible)?
|
|
|
|
ScDPUniqueStringSet aVisibleEntries;
|
|
pDPObj->GetMemberResultNames( aVisibleEntries, nSelectDimension );
|
|
|
|
for (const OUString& aVisName : aVisibleEntries)
|
|
{
|
|
ScDPSaveMember* pMember = pDim->GetMemberByName( aVisName );
|
|
pMember->SetShowDetails( false );
|
|
}
|
|
}
|
|
|
|
for (const auto& rEntry : aEntries)
|
|
{
|
|
ScDPSaveMember* pMember = pDim->GetMemberByName(rEntry);
|
|
pMember->SetShowDetails( bShow );
|
|
}
|
|
|
|
// apply changes
|
|
ScDBDocFunc aFunc( *GetViewData().GetDocShell() );
|
|
std::unique_ptr<ScDPObject> pNewObj(new ScDPObject( *pDPObj ));
|
|
pNewObj->SetSaveData( aData );
|
|
aFunc.DataPilotUpdate( pDPObj, pNewObj.get(), true, false );
|
|
pNewObj.reset();
|
|
|
|
// unmark cell selection
|
|
Unmark();
|
|
}
|
|
|
|
void ScDBFunc::ShowDataPilotSourceData( ScDPObject& rDPObj, const Sequence<sheet::DataPilotFieldFilter>& rFilters )
|
|
{
|
|
ScDocument& rDoc = GetViewData().GetDocument();
|
|
if (rDoc.GetDocumentShell()->IsReadOnly())
|
|
{
|
|
ErrorMessage(STR_READONLYERR);
|
|
return;
|
|
}
|
|
|
|
Reference<sheet::XDimensionsSupplier> xDimSupplier = rDPObj.GetSource();
|
|
Reference<container::XNameAccess> xDims = xDimSupplier->getDimensions();
|
|
Reference<sheet::XDrillDownDataSupplier> xDDSupplier(xDimSupplier, UNO_QUERY);
|
|
if (!xDDSupplier.is())
|
|
return;
|
|
|
|
Sequence< Sequence<Any> > aTabData = xDDSupplier->getDrillDownData(rFilters);
|
|
sal_Int32 nRowSize = aTabData.getLength();
|
|
if (nRowSize <= 1)
|
|
// There is no data to show. Bail out.
|
|
return;
|
|
|
|
SCCOL nColSize = aTabData[0].getLength();
|
|
|
|
SCTAB nNewTab = GetViewData().GetTabNo();
|
|
|
|
ScDocumentUniquePtr pInsDoc(new ScDocument(SCDOCMODE_CLIP));
|
|
pInsDoc->ResetClip( &rDoc, nNewTab );
|
|
for (SCROW nRow = 0; nRow < nRowSize; ++nRow)
|
|
{
|
|
for (SCCOL nCol = 0; nCol < nColSize; ++nCol)
|
|
{
|
|
const Any& rAny = aTabData[nRow][nCol];
|
|
OUString aStr;
|
|
double fVal;
|
|
if (rAny >>= aStr)
|
|
{
|
|
pInsDoc->SetString(ScAddress(nCol,nRow,nNewTab), aStr);
|
|
}
|
|
else if (rAny >>= fVal)
|
|
pInsDoc->SetValue(nCol, nRow, nNewTab, fVal);
|
|
}
|
|
}
|
|
|
|
// set number format (important for dates)
|
|
for (SCCOL nCol = 0; nCol < nColSize; ++nCol)
|
|
{
|
|
OUString aStr;
|
|
if (!(aTabData[0][nCol] >>= aStr))
|
|
continue;
|
|
|
|
Reference<XPropertySet> xPropSet(xDims->getByName(aStr), UNO_QUERY);
|
|
if (!xPropSet.is())
|
|
continue;
|
|
|
|
Any any = xPropSet->getPropertyValue( SC_UNO_DP_NUMBERFO );
|
|
sal_Int32 nNumFmt = 0;
|
|
if (!(any >>= nNumFmt))
|
|
continue;
|
|
|
|
ScPatternAttr aPattern(pInsDoc->getCellAttributeHelper());
|
|
aPattern.GetItemSet().Put( SfxUInt32Item(ATTR_VALUE_FORMAT, static_cast<sal_uInt32>(nNumFmt)) );
|
|
pInsDoc->ApplyPatternAreaTab(nCol, 1, nCol, nRowSize-1, nNewTab, aPattern);
|
|
}
|
|
|
|
SCCOL nEndCol = 0;
|
|
SCROW nEndRow = 0;
|
|
pInsDoc->GetCellArea( nNewTab, nEndCol, nEndRow );
|
|
pInsDoc->SetClipArea( ScRange( 0, 0, nNewTab, nEndCol, nEndRow, nNewTab ) );
|
|
|
|
SfxUndoManager* pMgr = GetViewData().GetDocShell()->GetUndoManager();
|
|
OUString aUndo = ScResId( STR_UNDO_DOOUTLINE );
|
|
pMgr->EnterListAction( aUndo, aUndo, 0, GetViewData().GetViewShell()->GetViewShellId() );
|
|
|
|
OUString aNewTabName;
|
|
rDoc.CreateValidTabName(aNewTabName);
|
|
if ( InsertTable(aNewTabName, nNewTab) )
|
|
PasteFromClip( InsertDeleteFlags::ALL, pInsDoc.get() );
|
|
|
|
pMgr->LeaveListAction();
|
|
}
|
|
|
|
// repeat data base operations (sorting, filtering, subtotals)
|
|
|
|
void ScDBFunc::RepeatDB( bool bRecord )
|
|
{
|
|
SCCOL nCurX = GetViewData().GetCurX();
|
|
SCROW nCurY = GetViewData().GetCurY();
|
|
SCTAB nTab = GetViewData().GetTabNo();
|
|
ScDocument& rDoc = GetViewData().GetDocument();
|
|
ScDBData* pDBData = GetDBData();
|
|
if (bRecord && !rDoc.IsUndoEnabled())
|
|
bRecord = false;
|
|
|
|
ScQueryParam aQueryParam;
|
|
pDBData->GetQueryParam( aQueryParam );
|
|
bool bQuery = aQueryParam.GetEntry(0).bDoQuery;
|
|
|
|
ScSortParam aSortParam;
|
|
pDBData->GetSortParam( aSortParam );
|
|
bool bSort = aSortParam.maKeyState[0].bDoSort;
|
|
|
|
ScSubTotalParam aSubTotalParam;
|
|
pDBData->GetSubTotalParam( aSubTotalParam );
|
|
bool bSubTotal = aSubTotalParam.aGroups[0].bActive && !aSubTotalParam.bRemoveOnly;
|
|
|
|
if ( bQuery || bSort || bSubTotal )
|
|
{
|
|
bool bQuerySize = false;
|
|
ScRange aOldQuery;
|
|
ScRange aNewQuery;
|
|
if (bQuery && !aQueryParam.bInplace)
|
|
{
|
|
ScDBData* pDest = rDoc.GetDBAtCursor( aQueryParam.nDestCol, aQueryParam.nDestRow,
|
|
aQueryParam.nDestTab, ScDBDataPortion::TOP_LEFT );
|
|
if (pDest && pDest->IsDoSize())
|
|
{
|
|
pDest->GetArea( aOldQuery );
|
|
bQuerySize = true;
|
|
}
|
|
}
|
|
|
|
SCTAB nDummy;
|
|
SCCOL nStartCol;
|
|
SCROW nStartRow;
|
|
SCCOL nEndCol;
|
|
SCROW nEndRow;
|
|
pDBData->GetArea( nDummy, nStartCol, nStartRow, nEndCol, nEndRow );
|
|
|
|
//! undo only needed data ?
|
|
|
|
ScDocumentUniquePtr pUndoDoc;
|
|
std::unique_ptr<ScOutlineTable> pUndoTab;
|
|
std::unique_ptr<ScRangeName> pUndoRange;
|
|
std::unique_ptr<ScDBCollection> pUndoDB;
|
|
|
|
if (bRecord)
|
|
{
|
|
SCTAB nTabCount = rDoc.GetTableCount();
|
|
pUndoDoc.reset(new ScDocument( SCDOCMODE_UNDO ));
|
|
ScOutlineTable* pTable = rDoc.GetOutlineTable( nTab );
|
|
if (pTable)
|
|
{
|
|
pUndoTab.reset(new ScOutlineTable( *pTable ));
|
|
|
|
SCCOLROW nOutStartCol; // row/column status
|
|
SCCOLROW nOutStartRow;
|
|
SCCOLROW nOutEndCol;
|
|
SCCOLROW nOutEndRow;
|
|
pTable->GetColArray().GetRange( nOutStartCol, nOutEndCol );
|
|
pTable->GetRowArray().GetRange( nOutStartRow, nOutEndRow );
|
|
|
|
pUndoDoc->InitUndo( rDoc, nTab, nTab, true, true );
|
|
rDoc.CopyToDocument( static_cast<SCCOL>(nOutStartCol), 0, nTab, static_cast<SCCOL>(nOutEndCol), rDoc.MaxRow(), nTab, InsertDeleteFlags::NONE, false, *pUndoDoc );
|
|
rDoc.CopyToDocument( 0, nOutStartRow, nTab, rDoc.MaxCol(), nOutEndRow, nTab, InsertDeleteFlags::NONE, false, *pUndoDoc );
|
|
}
|
|
else
|
|
pUndoDoc->InitUndo( rDoc, nTab, nTab, false, true );
|
|
|
|
// Record data range - including filter results
|
|
rDoc.CopyToDocument( 0,nStartRow,nTab, rDoc.MaxCol(),nEndRow,nTab, InsertDeleteFlags::ALL, false, *pUndoDoc );
|
|
|
|
// all formulas for reference
|
|
rDoc.CopyToDocument( 0,0,0, rDoc.MaxCol(),rDoc.MaxRow(),nTabCount-1, InsertDeleteFlags::FORMULA, false, *pUndoDoc );
|
|
|
|
// data base and other ranges
|
|
ScRangeName* pDocRange = rDoc.GetRangeName();
|
|
if (!pDocRange->empty())
|
|
pUndoRange.reset(new ScRangeName( *pDocRange ));
|
|
ScDBCollection* pDocDB = rDoc.GetDBCollection();
|
|
if (!pDocDB->empty())
|
|
pUndoDB.reset(new ScDBCollection( *pDocDB ));
|
|
}
|
|
|
|
if (bSort && bSubTotal)
|
|
{
|
|
// sort without subtotals
|
|
|
|
aSubTotalParam.bRemoveOnly = true; // is reset below
|
|
DoSubTotals( aSubTotalParam, false );
|
|
}
|
|
|
|
if (bSort)
|
|
{
|
|
pDBData->GetSortParam( aSortParam ); // range may have changed
|
|
Sort( aSortParam, false, false);
|
|
}
|
|
if (bQuery)
|
|
{
|
|
pDBData->GetQueryParam( aQueryParam ); // range may have changed
|
|
ScRange aAdvSource;
|
|
if (pDBData->GetAdvancedQuerySource(aAdvSource))
|
|
{
|
|
rDoc.CreateQueryParam(aAdvSource, aQueryParam);
|
|
Query( aQueryParam, &aAdvSource, false );
|
|
}
|
|
else
|
|
Query( aQueryParam, nullptr, false );
|
|
|
|
// if not inplace the sheet may have changed
|
|
if ( !aQueryParam.bInplace && aQueryParam.nDestTab != nTab )
|
|
SetTabNo( nTab );
|
|
}
|
|
if (bSubTotal)
|
|
{
|
|
pDBData->GetSubTotalParam( aSubTotalParam ); // range may have changed
|
|
aSubTotalParam.bRemoveOnly = false;
|
|
DoSubTotals( aSubTotalParam, false );
|
|
}
|
|
|
|
if (bRecord)
|
|
{
|
|
SCTAB nDummyTab;
|
|
SCCOL nDummyCol;
|
|
SCROW nDummyRow, nNewEndRow;
|
|
pDBData->GetArea( nDummyTab, nDummyCol,nDummyRow, nDummyCol,nNewEndRow );
|
|
|
|
const ScRange* pOld = nullptr;
|
|
const ScRange* pNew = nullptr;
|
|
if (bQuerySize)
|
|
{
|
|
ScDBData* pDest = rDoc.GetDBAtCursor( aQueryParam.nDestCol, aQueryParam.nDestRow,
|
|
aQueryParam.nDestTab, ScDBDataPortion::TOP_LEFT );
|
|
if (pDest)
|
|
{
|
|
pDest->GetArea( aNewQuery );
|
|
pOld = &aOldQuery;
|
|
pNew = &aNewQuery;
|
|
}
|
|
}
|
|
|
|
GetViewData().GetDocShell()->GetUndoManager()->AddUndoAction(
|
|
std::make_unique<ScUndoRepeatDB>( GetViewData().GetDocShell(), nTab,
|
|
nStartCol, nStartRow, nEndCol, nEndRow,
|
|
nNewEndRow,
|
|
nCurX, nCurY,
|
|
std::move(pUndoDoc), std::move(pUndoTab),
|
|
std::move(pUndoRange), std::move(pUndoDB),
|
|
pOld, pNew ) );
|
|
}
|
|
|
|
GetViewData().GetDocShell()->PostPaint(
|
|
ScRange(0, 0, nTab, rDoc.MaxCol(), rDoc.MaxRow(), nTab),
|
|
PaintPartFlags::Grid | PaintPartFlags::Left | PaintPartFlags::Top | PaintPartFlags::Size);
|
|
}
|
|
else // "no not execute any operations"
|
|
ErrorMessage(STR_MSSG_REPEATDB_0);
|
|
}
|
|
|
|
void ScDBFunc::OnLOKShowHideColRow(bool bColumns, SCCOLROW nStart)
|
|
{
|
|
if (!comphelper::LibreOfficeKit::isActive())
|
|
return;
|
|
|
|
SCTAB nCurrentTabIndex = GetViewData().GetTabNo();
|
|
SfxViewShell* pThisViewShell = GetViewData().GetViewShell();
|
|
SfxViewShell* pViewShell = SfxViewShell::GetFirst();
|
|
while (pViewShell)
|
|
{
|
|
ScTabViewShell* pTabViewShell = dynamic_cast<ScTabViewShell*>(pViewShell);
|
|
if (pTabViewShell && pTabViewShell->GetDocId() == pThisViewShell->GetDocId())
|
|
{
|
|
if (bColumns)
|
|
{
|
|
if (ScPositionHelper* pPosHelper = pTabViewShell->GetViewData().GetLOKWidthHelper(nCurrentTabIndex))
|
|
pPosHelper->invalidateByIndex(nStart);
|
|
}
|
|
else
|
|
{
|
|
if (ScPositionHelper* pPosHelper = pTabViewShell->GetViewData().GetLOKHeightHelper(nCurrentTabIndex))
|
|
pPosHelper->invalidateByIndex(nStart);
|
|
}
|
|
|
|
if (pTabViewShell->getPart() == nCurrentTabIndex)
|
|
{
|
|
pTabViewShell->ShowCursor();
|
|
pTabViewShell->MarkDataChanged();
|
|
}
|
|
}
|
|
pViewShell = SfxViewShell::GetNext(*pViewShell);
|
|
}
|
|
}
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|