Files
libreoffice/sw/source/ui/fldui/changedb.cxx
Rüdiger Timm 03abf581a9 INTEGRATION: CWS tune03 (1.13.268); FILE MERGED
2004/08/09 21:47:47 mhu 1.13.268.2: RESYNC: (1.13-1.14); FILE MERGED
2004/07/19 19:11:14 mhu 1.13.268.1: #i29979# Added SW_DLLPUBLIC/PRIVATE (see swdllapi.h) to exported symbols/classes.
2004-08-23 07:52:12 +00:00

427 lines
13 KiB
C++

/*************************************************************************
*
* $RCSfile: changedb.cxx,v $
*
* $Revision: 1.15 $
*
* last change: $Author: rt $ $Date: 2004-08-23 08:52:12 $
*
* The Contents of this file are made available subject to the terms of
* either of the following licenses
*
* - GNU Lesser General Public License Version 2.1
* - Sun Industry Standards Source License Version 1.1
*
* Sun Microsystems Inc., October, 2000
*
* GNU Lesser General Public License Version 2.1
* =============================================
* Copyright 2000 by Sun Microsystems, Inc.
* 901 San Antonio Road, Palo Alto, CA 94303, USA
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License version 2.1, as published by the Free Software Foundation.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307 USA
*
*
* Sun Industry Standards Source License Version 1.1
* =================================================
* The contents of this file are subject to the Sun Industry Standards
* Source License Version 1.1 (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.openoffice.org/license.html.
*
* Software provided under this License is provided on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
* WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
* MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
* See the License for the specific provisions governing your rights and
* obligations concerning the Software.
*
* The Initial Developer of the Original Code is: Sun Microsystems, Inc.
*
* Copyright: 2000 by Sun Microsystems, Inc.
*
* All Rights Reserved.
*
* Contributor(s): _______________________________________
*
*
************************************************************************/
#ifdef SW_DLLIMPLEMENTATION
#undef SW_DLLIMPLEMENTATION
#endif
#pragma hdrstop
#define _CHANGEDB_CXX
#include <svtools/stdctrl.hxx>
#ifndef _MSGBOX_HXX //autogen
#include <vcl/msgbox.hxx>
#endif
#ifndef _COM_SUN_STAR_LANG_XMULTISERVICEFACTORY_HPP_
#include <com/sun/star/lang/XMultiServiceFactory.hpp>
#endif
#ifndef _COM_SUN_STAR_CONTAINER_XNAMEACCESS_HPP_
#include <com/sun/star/container/XNameAccess.hpp>
#endif
#ifndef _COM_SUN_STAR_SDB_XDATABASEACCESS_HPP_
#include <com/sun/star/sdb/XDatabaseAccess.hpp>
#endif
#ifndef _COMPHELPER_PROCESSFACTORY_HXX_
#include <comphelper/processfactory.hxx>
#endif
#ifndef _SFXVIEWFRM_HXX //autogen
#include <sfx2/viewfrm.hxx>
#endif
#ifndef _VIEW_HXX
#include <view.hxx>
#endif
#ifndef _WRTSH_HXX
#include <wrtsh.hxx>
#endif
#ifndef _DBMGR_HXX
#include <dbmgr.hxx>
#endif
#ifndef _FLDMGR_HXX
#include <fldmgr.hxx>
#endif
#ifndef _EXPFLD_HXX
#include <expfld.hxx>
#endif
#ifndef _TXTATR_HXX
#include <txtatr.hxx>
#endif
#ifndef _NDTXT_HXX
#include <ndtxt.hxx>
#endif
#ifndef _FLDBAS_HXX
#include <fldbas.hxx>
#endif
#ifndef _DBFLD_HXX
#include <dbfld.hxx>
#endif
#ifndef _CHANGEDB_HXX
#include <changedb.hxx>
#endif
#ifndef _FLDUI_HRC
#include <fldui.hrc>
#endif
#ifndef _UTLUI_HRC
#include <utlui.hrc>
#endif
#ifndef _CHANGEDB_HRC
#include <changedb.hrc>
#endif
using namespace rtl;
using namespace com::sun::star::uno;
using namespace com::sun::star::container;
using namespace com::sun::star::lang;
#define C2U(cChar) OUString::createFromAscii(cChar)
/*--------------------------------------------------------------------
Beschreibung: Feldeinfuegen bearbeiten
--------------------------------------------------------------------*/
SwChangeDBDlg::SwChangeDBDlg(SwView& rVw) :
SvxStandardDialog(&rVw.GetViewFrame()->GetWindow(), SW_RES(DLG_CHANGE_DB)),
aDBListFL (this, SW_RES(FL_DBLIST )),
aUsedDBFT (this, SW_RES(FT_USEDDB )),
aAvailDBFT (this, SW_RES(FT_AVAILDB )),
aUsedDBTLB (this, SW_RES(TLB_USEDDB )),
aAvailDBTLB (this, SW_RES(TLB_AVAILDB ), 0),
aAddDBPB (this, ResId(PB_ADDDB)),
aDescFT (this, SW_RES(FT_DESC )),
aDocDBTextFT(this, SW_RES(FT_DOCDBTEXT )),
aDocDBNameFT(this, SW_RES(FT_DOCDBNAME )),
aOKBT (this, SW_RES(BT_OK )),
aCancelBT (this, SW_RES(BT_CANCEL )),
aHelpBT (this, SW_RES(BT_HELP )),
// aChangeBT (this, SW_RES(BT_CHANGEDB )),
aImageList (SW_RES(ILIST_DB_DLG )),
aImageListHC (SW_RES(ILIST_DB_DLG_HC )),
pMgr( new SwFldMgr() ),
pSh(rVw.GetWrtShellPtr())
{
aAvailDBTLB.SetWrtShell(*pSh);
FillDBPopup();
FreeResource();
ShowDBName(pSh->GetDBData());
aOKBT.SetClickHdl(LINK(this, SwChangeDBDlg, ButtonHdl));
aAddDBPB.SetClickHdl(LINK(this, SwChangeDBDlg, AddDBHdl));
aUsedDBTLB.SetSelectionMode(MULTIPLE_SELECTION);
aUsedDBTLB.SetWindowBits(WB_HASLINES|WB_CLIPCHILDREN|WB_SORT|WB_HASBUTTONS|WB_HASBUTTONSATROOT|WB_HSCROLL);
aUsedDBTLB.SetSpaceBetweenEntries(0);
aUsedDBTLB.SetNodeBitmaps( aImageList.GetImage(IMG_COLLAPSE),
aImageList.GetImage(IMG_EXPAND ), BMP_COLOR_NORMAL );
aUsedDBTLB.SetNodeBitmaps( aImageListHC.GetImage(IMG_COLLAPSE),
aImageListHC.GetImage(IMG_EXPAND ), BMP_COLOR_HIGHCONTRAST );
Link aLink = LINK(this, SwChangeDBDlg, TreeSelectHdl);
aUsedDBTLB.SetSelectHdl(aLink);
aUsedDBTLB.SetDeselectHdl(aLink);
aAvailDBTLB.SetSelectHdl(aLink);
aAvailDBTLB.SetDeselectHdl(aLink);
TreeSelectHdl();
}
/*--------------------------------------------------------------------
Beschreibung: Datenbank-Listboxen initialisieren
--------------------------------------------------------------------*/
void SwChangeDBDlg::FillDBPopup()
{
Reference<XNameAccess> xDBContext;
Reference< XMultiServiceFactory > xMgr( ::comphelper::getProcessServiceFactory() );
if( xMgr.is() )
{
Reference<XInterface> xInstance = xMgr->createInstance( C2U( "com.sun.star.sdb.DatabaseContext" ));
xDBContext = Reference<XNameAccess>(xInstance, UNO_QUERY) ;
}
DBG_ASSERT(xDBContext.is(), "com.sun.star.sdb.DataBaseContext: service not available")
const SwDBData& rDBData = pSh->GetDBData();
String sDBName(rDBData.sDataSource);
String sTableName(rDBData.sCommand);
aAvailDBTLB.Select(sDBName, sTableName, aEmptyStr);
SvStringsDtor aAllDBNames(5, 5);
Sequence<OUString> aDBNames = xDBContext->getElementNames();
const OUString* pDBNames = aDBNames.getConstArray();
long nDBCount = aDBNames.getLength();
long i;
for( i = 0; i < nDBCount; i++)
{
String sDBName(pDBNames[i]);
aAllDBNames.Insert(new String(sDBName), aAllDBNames.Count());
}
SvStringsDtor aDBNameList(5, 1);
pSh->GetAllUsedDB( aDBNameList, &aAllDBNames );
USHORT nCount = aDBNameList.Count();
aUsedDBTLB.Clear();
SvLBoxEntry *pFirst = 0;
SvLBoxEntry *pLast = 0;
for (i = 0; i < nCount; i++)
{
sDBName = *aDBNameList.GetObject(i);
sDBName = sDBName.GetToken(0);
pLast = Insert(sDBName);
if (!pFirst)
pFirst = pLast;
}
if (pFirst)
{
aUsedDBTLB.MakeVisible(pFirst);
aUsedDBTLB.Select(pFirst);
}
}
/*--------------------------------------------------------------------
Beschreibung:
--------------------------------------------------------------------*/
SvLBoxEntry* SwChangeDBDlg::Insert(const String& rDBName)
{
String sDBName(rDBName.GetToken(0, DB_DELIM));
String sTableName(rDBName.GetToken(1, DB_DELIM));
int nCommandType = rDBName.GetToken(2, DB_DELIM).ToInt32();
SvLBoxEntry* pParent;
SvLBoxEntry* pChild;
USHORT nParent = 0;
USHORT nChild = 0;
Image aTableImg = aImageList.GetImage(IMG_DBTABLE);
Image aDBImg = aImageList.GetImage(IMG_DB);
Image aQueryImg = aImageList.GetImage(IMG_DBQUERY);
Image aHCTableImg = aImageListHC.GetImage(IMG_DBTABLE);
Image aHCDBImg = aImageListHC.GetImage(IMG_DB);
Image aHCQueryImg = aImageListHC.GetImage(IMG_DBQUERY);
Image& rToInsert = nCommandType ? aQueryImg : aTableImg;
Image& rHCToInsert = nCommandType ? aHCQueryImg : aHCTableImg;
while ((pParent = aUsedDBTLB.GetEntry(nParent++)) != NULL)
{
if (sDBName == aUsedDBTLB.GetEntryText(pParent))
{
while ((pChild = aUsedDBTLB.GetEntry(pParent, nChild++)) != NULL)
{
if (sTableName == aUsedDBTLB.GetEntryText(pChild))
return pChild;
}
SvLBoxEntry* pRet = aUsedDBTLB.InsertEntry(sTableName, rToInsert, rToInsert, pParent);
aUsedDBTLB.SetExpandedEntryBmp(pRet, rHCToInsert, BMP_COLOR_HIGHCONTRAST);
aUsedDBTLB.SetCollapsedEntryBmp(pRet, rHCToInsert, BMP_COLOR_HIGHCONTRAST);
pRet->SetUserData((void*)nCommandType);
return pRet;
}
}
pParent = aUsedDBTLB.InsertEntry(sDBName, aDBImg, aDBImg);
aUsedDBTLB.SetExpandedEntryBmp(pParent, aHCDBImg, BMP_COLOR_HIGHCONTRAST);
aUsedDBTLB.SetCollapsedEntryBmp(pParent, aHCDBImg, BMP_COLOR_HIGHCONTRAST);
SvLBoxEntry* pRet = aUsedDBTLB.InsertEntry(sTableName, rToInsert, rToInsert, pParent);
aUsedDBTLB.SetExpandedEntryBmp(pRet, rHCToInsert, BMP_COLOR_HIGHCONTRAST);
aUsedDBTLB.SetCollapsedEntryBmp(pRet, rHCToInsert, BMP_COLOR_HIGHCONTRAST);
pRet->SetUserData((void*)nCommandType);
return pRet;
}
/*--------------------------------------------------------------------
Beschreibung: Dialog zerstoeren
--------------------------------------------------------------------*/
__EXPORT SwChangeDBDlg::~SwChangeDBDlg()
{
delete pMgr;
}
/*--------------------------------------------------------------------
Beschreibung: Schliessen
--------------------------------------------------------------------*/
void __EXPORT SwChangeDBDlg::Apply()
{
UpdateFlds();
}
/*--------------------------------------------------------------------
Beschreibung:
--------------------------------------------------------------------*/
void SwChangeDBDlg::UpdateFlds()
{
SvStringsDtor aDBNames( (BYTE)aUsedDBTLB.GetSelectionCount(), 1 );
SvLBoxEntry* pEntry = aUsedDBTLB.FirstSelected();
while( pEntry )
{
if( aUsedDBTLB.GetParent( pEntry ))
{
String* pTmp = new String( aUsedDBTLB.GetEntryText(
aUsedDBTLB.GetParent( pEntry )));
*pTmp += DB_DELIM;
*pTmp += aUsedDBTLB.GetEntryText( pEntry );
*pTmp += DB_DELIM;
int nCommandType = (int)(ULONG)pEntry->GetUserData();
*pTmp += String::CreateFromInt32(nCommandType);
aDBNames.Insert(pTmp, aDBNames.Count() );
}
pEntry = aUsedDBTLB.NextSelected(pEntry);
}
pSh->StartAllAction();
String sTableName, sColumnName;
sal_Bool bIsTable = sal_False;
String sTemp(aAvailDBTLB.GetDBName(sTableName, sColumnName, &bIsTable));
sTemp += DB_DELIM;
sTemp += sTableName;
sTemp += DB_DELIM;
sTemp += bIsTable ? '0' : '1';
pSh->ChangeDBFields( aDBNames, sTemp);
pSh->EndAllAction();
}
/*------------------------------------------------------------------------
Beschreibung:
------------------------------------------------------------------------*/
IMPL_LINK( SwChangeDBDlg, ButtonHdl, Button *, pBtn )
{
String sTableName, sColumnName;
SwDBData aData;
sal_Bool bIsTable = sal_False;
aData.sDataSource = aAvailDBTLB.GetDBName(sTableName, sColumnName, &bIsTable);
aData.sCommand = sTableName;
aData.nCommandType = bIsTable ? 0 : 1;;
pSh->ChgDBData(aData);
ShowDBName(pSh->GetDBData());
EndDialog(RET_OK);
return 0;
}
/*------------------------------------------------------------------------
Beschreibung:
------------------------------------------------------------------------*/
IMPL_LINK( SwChangeDBDlg, TreeSelectHdl, SvTreeListBox *, pBox )
{
BOOL bEnable = FALSE;
SvLBoxEntry* pEntry = aAvailDBTLB.GetCurEntry();
if (pEntry)
{
if (aAvailDBTLB.GetParent(pEntry))
bEnable = TRUE;
aOKBT.Enable( bEnable );
}
return 0;
}
/*--------------------------------------------------------------------
Beschreibung: Datenbankname fuer Anzeige wandeln
--------------------------------------------------------------------*/
void SwChangeDBDlg::ShowDBName(const SwDBData& rDBData)
{
String sTmp(rDBData.sDataSource);
String sName;
sTmp += '.';
sTmp += (String)rDBData.sCommand;
for (USHORT i = 0; i < sTmp.Len(); i++)
{
sName += sTmp.GetChar(i);
if (sTmp.GetChar(i) == '~')
sName += '~';
}
aDocDBNameFT.SetText(sName);
}
/*-- 27.05.2004 09:14:01---------------------------------------------------
-----------------------------------------------------------------------*/
IMPL_LINK( SwChangeDBDlg, AddDBHdl, PushButton *, EMPTYARG )
{
String sNewDB = SwNewDBMgr::LoadAndRegisterDataSource();
if(sNewDB.Len())
aAvailDBTLB.AddDataSource(sNewDB);
return 0;
}