dbaccess/source/ui/dlg/dlgsave.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: dlgsave.cxx,v $
  10  * $Revision: 1.35 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_dbaccess.hxx"
  33
  34 #ifndef DBAUI_DLGSAVE_HXX
  35 #include "dlgsave.hxx"
  36 #endif
  37 #ifndef DBAUI_DLGSAVE_HRC
  38 #include "dlgsave.hrc"
  39 #endif
  40 #ifndef _SV_MSGBOX_HXX //autogen
  41 #include <vcl/msgbox.hxx>
  42 #endif
  43 #ifndef _DBU_DLG_HRC_
  44 #include "dbu_dlg.hrc"
  45 #endif
  46 #ifndef _COM_SUN_STAR_SDB_COMMANDTYPE_HPP_
  47 #include <com/sun/star/sdb/CommandType.hpp>
  48 #endif
  49 #ifndef _COM_SUN_STAR_SDBC_XROW_HPP_
  50 #include <com/sun/star/sdbc/XRow.hpp>
  51 #endif
  52 #ifndef _DBAUI_SQLMESSAGE_HXX_
  53 #include "sqlmessage.hxx"
  54 #endif
  55 #ifndef _CONNECTIVITY_DBTOOLS_HXX_
  56 #include <connectivity/dbtools.hxx>
  57 #endif
  58 #ifndef DBAUI_TOOLS_HXX
  59 #include "UITools.hxx"
  60 #endif
  61 #ifndef _DBA_DBACCESS_HELPID_HRC_
  62 #include "dbaccess_helpid.hrc"
  63 #endif
  64 #ifndef DBAUI_SQLNAMEEDIT_HXX
  65 #include "SqlNameEdit.hxx"
  66 #endif
  67 #ifndef _BUTTON_HXX //autogen
  68 #include <vcl/button.hxx>
  69 #endif
  70 #ifndef _FIXED_HXX //autogen
  71 #include <vcl/fixed.hxx>
  72 #endif
  73 #ifndef _EDIT_HXX //autogen
  74 #include <vcl/edit.hxx>
  75 #endif
  76 #ifndef _COM_SUN_STAR_CONTAINER_XNAMEACCESS_HPP_
  77 #include <com/sun/star/container/XNameAccess.hpp>
  78 #endif
  79 #ifndef _COM_SUN_STAR_CONTAINER_XHIERARCHICALNAMEACCESS_HPP_
  80 #include <com/sun/star/container/XHierarchicalNameAccess.hpp>
  81 #endif
  82 #ifndef _COM_SUN_STAR_SDBC_XDATABASEMETADATA_HPP_
  83 #include <com/sun/star/sdbc/XDatabaseMetaData.hpp>
  84 #endif
  85 #ifndef _DBAUI_MODULE_DBU_HXX_
  86 #include "moduledbu.hxx"
  87 #endif
  88 #ifndef DBACCESS_SOURCE_UI_INC_OBJECTNAMECHECK_HXX
  89 #include "objectnamecheck.hxx"
  90 #endif
  91 #ifndef TOOLS_DIAGNOSE_EX_H
  92 #include <tools/diagnose_ex.h>
  93 #endif
  94
  95
  96 using namespace dbaui;
  97 using namespace dbtools;
  98 using namespace ::com::sun::star::uno;
  99 using namespace ::com::sun::star::container;
 100 using namespace ::com::sun::star::sdb;
 101 using namespace ::com::sun::star::sdbc;
 102 namespace dbaui
 103 {
 104 class OSaveAsDlgImpl
 105 {
 106 public:
 107     FixedText                   m_aDescription;
 108     FixedText                   m_aCatalogLbl;
 109     OSQLNameComboBox    m_aCatalog;
 110     FixedText                   m_aSchemaLbl;
 111     OSQLNameComboBox    m_aSchema;
 112     FixedText                   m_aLabel;
 113     OSQLNameEdit                m_aTitle;
 114     OKButton                    m_aPB_OK;
 115     CancelButton                m_aPB_CANCEL;
 116     HelpButton                  m_aPB_HELP;
 117     String                              m_aQryLabel;
 118     String                              m_sTblLabel;
 119     rtl::OUString       m_sCatalog;
 120     rtl::OUString       m_sSchema;
 121     String                              m_aName;
 122     const IObjectNameCheck&
 123                         m_rObjectNameCheck;
 124     String                              m_sParentURL;
 125     ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XDatabaseMetaData>                        m_xMetaData;
 126     sal_Int32                   m_nType;
 127     sal_Int32                   m_nFlags;
 128
 129     OSaveAsDlgImpl(     Window * pParent,const sal_Int32& _rType,
 130                     const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XConnection>& _xConnection,
 131                     const String& rDefault,
 132                     const IObjectNameCheck& _rObjectNameCheck,
 133                     sal_Int32 _nFlags);
 134     OSaveAsDlgImpl(     Window * pParent,
 135                     const String& rDefault,
 136                     const IObjectNameCheck& _rObjectNameCheck,
 137                     sal_Int32 _nFlags);
 138 };
 139 // -----------------------------------------------------------------------------
 140 } // dbaui
 141 // -----------------------------------------------------------------------------
 142 OSaveAsDlgImpl::OSaveAsDlgImpl( Window * _pParent,
 143                         const sal_Int32& _rType,
 144                         const Reference< XConnection>& _xConnection,
 145                         const String& rDefault,
 146                         const IObjectNameCheck& _rObjectNameCheck,
 147                         sal_Int32 _nFlags)
 148     :m_aDescription(_pParent, ModuleRes (FT_DESCRIPTION))
 149     ,m_aCatalogLbl(_pParent, ModuleRes (FT_CATALOG))
 150     ,m_aCatalog(_pParent, ModuleRes (ET_CATALOG), ::rtl::OUString())
 151     ,m_aSchemaLbl(_pParent, ModuleRes (FT_SCHEMA))
 152     ,m_aSchema(_pParent, ModuleRes (ET_SCHEMA), ::rtl::OUString())
 153     ,m_aLabel(_pParent, ModuleRes (FT_TITLE))
 154     ,m_aTitle(_pParent, ModuleRes (ET_TITLE), ::rtl::OUString())
 155     ,m_aPB_OK(_pParent, ModuleRes( PB_OK ) )
 156     ,m_aPB_CANCEL(_pParent, ModuleRes( PB_CANCEL ))
 157     ,m_aPB_HELP(_pParent, ModuleRes( PB_HELP))
 158     ,m_aQryLabel(ModuleRes(STR_QRY_LABEL))
 159     ,m_sTblLabel(ModuleRes(STR_TBL_LABEL))
 160     ,m_aName(rDefault)
 161     ,m_rObjectNameCheck( _rObjectNameCheck )
 162              ,m_nType(_rType)
 163              ,m_nFlags(_nFlags)
 164 {
 165     if ( _xConnection.is() )
 166         m_xMetaData = _xConnection->getMetaData();
 167
 168     if ( m_xMetaData.is() )
 169     {
 170         ::rtl::OUString sExtraNameChars( m_xMetaData->getExtraNameCharacters() );
 171         m_aCatalog.setAllowedChars( sExtraNameChars );
 172         m_aSchema.setAllowedChars( sExtraNameChars );
 173         m_aTitle.setAllowedChars( sExtraNameChars );
 174     }
 175
 176     m_aCatalog.SetDropDownLineCount( 10 );
 177     m_aSchema.SetDropDownLineCount( 10 );
 178 }
 179 // -----------------------------------------------------------------------------
 180 OSaveAsDlgImpl::OSaveAsDlgImpl( Window * _pParent,
 181                         const String& rDefault,
 182                         const IObjectNameCheck& _rObjectNameCheck,
 183                         sal_Int32 _nFlags)
 184              :m_aDescription(_pParent, ModuleRes (FT_DESCRIPTION))
 185              ,m_aCatalogLbl(_pParent, ModuleRes (FT_CATALOG))
 186              ,m_aCatalog(_pParent, ModuleRes (ET_CATALOG))
 187              ,m_aSchemaLbl(_pParent, ModuleRes (FT_SCHEMA))
 188              ,m_aSchema(_pParent, ModuleRes (ET_SCHEMA))
 189              ,m_aLabel(_pParent, ModuleRes (FT_TITLE))
 190              ,m_aTitle(_pParent, ModuleRes (ET_TITLE))
 191              ,m_aPB_OK(_pParent, ModuleRes( PB_OK ) )
 192              ,m_aPB_CANCEL(_pParent, ModuleRes( PB_CANCEL ))
 193              ,m_aPB_HELP(_pParent, ModuleRes( PB_HELP))
 194              ,m_aQryLabel(ModuleRes(STR_QRY_LABEL))
 195              ,m_sTblLabel(ModuleRes(STR_TBL_LABEL))
 196              ,m_aName(rDefault)
 197              ,m_rObjectNameCheck( _rObjectNameCheck )
 198              ,m_nType(CommandType::COMMAND)
 199              ,m_nFlags(_nFlags)
 200 {
 201     m_aCatalog.SetDropDownLineCount( 10 );
 202     m_aSchema.SetDropDownLineCount( 10 );
 203 }
 204
 205 // -----------------------------------------------------------------------------
 206 using namespace ::com::sun::star::lang;
 207
 208 //==================================================================
 209 namespace
 210 {
 211     typedef Reference< XResultSet > (SAL_CALL XDatabaseMetaData::*FGetMetaStrings)();
 212
 213     void lcl_fillComboList( ComboBox& _rList, const Reference< XConnection >& _rxConnection,
 214         FGetMetaStrings _GetAll, const ::rtl::OUString& _rCurrent )
 215     {
 216         try
 217         {
 218             Reference< XDatabaseMetaData > xMetaData( _rxConnection->getMetaData(), UNO_QUERY_THROW );
 219
 220             Reference< XResultSet > xRes = (xMetaData.get()->*_GetAll)();
 221             Reference< XRow > xRow( xRes, UNO_QUERY_THROW );
 222             ::rtl::OUString sValue;
 223             while ( xRes->next() )
 224             {
 225                 sValue = xRow->getString( 1 );
 226                 if ( !xRow->wasNull() )
 227                     _rList.InsertEntry( sValue );
 228             }
 229
 230             USHORT nPos = _rList.GetEntryPos( String( _rCurrent ) );
 231             if ( nPos != COMBOBOX_ENTRY_NOTFOUND )
 232                 _rList.SelectEntryPos( nPos );
 233             else
 234                 _rList.SelectEntryPos( 0 );
 235         }
 236         catch( const Exception& )
 237         {
 238             DBG_UNHANDLED_EXCEPTION();
 239         }
 240     }
 241 }
 242
 243 //==================================================================
 244 OSaveAsDlg::OSaveAsDlg( Window * pParent,
 245                         const sal_Int32& _rType,
 246                         const Reference< XMultiServiceFactory >& _rxORB,
 247                         const Reference< XConnection>& _xConnection,
 248                         const String& rDefault,
 249                         const IObjectNameCheck& _rObjectNameCheck,
 250                         sal_Int32 _nFlags)
 251     :ModalDialog( pParent, ModuleRes(DLG_SAVE_AS))
 252     ,m_xORB( _rxORB )
 253 {
 254     m_pImpl = new OSaveAsDlgImpl(this,_rType,_xConnection,rDefault,_rObjectNameCheck,_nFlags);
 255
 256     switch (_rType)
 257     {
 258         case CommandType::QUERY:
 259             implInitOnlyTitle(m_pImpl->m_aQryLabel);
 260             break;
 261
 262         case CommandType::TABLE:
 263             OSL_ENSURE( m_pImpl->m_xMetaData.is(), "OSaveAsDlg::OSaveAsDlg: no meta data for entering table names: this will crash!" );
 264             {
 265                 m_pImpl->m_aLabel.SetText(m_pImpl->m_sTblLabel);
 266                 Point aPos(m_pImpl->m_aPB_OK.GetPosPixel());
 267                 if(m_pImpl->m_xMetaData.is() && !m_pImpl->m_xMetaData->supportsCatalogsInTableDefinitions())
 268                 {
 269                     m_pImpl->m_aCatalogLbl.Hide();
 270                     m_pImpl->m_aCatalog.Hide();
 271
 272                     aPos = m_pImpl->m_aLabel.GetPosPixel();
 273
 274                     m_pImpl->m_aLabel.SetPosPixel(m_pImpl->m_aSchemaLbl.GetPosPixel());
 275                     m_pImpl->m_aTitle.SetPosPixel(m_pImpl->m_aSchema.GetPosPixel());
 276
 277                     m_pImpl->m_aSchemaLbl.SetPosPixel(m_pImpl->m_aCatalogLbl.GetPosPixel());
 278                     m_pImpl->m_aSchema.SetPosPixel(m_pImpl->m_aCatalog.GetPosPixel());
 279                 }
 280                 else
 281                 {
 282                     // now fill the catalogs
 283                     lcl_fillComboList( m_pImpl->m_aCatalog, _xConnection,
 284                         &XDatabaseMetaData::getCatalogs, _xConnection->getCatalog() );
 285                 }
 286
 287                 if ( !m_pImpl->m_xMetaData->supportsSchemasInTableDefinitions())
 288                 {
 289                     m_pImpl->m_aSchemaLbl.Hide();
 290                     m_pImpl->m_aSchema.Hide();
 291
 292                     aPos = m_pImpl->m_aLabel.GetPosPixel();
 293
 294                     m_pImpl->m_aLabel.SetPosPixel(m_pImpl->m_aSchemaLbl.GetPosPixel());
 295                     m_pImpl->m_aTitle.SetPosPixel(m_pImpl->m_aSchema.GetPosPixel());
 296                 }
 297                 else
 298                 {
 299                     lcl_fillComboList( m_pImpl->m_aSchema, _xConnection,
 300                         &XDatabaseMetaData::getSchemas, m_pImpl->m_xMetaData->getUserName() );
 301                 }
 302
 303                 OSL_ENSURE(m_pImpl->m_xMetaData.is(),"The metadata can not be null!");
 304                 if(m_pImpl->m_aName.Search('.') != STRING_NOTFOUND)
 305                 {
 306                     ::rtl::OUString sCatalog,sSchema,sTable;
 307                     ::dbtools::qualifiedNameComponents(m_pImpl->m_xMetaData,
 308                                                         m_pImpl->m_aName,
 309                                                         sCatalog,
 310                                                         sSchema,
 311                                                         sTable,
 312                                                         ::dbtools::eInDataManipulation);
 313
 314                     USHORT nPos = m_pImpl->m_aCatalog.GetEntryPos(String(sCatalog));
 315                     if ( nPos != COMBOBOX_ENTRY_NOTFOUND )
 316                         m_pImpl->m_aCatalog.SelectEntryPos(nPos);
 317
 318                     if ( sSchema.getLength() )
 319                     {
 320                         nPos = m_pImpl->m_aSchema.GetEntryPos(String(sSchema));
 321                         if ( nPos != COMBOBOX_ENTRY_NOTFOUND )
 322                             m_pImpl->m_aSchema.SelectEntryPos(nPos);
 323                     }
 324                     m_pImpl->m_aTitle.SetText(sTable);
 325                 }
 326                 else
 327                     m_pImpl->m_aTitle.SetText(m_pImpl->m_aName);
 328
 329                 m_pImpl->m_aPB_OK.SetPosPixel(Point(m_pImpl->m_aPB_OK.GetPosPixel().X(),aPos.Y()));
 330                 m_pImpl->m_aPB_CANCEL.SetPosPixel(Point(m_pImpl->m_aPB_CANCEL.GetPosPixel().X(),aPos.Y()));
 331                 m_pImpl->m_aPB_HELP.SetPosPixel(Point(m_pImpl->m_aPB_HELP.GetPosPixel().X(),aPos.Y()));
 332
 333                 USHORT nLength =  m_pImpl->m_xMetaData.is() ? static_cast<USHORT>(m_pImpl->m_xMetaData->getMaxTableNameLength()) : 0;
 334                 nLength = nLength ? nLength : EDIT_NOLIMIT;
 335
 336                 m_pImpl->m_aTitle.SetMaxTextLen(nLength);
 337                 m_pImpl->m_aSchema.SetMaxTextLen(nLength);
 338                 m_pImpl->m_aCatalog.SetMaxTextLen(nLength);
 339
 340                 sal_Bool bCheck = _xConnection.is() && isSQL92CheckEnabled(_xConnection);
 341                 m_pImpl->m_aTitle.setCheck(bCheck); // enable non valid sql chars as well
 342                 m_pImpl->m_aSchema.setCheck(bCheck); // enable non valid sql chars as well
 343                 m_pImpl->m_aCatalog.setCheck(bCheck); // enable non valid sql chars as well
 344
 345                 Size aSize = GetSizePixel();
 346                 aSize.Height() =
 347                     aPos.Y() + m_pImpl->m_aPB_OK.GetSizePixel().Height() + m_pImpl->m_aTitle.GetSizePixel().Height() / 2;
 348                 SetSizePixel(aSize);
 349             }
 350             break;
 351
 352         default:
 353             OSL_ENSURE( false, "OSaveAsDlg::OSaveAsDlg: Type not supported yet!" );
 354     }
 355
 356     implInit();
 357 }
 358 // -----------------------------------------------------------------------------
 359 OSaveAsDlg::OSaveAsDlg( Window * pParent,
 360                         const Reference< XMultiServiceFactory >& _rxORB,
 361                         const String& rDefault,
 362                         const String& _sLabel,
 363                         const IObjectNameCheck& _rObjectNameCheck,
 364                         sal_Int32 _nFlags)
 365              :ModalDialog( pParent, ModuleRes(DLG_SAVE_AS))
 366              ,m_xORB( _rxORB )
 367 {
 368     m_pImpl = new OSaveAsDlgImpl(this,rDefault,_rObjectNameCheck,_nFlags);
 369     implInitOnlyTitle(_sLabel);
 370     implInit();
 371 }
 372 // -----------------------------------------------------------------------------
 373 OSaveAsDlg::~OSaveAsDlg()
 374 {
 375     DELETEZ(m_pImpl);
 376 }
 377 // -----------------------------------------------------------------------------
 378 IMPL_LINK(OSaveAsDlg, ButtonClickHdl, Button *, pButton)
 379 {
 380     if (pButton == &m_pImpl->m_aPB_OK)
 381     {
 382         m_pImpl->m_aName = m_pImpl->m_aTitle.GetText();
 383
 384         ::rtl::OUString sNameToCheck( m_pImpl->m_aName );
 385
 386         if ( m_pImpl->m_nType == CommandType::TABLE )
 387         {
 388             sNameToCheck = ::dbtools::composeTableName(
 389                 m_pImpl->m_xMetaData,
 390                 getCatalog(),
 391                 getSchema(),
 392                 sNameToCheck,
 393                 sal_False,  // no quoting
 394                 ::dbtools::eInDataManipulation
 395             );
 396         }
 397
 398         SQLExceptionInfo aNameError;
 399         if ( m_pImpl->m_rObjectNameCheck.isNameValid( sNameToCheck, aNameError ) )
 400             EndDialog( RET_OK );
 401
 402         showError( aNameError, this, m_xORB );
 403         m_pImpl->m_aTitle.GrabFocus();
 404     }
 405     return 0;
 406 }
 407 // -----------------------------------------------------------------------------
 408
 409 IMPL_LINK(OSaveAsDlg, EditModifyHdl, Edit *, pEdit )
 410 {
 411     if (pEdit == &m_pImpl->m_aTitle)
 412         m_pImpl->m_aPB_OK.Enable(0 != m_pImpl->m_aTitle.GetText().Len());
 413     return 0;
 414 }
 415 // -----------------------------------------------------------------------------
 416 void OSaveAsDlg::implInitOnlyTitle(const String& _rLabel)
 417 {
 418     m_pImpl->m_aLabel.SetText(_rLabel);
 419     m_pImpl->m_aCatalogLbl.Hide();
 420     m_pImpl->m_aCatalog.Hide();
 421     m_pImpl->m_aSchemaLbl.Hide();
 422     m_pImpl->m_aSchema.Hide();
 423
 424     Point aPos(m_pImpl->m_aSchemaLbl.GetPosPixel());
 425     m_pImpl->m_aLabel.SetPosPixel(m_pImpl->m_aCatalogLbl.GetPosPixel());
 426     m_pImpl->m_aTitle.SetPosPixel(m_pImpl->m_aCatalog.GetPosPixel());
 427
 428     m_pImpl->m_aPB_OK.SetPosPixel(Point(m_pImpl->m_aPB_OK.GetPosPixel().X(),aPos.Y()));
 429     m_pImpl->m_aPB_CANCEL.SetPosPixel(Point(m_pImpl->m_aPB_CANCEL.GetPosPixel().X(),aPos.Y()));
 430     m_pImpl->m_aPB_HELP.SetPosPixel(Point(m_pImpl->m_aPB_HELP.GetPosPixel().X(),aPos.Y()));
 431
 432     sal_Int32 nNewHeight =
 433         aPos.Y() + m_pImpl->m_aPB_OK.GetSizePixel().Height() + m_pImpl->m_aTitle.GetSizePixel().Height() / 2;
 434
 435     SetSizePixel(Size(GetSizePixel().Width(), nNewHeight));
 436
 437     m_pImpl->m_aTitle.SetText(m_pImpl->m_aName);
 438     m_pImpl->m_aTitle.setCheck(sal_False); // enable non valid sql chars as well
 439 }
 440 // -----------------------------------------------------------------------------
 441 void OSaveAsDlg::implInit()
 442 {
 443     if ( 0 == ( m_pImpl->m_nFlags & SAD_ADDITIONAL_DESCRIPTION ) )
 444     {
 445         // hide the description window
 446         m_pImpl->m_aDescription.Hide();
 447
 448         // the number of pixels we have to move the other controls
 449         sal_Int32 nMoveUp = m_pImpl->m_aCatalog.GetPosPixel().Y() - m_pImpl->m_aDescription.GetPosPixel().Y();
 450
 451         // loop to all controls and move them ...
 452         for     (       Window* pChildControl = GetWindow( WINDOW_FIRSTCHILD );
 453                 pChildControl;
 454                 pChildControl= pChildControl->GetWindow( WINDOW_NEXT )
 455             )
 456         {
 457             if ( &m_pImpl->m_aDescription != pChildControl )
 458             {
 459                 Point aPos = pChildControl->GetPosPixel();
 460                 aPos.Y() -= nMoveUp;
 461                 pChildControl->SetPosPixel(aPos);
 462             }
 463         }
 464
 465         // change our own size accordingly
 466         Size aSize = GetSizePixel();
 467         aSize.Height() -= nMoveUp;
 468         SetSizePixel(aSize);
 469     }
 470
 471     if ( SAD_TITLE_PASTE_AS == ( m_pImpl->m_nFlags & SAD_TITLE_PASTE_AS ) )
 472         SetText( String( ModuleRes( STR_TITLE_PASTE_AS ) ) );
 473     else if ( SAD_TITLE_RENAME == ( m_pImpl->m_nFlags & SAD_TITLE_RENAME ) )
 474     {
 475         SetText( String( ModuleRes( STR_TITLE_RENAME ) ) );
 476         m_pImpl->m_aTitle.SetHelpId(HID_DLG_RENAME);
 477     }
 478
 479     m_pImpl->m_aPB_OK.SetClickHdl(LINK(this,OSaveAsDlg,ButtonClickHdl));
 480     m_pImpl->m_aTitle.SetModifyHdl(LINK(this,OSaveAsDlg,EditModifyHdl));
 481     m_pImpl->m_aTitle.GrabFocus();
 482     FreeResource();
 483 }
 484 // -----------------------------------------------------------------------------
 485 String OSaveAsDlg::getName() const              { return m_pImpl->m_aName; }
 486 String OSaveAsDlg::getCatalog() const   { return m_pImpl->m_aCatalog.IsVisible() ? m_pImpl->m_aCatalog.GetText() : String(); }
 487 String OSaveAsDlg::getSchema() const    { return m_pImpl->m_aSchema.IsVisible() ? m_pImpl->m_aSchema.GetText() : String(); }
 488