xref: /AOO41X/main/connectivity/source/drivers/adabas/BIndexColumns.cxx (revision 9b5730f6ddef7eb82608ca4d31dc0d7678e652cf)
1*9b5730f6SAndrew Rist /**************************************************************
2cdf0e10cSrcweir  *
3*9b5730f6SAndrew Rist  * Licensed to the Apache Software Foundation (ASF) under one
4*9b5730f6SAndrew Rist  * or more contributor license agreements.  See the NOTICE file
5*9b5730f6SAndrew Rist  * distributed with this work for additional information
6*9b5730f6SAndrew Rist  * regarding copyright ownership.  The ASF licenses this file
7*9b5730f6SAndrew Rist  * to you under the Apache License, Version 2.0 (the
8*9b5730f6SAndrew Rist  * "License"); you may not use this file except in compliance
9*9b5730f6SAndrew Rist  * with the License.  You may obtain a copy of the License at
10cdf0e10cSrcweir  *
11*9b5730f6SAndrew Rist  *   http://www.apache.org/licenses/LICENSE-2.0
12cdf0e10cSrcweir  *
13*9b5730f6SAndrew Rist  * Unless required by applicable law or agreed to in writing,
14*9b5730f6SAndrew Rist  * software distributed under the License is distributed on an
15*9b5730f6SAndrew Rist  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*9b5730f6SAndrew Rist  * KIND, either express or implied.  See the License for the
17*9b5730f6SAndrew Rist  * specific language governing permissions and limitations
18*9b5730f6SAndrew Rist  * under the License.
19cdf0e10cSrcweir  *
20*9b5730f6SAndrew Rist  *************************************************************/
21*9b5730f6SAndrew Rist 
22*9b5730f6SAndrew Rist 
23cdf0e10cSrcweir 
24cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove
25cdf0e10cSrcweir #include "precompiled_connectivity.hxx"
26cdf0e10cSrcweir 
27cdf0e10cSrcweir #ifndef _CONNECTIVITY_ADABAS_INDEXCOLUMNS_HXX_
28cdf0e10cSrcweir #include "adabas/BIndexColumns.hxx"
29cdf0e10cSrcweir #endif
30cdf0e10cSrcweir #include "connectivity/sdbcx/VIndexColumn.hxx"
31cdf0e10cSrcweir #include <com/sun/star/sdbc/XRow.hpp>
32cdf0e10cSrcweir #include <com/sun/star/sdbc/XResultSet.hpp>
33cdf0e10cSrcweir #include <com/sun/star/sdbc/DataType.hpp>
34cdf0e10cSrcweir #include <com/sun/star/sdbc/ColumnValue.hpp>
35cdf0e10cSrcweir #include "adabas/BTable.hxx"
36cdf0e10cSrcweir #include "adabas/BCatalog.hxx"
37cdf0e10cSrcweir #include <comphelper/types.hxx>
38cdf0e10cSrcweir #include <comphelper/property.hxx>
39cdf0e10cSrcweir 
40cdf0e10cSrcweir using namespace connectivity::adabas;
41cdf0e10cSrcweir using namespace connectivity::sdbcx;
42cdf0e10cSrcweir using namespace ::com::sun::star::uno;
43cdf0e10cSrcweir using namespace ::com::sun::star::beans;
44cdf0e10cSrcweir //	using namespace ::com::sun::star::sdbcx;
45cdf0e10cSrcweir using namespace ::com::sun::star::sdbc;
46cdf0e10cSrcweir using namespace ::com::sun::star::container;
47cdf0e10cSrcweir using namespace ::com::sun::star::lang;
48cdf0e10cSrcweir // -------------------------------------------------------------------------
createObject(const::rtl::OUString & _rName)49cdf0e10cSrcweir ObjectType OIndexColumns::createObject(const ::rtl::OUString& _rName)
50cdf0e10cSrcweir {
51cdf0e10cSrcweir 
52cdf0e10cSrcweir 	Reference< XResultSet > xResult = m_pIndex->getTable()->getConnection()->getMetaData()->getIndexInfo(Any(),
53cdf0e10cSrcweir 					m_pIndex->getTable()->getSchema(),m_pIndex->getTable()->getTableName(),sal_False,sal_False);
54cdf0e10cSrcweir 
55cdf0e10cSrcweir 	sal_Bool bAsc = sal_True;
56cdf0e10cSrcweir 	if(xResult.is())
57cdf0e10cSrcweir 	{
58cdf0e10cSrcweir                 Reference< XRow > xRow(xResult,UNO_QUERY);
59cdf0e10cSrcweir 		::rtl::OUString aD(::rtl::OUString::createFromAscii("D"));
60cdf0e10cSrcweir 		while(xResult->next())
61cdf0e10cSrcweir 		{
62cdf0e10cSrcweir 			if(xRow->getString(9) == _rName)
63cdf0e10cSrcweir 				bAsc = xRow->getString(10) != aD;
64cdf0e10cSrcweir 		}
65cdf0e10cSrcweir 		::comphelper::disposeComponent(xResult);
66cdf0e10cSrcweir 	}
67cdf0e10cSrcweir 
68cdf0e10cSrcweir 	xResult = m_pIndex->getTable()->getConnection()->getMetaData()->getColumns(Any(),
69cdf0e10cSrcweir 			m_pIndex->getTable()->getSchema(),m_pIndex->getTable()->getTableName(),_rName);
70cdf0e10cSrcweir 
71cdf0e10cSrcweir     ObjectType xRet = NULL;
72cdf0e10cSrcweir 	if(xResult.is())
73cdf0e10cSrcweir 	{
74cdf0e10cSrcweir                 Reference< XRow > xRow(xResult,UNO_QUERY);
75cdf0e10cSrcweir 		while(xResult->next())
76cdf0e10cSrcweir 		{
77cdf0e10cSrcweir 			if(xRow->getString(4) == _rName)
78cdf0e10cSrcweir 			{
79cdf0e10cSrcweir 				sal_Int32 nType				= xRow->getInt(5);
80cdf0e10cSrcweir 				::rtl::OUString sTypeName	= xRow->getString(6);
81cdf0e10cSrcweir 				sal_Int32 nPrec				= xRow->getInt(7);
82cdf0e10cSrcweir 				OAdabasCatalog::correctColumnProperties(nPrec,nType,sTypeName);
83cdf0e10cSrcweir 
84cdf0e10cSrcweir 				OIndexColumn* pRet = new OIndexColumn(bAsc,
85cdf0e10cSrcweir 													_rName,
86cdf0e10cSrcweir 													sTypeName,
87cdf0e10cSrcweir 													xRow->getString(13),
88cdf0e10cSrcweir 													xRow->getInt(11),
89cdf0e10cSrcweir 													nPrec,
90cdf0e10cSrcweir 													xRow->getInt(9),
91cdf0e10cSrcweir 													nType,
92cdf0e10cSrcweir 													sal_False,sal_False,sal_False,sal_True);
93cdf0e10cSrcweir 				xRet = pRet;
94cdf0e10cSrcweir 				break;
95cdf0e10cSrcweir 			}
96cdf0e10cSrcweir 		}
97cdf0e10cSrcweir 		::comphelper::disposeComponent(xResult);
98cdf0e10cSrcweir 	}
99cdf0e10cSrcweir 
100cdf0e10cSrcweir 	return xRet;
101cdf0e10cSrcweir }
102cdf0e10cSrcweir // -------------------------------------------------------------------------
createDescriptor()103cdf0e10cSrcweir Reference< XPropertySet > OIndexColumns::createDescriptor()
104cdf0e10cSrcweir {
105cdf0e10cSrcweir 	return new OIndexColumn(sal_True);
106cdf0e10cSrcweir }
107cdf0e10cSrcweir // -----------------------------------------------------------------------------
impl_refresh()108cdf0e10cSrcweir void OIndexColumns::impl_refresh() throw(::com::sun::star::uno::RuntimeException)
109cdf0e10cSrcweir {
110cdf0e10cSrcweir 	m_pIndex->refreshColumns();
111cdf0e10cSrcweir }
112cdf0e10cSrcweir // -----------------------------------------------------------------------------
appendObject(const::rtl::OUString &,const Reference<XPropertySet> & descriptor)113cdf0e10cSrcweir ObjectType OIndexColumns::appendObject( const ::rtl::OUString& /*_rForName*/, const Reference< XPropertySet >& descriptor )
114cdf0e10cSrcweir {
115cdf0e10cSrcweir     return cloneDescriptor( descriptor );
116cdf0e10cSrcweir }
117cdf0e10cSrcweir // -----------------------------------------------------------------------------
118cdf0e10cSrcweir 
119cdf0e10cSrcweir 
120cdf0e10cSrcweir 
121