1*b3f79822SAndrew Rist /**************************************************************
2cdf0e10cSrcweir *
3*b3f79822SAndrew Rist * Licensed to the Apache Software Foundation (ASF) under one
4*b3f79822SAndrew Rist * or more contributor license agreements. See the NOTICE file
5*b3f79822SAndrew Rist * distributed with this work for additional information
6*b3f79822SAndrew Rist * regarding copyright ownership. The ASF licenses this file
7*b3f79822SAndrew Rist * to you under the Apache License, Version 2.0 (the
8*b3f79822SAndrew Rist * "License"); you may not use this file except in compliance
9*b3f79822SAndrew Rist * with the License. You may obtain a copy of the License at
10cdf0e10cSrcweir *
11*b3f79822SAndrew Rist * http://www.apache.org/licenses/LICENSE-2.0
12cdf0e10cSrcweir *
13*b3f79822SAndrew Rist * Unless required by applicable law or agreed to in writing,
14*b3f79822SAndrew Rist * software distributed under the License is distributed on an
15*b3f79822SAndrew Rist * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*b3f79822SAndrew Rist * KIND, either express or implied. See the License for the
17*b3f79822SAndrew Rist * specific language governing permissions and limitations
18*b3f79822SAndrew Rist * under the License.
19cdf0e10cSrcweir *
20*b3f79822SAndrew Rist *************************************************************/
21*b3f79822SAndrew Rist
22*b3f79822SAndrew Rist
23cdf0e10cSrcweir #include "vbapivottable.hxx"
24cdf0e10cSrcweir #include "vbapivotcache.hxx"
25cdf0e10cSrcweir
26cdf0e10cSrcweir
27cdf0e10cSrcweir using namespace ::com::sun::star;
28cdf0e10cSrcweir using namespace ::ooo::vba;
29cdf0e10cSrcweir
ScVbaPivotTable(const uno::Reference<uno::XComponentContext> & xContext,const uno::Reference<sheet::XDataPilotTable> & xTable)30cdf0e10cSrcweir ScVbaPivotTable::ScVbaPivotTable( const uno::Reference< uno::XComponentContext >& xContext, const uno::Reference< sheet::XDataPilotTable >& xTable ) : PivotTableImpl_BASE( uno::Reference< XHelperInterface >(), xContext), m_xTable( xTable )
31cdf0e10cSrcweir {
32cdf0e10cSrcweir }
33cdf0e10cSrcweir
34cdf0e10cSrcweir uno::Reference< excel::XPivotCache >
PivotCache()35cdf0e10cSrcweir ScVbaPivotTable::PivotCache() throw (uno::RuntimeException)
36cdf0e10cSrcweir {
37cdf0e10cSrcweir // #FIXME with a quick example failed to determine what the parent
38cdf0e10cSrcweir // should be, leaving as null at the moment
39cdf0e10cSrcweir return new ScVbaPivotCache( uno::Reference< XHelperInterface >(), mxContext, m_xTable );
40cdf0e10cSrcweir }
41cdf0e10cSrcweir
42cdf0e10cSrcweir rtl::OUString&
getServiceImplName()43cdf0e10cSrcweir ScVbaPivotTable::getServiceImplName()
44cdf0e10cSrcweir {
45cdf0e10cSrcweir static rtl::OUString sImplName( RTL_CONSTASCII_USTRINGPARAM("ScVbaPivotTable") );
46cdf0e10cSrcweir return sImplName;
47cdf0e10cSrcweir }
48cdf0e10cSrcweir
49cdf0e10cSrcweir uno::Sequence< rtl::OUString >
getServiceNames()50cdf0e10cSrcweir ScVbaPivotTable::getServiceNames()
51cdf0e10cSrcweir {
52cdf0e10cSrcweir static uno::Sequence< rtl::OUString > aServiceNames;
53cdf0e10cSrcweir if ( aServiceNames.getLength() == 0 )
54cdf0e10cSrcweir {
55cdf0e10cSrcweir aServiceNames.realloc( 1 );
56cdf0e10cSrcweir aServiceNames[ 0 ] = rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("ooo.vba.excel.PivotTable" ) );
57cdf0e10cSrcweir }
58cdf0e10cSrcweir return aServiceNames;
59cdf0e10cSrcweir }
60