sc/source/core/data/dbdocutl.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: dbdocutl.cxx,v $
  10  * $Revision: 1.9 $
  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_sc.hxx"
  33
  34
  35
  36 // INCLUDE ---------------------------------------------------------------
  37
  38 #include <com/sun/star/sdbc/DataType.hpp>
  39 #include <com/sun/star/sdbc/XRow.hpp>
  40
  41 #include <svtools/zforlist.hxx>
  42
  43 #include "dbdocutl.hxx"
  44 #include "document.hxx"
  45 #include "cell.hxx"
  46 #include "formula/errorcodes.hxx"
  47
  48 using namespace ::com::sun::star;
  49
  50 #define D_TIMEFACTOR              86400.0
  51
  52 // -----------------------------------------------------------------------
  53
  54 // static
  55 void ScDatabaseDocUtil::PutData( ScDocument* pDoc, SCCOL nCol, SCROW nRow, SCTAB nTab,
  56                                 const uno::Reference<sdbc::XRow>& xRow, long nRowPos,
  57                                 long nType, BOOL bCurrency, BOOL* pSimpleFlag )
  58 {
  59     String aString;
  60     double nVal = 0.0;
  61     BOOL bValue = FALSE;
  62     BOOL bEmptyFlag = FALSE;
  63     BOOL bError = FALSE;
  64     ULONG nFormatIndex = 0;
  65
  66     //! wasNull calls only if null value was found?
  67
  68     try
  69     {
  70         switch ( nType )
  71         {
  72             case sdbc::DataType::BIT:
  73             case sdbc::DataType::BOOLEAN:
  74                 //!     use language from doc (here, date/time and currency)?
  75                 nFormatIndex = pDoc->GetFormatTable()->GetStandardFormat(
  76                                     NUMBERFORMAT_LOGICAL, ScGlobal::eLnge );
  77                 nVal = (xRow->getBoolean(nRowPos) ? 1 : 0);
  78                 bEmptyFlag = ( nVal == 0.0 ) && xRow->wasNull();
  79                 bValue = TRUE;
  80                 break;
  81
  82             case sdbc::DataType::TINYINT:
  83             case sdbc::DataType::SMALLINT:
  84             case sdbc::DataType::INTEGER:
  85             case sdbc::DataType::BIGINT:
  86             case sdbc::DataType::FLOAT:
  87             case sdbc::DataType::REAL:
  88             case sdbc::DataType::DOUBLE:
  89             case sdbc::DataType::NUMERIC:
  90             case sdbc::DataType::DECIMAL:
  91                 //!     do the conversion here?
  92                 nVal = xRow->getDouble(nRowPos);
  93                 bEmptyFlag = ( nVal == 0.0 ) && xRow->wasNull();
  94                 bValue = TRUE;
  95                 break;
  96
  97             case sdbc::DataType::CHAR:
  98             case sdbc::DataType::VARCHAR:
  99             case sdbc::DataType::LONGVARCHAR:
 100                 aString = xRow->getString(nRowPos);
 101                 bEmptyFlag = ( aString.Len() == 0 ) && xRow->wasNull();
 102                 break;
 103
 104             case sdbc::DataType::DATE:
 105                 {
 106                     SvNumberFormatter* pFormTable = pDoc->GetFormatTable();
 107                     nFormatIndex = pFormTable->GetStandardFormat(
 108                                         NUMBERFORMAT_DATE, ScGlobal::eLnge );
 109
 110                     util::Date aDate = xRow->getDate(nRowPos);
 111                     nVal = Date( aDate.Day, aDate.Month, aDate.Year ) -
 112                                                 *pFormTable->GetNullDate();
 113                     bEmptyFlag = xRow->wasNull();
 114                     bValue = TRUE;
 115                 }
 116                 break;
 117
 118             case sdbc::DataType::TIME:
 119                 {
 120                     SvNumberFormatter* pFormTable = pDoc->GetFormatTable();
 121                     nFormatIndex = pFormTable->GetStandardFormat(
 122                                         NUMBERFORMAT_TIME, ScGlobal::eLnge );
 123
 124                     util::Time aTime = xRow->getTime(nRowPos);
 125                     nVal = ( aTime.Hours * 3600 + aTime.Minutes * 60 +
 126                              aTime.Seconds + aTime.HundredthSeconds / 100.0 ) / D_TIMEFACTOR;
 127                     bEmptyFlag = xRow->wasNull();
 128                     bValue = TRUE;
 129                 }
 130                 break;
 131
 132             case sdbc::DataType::TIMESTAMP:
 133                 {
 134                     SvNumberFormatter* pFormTable = pDoc->GetFormatTable();
 135                     nFormatIndex = pFormTable->GetStandardFormat(
 136                                         NUMBERFORMAT_DATETIME, ScGlobal::eLnge );
 137
 138                     util::DateTime aStamp = xRow->getTimestamp(nRowPos);
 139                     nVal = ( Date( aStamp.Day, aStamp.Month, aStamp.Year ) -
 140                                                 *pFormTable->GetNullDate() ) +
 141                            ( aStamp.Hours * 3600 + aStamp.Minutes * 60 +
 142                              aStamp.Seconds + aStamp.HundredthSeconds / 100.0 ) / D_TIMEFACTOR;
 143                     bEmptyFlag = xRow->wasNull();
 144                     bValue = TRUE;
 145                 }
 146                 break;
 147
 148             case sdbc::DataType::SQLNULL:
 149                 bEmptyFlag = TRUE;
 150                 break;
 151
 152             case sdbc::DataType::BINARY:
 153             case sdbc::DataType::VARBINARY:
 154             case sdbc::DataType::LONGVARBINARY:
 155             default:
 156                 bError = TRUE;          // unknown type
 157         }
 158     }
 159     catch ( uno::Exception& )
 160     {
 161         bError = TRUE;
 162     }
 163
 164     if ( bValue && bCurrency )
 165         nFormatIndex = pDoc->GetFormatTable()->GetStandardFormat(
 166                             NUMBERFORMAT_CURRENCY, ScGlobal::eLnge );
 167
 168     ScBaseCell* pCell;
 169     if (bEmptyFlag)
 170     {
 171         pCell = NULL;
 172         pDoc->PutCell( nCol, nRow, nTab, pCell );
 173     }
 174     else if (bError)
 175     {
 176         pDoc->SetError( nCol, nRow, nTab, NOTAVAILABLE );
 177     }
 178     else if (bValue)
 179     {
 180         pCell = new ScValueCell( nVal );
 181         if (nFormatIndex == 0)
 182             pDoc->PutCell( nCol, nRow, nTab, pCell );
 183         else
 184             pDoc->PutCell( nCol, nRow, nTab, pCell, nFormatIndex );
 185     }
 186     else
 187     {
 188         if (aString.Len())
 189         {
 190             pCell = ScBaseCell::CreateTextCell( aString, pDoc );
 191             if ( pSimpleFlag && pCell->GetCellType() == CELLTYPE_EDIT )
 192                 *pSimpleFlag = FALSE;
 193         }
 194         else
 195             pCell = NULL;
 196         pDoc->PutCell( nCol, nRow, nTab, pCell );
 197     }
 198 }
 199
 200