2000-09-18 15:18:56 +00:00
/*************************************************************************
*
* $ RCSfile : AKeys . cxx , v $
*
2001-05-18 07:51:34 +00:00
* $ Revision : 1.8 $
2000-09-18 15:18:56 +00:00
*
2001-05-18 07:51:34 +00:00
* last change : $ Author : oj $ $ Date : 2001 - 05 - 18 08 : 48 : 07 $
2000-09-18 15:18:56 +00:00
*
* 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 ) : _______________________________________
*
*
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
# ifndef _CONNECTIVITY_ADO_KEYS_HXX_
# include "ado/AKeys.hxx"
# endif
# ifndef _CONNECTIVITY_ADO_INDEX_HXX_
# include "ado/AKey.hxx"
# endif
# ifndef _COM_SUN_STAR_SDBC_XROW_HPP_
# include <com/sun/star/sdbc/XRow.hpp>
# endif
# ifndef _COM_SUN_STAR_SDBC_XRESULTSET_HPP_
# include <com/sun/star/sdbc/XResultSet.hpp>
# endif
# ifndef _COM_SUN_STAR_SDBCX_KEYTYPE_HPP_
# include <com/sun/star/sdbcx/KeyType.hpp>
# endif
# ifndef _COM_SUN_STAR_SDBC_KEYRULE_HPP_
# include <com/sun/star/sdbc/KeyRule.hpp>
# endif
2001-05-14 10:42:44 +00:00
# ifndef CONNECTIVITY_CONNECTION_HXX
# include "TConnection.hxx"
2000-09-18 15:18:56 +00:00
# endif
2001-05-18 07:51:34 +00:00
# ifndef _COMPHELPER_TYPES_HXX_
# include <comphelper/types.hxx>
# endif
2001-05-14 10:42:44 +00:00
2001-05-18 07:51:34 +00:00
using namespace : : comphelper ;
2001-05-14 10:42:44 +00:00
using namespace connectivity ;
2000-09-18 15:18:56 +00:00
using namespace connectivity : : ado ;
using namespace com : : sun : : star : : uno ;
using namespace com : : sun : : star : : lang ;
using namespace com : : sun : : star : : beans ;
using namespace com : : sun : : star : : sdbc ;
using namespace com : : sun : : star : : container ;
typedef connectivity : : sdbcx : : OCollection OCollection_TYPE ;
Reference < XNamed > OKeys : : createObject ( const : : rtl : : OUString & _rName )
{
ADOKey * pKey = NULL ;
m_pCollection - > get_Item ( OLEVariant ( _rName ) , & pKey ) ;
2001-04-12 11:33:30 +00:00
Reference < XNamed > xRet = new OAdoKey ( isCaseSensitive ( ) , m_pConnection , pKey ) ;
2000-09-18 15:18:56 +00:00
return xRet ;
}
// -------------------------------------------------------------------------
void OKeys : : impl_refresh ( ) throw ( RuntimeException )
{
m_pCollection - > Refresh ( ) ;
}
// -------------------------------------------------------------------------
Reference < XPropertySet > OKeys : : createEmptyObject ( )
{
2001-04-12 11:33:30 +00:00
OAdoKey * pNew = new OAdoKey ( isCaseSensitive ( ) , m_pConnection ) ;
2000-09-18 15:18:56 +00:00
return pNew ;
}
// -------------------------------------------------------------------------
// XAppend
void SAL_CALL OKeys : : appendByDescriptor ( const Reference < XPropertySet > & descriptor ) throw ( SQLException , ElementExistException , RuntimeException )
{
: : osl : : MutexGuard aGuard ( m_rMutex ) ;
2000-11-03 13:21:22 +00:00
Reference < : : com : : sun : : star : : lang : : XUnoTunnel > xTunnel ( descriptor , UNO_QUERY ) ;
2000-09-18 15:18:56 +00:00
if ( xTunnel . is ( ) )
{
2000-11-03 13:21:22 +00:00
OAdoKey * pKey = ( OAdoKey * ) xTunnel - > getSomething ( OAdoKey : : getUnoTunnelImplementationId ( ) ) ;
2001-04-12 11:33:30 +00:00
if ( pKey )
{
// To pass as column parameter to Key's Apppend method
OLEVariant vOptional ;
vOptional . vt = VT_ERROR ;
vOptional . scode = DISP_E_PARAMNOTFOUND ;
2000-09-18 15:18:56 +00:00
2001-05-14 10:42:44 +00:00
m_pCollection - > Append ( OLEVariant ( pKey - > getImpl ( ) ) , ( KeyTypeEnum ) getINT32 ( descriptor - > getPropertyValue ( OMetaConnection : : getPropMap ( ) . getNameByIndex ( PROPERTY_ID_TYPE ) ) ) , vOptional ) ;
2001-04-12 11:33:30 +00:00
}
else
2001-05-14 10:42:44 +00:00
throw SQLException ( : : rtl : : OUString : : createFromAscii ( " Could not append key! " ) , * this , OMetaConnection : : getPropMap ( ) . getNameByIndex ( PROPERTY_ID_HY0000 ) , 1000 , Any ( ) ) ;
2000-09-18 15:18:56 +00:00
}
OCollection_TYPE : : appendByDescriptor ( descriptor ) ;
}
// -------------------------------------------------------------------------
// XDrop
void SAL_CALL OKeys : : dropByName ( const : : rtl : : OUString & elementName ) throw ( SQLException , NoSuchElementException , RuntimeException )
{
: : osl : : MutexGuard aGuard ( m_rMutex ) ;
m_pCollection - > Delete ( OLEVariant ( elementName ) ) ;
OCollection_TYPE : : dropByName ( elementName ) ;
}
// -------------------------------------------------------------------------
void SAL_CALL OKeys : : dropByIndex ( sal_Int32 index ) throw ( SQLException , IndexOutOfBoundsException , RuntimeException )
{
: : osl : : MutexGuard aGuard ( m_rMutex ) ;
if ( index < 0 | | index > = getCount ( ) )
2001-03-30 13:08:05 +00:00
throw IndexOutOfBoundsException ( : : rtl : : OUString : : valueOf ( index ) , * this ) ;
2000-09-18 15:18:56 +00:00
m_pCollection - > Delete ( OLEVariant ( index ) ) ;
OCollection_TYPE : : dropByIndex ( index ) ;
}
2000-11-03 13:21:22 +00:00
// -----------------------------------------------------------------------------
2000-09-18 15:18:56 +00:00