Files
libreoffice/sw/source/ui/dbui/mmpreparemergepage.cxx
Stephan Bergmann 3ead3ad52f Gradually typed Link
Turn the Link class into a template abstracting over the link's argument and
return types, but provide default template arguments that keep the generic,
unsafe "void* in, sal_IntPtr out" behvior.  That way, individual uses of the
Link class can be updated over time.

All the related macros are duplicated with ..._TYPED counterparts, that
additionally take the RetType (except for LINK_TYPED, which manages to infer the
relevant types from the supplied Member).

(It would have been attractive to change the "untyped" LinkStubs from taking a
void* to a properly typed ArgType parameter, too, but that would cause
-fsanitize=function to flag uses of "untyped" Link::Call.)

Change-Id: I3b0140378bad99abbf240140ebb4a46a05d2d2f8
2015-04-30 10:20:00 +02:00

171 lines
5.7 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 <mmpreparemergepage.hxx>
#include <mailmergewizard.hxx>
#include <mmconfigitem.hxx>
#include <dbui.hrc>
#include <swtypes.hxx>
#include <view.hxx>
#include <dbmgr.hxx>
#include <wrtsh.hxx>
#include <svx/dataaccessdescriptor.hxx>
#include <com/sun/star/sdbc/XConnection.hpp>
#include <swabstdlg.hxx>
#include <unomid.h>
using namespace ::com::sun::star::uno;
using namespace ::com::sun::star::beans;
using namespace ::com::sun::star::sdbc;
SwMailMergePrepareMergePage::SwMailMergePrepareMergePage( SwMailMergeWizard* _pParent)
: svt::OWizardPage(_pParent, "MMPreparePage", "modules/swriter/ui/mmpreparepage.ui")
, m_pWizard(_pParent)
{
get(m_pFirstPB, "first");
get(m_pPrevPB, "prev");
get(m_pRecordED, "record-nospin");
get(m_pNextPB, "next");
get(m_pLastPB, "last");
get(m_pExcludeCB, "exclude");
get(m_pEditPB, "edit");
m_pEditPB->SetClickHdl( LINK( this, SwMailMergePrepareMergePage, EditDocumentHdl_Impl));
Link<> aMoveLink(LINK( this, SwMailMergePrepareMergePage, MoveHdl_Impl));
m_pFirstPB->SetClickHdl( aMoveLink );
m_pPrevPB->SetClickHdl( aMoveLink );
m_pNextPB->SetClickHdl( aMoveLink );
m_pLastPB->SetClickHdl( aMoveLink );
m_pRecordED->SetModifyHdl( aMoveLink );
m_pExcludeCB->SetClickHdl(LINK(this, SwMailMergePrepareMergePage, ExcludeHdl_Impl));
aMoveLink.Call(m_pRecordED);
}
SwMailMergePrepareMergePage::~SwMailMergePrepareMergePage()
{
disposeOnce();
}
void SwMailMergePrepareMergePage::dispose()
{
m_pFirstPB.clear();
m_pPrevPB.clear();
m_pRecordED.clear();
m_pNextPB.clear();
m_pLastPB.clear();
m_pExcludeCB.clear();
m_pEditPB.clear();
m_pWizard.clear();
svt::OWizardPage::dispose();
}
IMPL_LINK_NOARG(SwMailMergePrepareMergePage, EditDocumentHdl_Impl)
{
m_pWizard->SetRestartPage(MM_PREPAREMERGEPAGE);
m_pWizard->EndDialog(RET_EDIT_DOC);
return 0;
}
IMPL_LINK( SwMailMergePrepareMergePage, MoveHdl_Impl, void*, pCtrl)
{
SwMailMergeConfigItem& rConfigItem = m_pWizard->GetConfigItem();
sal_Int32 nPos = rConfigItem.GetResultSetPosition();
if (pCtrl == m_pFirstPB)
{
rConfigItem.MoveResultSet(1);
}
else if (pCtrl == m_pPrevPB)
{
rConfigItem.MoveResultSet(nPos - 1);
}
else if (pCtrl == m_pRecordED)
{
rConfigItem.MoveResultSet( static_cast< sal_Int32 >(m_pRecordED->GetValue()) );
}
else if (pCtrl == m_pNextPB)
rConfigItem.MoveResultSet(nPos + 1);
else if (pCtrl == m_pLastPB)
rConfigItem.MoveResultSet(-1);
nPos = rConfigItem.GetResultSetPosition();
m_pRecordED->SetValue(nPos);
bool bIsFirst;
bool bIsLast;
bool bValid = rConfigItem.IsResultSetFirstLast(bIsFirst, bIsLast);
m_pFirstPB->Enable(bValid && !bIsFirst);
m_pPrevPB->Enable(bValid && !bIsFirst);
m_pNextPB->Enable(bValid && !bIsLast);
m_pLastPB->Enable(bValid && !bIsLast);
m_pExcludeCB->Check(rConfigItem.IsRecordExcluded( rConfigItem.GetResultSetPosition() ));
//now the record has to be merged into the source document
const SwDBData& rDBData = rConfigItem.GetCurrentDBData();
Sequence< PropertyValue > aArgs(7);
Sequence<Any> aSelection(1);
aSelection[0] <<= rConfigItem.GetResultSetPosition();
aArgs[0].Name = "Selection";
aArgs[0].Value <<= aSelection;
aArgs[1].Name = "DataSourceName";
aArgs[1].Value <<= rDBData.sDataSource;
aArgs[2].Name = "Command";
aArgs[2].Value <<= rDBData.sCommand;
aArgs[3].Name = "CommandType";
aArgs[3].Value <<= rDBData.nCommandType;
aArgs[4].Name = "ActiveConnection";
aArgs[4].Value <<= rConfigItem.GetConnection().getTyped();
aArgs[5].Name = "Filter";
aArgs[5].Value <<= rConfigItem.GetFilter();
aArgs[6].Name = "Cursor";
aArgs[6].Value <<= rConfigItem.GetResultSet();
svx::ODataAccessDescriptor aDescriptor(aArgs);
SwWrtShell& rSh = m_pWizard->GetSwView()->GetWrtShell();
SwMergeDescriptor aMergeDesc( DBMGR_MERGE, rSh, aDescriptor );
rSh.GetDBManager()->MergeNew(aMergeDesc);
return 0;
}
IMPL_LINK( SwMailMergePrepareMergePage, ExcludeHdl_Impl, CheckBox*, pBox)
{
SwMailMergeConfigItem& rConfigItem = m_pWizard->GetConfigItem();
rConfigItem.ExcludeRecord( rConfigItem.GetResultSetPosition(), pBox->IsChecked());
return 0;
};
void SwMailMergePrepareMergePage::ActivatePage()
{
MoveHdl_Impl(m_pRecordED);
}
// merge the data into a new file
bool SwMailMergePrepareMergePage::commitPage( ::svt::WizardTypes::CommitPageReason _eReason )
{
SwMailMergeConfigItem& rConfigItem = m_pWizard->GetConfigItem();
if(::svt::WizardTypes::eTravelForward == _eReason && !rConfigItem.IsMergeDone())
{
m_pWizard->CreateTargetDocument();
m_pWizard->SetRestartPage(MM_MERGEPAGE);
m_pWizard->EndDialog(RET_TARGET_CREATED);
}
return true;
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */