xref: /trunk/main/dbaccess/source/ui/dlg/tablespage.cxx (revision a3cdc23e488c57f3433f22cd4458e65c27aa499c)
1 /**************************************************************
2  *
3  * Licensed to the Apache Software Foundation (ASF) under one
4  * or more contributor license agreements.  See the NOTICE file
5  * distributed with this work for additional information
6  * regarding copyright ownership.  The ASF licenses this file
7  * to you under the Apache License, Version 2.0 (the
8  * "License"); you may not use this file except in compliance
9  * with the License.  You may obtain a copy of the License at
10  *
11  *   http://www.apache.org/licenses/LICENSE-2.0
12  *
13  * Unless required by applicable law or agreed to in writing,
14  * software distributed under the License is distributed on an
15  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16  * KIND, either express or implied.  See the License for the
17  * specific language governing permissions and limitations
18  * under the License.
19  *
20  *************************************************************/
21 
22 
23 
24 // MARKER(update_precomp.py): autogen include statement, do not remove
25 #include "precompiled_dbui.hxx"
26 
27 #ifndef _DBAUI_TABLESPAGE_HXX_
28 #include "tablespage.hxx"
29 #endif
30 #ifndef _DBU_DLG_HRC_
31 #include "dbu_dlg.hrc"
32 #endif
33 #ifndef _DBAUI_DBADMIN_HRC_
34 #include "dbadmin.hrc"
35 #endif
36 #ifndef _DBAUI_DATASOURCEITEMS_HXX_
37 #include "dsitems.hxx"
38 #endif
39 #ifndef DBACCESS_UI_BROWSER_ID_HXX
40 #include "browserids.hxx"
41 #endif
42 #ifndef _DBAUI_DATASOURCECONNECTOR_HXX_
43 #include "datasourceconnector.hxx"
44 #endif
45 #ifndef _COMPHELPER_TYPES_HXX_
46 #include <comphelper/types.hxx>
47 #endif
48 #ifndef _CONNECTIVITY_DBTOOLS_HXX_
49 #include <connectivity/dbtools.hxx>
50 #endif
51 #ifndef _DBHELPER_DBEXCEPTION_HXX_
52 #include <connectivity/dbexception.hxx>
53 #endif
54 #ifndef _DBAUI_STRINGLISTITEM_HXX_
55 #include "stringlistitem.hxx"
56 #endif
57 #ifndef _SFXENUMITEM_HXX
58 #include <svl/eitem.hxx>
59 #endif
60 #ifndef _SFXSTRITEM_HXX
61 #include <svl/stritem.hxx>
62 #endif
63 #ifndef DBACCESS_SHARED_DBUSTRINGS_HRC
64 #include "dbustrings.hrc"
65 #endif
66 #ifndef _SV_SVAPP_HXX
67 #include <vcl/svapp.hxx>
68 #endif
69 #ifndef _SV_WAITOBJ_HXX
70 #include <vcl/waitobj.hxx>
71 #endif
72 #ifndef _COM_SUN_STAR_SDB_SQLCONTEXT_HPP_
73 #include <com/sun/star/sdb/SQLContext.hpp>
74 #endif
75 #ifndef _COM_SUN_STAR_SDBCX_XTABLESSUPPLIER_HPP_
76 #include <com/sun/star/sdbcx/XTablesSupplier.hpp>
77 #endif
78 #ifndef _COM_SUN_STAR_SDBCX_XAPPEND_HPP_
79 #include <com/sun/star/sdbcx/XAppend.hpp>
80 #endif
81 #ifndef _COM_SUN_STAR_UTIL_XMODIFIABLE_HPP_
82 #include <com/sun/star/util/XModifiable.hpp>
83 #endif
84 #ifndef _COM_SUN_STAR_SDBCX_XDROP_HPP_
85 #include <com/sun/star/sdbcx/XDrop.hpp>
86 #endif
87 #ifndef _COM_SUN_STAR_SDBCX_XDATADEFINITIONSUPPLIER_HPP_
88 #include <com/sun/star/sdbcx/XDataDefinitionSupplier.hpp>
89 #endif
90 #ifndef _DBAUI_SQLMESSAGE_HXX_
91 #include "sqlmessage.hxx"
92 #endif
93 #ifndef _SV_MSGBOX_HXX
94 #include <vcl/msgbox.hxx>
95 #endif
96 #ifndef _DBA_DBACCESS_HELPID_HRC_
97 #include "dbaccess_helpid.hrc"
98 #endif
99 #ifndef DBAUI_TOOLS_HXX
100 #include "UITools.hxx"
101 #endif
102 #ifndef _VOS_MUTEX_HXX_
103 #include <vos/mutex.hxx>
104 #endif
105 #ifndef _SVTOOLS_IMGDEF_HXX
106 #include <svtools/imgdef.hxx>
107 #endif
108 #ifndef _DBAUI_TABLESSINGLEDLG_HXX_
109 #include "TablesSingleDlg.hxx"
110 #endif
111 #ifndef TOOLS_DIAGNOSE_EX_H
112 #include <tools/diagnose_ex.h>
113 #endif
114 #ifndef _CPPUHELPER_EXC_HLP_HXX_
115 #include <cppuhelper/exc_hlp.hxx>
116 #endif
117 #include "AutoControlsDef.hrc"
118 
119 //.........................................................................
120 namespace dbaui
121 {
122 //.........................................................................
123 
124     using namespace ::com::sun::star::uno;
125     using namespace ::com::sun::star::sdbc;
126     using namespace ::com::sun::star::sdbcx;
127     using namespace ::com::sun::star::sdb;
128     using namespace ::com::sun::star::beans;
129     using namespace ::com::sun::star::lang;
130     using namespace ::com::sun::star::i18n;
131     using namespace ::com::sun::star::container;
132     using namespace ::com::sun::star::frame;
133     using namespace ::com::sun::star::util;
134     using namespace ::dbtools;
135     using namespace ::comphelper;
136 
137     //========================================================================
138     //= OTableSubscriptionPage
139     //========================================================================
140 DBG_NAME(OTableSubscriptionPage)
141 //------------------------------------------------------------------------
142     OTableSubscriptionPage::OTableSubscriptionPage( Window* pParent, const SfxItemSet& _rCoreAttrs,OTableSubscriptionDialog* _pTablesDlg )
143         :OGenericAdministrationPage( pParent, ModuleRes(PAGE_TABLESUBSCRIPTION), _rCoreAttrs )
144         ,m_aTables              (this, ModuleRes(FL_SEPARATOR1))
145         ,m_aTablesList          (this, NULL,ModuleRes(CTL_TABLESUBSCRIPTION),sal_True)
146         ,m_aExplanation         (this, ModuleRes(FT_FILTER_EXPLANATION))
147         ,m_bCheckedAll          ( sal_False )
148         ,m_bCatalogAtStart      ( sal_True )
149         ,m_pTablesDlg(_pTablesDlg)
150     {
151         DBG_CTOR(OTableSubscriptionPage,NULL);
152 
153         m_aTablesList.SetCheckHandler(getControlModifiedLink());
154 
155         // initialize the TabListBox
156         m_aTablesList.SetSelectionMode( MULTIPLE_SELECTION );
157         m_aTablesList.SetDragDropMode( 0 );
158         m_aTablesList.EnableInplaceEditing( sal_False );
159         m_aTablesList.SetStyle(m_aTablesList.GetStyle() | WB_BORDER | WB_HASLINES | WB_HASLINESATROOT | WB_SORT | WB_HASBUTTONS | WB_HSCROLL |WB_HASBUTTONSATROOT);
160 
161         m_aTablesList.Clear();
162 
163         FreeResource();
164 
165         m_aTablesList.SetCheckButtonHdl(LINK(this, OTableSubscriptionPage, OnTreeEntryChecked));
166         m_aTablesList.SetCheckHandler(LINK(this, OTableSubscriptionPage, OnTreeEntryChecked));
167     }
168 
169     //------------------------------------------------------------------------
170     OTableSubscriptionPage::~OTableSubscriptionPage()
171     {
172         // just to make sure that our connection will be removed
173         try
174         {
175             ::comphelper::disposeComponent(m_xCurrentConnection);
176         }
177         catch (RuntimeException&) { }
178 
179         DBG_DTOR(OTableSubscriptionPage,NULL);
180     }
181 
182     // -----------------------------------------------------------------------------
183     void OTableSubscriptionPage::StateChanged( StateChangedType nType )
184     {
185         OGenericAdministrationPage::StateChanged( nType );
186 
187         if ( nType == STATE_CHANGE_CONTROLBACKGROUND )
188         {
189             // Check if we need to get new images for normal/high contrast mode
190             m_aTablesList.notifyHiContrastChanged();
191         }
192     }
193     // -----------------------------------------------------------------------------
194     void OTableSubscriptionPage::DataChanged( const DataChangedEvent& rDCEvt )
195     {
196         OGenericAdministrationPage::DataChanged( rDCEvt );
197 
198         if ((( rDCEvt.GetType() == DATACHANGED_SETTINGS )   ||
199             ( rDCEvt.GetType() == DATACHANGED_DISPLAY   ))  &&
200             ( rDCEvt.GetFlags() & SETTINGS_STYLE        ))
201         {
202             // Check if we need to get new images for normal/high contrast mode
203             m_aTablesList.notifyHiContrastChanged();
204         }
205     }
206     //------------------------------------------------------------------
207     void OTableSubscriptionPage::resizeControls(const Size& _rDiff)
208     {
209         if ( _rDiff.Height() )
210         {
211             Size aOldSize = m_aTablesList.GetSizePixel();
212             aOldSize.Height() -= _rDiff.Height();
213             m_aTablesList.SetPosSizePixel(
214                     m_aTablesList.GetPosPixel()+Point(0,_rDiff.Height()),
215                     aOldSize
216                     );
217         }
218     }
219     //------------------------------------------------------------------------
220     void OTableSubscriptionPage::implCheckTables(const Sequence< ::rtl::OUString >& _rTables)
221     {
222         // the meta data for the current connection, used for splitting up table names
223         Reference< XDatabaseMetaData > xMeta;
224         try
225         {
226             if (m_xCurrentConnection.is())
227                 xMeta = m_xCurrentConnection->getMetaData();
228         }
229         catch(SQLException&)
230         {
231             DBG_ERROR("OTableSubscriptionPage::implCheckTables : could not retrieve the current connection's meta data!");
232         }
233 
234         // uncheck all
235         CheckAll(sal_False);
236 
237         // check the ones which are in the list
238         String aListBoxTable;
239         ::rtl::OUString sCatalog, sSchema, sName;
240 
241         SvLBoxEntry* pRootEntry = m_aTablesList.getAllObjectsEntry();
242         sal_Bool bAllTables = sal_False;
243         sal_Bool bAllSchemas = sal_False;
244 
245         const ::rtl::OUString* pIncludeTable = _rTables.getConstArray();
246         for (sal_Int32 i=0; i<_rTables.getLength(); ++i, ++pIncludeTable)
247         {
248             if (xMeta.is())
249                 qualifiedNameComponents(xMeta, pIncludeTable->getStr(), sCatalog, sSchema, sName,::dbtools::eInDataManipulation);
250             else
251                 sName = pIncludeTable->getStr();
252 
253             bAllTables = (1 == sName.getLength()) && ('%' == sName[0]);
254             bAllSchemas = (1 == sSchema.getLength()) && ('%' == sSchema[0]);
255 
256             // the catalog entry
257             SvLBoxEntry* pCatalog = m_aTablesList.GetEntryPosByName(sCatalog, pRootEntry);
258             if (!pCatalog && sCatalog.getLength())
259                 // the table (resp. its catalog) referred in this filter entry does not exist anymore
260                 continue;
261 
262             if (bAllSchemas && pCatalog)
263             {
264                 m_aTablesList.checkWildcard(pCatalog);
265                 continue;
266             }
267 
268             // the schema entry
269             SvLBoxEntry* pSchema = m_aTablesList.GetEntryPosByName(sSchema, (pCatalog ? pCatalog : pRootEntry));
270             if (!pSchema && sSchema.getLength())
271                 // the table (resp. its schema) referred in this filter entry does not exist anymore
272                 continue;
273 
274             if (bAllTables && pSchema)
275             {
276                 m_aTablesList.checkWildcard(pSchema);
277                 continue;
278             }
279 
280             SvLBoxEntry* pEntry = m_aTablesList.GetEntryPosByName(sName, pSchema ? pSchema : (pCatalog ? pCatalog : pRootEntry) );
281             if (pEntry)
282                 m_aTablesList.SetCheckButtonState(pEntry, SV_BUTTON_CHECKED);
283         }
284         m_aTablesList.CheckButtons();
285     }
286 
287     //------------------------------------------------------------------------
288     void OTableSubscriptionPage::implCompleteTablesCheck( const ::com::sun::star::uno::Sequence< ::rtl::OUString >& _rTableFilter )
289     {
290         if (!_rTableFilter.getLength())
291         {   // no tables visible
292             CheckAll(sal_False);
293         }
294         else
295         {
296             if ((1 == _rTableFilter.getLength()) && _rTableFilter[0].equalsAsciiL("%", 1))
297             {   // all tables visible
298                 CheckAll(sal_True);
299             }
300             else
301                 implCheckTables( _rTableFilter );
302         }
303     }
304 
305     //-------------------------------------------------------------------------
306     void OTableSubscriptionPage::implInitControls(const SfxItemSet& _rSet, sal_Bool _bSaveValue)
307     {
308         // check whether or not the selection is invalid or readonly (invalid implies readonly, but not vice versa)
309         sal_Bool bValid, bReadonly;
310         getFlags(_rSet, bValid, bReadonly);
311 
312         // get the name of the data source we're working for
313         SFX_ITEMSET_GET(_rSet, pNameItem, SfxStringItem, DSID_NAME, sal_True);
314         DBG_ASSERT(pNameItem, "OTableSubscriptionPage::implInitControls: missing the name attribute!");
315         String sDSName = pNameItem->GetValue();
316 
317         if (bValid && sDSName.Len() && !m_xCurrentConnection.is() )
318         {   // get the current table list from the connection for the current settings
319 
320             // the PropertyValues for the current dialog settings
321             Sequence< PropertyValue > aConnectionParams;
322             DBG_ASSERT(m_pTablesDlg, "OTableSubscriptionPage::implInitControls: need a parent dialog doing the translation!");
323             if ( m_pTablesDlg )
324             {
325                 if (!m_pTablesDlg->getCurrentSettings(aConnectionParams))
326                 {
327                     m_aTablesList.Clear();
328                     m_pTablesDlg->endExecution();
329                     return;
330                 }
331             }
332 
333             if (!m_xCollator.is())
334             {
335                 // the collator for the string compares
336                 try
337                 {
338                     m_xCollator = Reference< XCollator >(m_xORB->createInstance(SERVICE_I18N_COLLATOR), UNO_QUERY);
339                     if (m_xCollator.is())
340                         m_xCollator->loadDefaultCollator(Application::GetSettings().GetLocale(), 0);
341                 }
342                 catch(const Exception&)
343                 {
344                     DBG_UNHANDLED_EXCEPTION();
345                 }
346             }
347 
348             // fill the table list with this connection information
349             SQLExceptionInfo aErrorInfo;
350             // the current DSN
351             String sURL;
352             if ( m_pTablesDlg )
353                 sURL = m_pTablesDlg->getConnectionURL();
354 
355             try
356             {
357                 WaitObject aWaitCursor(this);
358                 m_aTablesList.GetModel()->SetSortMode(SortAscending);
359                 m_aTablesList.GetModel()->SetCompareHdl(LINK(this, OTableSubscriptionPage, OnTreeEntryCompare));
360 
361                 Reference< XDriver > xDriver;
362                 m_aTablesList.setORB(m_xORB);
363                 Reference<XPropertySet> xProp = m_pTablesDlg->getCurrentDataSource();
364                 OSL_ENSURE(xProp.is(),"No data source set!");
365                 if ( xProp.is() )
366                 {
367                     Any aTableFilter = xProp->getPropertyValue(PROPERTY_TABLEFILTER);
368                     Any aTableTypeFilter = xProp->getPropertyValue(PROPERTY_TABLETYPEFILTER);
369 
370                     Reference<XModifiable> xModi(getDataSourceOrModel(xProp),UNO_QUERY);
371                     sal_Bool bModified = ( xModi.is() && xModi->isModified() );
372 
373                     Sequence< ::rtl::OUString > aNewTableFilter(1);
374                     aNewTableFilter[0] = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("%"));
375                     xProp->setPropertyValue(PROPERTY_TABLEFILTER,makeAny(aNewTableFilter));
376 
377                     xProp->setPropertyValue( PROPERTY_TABLETYPEFILTER, makeAny( Sequence< ::rtl::OUString >() ) );
378                     Reference< ::com::sun::star::lang::XEventListener> xEvt;
379                     aErrorInfo = ::dbaui::createConnection(xProp,m_xORB,xEvt,m_xCurrentConnection);
380 
381                     xProp->setPropertyValue(PROPERTY_TABLEFILTER,aTableFilter);
382                     xProp->setPropertyValue(PROPERTY_TABLETYPEFILTER,aTableTypeFilter);
383 
384                     if ( xModi.is() && !bModified )
385                         xModi->setModified(sal_False);
386 
387                 }
388 
389                 if ( m_xCurrentConnection.is() )
390                 {
391                     m_aTablesList.UpdateTableList( m_xCurrentConnection );
392                     if (m_pTablesDlg)
393                         m_pTablesDlg->successfullyConnected();
394                 }
395             }
396             catch (const SQLException&)
397             {
398                 aErrorInfo = ::cppu::getCaughtException();
399             }
400 
401             if (aErrorInfo.isValid())
402             {
403                 // establishing the connection failed. Show an error window and exit.
404                 OSQLMessageBox aMessageBox( GetParent()->GetParent(), aErrorInfo );
405                 aMessageBox.Execute();
406                 m_aTables.Enable(sal_False);
407                 m_aTablesList.Enable(sal_False);
408                 m_aExplanation.Enable(sal_False);
409                 m_aTablesList.Clear();
410 
411                 if ( m_pTablesDlg )
412                 {
413                     m_pTablesDlg->clearPassword();
414                     m_pTablesDlg->endExecution();
415                 }
416             }
417             else
418             {
419                 // in addition, we need some infos about the connection used
420                 m_sCatalogSeparator = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("."));    // (default)
421                 m_bCatalogAtStart = sal_True;   // (default)
422                 try
423                 {
424                     Reference< XDatabaseMetaData > xMeta;
425                     if (m_xCurrentConnection.is())
426                         xMeta = m_xCurrentConnection->getMetaData();
427                     if (xMeta.is() && xMeta->supportsCatalogsInDataManipulation())
428                     {
429                         m_sCatalogSeparator = xMeta->getCatalogSeparator();
430                         m_bCatalogAtStart = xMeta->isCatalogAtStart();
431                     }
432                 }
433                 catch(Exception&)
434                 {
435                     DBG_UNHANDLED_EXCEPTION();
436                 }
437             }
438         }
439 
440         bValid = bValid && m_xCurrentConnection.is();
441         bReadonly = bReadonly || !bValid;
442 
443         // get the current table filter
444         SFX_ITEMSET_GET(_rSet, pTableFilter, OStringListItem, DSID_TABLEFILTER, sal_True);
445         SFX_ITEMSET_GET(_rSet, pSuppress, SfxBoolItem, DSID_SUPPRESSVERSIONCL, sal_True);
446         Sequence< ::rtl::OUString > aTableFilter;
447         sal_Bool bSuppressVersionColumns = sal_True;
448         if (pTableFilter)
449             aTableFilter = pTableFilter->getList();
450         if (pSuppress)
451             bSuppressVersionColumns = pSuppress->GetValue();
452 
453         implCompleteTablesCheck( aTableFilter );
454 
455         // expand the first entry by default
456         SvLBoxEntry* pExpand = m_aTablesList.getAllObjectsEntry();
457         while (pExpand)
458         {
459             m_aTablesList.Expand(pExpand);
460             pExpand = m_aTablesList.FirstChild(pExpand);
461             if (pExpand && m_aTablesList.NextSibling(pExpand))
462                 pExpand = NULL;
463         }
464 
465         // update the toolbox according to the current selection and check state
466         OGenericAdministrationPage::implInitControls(_rSet, _bSaveValue);
467     }
468 
469     //------------------------------------------------------------------------
470     void OTableSubscriptionPage::CheckAll( sal_Bool _bCheck )
471     {
472         SvButtonState eState = _bCheck ? SV_BUTTON_CHECKED : SV_BUTTON_UNCHECKED;
473         SvLBoxEntry* pEntry = m_aTablesList.First();
474         while (pEntry)
475         {
476             m_aTablesList.SetCheckButtonState( pEntry, eState);
477             pEntry = m_aTablesList.Next(pEntry);
478         }
479 
480         if (_bCheck && m_aTablesList.getAllObjectsEntry())
481             m_aTablesList.checkWildcard(m_aTablesList.getAllObjectsEntry());
482     }
483 
484     //------------------------------------------------------------------------
485     int OTableSubscriptionPage::DeactivatePage(SfxItemSet* _pSet)
486     {
487         int nResult = OGenericAdministrationPage::DeactivatePage(_pSet);
488 
489         // dispose the connection, we don't need it anymore, so we're not wasting resources
490         try
491         {
492             ::comphelper::disposeComponent(m_xCurrentConnection);
493         }
494         catch (RuntimeException&) { }
495 
496         return nResult;
497     }
498     //------------------------------------------------------------------------
499     IMPL_LINK( OTableSubscriptionPage, OnTreeEntryChecked, Control*, _pControl )
500     {
501         return OnControlModified(_pControl);
502     }
503     //------------------------------------------------------------------------
504     IMPL_LINK( OTableSubscriptionPage, OnTreeEntryCompare, const SvSortData*, _pSortData )
505     {
506         SvLBoxEntry* pLHS = static_cast<SvLBoxEntry*>(_pSortData->pLeft);
507         SvLBoxEntry* pRHS = static_cast<SvLBoxEntry*>(_pSortData->pRight);
508         DBG_ASSERT(pLHS && pRHS, "SbaTableQueryBrowser::OnTreeEntryCompare: invalid tree entries!");
509 
510         SvLBoxString* pLeftTextItem = static_cast<SvLBoxString*>(pLHS->GetFirstItem(SV_ITEM_ID_LBOXSTRING));
511         SvLBoxString* pRightTextItem = static_cast<SvLBoxString*>(pRHS->GetFirstItem(SV_ITEM_ID_LBOXSTRING));
512         DBG_ASSERT(pLeftTextItem && pRightTextItem, "SbaTableQueryBrowser::OnTreeEntryCompare: invalid text items!");
513 
514         String sLeftText = pLeftTextItem->GetText();
515         String sRightText = pRightTextItem->GetText();
516 
517         sal_Int32 nCompareResult = 0;   // equal by default
518 
519         if (m_xCollator.is())
520         {
521             try
522             {
523                 nCompareResult = m_xCollator->compareString(sLeftText, sRightText);
524             }
525             catch(Exception&)
526             {
527             }
528         }
529         else
530             // default behaviour if we do not have a collator -> do the simple string compare
531             nCompareResult = sLeftText.CompareTo(sRightText);
532 
533         return nCompareResult;
534     }
535 
536     //------------------------------------------------------------------------
537     Sequence< ::rtl::OUString > OTableSubscriptionPage::collectDetailedSelection() const
538     {
539         Sequence< ::rtl::OUString > aTableFilter;
540         static const ::rtl::OUString sDot(RTL_CONSTASCII_USTRINGPARAM("."));
541         static const ::rtl::OUString sWildcard(RTL_CONSTASCII_USTRINGPARAM("%"));
542 
543         ::rtl::OUString sComposedName;
544         const SvLBoxEntry* pAllObjectsEntry = m_aTablesList.getAllObjectsEntry();
545         if (!pAllObjectsEntry)
546             return aTableFilter;
547         SvLBoxEntry* pEntry = m_aTablesList.GetModel()->Next(const_cast<SvLBoxEntry*>(pAllObjectsEntry));
548         while(pEntry)
549         {
550             sal_Bool bCatalogWildcard = sal_False;
551             sal_Bool bSchemaWildcard =  sal_False;
552             SvLBoxEntry* pSchema = NULL;
553             SvLBoxEntry* pCatalog = NULL;
554 
555             if (m_aTablesList.GetCheckButtonState(pEntry) == SV_BUTTON_CHECKED && !m_aTablesList.GetModel()->HasChilds(pEntry))
556             {   // checked and a leaf, which means it's no catalog, no schema, but a real table
557                 ::rtl::OUString sCatalog;
558                 if(m_aTablesList.GetModel()->HasParent(pEntry))
559                 {
560                     pSchema = m_aTablesList.GetModel()->GetParent(pEntry);
561                     if (pAllObjectsEntry == pSchema)
562                         // do not want to have the root entry
563                         pSchema = NULL;
564 
565                     if (pSchema)
566                     {   // it's a real schema entry, not the "all objects" root
567                         if(m_aTablesList.GetModel()->HasParent(pSchema))
568                         {
569                             pCatalog = m_aTablesList.GetModel()->GetParent(pSchema);
570                             if (pAllObjectsEntry == pCatalog)
571                                 // do not want to have the root entry
572                                 pCatalog = NULL;
573 
574                             if (pCatalog)
575                             {   // it's a real catalog entry, not the "all objects" root
576                                 bCatalogWildcard = m_aTablesList.isWildcardChecked(pCatalog);
577                                 if (m_bCatalogAtStart)
578                                 {
579                                     sComposedName += m_aTablesList.GetEntryText( pCatalog );
580                                     sComposedName += m_sCatalogSeparator;
581                                     if (bCatalogWildcard)
582                                         sComposedName += sWildcard;
583                                 }
584                                 else
585                                 {
586                                     if (bCatalogWildcard)
587                                         sCatalog = sWildcard;
588                                     else
589                                         sCatalog = ::rtl::OUString();
590                                     sCatalog += m_sCatalogSeparator;
591                                     sCatalog += m_aTablesList.GetEntryText( pCatalog );
592                                 }
593                             }
594                         }
595                         bSchemaWildcard = m_aTablesList.isWildcardChecked(pSchema);
596                         sComposedName += m_aTablesList.GetEntryText( pSchema );
597                         sComposedName += sDot;
598                     }
599 
600                     if (bSchemaWildcard)
601                         sComposedName += sWildcard;
602                 }
603                 if (!bSchemaWildcard && !bCatalogWildcard)
604                     sComposedName += m_aTablesList.GetEntryText( pEntry );
605 
606                 if (!m_bCatalogAtStart && !bCatalogWildcard)
607                     sComposedName += sCatalog;
608 
609                 // need some space
610                 sal_Int32 nOldLen = aTableFilter.getLength();
611                 aTableFilter.realloc(nOldLen + 1);
612                 // add the new name
613                 aTableFilter[nOldLen] = sComposedName;
614 
615                 // reset the composed name
616                 sComposedName = ::rtl::OUString();
617             }
618 
619             if (bCatalogWildcard)
620                 pEntry = implNextSibling(pCatalog);
621             else if (bSchemaWildcard)
622                 pEntry = implNextSibling(pSchema);
623             else
624                 pEntry = m_aTablesList.GetModel()->Next(pEntry);
625         }
626 
627         return aTableFilter;
628     }
629 
630     //------------------------------------------------------------------------
631     SvLBoxEntry* OTableSubscriptionPage::implNextSibling(SvLBoxEntry* _pEntry) const
632     {
633         SvLBoxEntry* pReturn = NULL;
634         if (_pEntry)
635         {
636             pReturn = m_aTablesList.NextSibling(_pEntry);
637             if (!pReturn)
638                 pReturn = implNextSibling(m_aTablesList.GetParent(_pEntry));
639         }
640         return pReturn;
641     }
642 
643     //------------------------------------------------------------------------
644     sal_Bool OTableSubscriptionPage::FillItemSet( SfxItemSet& _rCoreAttrs )
645     {
646         sal_Bool bValid, bReadonly;
647         getFlags(_rCoreAttrs, bValid, bReadonly);
648 
649         if (!bValid || bReadonly)
650             // don't store anything if the data we're working with is invalid or readonly
651             return sal_True;
652 
653         /////////////////////////////////////////////////////////////////////////
654         // create the output string which contains all the table names
655         if ( m_xCurrentConnection.is() )
656         {   // collect the table filter data only if we have a connection - else no tables are displayed at all
657             Sequence< ::rtl::OUString > aTableFilter;
658             if (m_aTablesList.isWildcardChecked(m_aTablesList.getAllObjectsEntry()))
659             {
660                 aTableFilter.realloc(1);
661                 aTableFilter[0] = ::rtl::OUString("%", 1, RTL_TEXTENCODING_ASCII_US);
662             }
663             else
664             {
665                 aTableFilter = collectDetailedSelection();
666             }
667             _rCoreAttrs.Put( OStringListItem(DSID_TABLEFILTER, aTableFilter) );
668         }
669 
670         return sal_True;
671     }
672 
673     // -----------------------------------------------------------------------
674     void OTableSubscriptionPage::fillControls(::std::vector< ISaveValueWrapper* >& /*_rControlList*/)
675     {
676     }
677     // -----------------------------------------------------------------------
678     void OTableSubscriptionPage::fillWindows(::std::vector< ISaveValueWrapper* >& _rControlList)
679     {
680         _rControlList.push_back(new ODisableWrapper<OTableTreeListBox>(&m_aTablesList));
681         _rControlList.push_back(new ODisableWrapper<FixedLine>(&m_aTables));
682         _rControlList.push_back(new ODisableWrapper<FixedText>(&m_aExplanation));
683     }
684     // -----------------------------------------------------------------------
685 //.........................................................................
686 }   // namespace dbaui
687 //.........................................................................
688