1 /************************************************************************* 2 * 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4 * 5 * Copyright 2000, 2010 Oracle and/or its affiliates. 6 * 7 * OpenOffice.org - a multi-platform office productivity suite 8 * 9 * This file is part of OpenOffice.org. 10 * 11 * OpenOffice.org is free software: you can redistribute it and/or modify 12 * it under the terms of the GNU Lesser General Public License version 3 13 * only, as published by the Free Software Foundation. 14 * 15 * OpenOffice.org is distributed in the hope that it will be useful, 16 * but WITHOUT ANY WARRANTY; without even the implied warranty of 17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18 * GNU Lesser General Public License version 3 for more details 19 * (a copy is included in the LICENSE file that accompanied this code). 20 * 21 * You should have received a copy of the GNU Lesser General Public License 22 * version 3 along with OpenOffice.org. If not, see 23 * <http://www.openoffice.org/license.html> 24 * for a copy of the LGPLv3 License. 25 * 26 ************************************************************************/ 27 28 // MARKER(update_precomp.py): autogen include statement, do not remove 29 #include "precompiled_connectivity.hxx" 30 #include "adabas/BGroups.hxx" 31 #include "adabas/BGroup.hxx" 32 #include "adabas/BTable.hxx" 33 #include <com/sun/star/sdbc/XRow.hpp> 34 #include <com/sun/star/sdbc/XResultSet.hpp> 35 #include <comphelper/types.hxx> 36 37 using namespace ::comphelper; 38 using namespace connectivity; 39 using namespace connectivity::adabas; 40 using namespace ::com::sun::star::uno; 41 using namespace ::com::sun::star::beans; 42 // using namespace ::com::sun::star::sdbcx; 43 using namespace ::com::sun::star::sdbc; 44 using namespace ::com::sun::star::container; 45 using namespace ::com::sun::star::lang; 46 typedef connectivity::sdbcx::OCollection OCollection_TYPE; 47 // ------------------------------------------------------------------------- 48 sdbcx::ObjectType OGroups::createObject(const ::rtl::OUString& _rName) 49 { 50 return new OAdabasGroup(m_pConnection,_rName); 51 } 52 // ------------------------------------------------------------------------- 53 void OGroups::impl_refresh() throw(RuntimeException) 54 { 55 m_pParent->refreshGroups(); 56 } 57 // ------------------------------------------------------------------------- 58 Reference< XPropertySet > OGroups::createDescriptor() 59 { 60 // OAdabasGroup* pNew = 61 return new OAdabasGroup(m_pConnection); 62 } 63 // ------------------------------------------------------------------------- 64 // XAppend 65 sdbcx::ObjectType OGroups::appendObject( const ::rtl::OUString& _rForName, const Reference< XPropertySet >& /*descriptor*/ ) 66 { 67 ::rtl::OUString aSql = ::rtl::OUString::createFromAscii("CREATE USERGROUP "); 68 ::rtl::OUString aQuote = m_pConnection->getMetaData()->getIdentifierQuoteString( ); 69 70 aSql = aSql + aQuote + _rForName + aQuote; 71 72 Reference< XStatement > xStmt = m_pConnection->createStatement( ); 73 xStmt->execute(aSql); 74 ::comphelper::disposeComponent(xStmt); 75 76 return createObject( _rForName ); 77 } 78 // ------------------------------------------------------------------------- 79 // XDrop 80 void OGroups::dropObject(sal_Int32 /*_nPos*/,const ::rtl::OUString _sElementName) 81 { 82 ::rtl::OUString aSql = ::rtl::OUString::createFromAscii("DROP USERGROUP "); 83 ::rtl::OUString aQuote = m_pConnection->getMetaData()->getIdentifierQuoteString( ); 84 85 aSql = aSql + aQuote + _sElementName + aQuote; 86 87 Reference< XStatement > xStmt = m_pConnection->createStatement( ); 88 xStmt->execute(aSql); 89 ::comphelper::disposeComponent(xStmt); 90 } 91 // ------------------------------------------------------------------------- 92 93 94