xref: /aoo41x/main/forms/source/component/Numeric.cxx (revision 24acc546)
1*24acc546SAndrew Rist /**************************************************************
2cdf0e10cSrcweir  *
3*24acc546SAndrew Rist  * Licensed to the Apache Software Foundation (ASF) under one
4*24acc546SAndrew Rist  * or more contributor license agreements.  See the NOTICE file
5*24acc546SAndrew Rist  * distributed with this work for additional information
6*24acc546SAndrew Rist  * regarding copyright ownership.  The ASF licenses this file
7*24acc546SAndrew Rist  * to you under the Apache License, Version 2.0 (the
8*24acc546SAndrew Rist  * "License"); you may not use this file except in compliance
9*24acc546SAndrew Rist  * with the License.  You may obtain a copy of the License at
10*24acc546SAndrew Rist  *
11*24acc546SAndrew Rist  *   http://www.apache.org/licenses/LICENSE-2.0
12*24acc546SAndrew Rist  *
13*24acc546SAndrew Rist  * Unless required by applicable law or agreed to in writing,
14*24acc546SAndrew Rist  * software distributed under the License is distributed on an
15*24acc546SAndrew Rist  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*24acc546SAndrew Rist  * KIND, either express or implied.  See the License for the
17*24acc546SAndrew Rist  * specific language governing permissions and limitations
18*24acc546SAndrew Rist  * under the License.
19*24acc546SAndrew Rist  *
20*24acc546SAndrew Rist  *************************************************************/
21*24acc546SAndrew Rist 
22*24acc546SAndrew Rist 
23cdf0e10cSrcweir 
24cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove
25cdf0e10cSrcweir #include "precompiled_forms.hxx"
26cdf0e10cSrcweir #include "Numeric.hxx"
27cdf0e10cSrcweir #include <tools/debug.hxx>
28cdf0e10cSrcweir 
29cdf0e10cSrcweir //.........................................................................
30cdf0e10cSrcweir namespace frm
31cdf0e10cSrcweir {
32cdf0e10cSrcweir //.........................................................................
33cdf0e10cSrcweir using namespace ::com::sun::star::uno;
34cdf0e10cSrcweir using namespace ::com::sun::star::sdb;
35cdf0e10cSrcweir using namespace ::com::sun::star::sdbc;
36cdf0e10cSrcweir using namespace ::com::sun::star::sdbcx;
37cdf0e10cSrcweir using namespace ::com::sun::star::beans;
38cdf0e10cSrcweir using namespace ::com::sun::star::container;
39cdf0e10cSrcweir using namespace ::com::sun::star::form;
40cdf0e10cSrcweir using namespace ::com::sun::star::awt;
41cdf0e10cSrcweir using namespace ::com::sun::star::io;
42cdf0e10cSrcweir using namespace ::com::sun::star::lang;
43cdf0e10cSrcweir using namespace ::com::sun::star::util;
44cdf0e10cSrcweir using namespace ::com::sun::star::form::binding;
45cdf0e10cSrcweir 
46cdf0e10cSrcweir //==================================================================
47cdf0e10cSrcweir // ONumericControl
48cdf0e10cSrcweir //==================================================================
49cdf0e10cSrcweir 
50cdf0e10cSrcweir //------------------------------------------------------------------
ONumericControl(const Reference<XMultiServiceFactory> & _rxFactory)51cdf0e10cSrcweir ONumericControl::ONumericControl(const Reference<XMultiServiceFactory>& _rxFactory)
52cdf0e10cSrcweir 	:OBoundControl(_rxFactory, VCL_CONTROL_NUMERICFIELD)
53cdf0e10cSrcweir {
54cdf0e10cSrcweir }
55cdf0e10cSrcweir 
56cdf0e10cSrcweir //------------------------------------------------------------------------------
getSupportedServiceNames()57cdf0e10cSrcweir StringSequence ONumericControl::getSupportedServiceNames() throw()
58cdf0e10cSrcweir {
59cdf0e10cSrcweir 	StringSequence aSupported = OBoundControl::getSupportedServiceNames();
60cdf0e10cSrcweir 	aSupported.realloc(aSupported.getLength() + 1);
61cdf0e10cSrcweir 
62cdf0e10cSrcweir 	::rtl::OUString*pArray = aSupported.getArray();
63cdf0e10cSrcweir 	pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_NUMERICFIELD;
64cdf0e10cSrcweir 	return aSupported;
65cdf0e10cSrcweir }
66cdf0e10cSrcweir 
67cdf0e10cSrcweir 
68cdf0e10cSrcweir //------------------------------------------------------------------
ONumericControl_CreateInstance(const Reference<XMultiServiceFactory> & _rxFactory)69cdf0e10cSrcweir InterfaceRef SAL_CALL ONumericControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
70cdf0e10cSrcweir {
71cdf0e10cSrcweir 	return *(new ONumericControl(_rxFactory));
72cdf0e10cSrcweir }
73cdf0e10cSrcweir 
74cdf0e10cSrcweir //------------------------------------------------------------------------------
_getTypes()75cdf0e10cSrcweir Sequence<Type> ONumericControl::_getTypes()
76cdf0e10cSrcweir {
77cdf0e10cSrcweir 	return OBoundControl::_getTypes();
78cdf0e10cSrcweir }
79cdf0e10cSrcweir 
80cdf0e10cSrcweir //==================================================================
81cdf0e10cSrcweir // ONumericModel
82cdf0e10cSrcweir //==================================================================
83cdf0e10cSrcweir //------------------------------------------------------------------
ONumericModel_CreateInstance(const Reference<XMultiServiceFactory> & _rxFactory)84cdf0e10cSrcweir InterfaceRef SAL_CALL ONumericModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
85cdf0e10cSrcweir {
86cdf0e10cSrcweir 	return *(new ONumericModel(_rxFactory));
87cdf0e10cSrcweir }
88cdf0e10cSrcweir 
89cdf0e10cSrcweir //------------------------------------------------------------------------------
_getTypes()90cdf0e10cSrcweir Sequence<Type> ONumericModel::_getTypes()
91cdf0e10cSrcweir {
92cdf0e10cSrcweir 	return OEditBaseModel::_getTypes();
93cdf0e10cSrcweir }
94cdf0e10cSrcweir 
95cdf0e10cSrcweir //------------------------------------------------------------------
DBG_NAME(ONumericModel)96cdf0e10cSrcweir DBG_NAME( ONumericModel )
97cdf0e10cSrcweir //------------------------------------------------------------------
98cdf0e10cSrcweir ONumericModel::ONumericModel(const Reference<XMultiServiceFactory>& _rxFactory)
99cdf0e10cSrcweir 				:OEditBaseModel( _rxFactory, VCL_CONTROLMODEL_NUMERICFIELD, FRM_SUN_CONTROL_NUMERICFIELD, sal_True, sal_True )
100cdf0e10cSrcweir 									// use the old control name for compytibility reasons
101cdf0e10cSrcweir {
102cdf0e10cSrcweir 	DBG_CTOR( ONumericModel, NULL );
103cdf0e10cSrcweir 
104cdf0e10cSrcweir 	m_nClassId = FormComponentType::NUMERICFIELD;
105cdf0e10cSrcweir 	initValueProperty( PROPERTY_VALUE, PROPERTY_ID_VALUE );
106cdf0e10cSrcweir }
107cdf0e10cSrcweir 
108cdf0e10cSrcweir //------------------------------------------------------------------
ONumericModel(const ONumericModel * _pOriginal,const Reference<XMultiServiceFactory> & _rxFactory)109cdf0e10cSrcweir ONumericModel::ONumericModel( const ONumericModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
110cdf0e10cSrcweir 	:OEditBaseModel( _pOriginal, _rxFactory )
111cdf0e10cSrcweir {
112cdf0e10cSrcweir 	DBG_CTOR( ONumericModel, NULL );
113cdf0e10cSrcweir }
114cdf0e10cSrcweir 
115cdf0e10cSrcweir //------------------------------------------------------------------
~ONumericModel()116cdf0e10cSrcweir ONumericModel::~ONumericModel()
117cdf0e10cSrcweir {
118cdf0e10cSrcweir 	DBG_DTOR( ONumericModel, NULL );
119cdf0e10cSrcweir }
120cdf0e10cSrcweir 
121cdf0e10cSrcweir // XCloneable
122cdf0e10cSrcweir //------------------------------------------------------------------------------
IMPLEMENT_DEFAULT_CLONING(ONumericModel)123cdf0e10cSrcweir IMPLEMENT_DEFAULT_CLONING( ONumericModel )
124cdf0e10cSrcweir 
125cdf0e10cSrcweir // XServiceInfo
126cdf0e10cSrcweir //------------------------------------------------------------------------------
127cdf0e10cSrcweir StringSequence ONumericModel::getSupportedServiceNames() throw()
128cdf0e10cSrcweir {
129cdf0e10cSrcweir 	StringSequence aSupported = OBoundControlModel::getSupportedServiceNames();
130cdf0e10cSrcweir 
131cdf0e10cSrcweir     sal_Int32 nOldLen = aSupported.getLength();
132cdf0e10cSrcweir 	aSupported.realloc( nOldLen + 8 );
133cdf0e10cSrcweir 	::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
134cdf0e10cSrcweir 
135cdf0e10cSrcweir     *pStoreTo++ = BINDABLE_CONTROL_MODEL;
136cdf0e10cSrcweir     *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
137cdf0e10cSrcweir     *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
138cdf0e10cSrcweir 
139cdf0e10cSrcweir     *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
140cdf0e10cSrcweir     *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
141cdf0e10cSrcweir 
142cdf0e10cSrcweir     *pStoreTo++ = FRM_SUN_COMPONENT_NUMERICFIELD;
143cdf0e10cSrcweir     *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_NUMERICFIELD;
144cdf0e10cSrcweir     *pStoreTo++ = BINDABLE_DATABASE_NUMERIC_FIELD;
145cdf0e10cSrcweir 
146cdf0e10cSrcweir 	return aSupported;
147cdf0e10cSrcweir }
148cdf0e10cSrcweir 
149cdf0e10cSrcweir //------------------------------------------------------------------------------
describeFixedProperties(Sequence<Property> & _rProps) const150cdf0e10cSrcweir void ONumericModel::describeFixedProperties( Sequence< Property >& _rProps ) const
151cdf0e10cSrcweir {
152cdf0e10cSrcweir 	BEGIN_DESCRIBE_PROPERTIES( 2, OEditBaseModel )
153cdf0e10cSrcweir 		DECL_PROP3(DEFAULT_VALUE,	double,				BOUND, MAYBEDEFAULT, MAYBEVOID);
154cdf0e10cSrcweir 		DECL_PROP1(TABINDEX,		sal_Int16,			BOUND);
155cdf0e10cSrcweir 	END_DESCRIBE_PROPERTIES();
156cdf0e10cSrcweir }
157cdf0e10cSrcweir 
158cdf0e10cSrcweir //------------------------------------------------------------------------------
getServiceName()159cdf0e10cSrcweir ::rtl::OUString SAL_CALL ONumericModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
160cdf0e10cSrcweir {
161cdf0e10cSrcweir 	return FRM_COMPONENT_NUMERICFIELD;	// old (non-sun) name for compatibility !
162cdf0e10cSrcweir }
163cdf0e10cSrcweir 
164cdf0e10cSrcweir //------------------------------------------------------------------------------
commitControlValueToDbColumn(bool)165cdf0e10cSrcweir sal_Bool ONumericModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
166cdf0e10cSrcweir {
167cdf0e10cSrcweir 	Any aControlValue( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) );
168cdf0e10cSrcweir 	if ( !compare( aControlValue, m_aSaveValue ) )
169cdf0e10cSrcweir 	{
170cdf0e10cSrcweir 		if ( !aControlValue.hasValue() )
171cdf0e10cSrcweir 			m_xColumnUpdate->updateNull();
172cdf0e10cSrcweir 		else
173cdf0e10cSrcweir 		{
174cdf0e10cSrcweir 			try
175cdf0e10cSrcweir 			{
176cdf0e10cSrcweir 				m_xColumnUpdate->updateDouble( getDouble( aControlValue ) );
177cdf0e10cSrcweir 			}
178cdf0e10cSrcweir 			catch(Exception&)
179cdf0e10cSrcweir 			{
180cdf0e10cSrcweir 				return sal_False;
181cdf0e10cSrcweir 			}
182cdf0e10cSrcweir 		}
183cdf0e10cSrcweir 		m_aSaveValue = aControlValue;
184cdf0e10cSrcweir 	}
185cdf0e10cSrcweir 	return sal_True;
186cdf0e10cSrcweir }
187cdf0e10cSrcweir 
188cdf0e10cSrcweir //------------------------------------------------------------------------------
translateDbColumnToControlValue()189cdf0e10cSrcweir Any ONumericModel::translateDbColumnToControlValue()
190cdf0e10cSrcweir {
191cdf0e10cSrcweir 	m_aSaveValue <<= (double)m_xColumn->getDouble();
192cdf0e10cSrcweir 	if ( m_xColumn->wasNull() )
193cdf0e10cSrcweir 		m_aSaveValue.clear();
194cdf0e10cSrcweir 
195cdf0e10cSrcweir     return m_aSaveValue;
196cdf0e10cSrcweir }
197cdf0e10cSrcweir 
198cdf0e10cSrcweir //------------------------------------------------------------------------------
getDefaultForReset() const199cdf0e10cSrcweir Any ONumericModel::getDefaultForReset() const
200cdf0e10cSrcweir {
201cdf0e10cSrcweir 	Any aValue;
202cdf0e10cSrcweir 	if (m_aDefault.getValueType().getTypeClass() == TypeClass_DOUBLE)
203cdf0e10cSrcweir 		aValue = m_aDefault;
204cdf0e10cSrcweir 
205cdf0e10cSrcweir     return aValue;
206cdf0e10cSrcweir }
207cdf0e10cSrcweir 
208cdf0e10cSrcweir //------------------------------------------------------------------------------
resetNoBroadcast()209cdf0e10cSrcweir void ONumericModel::resetNoBroadcast()
210cdf0e10cSrcweir {
211cdf0e10cSrcweir     OEditBaseModel::resetNoBroadcast();
212cdf0e10cSrcweir     m_aSaveValue.clear();
213cdf0e10cSrcweir }
214cdf0e10cSrcweir 
215cdf0e10cSrcweir //.........................................................................
216cdf0e10cSrcweir }	// namespace frm
217cdf0e10cSrcweir //.........................................................................
218cdf0e10cSrcweir 
219