/************************************************************************* * * $RCSfile: changedb.cxx,v $ * * $Revision: 1.3 $ * * last change: $Author: os $ $Date: 2000-10-27 11:24:22 $ * * 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 PRECOMPILED #include "ui_pch.hxx" #endif #pragma hdrstop #define _CHANGEDB_CXX #include #ifndef _MSGBOX_HXX //autogen #include #endif #ifndef _COM_SUN_STAR_LANG_XMULTISERVICEFACTORY_HPP_ #include #endif #ifndef _COM_SUN_STAR_CONTAINER_XNAMEACCESS_HPP_ #include #endif #ifndef _COM_SUN_STAR_SDB_XDATABASEACCESS_HPP_ #include #endif #ifndef _COMPHELPER_PROCESSFACTORY_HXX_ #include #endif #ifndef _SFXVIEWFRM_HXX //autogen #include #endif #ifndef _VIEW_HXX #include #endif #ifndef _WRTSH_HXX #include #endif #ifndef _DBMGR_HXX #include #endif #ifndef _FLDMGR_HXX #include #endif #ifndef _EXPFLD_HXX #include #endif #ifndef _TXTATR_HXX #include #endif #ifndef _NDTXT_HXX #include #endif #ifndef _FLDBAS_HXX #include #endif #ifndef _DBFLD_HXX #include #endif #ifndef _CHANGEDB_HXX #include #endif #ifndef _FLDUI_HRC #include #endif #ifndef _CHANGEDB_HRC #include #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)), aDescFT (this, SW_RES(FT_DESC )), aUsedDBFT (this, SW_RES(FT_USEDDB )), aAvailDBFT (this, SW_RES(FT_AVAILDB )), aDBListGB (this, SW_RES(GB_DBLIST )), aUsedDBTLB (this, SW_RES(TLB_USEDDB )), aAvailDBTLB (this, SW_RES(TLB_AVAILDB )), 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 )), aRootOpened (SW_RES(BMP_ROOT_CLOSED)), aRootClosed (SW_RES(BMP_ROOT_OPENED)), aDBBMP (SW_RES(BMP_DB)), aTableBMP (SW_RES(BMP_TABLE)), pMgr( new SwFldMgr() ), pSh(rVw.GetWrtShellPtr()) { FillDBPopup(); FreeResource(); ShowDBName(pSh->GetDBName()); aOKBT.SetClickHdl(LINK(this, SwChangeDBDlg, ButtonHdl)); aUsedDBTLB.SetSelectionMode(MULTIPLE_SELECTION); aUsedDBTLB.SetWindowBits(WB_HASLINES|WB_CLIPCHILDREN|WB_SORT|WB_HASBUTTONS|WB_HASBUTTONSATROOT|WB_HSCROLL); aUsedDBTLB.SetFont(GetSettings().GetStyleSettings().GetAppFont()); aUsedDBTLB.SetSpaceBetweenEntries(0); aUsedDBTLB.SetNodeBitmaps( aRootOpened, aRootClosed ); 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 xDBContext; Reference< XMultiServiceFactory > xMgr( ::comphelper::getProcessServiceFactory() ); if( xMgr.is() ) { Reference xInstance = xMgr->createInstance( C2U( "com.sun.star.sdb.DatabaseContext" )); xDBContext = Reference(xInstance, UNO_QUERY) ; } DBG_ASSERT(xDBContext.is(), "com.sun.star.sdb.DataBaseContext: service not available") String sDataBaseName(pSh->GetDBName()); String sDBName(sDataBaseName.GetToken(0, DB_DELIM)); String sTableName(sDataBaseName.GetToken(1, DB_DELIM)); aAvailDBTLB.Select(sDBName, sTableName, aEmptyStr); SvStringsDtor aAllDBNames(5, 5); Sequence aDBNames = xDBContext->getElementNames(); const OUString* pDBNames = aDBNames.getConstArray(); long nDBCount = aDBNames.getLength(); for(long 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)); SvLBoxEntry* pParent; SvLBoxEntry* pChild; USHORT nParent = 0; USHORT nChild = 0; 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; } return aUsedDBTLB.InsertEntry(sTableName, aTableBMP, aTableBMP, pParent); } } pParent = aUsedDBTLB.InsertEntry(sDBName, aDBBMP, aDBBMP); return aUsedDBTLB.InsertEntry(sTableName, aTableBMP, aTableBMP, pParent); } /*-------------------------------------------------------------------- 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 ); aDBNames.Insert(pTmp, aDBNames.Count() ); } pEntry = aUsedDBTLB.NextSelected(pEntry); } pSh->StartAllAction(); String sTableName, sColumnName; String sTemp(aAvailDBTLB.GetDBName(sTableName, sColumnName)); sTemp += DB_DELIM; sTemp += sTableName; pSh->ChangeDBFields( aDBNames, sTemp); pSh->EndAllAction(); } /*------------------------------------------------------------------------ Beschreibung: ------------------------------------------------------------------------*/ IMPL_LINK( SwChangeDBDlg, ButtonHdl, Button *, pBtn ) { String sTableName, sColumnName; String sTemp(aAvailDBTLB.GetDBName(sTableName, sColumnName)); sTemp += DB_DELIM; sTemp += sTableName; sTemp += DB_DELIM; sTemp += sColumnName; pSh->ChgDBName(sTemp); ShowDBName(pSh->GetDBName()); 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 String& rDBName) { String sTmp(rDBName.GetToken(0, DB_DELIM)); String sName; sTmp += '.'; sTmp += rDBName.GetToken(1, DB_DELIM); for (USHORT i = 0; i < sTmp.Len(); i++) { sName += sTmp.GetChar(i); if (sTmp.GetChar(i) == '~') sName += '~'; } aDocDBNameFT.SetText(sName); }