sw/source/ui/fldui/xfldui.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: xfldui.cxx,v $
  10  * $Revision: 1.11 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  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.
  17  *
  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).
  23  *
  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.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_sw.hxx"
  33
  34
  35 #include <tools/debug.hxx>
  36 #include <com/sun/star/lang/XMultiServiceFactory.hpp>
  37 #include <com/sun/star/container/XNameAccess.hpp>
  38 #include <com/sun/star/sdbc/XDataSource.hpp>
  39 #include <com/sun/star/sdbc/DataType.hpp>
  40 #include <com/sun/star/sdbcx/XTablesSupplier.hpp>
  41 #include <com/sun/star/sdbcx/XColumnsSupplier.hpp>
  42 #include <com/sun/star/sdb/XQueriesSupplier.hpp>
  43 #include <com/sun/star/beans/XPropertySet.hpp>
  44 #include <comphelper/processfactory.hxx>
  45 #include <fldmgr.hxx>
  46 #ifndef _DBMGR_HXX
  47 #include <dbmgr.hxx>
  48 #endif
  49 #include <wrtsh.hxx>            // Actives Fenster
  50 #ifndef _VIEW_HXX
  51 #include <view.hxx>
  52 #endif
  53 #include <swmodule.hxx>
  54
  55
  56 using namespace ::com::sun::star::uno;
  57 using namespace ::com::sun::star::container;
  58 using namespace ::com::sun::star::lang;
  59 using namespace ::com::sun::star::sdb;
  60 using namespace ::com::sun::star::sdbc;
  61 using namespace ::com::sun::star::sdbcx;
  62 using namespace ::com::sun::star::beans;
  63
  64
  65 // ---------------------------------------------------------------------------
  66 // This file contains all routines of the fldui directory, which must compile
  67 // with exceptions. So we can reduce the code of the other files, which don't
  68 // need any exception handling.
  69 // ---------------------------------------------------------------------------
  70
  71 /*--------------------------------------------------------------------
  72      Beschreibung: Ist das Datenbankfeld numerisch?
  73      Anm: Im Fehlerfall wird TRUE returnt.
  74  --------------------------------------------------------------------*/
  75
  76 BOOL SwFldMgr::IsDBNumeric( const String& rDBName, const String& rTblQryName,
  77                             BOOL bIsTable, const String& rFldName)
  78 {
  79     BOOL bNumeric = TRUE;
  80
  81     SwNewDBMgr* pDBMgr = pWrtShell ? pWrtShell->GetNewDBMgr() :
  82                             ::GetActiveView()->GetWrtShell().GetNewDBMgr();
  83
  84     ::rtl::OUString sSource(rDBName);
  85     Reference< XConnection> xConnection =
  86                     pDBMgr->RegisterConnection(sSource);
  87
  88     if( !xConnection.is() )
  89         return bNumeric;
  90
  91     Reference<XColumnsSupplier> xColsSupplier;
  92     if(bIsTable)
  93     {
  94         Reference<XTablesSupplier> xTSupplier = Reference<XTablesSupplier>(xConnection, UNO_QUERY);
  95         if(xTSupplier.is())
  96         {
  97             Reference<XNameAccess> xTbls = xTSupplier->getTables();
  98             DBG_ASSERT(xTbls->hasByName(rTblQryName), "table not available anymore?");
  99             try
 100             {
 101                 Any aTable = xTbls->getByName(rTblQryName);
 102                 Reference<XPropertySet> xPropSet;
 103                 aTable >>= xPropSet;
 104                 xColsSupplier = Reference<XColumnsSupplier>(xPropSet, UNO_QUERY);
 105             }
 106             catch(Exception&){}
 107         }
 108     }
 109     else
 110     {
 111         Reference<XQueriesSupplier> xQSupplier = Reference<XQueriesSupplier>(xConnection, UNO_QUERY);
 112         if(xQSupplier.is())
 113         {
 114             Reference<XNameAccess> xQueries = xQSupplier->getQueries();
 115             DBG_ASSERT(xQueries->hasByName(rTblQryName), "table not available anymore?");
 116             try
 117             {
 118                 Any aQuery = xQueries->getByName(rTblQryName);
 119                 Reference<XPropertySet> xPropSet;
 120                 aQuery >>= xPropSet;
 121                 xColsSupplier = Reference<XColumnsSupplier>(xPropSet, UNO_QUERY);
 122             }
 123             catch(Exception&){}
 124         }
 125     }
 126
 127     if(xColsSupplier.is())
 128     {
 129         Reference <XNameAccess> xCols;
 130         try
 131         {
 132             xCols = xColsSupplier->getColumns();
 133         }
 134         catch(Exception& )
 135         {
 136             DBG_ERROR("Exception in getColumns()");
 137         }
 138         if(xCols.is() && xCols->hasByName(rFldName))
 139         {
 140             Any aCol = xCols->getByName(rFldName);
 141             Reference <XPropertySet> xCol;
 142             aCol >>= xCol;
 143             Any aType = xCol->getPropertyValue( UniString::CreateFromAscii("Type"));
 144             sal_Int32 eDataType = 0;
 145             aType >>= eDataType;
 146             switch(eDataType)
 147             {
 148                 case DataType::BIT:
 149                 case DataType::BOOLEAN:
 150                 case DataType::TINYINT:
 151                 case DataType::SMALLINT:
 152                 case DataType::INTEGER:
 153                 case DataType::BIGINT:
 154                 case DataType::FLOAT:
 155                 case DataType::REAL:
 156                 case DataType::DOUBLE:
 157                 case DataType::NUMERIC:
 158                 case DataType::DECIMAL:
 159                 case DataType::DATE:
 160                 case DataType::TIME:
 161                 case DataType::TIMESTAMP:
 162                     break;
 163
 164                 case DataType::BINARY:
 165                 case DataType::VARBINARY:
 166                 case DataType::LONGVARBINARY:
 167                 case DataType::SQLNULL:
 168                 case DataType::OTHER:
 169                 case DataType::OBJECT:
 170                 case DataType::DISTINCT:
 171                 case DataType::STRUCT:
 172                 case DataType::ARRAY:
 173                 case DataType::BLOB:
 174                 case DataType::CLOB:
 175                 case DataType::REF:
 176                 case DataType::CHAR:
 177                 case DataType::VARCHAR:
 178                 case DataType::LONGVARCHAR:
 179                 default:
 180                     bNumeric = FALSE;
 181             }
 182         }
 183     }
 184     return bNumeric;
 185 }
 186
 187