office-gobmx/extensions/source/propctrlr/formlinkdialog.cxx
Kurt Zenker 70478ecb77 INTEGRATION: CWS rptchart01_DEV300 (1.12.14); FILE MERGED
2008/02/20 10:43:09 oj 1.12.14.4: i85225 handle para strings
2008/02/19 07:27:09 oj 1.12.14.3: #i85225# allow strings as arguments
2008/01/31 11:38:34 oj 1.12.14.2: small compile errors
2008/01/31 09:37:43 oj 1.12.14.1: separate formlink dialog into uno dialog
2008-03-05 16:10:28 +00:00

715 lines
28 KiB
C++

/*************************************************************************
*
* OpenOffice.org - a multi-platform office productivity suite
*
* $RCSfile: formlinkdialog.cxx,v $
*
* $Revision: 1.13 $
*
* last change: $Author: kz $ $Date: 2008-03-05 17:10:28 $
*
* The Contents of this file are made available subject to
* the terms of GNU Lesser General Public License Version 2.1.
*
*
* GNU Lesser General Public License Version 2.1
* =============================================
* Copyright 2005 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
*
************************************************************************/
// MARKER(update_precomp.py): autogen include statement, do not remove
#include "precompiled_extensions.hxx"
#include "formlinkdialog.hxx"
#include "formlinkdialog.hrc"
#ifndef _EXTENSIONS_PROPCTRLR_MODULEPRC_HXX_
#include "modulepcr.hxx"
#endif
#ifndef _EXTENSIONS_FORMCTRLR_PROPRESID_HRC_
#include "formresid.hrc"
#endif
#ifndef _EXTENSIONS_FORMSCTRLR_FORMSTRINGS_HXX_
#include "formstrings.hxx"
#endif
#ifndef _SV_COMBOBOX_HXX
#include <vcl/combobox.hxx>
#endif
#ifndef _SV_MSGBOX_HXX
#include <vcl/msgbox.hxx>
#endif
#ifndef _SV_WAITOBJ_HXX
#include <vcl/waitobj.hxx>
#endif
#ifndef _SVTOOLS_LOCALRESACCESS_HXX_
#include <svtools/localresaccess.hxx>
#endif
#ifndef _CONNECTIVITY_DBTOOLS_HXX_
#include <connectivity/dbtools.hxx>
#endif
#ifndef _DBHELPER_DBEXCEPTION_HXX_
#include <connectivity/dbexception.hxx>
#endif
#ifndef _TOOLKIT_HELPER_VCLUNOHELPER_HXX_
#include <toolkit/helper/vclunohelper.hxx>
#endif
/** === begin UNO includes === **/
#ifndef _COM_SUN_STAR_SDBCX_XCOLUMNSSUPPLIER_HPP_
#include <com/sun/star/sdbcx/XColumnsSupplier.hpp>
#endif
#ifndef _COM_SUN_STAR_SDBCX_XKEYSSUPPLIER_HPP_
#include <com/sun/star/sdbcx/XKeysSupplier.hpp>
#endif
#include <com/sun/star/sdbcx/KeyType.hpp>
#ifndef _COM_SUN_STAR_CONTAINER_XNAMEACCESS_HPP_
#include <com/sun/star/container/XNameAccess.hpp>
#endif
#ifndef _COM_SUN_STAR_SDBCX_XTABLESSUPPLIER_HPP_
#include <com/sun/star/sdbcx/XTablesSupplier.hpp>
#endif
#ifndef _COM_SUN_STAR_SDBC_XROWSET_HPP_
#include <com/sun/star/sdbc/XRowSet.hpp>
#endif
#ifndef _COM_SUN_STAR_SDB_COMMANDTYPE_HPP_
#include <com/sun/star/sdb/CommandType.hpp>
#endif
#ifndef _COM_SUN_STAR_SDB_SQLCONTEXT_HPP_
#include <com/sun/star/sdb/SQLContext.hpp>
#endif
/** === end UNO includes === **/
//............................................................................
namespace pcr
{
//............................................................................
using namespace ::com::sun::star::uno;
using namespace ::com::sun::star::lang;
using namespace ::com::sun::star::form;
using namespace ::com::sun::star::sdb;
using namespace ::com::sun::star::sdbc;
using namespace ::com::sun::star::sdbcx;
using namespace ::com::sun::star::beans;
using namespace ::com::sun::star::container;
//========================================================================
//= FieldLinkRow
//========================================================================
class FieldLinkRow : public Window
{
private:
ComboBox m_aDetailColumn;
FixedText m_aEqualSign;
ComboBox m_aMasterColumn;
Link m_aLinkChangeHandler;
public:
FieldLinkRow( Window* _pParent, const ResId& _rId );
inline void SetLinkChangeHandler( const Link& _rHdl ) { m_aLinkChangeHandler = _rHdl; }
inline const Link& GetLinkChangeHandler( ) const { return m_aLinkChangeHandler; }
enum LinkParticipant
{
eDetailField,
eMasterField
};
/** retrieves the selected field name for either the master or the detail field
@return <TRUE/> if and only a valid field is selected
*/
bool GetFieldName( LinkParticipant _eWhich, String& /* [out] */ _rName ) const;
void SetFieldName( LinkParticipant _eWhich, const String& _rName );
void fillList( LinkParticipant _eWhich, const Sequence< ::rtl::OUString >& _rFieldNames );
private:
DECL_LINK( OnFieldNameChanged, ComboBox* );
};
//------------------------------------------------------------------------
FieldLinkRow::FieldLinkRow( Window* _pParent, const ResId& _rId )
:Window( _pParent, _rId )
,m_aDetailColumn( this, ResId( 1, *_rId.GetResMgr() ) )
,m_aEqualSign ( this, ResId( 1, *_rId.GetResMgr() ) )
,m_aMasterColumn( this, ResId( 2, *_rId.GetResMgr() ) )
{
FreeResource();
m_aDetailColumn.SetDropDownLineCount( 10 );
m_aMasterColumn.SetDropDownLineCount( 10 );
m_aDetailColumn.SetModifyHdl( LINK( this, FieldLinkRow, OnFieldNameChanged ) );
m_aMasterColumn.SetModifyHdl( LINK( this, FieldLinkRow, OnFieldNameChanged ) );
}
//------------------------------------------------------------------------
void FieldLinkRow::fillList( LinkParticipant _eWhich, const Sequence< ::rtl::OUString >& _rFieldNames )
{
ComboBox* pBox = ( _eWhich == eDetailField ) ? &m_aDetailColumn : &m_aMasterColumn;
const ::rtl::OUString* pFieldName = _rFieldNames.getConstArray();
const ::rtl::OUString* pFieldNameEnd = pFieldName + _rFieldNames.getLength();
for ( ; pFieldName != pFieldNameEnd; ++pFieldName )
pBox->InsertEntry( *pFieldName );
}
//------------------------------------------------------------------------
bool FieldLinkRow::GetFieldName( LinkParticipant _eWhich, String& /* [out] */ _rName ) const
{
const ComboBox* pBox = ( _eWhich == eDetailField ) ? &m_aDetailColumn : &m_aMasterColumn;
_rName = pBox->GetText();
return _rName.Len() != 0;
}
//------------------------------------------------------------------------
void FieldLinkRow::SetFieldName( LinkParticipant _eWhich, const String& _rName )
{
ComboBox* pBox = ( _eWhich == eDetailField ) ? &m_aDetailColumn : &m_aMasterColumn;
pBox->SetText( _rName );
}
//------------------------------------------------------------------------
IMPL_LINK( FieldLinkRow, OnFieldNameChanged, ComboBox*, /*_pBox*/ )
{
if ( m_aLinkChangeHandler.IsSet() )
return m_aLinkChangeHandler.Call( this );
return 0L;
}
//========================================================================
//= FormLinkDialog
//========================================================================
//------------------------------------------------------------------------
FormLinkDialog::FormLinkDialog( Window* _pParent, const Reference< XPropertySet >& _rxDetailForm,
const Reference< XPropertySet >& _rxMasterForm, const Reference< XMultiServiceFactory >& _rxORB,
const ::rtl::OUString& _sExplanation,
const ::rtl::OUString& _sDetailLabel,
const ::rtl::OUString& _sMasterLabel)
:ModalDialog( _pParent, PcrRes( RID_DLG_FORMLINKS ) )
,m_aExplanation( this, PcrRes( FT_EXPLANATION ) )
,m_aDetailLabel( this, PcrRes( FT_DETAIL_LABEL ) )
,m_aMasterLabel( this, PcrRes( FT_MASTER_LABEL ) )
,m_aRow1 ( new FieldLinkRow( this, PcrRes( 1 ) ) )
,m_aRow2 ( new FieldLinkRow( this, PcrRes( 2 ) ) )
,m_aRow3 ( new FieldLinkRow( this, PcrRes( 3 ) ) )
,m_aRow4 ( new FieldLinkRow( this, PcrRes( 4 ) ) )
,m_aOK ( this, PcrRes( PB_OK ) )
,m_aCancel ( this, PcrRes( PB_CANCEL ) )
,m_aHelp ( this, PcrRes( PB_HELP ) )
,m_aSuggest ( this, PcrRes( PB_SUGGEST ) )
,m_xORB ( _rxORB )
,m_xDetailForm( _rxDetailForm )
,m_xMasterForm( _rxMasterForm )
,m_sDetailLabel(_sDetailLabel)
,m_sMasterLabel(_sMasterLabel)
{
FreeResource();
if ( _sExplanation.getLength() )
m_aExplanation.SetText(_sExplanation);
m_aSuggest.SetClickHdl ( LINK( this, FormLinkDialog, OnSuggest ) );
m_aRow1->SetLinkChangeHandler( LINK( this, FormLinkDialog, OnFieldChanged ) );
m_aRow2->SetLinkChangeHandler( LINK( this, FormLinkDialog, OnFieldChanged ) );
m_aRow3->SetLinkChangeHandler( LINK( this, FormLinkDialog, OnFieldChanged ) );
m_aRow4->SetLinkChangeHandler( LINK( this, FormLinkDialog, OnFieldChanged ) );
PostUserEvent( LINK( this, FormLinkDialog, OnInitialize ) );
updateOkButton();
}
//------------------------------------------------------------------------
FormLinkDialog::~FormLinkDialog( )
{
}
//------------------------------------------------------------------------
void FormLinkDialog::commitLinkPairs()
{
// collect the field lists from the rows
::std::vector< ::rtl::OUString > aDetailFields; aDetailFields.reserve( 4 );
::std::vector< ::rtl::OUString > aMasterFields; aMasterFields.reserve( 4 );
const FieldLinkRow* aRows[] = {
m_aRow1.get(), m_aRow2.get(), m_aRow3.get(), m_aRow4.get()
};
for ( sal_Int32 i = 0; i < 4; ++i )
{
String sDetailField, sMasterField;
aRows[ i ]->GetFieldName( FieldLinkRow::eDetailField, sDetailField );
aRows[ i ]->GetFieldName( FieldLinkRow::eMasterField, sMasterField );
if ( !sDetailField.Len() && !sMasterField.Len() )
continue;
aDetailFields.push_back( sDetailField );
aMasterFields.push_back( sMasterField );
}
// and set as property values
try
{
Reference< XPropertySet > xDetailFormProps( m_xDetailForm, UNO_QUERY );
if ( xDetailFormProps.is() )
{
::rtl::OUString *pFields = aDetailFields.empty() ? 0 : &aDetailFields[0];
xDetailFormProps->setPropertyValue( PROPERTY_DETAILFIELDS, makeAny( Sequence< ::rtl::OUString >( pFields, aDetailFields.size() ) ) );
pFields = aMasterFields.empty() ? 0 : &aMasterFields[0];
xDetailFormProps->setPropertyValue( PROPERTY_MASTERFIELDS, makeAny( Sequence< ::rtl::OUString >( pFields, aMasterFields.size() ) ) );
}
}
catch( const Exception& )
{
OSL_ENSURE( sal_False, "FormLinkDialog::commitLinkPairs: caught an exception while setting the properties!" );
}
}
//------------------------------------------------------------------------
short FormLinkDialog::Execute()
{
short nResult = ModalDialog::Execute();
if ( RET_OK == nResult )
commitLinkPairs();
return nResult;
}
//------------------------------------------------------------------------
void FormLinkDialog::initializeFieldLists()
{
Sequence< ::rtl::OUString > sDetailFields;
getFormFields( m_xDetailForm, sDetailFields );
Sequence< ::rtl::OUString > sMasterFields;
getFormFields( m_xMasterForm, sMasterFields );
FieldLinkRow* aRows[] = {
m_aRow1.get(), m_aRow2.get(), m_aRow3.get(), m_aRow4.get()
};
for ( sal_Int32 i = 0; i < 4 ; ++i )
{
aRows[i]->fillList( FieldLinkRow::eDetailField, sDetailFields );
aRows[i]->fillList( FieldLinkRow::eMasterField, sMasterFields );
}
}
//------------------------------------------------------------------------
void FormLinkDialog::initializeColumnLabels()
{
// label for the detail form
String sDetailType = getFormDataSourceType( m_xDetailForm );
if ( !sDetailType.Len() )
{
if ( !m_sDetailLabel.getLength() )
{
::svt::OLocalResourceAccess aStringAccess( PcrRes( RID_DLG_FORMLINKS ), RSC_MODALDIALOG );
m_sDetailLabel = String( PcrRes( STR_DETAIL_FORM ) );
}
sDetailType = m_sDetailLabel;
}
m_aDetailLabel.SetText( sDetailType );
// label for the master form
String sMasterType = getFormDataSourceType( m_xMasterForm );
if ( !sMasterType.Len() )
{
if ( !m_sMasterLabel.getLength() )
{
::svt::OLocalResourceAccess aStringAccess( PcrRes( RID_DLG_FORMLINKS ), RSC_MODALDIALOG );
m_sMasterLabel = String( PcrRes( STR_MASTER_FORM ) );
}
sMasterType = m_sMasterLabel;
}
m_aMasterLabel.SetText( sMasterType );
}
//------------------------------------------------------------------------
void FormLinkDialog::initializeFieldRowsFrom( Sequence< ::rtl::OUString >& _rDetailFields, Sequence< ::rtl::OUString >& _rMasterFields )
{
// our UI does allow 4 fields max
_rDetailFields.realloc( 4 );
_rMasterFields.realloc( 4 );
const ::rtl::OUString* pDetailFields = _rDetailFields.getConstArray();
const ::rtl::OUString* pMasterFields = _rMasterFields.getConstArray();
FieldLinkRow* aRows[] = {
m_aRow1.get(), m_aRow2.get(), m_aRow3.get(), m_aRow4.get()
};
for ( sal_Int32 i = 0; i < 4; ++i, ++pDetailFields, ++pMasterFields )
{
aRows[ i ]->SetFieldName( FieldLinkRow::eDetailField, *pDetailFields );
aRows[ i ]->SetFieldName( FieldLinkRow::eMasterField, *pMasterFields );
}
}
//------------------------------------------------------------------------
void FormLinkDialog::initializeLinks()
{
try
{
Sequence< ::rtl::OUString > aDetailFields;
Sequence< ::rtl::OUString > aMasterFields;
Reference< XPropertySet > xDetailFormProps( m_xDetailForm, UNO_QUERY );
if ( xDetailFormProps.is() )
{
xDetailFormProps->getPropertyValue( PROPERTY_DETAILFIELDS ) >>= aDetailFields;
xDetailFormProps->getPropertyValue( PROPERTY_MASTERFIELDS ) >>= aMasterFields;
}
initializeFieldRowsFrom( aDetailFields, aMasterFields );
}
catch( const Exception& )
{
OSL_ENSURE( sal_False, "FormLinkDialog::initializeLinks: caught an exception!" );
}
}
//------------------------------------------------------------------------
void FormLinkDialog::updateOkButton()
{
// in all rows, there must be either two valid selections, or none at all
// If there is at least one row with exactly one valid selection, then the
// OKButton needs to be disabled
BOOL bEnable = TRUE;
const FieldLinkRow* aRows[] = {
m_aRow1.get(), m_aRow2.get(), m_aRow3.get(), m_aRow4.get()
};
for ( sal_Int32 i = 0; ( i < 4 ) && bEnable; ++i )
{
String sNotInterestedInRightNow;
if ( aRows[ i ]->GetFieldName( FieldLinkRow::eDetailField, sNotInterestedInRightNow )
!= aRows[ i ]->GetFieldName( FieldLinkRow::eMasterField, sNotInterestedInRightNow )
)
bEnable = FALSE;
}
m_aOK.Enable( bEnable );
}
//------------------------------------------------------------------------
String FormLinkDialog::getFormDataSourceType( const Reference< XPropertySet >& _rxForm ) const SAL_THROW(())
{
String sReturn;
Reference< XPropertySet > xFormProps( _rxForm, UNO_QUERY );
if ( !xFormProps.is() )
return sReturn;
try
{
sal_Int32 nCommandType = CommandType::COMMAND;
::rtl::OUString sCommand;
xFormProps->getPropertyValue( PROPERTY_COMMANDTYPE ) >>= nCommandType;
xFormProps->getPropertyValue( PROPERTY_COMMAND ) >>= sCommand;
if ( ( nCommandType == CommandType::TABLE )
|| ( nCommandType == CommandType::QUERY )
)
sReturn = sCommand;
}
catch( const Exception& )
{
OSL_ENSURE( sal_False, "FormLinkDialog::getFormDataSourceType: caught an exception!" );
}
return sReturn;
}
//------------------------------------------------------------------------
void FormLinkDialog::getFormFields( const Reference< XPropertySet >& _rxForm, Sequence< ::rtl::OUString >& /* [out] */ _rNames ) const SAL_THROW(( ))
{
_rNames.realloc( 0 );
::dbtools::SQLExceptionInfo aErrorInfo;
::rtl::OUString sCommand;
try
{
WaitObject aWaitCursor( const_cast< FormLinkDialog* >( this ) );
Reference< XPropertySet > xFormProps( _rxForm, UNO_QUERY );
OSL_ENSURE( xFormProps.is(), "FormLinkDialog::getFormFields: invalid form!" );
sal_Int32 nCommandType = CommandType::COMMAND;
xFormProps->getPropertyValue( PROPERTY_COMMANDTYPE ) >>= nCommandType;
xFormProps->getPropertyValue( PROPERTY_COMMAND ) >>= sCommand;
Reference< XConnection > xConnection;
ensureFormConnection( xFormProps, xConnection );
_rNames = ::dbtools::getFieldNamesByCommandDescriptor(
xConnection,
nCommandType,
sCommand,
&aErrorInfo
);
}
catch (const SQLContext& e) { aErrorInfo = e; }
catch (const SQLWarning& e) { aErrorInfo = e; }
catch (const SQLException& e ) { aErrorInfo = e; }
catch( const Exception& )
{
OSL_ENSURE( sal_False, "FormLinkDialog::getFormFields: caught a non-SQL exception!" );
}
if ( aErrorInfo.isValid() )
{
String sErrorMessage;
{
::svt::OLocalResourceAccess aStringAccess( PcrRes( RID_DLG_FORMLINKS ), RSC_MODALDIALOG );
sErrorMessage = String( PcrRes( STR_ERROR_RETRIEVING_COLUMNS) );
sErrorMessage.SearchAndReplace('#',sCommand);
}
SQLContext aContext;
aContext.Message = sErrorMessage;
aContext.NextException = aErrorInfo.get();
::dbtools::showError( aContext, VCLUnoHelper::GetInterface( const_cast< FormLinkDialog* >( this ) ), m_xORB );
}
}
//------------------------------------------------------------------------
void FormLinkDialog::ensureFormConnection( const Reference< XPropertySet >& _rxFormProps, Reference< XConnection >& /* [out] */ _rxConnection ) const SAL_THROW(( Exception ))
{
OSL_PRECOND( _rxFormProps.is(), "FormLinkDialog::ensureFormConnection: invalid form!" );
if ( !_rxFormProps.is() )
return;
if ( _rxFormProps->getPropertySetInfo()->hasPropertyByName(PROPERTY_ACTIVE_CONNECTION) )
_rxConnection.set(_rxFormProps->getPropertyValue(PROPERTY_ACTIVE_CONNECTION),UNO_QUERY);
if ( !_rxConnection.is() )
_rxConnection = ::dbtools::connectRowset( Reference< XRowSet >( _rxFormProps, UNO_QUERY ), m_xORB, sal_True );
}
//------------------------------------------------------------------------
void FormLinkDialog::getConnectionMetaData( const Reference< XPropertySet >& _rxFormProps, Reference< XDatabaseMetaData >& /* [out] */ _rxMeta ) const SAL_THROW(( Exception ))
{
if ( _rxFormProps.is() )
{
Reference< XConnection > xConnection;
if ( !::dbtools::isEmbeddedInDatabase( _rxFormProps, xConnection ) )
_rxFormProps->getPropertyValue( PROPERTY_ACTIVE_CONNECTION ) >>= xConnection;
if ( xConnection.is() )
_rxMeta = xConnection->getMetaData();
}
}
//------------------------------------------------------------------------
Reference< XPropertySet > FormLinkDialog::getCanonicUnderlyingTable( const Reference< XPropertySet >& _rxFormProps ) const
{
Reference< XPropertySet > xTable;
try
{
Reference< XTablesSupplier > xTablesInForm( ::dbtools::getCurrentSettingsComposer( _rxFormProps, m_xORB ), UNO_QUERY );
Reference< XNameAccess > xTables;
if ( xTablesInForm.is() )
xTables = xTablesInForm->getTables();
Sequence< ::rtl::OUString > aTableNames;
if ( xTables.is() )
aTableNames = xTables->getElementNames();
if ( aTableNames.getLength() == 1 )
{
xTables->getByName( aTableNames[ 0 ] ) >>= xTable;
OSL_ENSURE( xTable.is(), "FormLinkDialog::getCanonicUnderlyingTable: invalid table!" );
}
}
catch( const Exception& )
{
OSL_ENSURE( sal_False, "FormLinkDialog::getCanonicUnderlyingTable: caught an exception!" );
}
return xTable;
}
//------------------------------------------------------------------------
sal_Bool FormLinkDialog::getExistingRelation( const Reference< XPropertySet >& _rxLHS, const Reference< XPropertySet >& /*_rxRHS*/,
// TODO: fix the usage of _rxRHS. This is issue #i81956#.
Sequence< ::rtl::OUString >& _rLeftFields, Sequence< ::rtl::OUString >& _rRightFields ) const
{
try
{
Reference< XKeysSupplier > xSuppKeys( _rxLHS, UNO_QUERY );
Reference< XIndexAccess > xKeys;
if ( xSuppKeys.is() )
xKeys = xSuppKeys->getKeys();
if ( xKeys.is() )
{
Reference< XPropertySet > xKey;
Reference< XColumnsSupplier > xKeyColSupp( xKey, UNO_QUERY );
Reference< XIndexAccess > xKeyColumns;
Reference< XPropertySet > xKeyColumn;
::rtl::OUString sColumnName, sRelatedColumnName;
const sal_Int32 keyCount = xKeys->getCount();
for ( sal_Int32 key = 0; key < keyCount; ++key )
{
xKeys->getByIndex( key ) >>= xKey;
sal_Int32 nKeyType = 0;
xKey->getPropertyValue( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "Type" ) ) ) >>= nKeyType;
if ( nKeyType != KeyType::FOREIGN )
continue;
xKeyColumns.clear();
xKeyColSupp = xKeyColSupp.query( xKey );
if ( xKeyColSupp.is() )
xKeyColumns = xKeyColumns.query( xKeyColSupp->getColumns() );
OSL_ENSURE( xKeyColumns.is(), "FormLinkDialog::getExistingRelation: could not obtain the columns for the key!" );
if ( !xKeyColumns.is() )
continue;
const sal_Int32 columnCount = xKeyColumns->getCount();
_rLeftFields.realloc( columnCount );
_rRightFields.realloc( columnCount );
for ( sal_Int32 column = 0; column < columnCount; ++column )
{
xKeyColumn.clear();
xKeyColumns->getByIndex( column ) >>= xKeyColumn;
OSL_ENSURE( xKeyColumn.is(), "FormLinkDialog::getExistingRelation: invalid key column!" );
if ( xKeyColumn.is() )
{
xKeyColumn->getPropertyValue( PROPERTY_NAME ) >>= sColumnName;
xKeyColumn->getPropertyValue( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "RelatedColumn" ) ) ) >>= sRelatedColumnName;
_rLeftFields[ column ] = sColumnName;
_rRightFields[ column ] = sRelatedColumnName;
}
}
}
}
}
catch( const Exception& )
{
OSL_ENSURE( sal_False, "FormLinkDialog::getExistingRelation: caught an exception!" );
}
return ( _rLeftFields.getLength() > 0 ) && ( _rLeftFields[ 0 ].getLength() > 0 );
}
//------------------------------------------------------------------------
void FormLinkDialog::initializeSuggest()
{
Reference< XPropertySet > xDetailFormProps( m_xDetailForm, UNO_QUERY );
Reference< XPropertySet > xMasterFormProps( m_xMasterForm, UNO_QUERY );
if ( !xDetailFormProps.is() || !xMasterFormProps.is() )
return;
try
{
sal_Bool bEnable = sal_True;
// only show the button when both forms are based on the same data source
if ( bEnable )
{
::rtl::OUString sMasterDS, sDetailDS;
xMasterFormProps->getPropertyValue( PROPERTY_DATASOURCE ) >>= sMasterDS;
xDetailFormProps->getPropertyValue( PROPERTY_DATASOURCE ) >>= sDetailDS;
bEnable = ( sMasterDS == sDetailDS );
}
// only show the button when the connection supports relations
if ( bEnable )
{
Reference< XDatabaseMetaData > xMeta;
getConnectionMetaData( xDetailFormProps, xMeta );
OSL_ENSURE( xMeta.is(), "FormLinkDialog::initializeSuggest: unable to retrieve the meta data for the connection!" );
try
{
bEnable = xMeta.is() && xMeta->supportsIntegrityEnhancementFacility();
}
catch(const Exception&)
{
bEnable = sal_False;
}
}
// only enable the button if there is a "canonic" table underlying both forms
Reference< XPropertySet > xDetailTable, xMasterTable;
if ( bEnable )
{
xDetailTable = getCanonicUnderlyingTable( xDetailFormProps );
xMasterTable = getCanonicUnderlyingTable( xMasterFormProps );
bEnable = xDetailTable.is() && xMasterTable.is();
}
// only enable the button if there is a relation between both tables
m_aRelationDetailColumns.realloc( 0 );
m_aRelationMasterColumns.realloc( 0 );
if ( bEnable )
{
bEnable = getExistingRelation( xDetailTable, xMasterTable, m_aRelationDetailColumns, m_aRelationMasterColumns );
OSL_POSTCOND( m_aRelationMasterColumns.getLength() == m_aRelationDetailColumns.getLength(), "FormLinkDialog::initializeSuggest: nonsense!" );
if ( m_aRelationMasterColumns.getLength() == 0 )
{ // okay, there is no relation "pointing" (via a foreign key) from the detail table to the master table
// but perhaps the other way round (would make less sense, but who knows ...)
bEnable = getExistingRelation( xMasterTable, xDetailTable, m_aRelationMasterColumns, m_aRelationDetailColumns );
}
}
// only enable the button if the relation contains at most 4 field pairs
if ( bEnable )
{
bEnable = ( m_aRelationMasterColumns.getLength() <= 4 );
}
m_aSuggest.Enable( bEnable );
}
catch( const Exception& )
{
OSL_ENSURE( sal_False, "FormLinkDialog::initializeSuggest: caught an exception!" );
}
}
//------------------------------------------------------------------------
IMPL_LINK( FormLinkDialog, OnSuggest, void*, /*_pNotInterestedIn*/ )
{
initializeFieldRowsFrom( m_aRelationDetailColumns, m_aRelationMasterColumns );
return 0L;
}
//------------------------------------------------------------------------
IMPL_LINK( FormLinkDialog, OnFieldChanged, FieldLinkRow*, /*_pRow*/ )
{
updateOkButton();
return 0L;
}
//------------------------------------------------------------------------
IMPL_LINK( FormLinkDialog, OnInitialize, void*, /*_pNotInterestedIn*/ )
{
initializeColumnLabels();
initializeFieldLists();
initializeLinks();
initializeSuggest();
return 0L;
}
//............................................................................
} // namespace pcr
//............................................................................