forms/source/component/Currency.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include "Currency.hxx"
  21 #include <property.hxx>
  22 #include <services.hxx>
  23 #include <unotools/localedatawrapper.hxx>
  24 #include <unotools/syslocale.hxx>
  25 #include <comphelper/types.hxx>
  26 #include <com/sun/star/form/FormComponentType.hpp>
  27
  28
  29 namespace frm
  30 {
  31
  32 using namespace ::com::sun::star::uno;
  33 using namespace ::com::sun::star::sdb;
  34 using namespace ::com::sun::star::sdbc;
  35 using namespace ::com::sun::star::beans;
  36 using namespace ::com::sun::star::container;
  37 using namespace ::com::sun::star::form;
  38 using namespace ::com::sun::star::awt;
  39 using namespace ::com::sun::star::io;
  40 using namespace ::com::sun::star::lang;
  41 using namespace ::com::sun::star::util;
  42
  43 OCurrencyControl::OCurrencyControl(const Reference<XComponentContext>& _rxFactory)
  44     :OBoundControl(_rxFactory, VCL_CONTROL_CURRENCYFIELD)
  45 {
  46 }
  47
  48 css::uno::Sequence<OUString> SAL_CALL OCurrencyControl::getSupportedServiceNames()
  49 {
  50     css::uno::Sequence<OUString> aSupported = OBoundControl::getSupportedServiceNames();
  51     aSupported.realloc(aSupported.getLength() + 2);
  52
  53     OUString*pArray = aSupported.getArray();
  54     pArray[aSupported.getLength()-2] = FRM_SUN_CONTROL_CURRENCYFIELD;
  55     pArray[aSupported.getLength()-1] = STARDIV_ONE_FORM_CONTROL_CURRENCYFIELD;
  56     return aSupported;
  57 }
  58
  59
  60 // OCurrencyModel
  61
  62 void OCurrencyModel::implConstruct()
  63 {
  64     if (!m_xAggregateSet.is())
  65         return;
  66
  67     try
  68     {
  69         // get the system international information
  70         const SvtSysLocale aSysLocale;
  71         const LocaleDataWrapper& aLocaleInfo = aSysLocale.GetLocaleData();
  72
  73         OUString sCurrencySymbol;
  74         bool bPrependCurrencySymbol = false;
  75         switch ( aLocaleInfo.getCurrPositiveFormat() )
  76         {
  77             case 0: // $1
  78                 sCurrencySymbol = aLocaleInfo.getCurrSymbol();
  79                 bPrependCurrencySymbol = true;
  80                 break;
  81             case 1: // 1$
  82                 sCurrencySymbol = aLocaleInfo.getCurrSymbol();
  83                 bPrependCurrencySymbol = false;
  84                 break;
  85             case 2: // $ 1
  86                 sCurrencySymbol = aLocaleInfo.getCurrSymbol() + " ";
  87                 bPrependCurrencySymbol = true;
  88                 break;
  89             case 3: // 1 $
  90                 sCurrencySymbol = " " + aLocaleInfo.getCurrSymbol();
  91                 bPrependCurrencySymbol = false;
  92                 break;
  93         }
  94         if (!sCurrencySymbol.isEmpty())
  95         {
  96             m_xAggregateSet->setPropertyValue(PROPERTY_CURRENCYSYMBOL, makeAny(sCurrencySymbol));
  97             m_xAggregateSet->setPropertyValue(PROPERTY_CURRSYM_POSITION, makeAny(bPrependCurrencySymbol));
  98         }
  99     }
 100     catch(const Exception&)
 101     {
 102         OSL_FAIL( "OCurrencyModel::implConstruct: caught an exception while initializing the aggregate!" );
 103     }
 104 }
 105
 106
 107 OCurrencyModel::OCurrencyModel(const Reference<XComponentContext>& _rxFactory)
 108     :OEditBaseModel( _rxFactory, VCL_CONTROLMODEL_CURRENCYFIELD, FRM_SUN_CONTROL_CURRENCYFIELD, false, true )
 109     // use the old control name for compatibility reasons
 110 {
 111
 112     m_nClassId = FormComponentType::CURRENCYFIELD;
 113     initValueProperty( PROPERTY_VALUE, PROPERTY_ID_VALUE );
 114
 115     implConstruct();
 116 }
 117
 118
 119 OCurrencyModel::OCurrencyModel( const OCurrencyModel* _pOriginal, const Reference<XComponentContext>& _rxFactory )
 120     :OEditBaseModel( _pOriginal, _rxFactory )
 121 {
 122     implConstruct();
 123 }
 124
 125
 126 OCurrencyModel::~OCurrencyModel()
 127 {
 128 }
 129
 130 // XCloneable
 131
 132 IMPLEMENT_DEFAULT_CLONING( OCurrencyModel )
 133
 134 // XServiceInfo
 135
 136 css::uno::Sequence<OUString> SAL_CALL OCurrencyModel::getSupportedServiceNames()
 137 {
 138     css::uno::Sequence<OUString> aSupported = OBoundControlModel::getSupportedServiceNames();
 139
 140     sal_Int32 nOldLen = aSupported.getLength();
 141     aSupported.realloc( nOldLen + 5 );
 142     OUString* pStoreTo = aSupported.getArray() + nOldLen;
 143
 144     *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
 145     *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
 146
 147     *pStoreTo++ = FRM_SUN_COMPONENT_CURRENCYFIELD;
 148     *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_CURRENCYFIELD;
 149
 150     *pStoreTo++ = FRM_COMPONENT_CURRENCYFIELD;
 151
 152     return aSupported;
 153 }
 154
 155
 156 void OCurrencyModel::describeFixedProperties( Sequence< Property >& _rProps ) const
 157 {
 158     BEGIN_DESCRIBE_PROPERTIES( 2, OEditBaseModel )
 159     // Set Value to transient
 160     // ModifyPropertyAttributes(_rAggregateProps, PROPERTY_VALUE, PropertyAttribute::TRANSIENT, 0);
 161
 162         DECL_PROP3(DEFAULT_VALUE,       double,             BOUND, MAYBEDEFAULT, MAYBEVOID);
 163         DECL_PROP1(TABINDEX,        sal_Int16,              BOUND);
 164     END_DESCRIBE_PROPERTIES();
 165 }
 166
 167
 168 OUString SAL_CALL OCurrencyModel::getServiceName()
 169 {
 170     return FRM_COMPONENT_CURRENCYFIELD; // old (non-sun) name for compatibility !
 171 }
 172
 173
 174 bool OCurrencyModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
 175 {
 176     Any aControlValue( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) );
 177     if ( aControlValue != m_aSaveValue )
 178     {
 179         if ( aControlValue.getValueType().getTypeClass() == TypeClass_VOID )
 180             m_xColumnUpdate->updateNull();
 181         else
 182         {
 183             try
 184             {
 185                 m_xColumnUpdate->updateDouble( getDouble( aControlValue ) );
 186             }
 187             catch(const Exception&)
 188             {
 189                 return false;
 190             }
 191         }
 192         m_aSaveValue = aControlValue;
 193     }
 194     return true;
 195 }
 196
 197
 198 Any OCurrencyModel::translateDbColumnToControlValue()
 199 {
 200     m_aSaveValue <<= m_xColumn->getDouble();
 201     if ( m_xColumn->wasNull() )
 202         m_aSaveValue.clear();
 203     return m_aSaveValue;
 204 }
 205
 206 // XReset
 207
 208 Any OCurrencyModel::getDefaultForReset() const
 209 {
 210     Any aValue;
 211     if ( m_aDefault.getValueType().getTypeClass() == TypeClass_DOUBLE )
 212         aValue = m_aDefault;
 213
 214     return aValue;
 215 }
 216
 217
 218 void OCurrencyModel::resetNoBroadcast()
 219 {
 220     OEditBaseModel::resetNoBroadcast();
 221     m_aSaveValue.clear();
 222 }
 223
 224
 225 }   // namespace frm
 226
 227 extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface*
 228 com_sun_star_form_OCurrencyModel_get_implementation(css::uno::XComponentContext* component,
 229         css::uno::Sequence<css::uno::Any> const &)
 230 {
 231     return cppu::acquire(new frm::OCurrencyModel(component));
 232 }
 233
 234 extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface*
 235 com_sun_star_form_OCurrencyControl_get_implementation(css::uno::XComponentContext* component,
 236         css::uno::Sequence<css::uno::Any> const &)
 237 {
 238     return cppu::acquire(new frm::OCurrencyControl(component));
 239 }
 240
 241 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */