update dev300-m58
[ooovba.git] / connectivity / source / drivers / ado / AKeyColumns.cxx
blobaa293ca0a5fe65c2727765beff0747691b51ddee
1 /*************************************************************************
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * Copyright 2008 by Sun Microsystems, Inc.
7 * OpenOffice.org - a multi-platform office productivity suite
9 * $RCSfile: AKeyColumns.cxx,v $
10 * $Revision: 1.8 $
12 * This file is part of OpenOffice.org.
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.
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).
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.
29 ************************************************************************/
31 // MARKER(update_precomp.py): autogen include statement, do not remove
32 #include "precompiled_connectivity.hxx"
33 #include "adabas/BKeyColumns.hxx"
34 #ifndef _CONNECTIVITY_ADABAS_KEYCOLUMN_HXX_
35 #include "adabas/BKeyColumn.hxx"
36 #endif
37 #include <com/sun/star/sdbc/XRow.hpp>
38 #include <com/sun/star/sdbc/XResultSet.hpp>
39 #include <com/sun/star/sdbc/DataType.hpp>
40 #include <com/sun/star/sdbc/ColumnValue.hpp>
41 #include "adabas/BTable.hxx"
43 using namespace connectivity::adabas;
44 // -------------------------------------------------------------------------
45 sdbcx::ObjectType OKeyColumns::createObject(const ::rtl::OUString& _rName)
48 Reference< starsdbc::XResultSet >
49 xResult = m_pTable->getConnection()->getMetaData()->getImportedKeys(Any(),
50 m_pTable->getSchema(),m_pTable->getName());
52 ::rtl::OUString aRefColumnName;
53 if(xResult.is())
55 Reference< starsdbc::XRow > xRow(xResult,UNO_QUERY);
56 while(xResult->next())
58 if(xRow->getString(8) == _rName)
60 aRefColumnName = xRow->getString(4);
61 break;
66 xResult = m_pTable->getConnection()->getMetaData()->getColumns(Any(),
67 m_pTable->getSchema(),m_pTable->getName(),_rName);
69 sdbcx::ObjectType xRet = NULL;
70 if(xResult.is())
72 Reference< starsdbc::XRow > xRow(xResult,UNO_QUERY);
73 if(xResult->next())
75 if(xRow->getString(4) == _rName)
77 OKeyColumn* pRet = new OKeyColumn(aRefColumnName,
78 _rName,
79 xRow->getString(6),
80 xRow->getString(13),
81 xRow->getInt(11),
82 xRow->getInt(7),
83 xRow->getInt(9),
84 xRow->getInt(5),
85 sal_False);
86 xRet = pRet;
91 return xRet;
93 // -------------------------------------------------------------------------
94 Reference< XPropertySet > OKeyColumns::createDescriptor()
96 OKeyColumn* pNew = new OKeyColumn();
97 return pNew;
99 // -------------------------------------------------------------------------