INTEGRATION: CWS npower8 (1.2.4); FILE MERGED

2007/07/18 13:46:48 npower 1.2.4.2: #i77189# sync ooo-build and this module
2007/05/10 11:23:11 npower 1.2.4.1: -m#i77189#
This commit is contained in:
Vladimir Glazounov
2007-12-07 10:07:56 +00:00
parent 0c129e9345
commit ad75414ab5
2 changed files with 32 additions and 13 deletions

View File

@@ -4,9 +4,9 @@
*
* $RCSfile: vbawsfunction.cxx,v $
*
* $Revision: 1.2 $
* $Revision: 1.3 $
*
* last change: $Author: rt $ $Date: 2007-04-25 16:14:30 $
* last change: $Author: vg $ $Date: 2007-12-07 11:07:44 $
*
* The Contents of this file are made available subject to
* the terms of GNU Lesser General Public License Version 2.1.
@@ -51,9 +51,9 @@
using namespace com::sun::star;
using namespace org::openoffice;
ScVbaWSFunction::ScVbaWSFunction( css::uno::Reference< css::uno::XComponentContext >& xContext):m_xContext(xContext)
ScVbaWSFunction::ScVbaWSFunction( const uno::Reference< vba::XHelperInterface >& xParent, const css::uno::Reference< css::uno::XComponentContext >& xContext): ScVbaWSFunction_BASE( xParent, xContext )
{
m_xNameAccess.set( m_xContext->getServiceManager()->createInstanceWithContext( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("com.sun.star.sheet.FunctionDescriptions") ), m_xContext ), uno::UNO_QUERY_THROW );
m_xNameAccess.set( mxContext->getServiceManager()->createInstanceWithContext( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("com.sun.star.sheet.FunctionDescriptions") ), mxContext ), uno::UNO_QUERY_THROW );
}
@@ -66,10 +66,10 @@ ScVbaWSFunction::getIntrospection(void) throw(uno::RuntimeException)
uno::Any SAL_CALL
ScVbaWSFunction::invoke(const rtl::OUString& FunctionName, const uno::Sequence< uno::Any >& Params, uno::Sequence< sal_Int16 >& /*OutParamIndex*/, uno::Sequence< uno::Any >& /*OutParam*/) throw(lang::IllegalArgumentException, script::CannotConvertException, reflection::InvocationTargetException, uno::RuntimeException)
{
uno::Reference< lang::XMultiComponentFactory > xSMgr( m_xContext->getServiceManager(), uno::UNO_QUERY_THROW );
uno::Reference< lang::XMultiComponentFactory > xSMgr( mxContext->getServiceManager(), uno::UNO_QUERY_THROW );
uno::Reference< sheet::XFunctionAccess > xFunctionAccess(
xSMgr->createInstanceWithContext(::rtl::OUString::createFromAscii(
"com.sun.star.sheet.FunctionAccess"), m_xContext),
"com.sun.star.sheet.FunctionAccess"), mxContext),
::uno::UNO_QUERY_THROW);
uno::Sequence< uno::Any > aParamTemp;
sal_Int32 nParamCount = Params.getLength();
@@ -136,3 +136,22 @@ ScVbaWSFunction::getExactName( const ::rtl::OUString& aApproximateName ) throw (
return rtl::OUString();
return sName;
}
rtl::OUString&
ScVbaWSFunction::getServiceImplName()
{
static rtl::OUString sImplName( RTL_CONSTASCII_USTRINGPARAM("ScVbaWSFunction") );
return sImplName;
}
uno::Sequence< rtl::OUString >
ScVbaWSFunction::getServiceNames()
{
static uno::Sequence< rtl::OUString > aServiceNames;
if ( aServiceNames.getLength() == 0 )
{
aServiceNames.realloc( 1 );
aServiceNames[ 0 ] = rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("org.openoffice.excel.WorksheetFunction" ) );
}
return aServiceNames;
}