1*b1cdbd2cSJim Jagielski /**************************************************************
2*b1cdbd2cSJim Jagielski *
3*b1cdbd2cSJim Jagielski * Licensed to the Apache Software Foundation (ASF) under one
4*b1cdbd2cSJim Jagielski * or more contributor license agreements. See the NOTICE file
5*b1cdbd2cSJim Jagielski * distributed with this work for additional information
6*b1cdbd2cSJim Jagielski * regarding copyright ownership. The ASF licenses this file
7*b1cdbd2cSJim Jagielski * to you under the Apache License, Version 2.0 (the
8*b1cdbd2cSJim Jagielski * "License"); you may not use this file except in compliance
9*b1cdbd2cSJim Jagielski * with the License. You may obtain a copy of the License at
10*b1cdbd2cSJim Jagielski *
11*b1cdbd2cSJim Jagielski * http://www.apache.org/licenses/LICENSE-2.0
12*b1cdbd2cSJim Jagielski *
13*b1cdbd2cSJim Jagielski * Unless required by applicable law or agreed to in writing,
14*b1cdbd2cSJim Jagielski * software distributed under the License is distributed on an
15*b1cdbd2cSJim Jagielski * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*b1cdbd2cSJim Jagielski * KIND, either express or implied. See the License for the
17*b1cdbd2cSJim Jagielski * specific language governing permissions and limitations
18*b1cdbd2cSJim Jagielski * under the License.
19*b1cdbd2cSJim Jagielski *
20*b1cdbd2cSJim Jagielski *************************************************************/
21*b1cdbd2cSJim Jagielski
22*b1cdbd2cSJim Jagielski
23*b1cdbd2cSJim Jagielski #include "vbapagebreak.hxx"
24*b1cdbd2cSJim Jagielski #include "vbarange.hxx"
25*b1cdbd2cSJim Jagielski #include <ooo/vba/excel/XlPageBreak.hpp>
26*b1cdbd2cSJim Jagielski using namespace ::com::sun::star;
27*b1cdbd2cSJim Jagielski using namespace ::ooo::vba;
28*b1cdbd2cSJim Jagielski
29*b1cdbd2cSJim Jagielski template< typename Ifc1 >
ScVbaPageBreak(const uno::Reference<XHelperInterface> & xParent,const uno::Reference<uno::XComponentContext> & xContext,uno::Reference<beans::XPropertySet> & xProps,sheet::TablePageBreakData aTablePageBreakData)30*b1cdbd2cSJim Jagielski ScVbaPageBreak<Ifc1>::ScVbaPageBreak( const uno::Reference< XHelperInterface >& xParent,
31*b1cdbd2cSJim Jagielski const uno::Reference< uno::XComponentContext >& xContext,
32*b1cdbd2cSJim Jagielski uno::Reference< beans::XPropertySet >& xProps,
33*b1cdbd2cSJim Jagielski sheet::TablePageBreakData aTablePageBreakData) throw (uno::RuntimeException):
34*b1cdbd2cSJim Jagielski ScVbaPageBreak_BASE( xParent, xContext ),
35*b1cdbd2cSJim Jagielski mxRowColPropertySet( xProps ),
36*b1cdbd2cSJim Jagielski maTablePageBreakData( aTablePageBreakData )
37*b1cdbd2cSJim Jagielski {
38*b1cdbd2cSJim Jagielski }
39*b1cdbd2cSJim Jagielski
40*b1cdbd2cSJim Jagielski template< typename Ifc1 >
getType()41*b1cdbd2cSJim Jagielski sal_Int32 ScVbaPageBreak<Ifc1>::getType() throw (uno::RuntimeException)
42*b1cdbd2cSJim Jagielski {
43*b1cdbd2cSJim Jagielski uno::Any aValue = mxRowColPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "IsStartOfNewPage" )));
44*b1cdbd2cSJim Jagielski sal_Bool hasPageBreak = sal_False;
45*b1cdbd2cSJim Jagielski aValue >>= hasPageBreak;
46*b1cdbd2cSJim Jagielski
47*b1cdbd2cSJim Jagielski if( !hasPageBreak )
48*b1cdbd2cSJim Jagielski return excel::XlPageBreak::xlPageBreakNone;
49*b1cdbd2cSJim Jagielski
50*b1cdbd2cSJim Jagielski if( maTablePageBreakData.ManualBreak )
51*b1cdbd2cSJim Jagielski return excel::XlPageBreak::xlPageBreakManual;
52*b1cdbd2cSJim Jagielski
53*b1cdbd2cSJim Jagielski return excel::XlPageBreak::xlPageBreakAutomatic;
54*b1cdbd2cSJim Jagielski }
55*b1cdbd2cSJim Jagielski
56*b1cdbd2cSJim Jagielski template< typename Ifc1 >
setType(sal_Int32 type)57*b1cdbd2cSJim Jagielski void ScVbaPageBreak<Ifc1>::setType(sal_Int32 type) throw (uno::RuntimeException)
58*b1cdbd2cSJim Jagielski {
59*b1cdbd2cSJim Jagielski if( (type != excel::XlPageBreak::xlPageBreakNone) &&
60*b1cdbd2cSJim Jagielski (type != excel::XlPageBreak::xlPageBreakManual) &&
61*b1cdbd2cSJim Jagielski (type != excel::XlPageBreak::xlPageBreakAutomatic) )
62*b1cdbd2cSJim Jagielski {
63*b1cdbd2cSJim Jagielski DebugHelper::exception(SbERR_BAD_PARAMETER, rtl::OUString() );
64*b1cdbd2cSJim Jagielski }
65*b1cdbd2cSJim Jagielski
66*b1cdbd2cSJim Jagielski if( type == excel::XlPageBreak::xlPageBreakNone )
67*b1cdbd2cSJim Jagielski {
68*b1cdbd2cSJim Jagielski mxRowColPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "IsStartOfNewPage" )), uno::makeAny(sal_False));
69*b1cdbd2cSJim Jagielski return;
70*b1cdbd2cSJim Jagielski }
71*b1cdbd2cSJim Jagielski
72*b1cdbd2cSJim Jagielski mxRowColPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "IsStartOfNewPage" )), uno::makeAny(sal_True));
73*b1cdbd2cSJim Jagielski if( type == excel::XlPageBreak::xlPageBreakManual )
74*b1cdbd2cSJim Jagielski maTablePageBreakData.ManualBreak = sal_True;
75*b1cdbd2cSJim Jagielski else
76*b1cdbd2cSJim Jagielski maTablePageBreakData.ManualBreak = sal_False;
77*b1cdbd2cSJim Jagielski }
78*b1cdbd2cSJim Jagielski
79*b1cdbd2cSJim Jagielski template< typename Ifc1 >
Delete()80*b1cdbd2cSJim Jagielski void ScVbaPageBreak<Ifc1>::Delete() throw ( script::BasicErrorException, uno::RuntimeException)
81*b1cdbd2cSJim Jagielski {
82*b1cdbd2cSJim Jagielski mxRowColPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "IsStartOfNewPage" )), uno::makeAny(sal_False));
83*b1cdbd2cSJim Jagielski }
84*b1cdbd2cSJim Jagielski
85*b1cdbd2cSJim Jagielski template< typename Ifc1 >
Location()86*b1cdbd2cSJim Jagielski uno::Reference< excel::XRange> ScVbaPageBreak<Ifc1>::Location() throw ( script::BasicErrorException, uno::RuntimeException)
87*b1cdbd2cSJim Jagielski {
88*b1cdbd2cSJim Jagielski uno::Reference< table::XCellRange > xRange( mxRowColPropertySet, uno::UNO_QUERY_THROW );
89*b1cdbd2cSJim Jagielski return new ScVbaRange( ScVbaPageBreak_BASE::getParent(), ScVbaPageBreak_BASE::mxContext, xRange);
90*b1cdbd2cSJim Jagielski }
91*b1cdbd2cSJim Jagielski
92*b1cdbd2cSJim Jagielski template< typename Ifc1 >
93*b1cdbd2cSJim Jagielski rtl::OUString&
getServiceImplName()94*b1cdbd2cSJim Jagielski ScVbaPageBreak<Ifc1>::getServiceImplName()
95*b1cdbd2cSJim Jagielski {
96*b1cdbd2cSJim Jagielski static rtl::OUString sImplName( RTL_CONSTASCII_USTRINGPARAM("ScVbaPageBreak") );
97*b1cdbd2cSJim Jagielski return sImplName;
98*b1cdbd2cSJim Jagielski }
99*b1cdbd2cSJim Jagielski
100*b1cdbd2cSJim Jagielski template< typename Ifc1 >
101*b1cdbd2cSJim Jagielski uno::Sequence< rtl::OUString >
getServiceNames()102*b1cdbd2cSJim Jagielski ScVbaPageBreak<Ifc1>::getServiceNames()
103*b1cdbd2cSJim Jagielski {
104*b1cdbd2cSJim Jagielski static uno::Sequence< rtl::OUString > aServiceNames;
105*b1cdbd2cSJim Jagielski if ( aServiceNames.getLength() == 0 )
106*b1cdbd2cSJim Jagielski {
107*b1cdbd2cSJim Jagielski aServiceNames.realloc( 1 );
108*b1cdbd2cSJim Jagielski aServiceNames[ 0 ] = rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("ooo.vba.excel.PageBreak" ) );
109*b1cdbd2cSJim Jagielski }
110*b1cdbd2cSJim Jagielski return aServiceNames;
111*b1cdbd2cSJim Jagielski }
112*b1cdbd2cSJim Jagielski
113*b1cdbd2cSJim Jagielski template class ScVbaPageBreak< excel::XHPageBreak >;
114*b1cdbd2cSJim Jagielski
115*b1cdbd2cSJim Jagielski /* class ScVbaHPageBreak */
116*b1cdbd2cSJim Jagielski rtl::OUString&
getServiceImplName()117*b1cdbd2cSJim Jagielski ScVbaHPageBreak::getServiceImplName()
118*b1cdbd2cSJim Jagielski {
119*b1cdbd2cSJim Jagielski static rtl::OUString sImplName( RTL_CONSTASCII_USTRINGPARAM("ScVbaHPageBreak") );
120*b1cdbd2cSJim Jagielski return sImplName;
121*b1cdbd2cSJim Jagielski }
122*b1cdbd2cSJim Jagielski
123*b1cdbd2cSJim Jagielski uno::Sequence< rtl::OUString >
getServiceNames()124*b1cdbd2cSJim Jagielski ScVbaHPageBreak::getServiceNames()
125*b1cdbd2cSJim Jagielski {
126*b1cdbd2cSJim Jagielski static uno::Sequence< rtl::OUString > aServiceNames;
127*b1cdbd2cSJim Jagielski if ( aServiceNames.getLength() == 0 )
128*b1cdbd2cSJim Jagielski {
129*b1cdbd2cSJim Jagielski aServiceNames.realloc( 1 );
130*b1cdbd2cSJim Jagielski aServiceNames[ 0 ] = rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("ooo.vba.excel.HPageBreak" ) );
131*b1cdbd2cSJim Jagielski }
132*b1cdbd2cSJim Jagielski return aServiceNames;
133*b1cdbd2cSJim Jagielski }
134*b1cdbd2cSJim Jagielski
135*b1cdbd2cSJim Jagielski template class ScVbaPageBreak< excel::XVPageBreak >;
136*b1cdbd2cSJim Jagielski
137*b1cdbd2cSJim Jagielski /* class ScVbaVPageBreak */
ScVbaVPageBreak(const css::uno::Reference<ov::XHelperInterface> & xParent,const css::uno::Reference<css::uno::XComponentContext> & xContext,css::uno::Reference<css::beans::XPropertySet> & xProps,css::sheet::TablePageBreakData aTablePageBreakData)138*b1cdbd2cSJim Jagielski ScVbaVPageBreak::ScVbaVPageBreak( const css::uno::Reference< ov::XHelperInterface >& xParent,
139*b1cdbd2cSJim Jagielski const css::uno::Reference< css::uno::XComponentContext >& xContext,
140*b1cdbd2cSJim Jagielski css::uno::Reference< css::beans::XPropertySet >& xProps,
141*b1cdbd2cSJim Jagielski css::sheet::TablePageBreakData aTablePageBreakData ) throw ( css::uno::RuntimeException )
142*b1cdbd2cSJim Jagielski : ScVbaVPageBreak_BASE( xParent, xContext, xProps, aTablePageBreakData )
143*b1cdbd2cSJim Jagielski {
144*b1cdbd2cSJim Jagielski }
145*b1cdbd2cSJim Jagielski
~ScVbaVPageBreak()146*b1cdbd2cSJim Jagielski ScVbaVPageBreak::~ScVbaVPageBreak()
147*b1cdbd2cSJim Jagielski {
148*b1cdbd2cSJim Jagielski }
149*b1cdbd2cSJim Jagielski
150*b1cdbd2cSJim Jagielski rtl::OUString&
getServiceImplName()151*b1cdbd2cSJim Jagielski ScVbaVPageBreak::getServiceImplName()
152*b1cdbd2cSJim Jagielski {
153*b1cdbd2cSJim Jagielski static rtl::OUString sImplName( RTL_CONSTASCII_USTRINGPARAM("ScVbaVPageBreak") );
154*b1cdbd2cSJim Jagielski return sImplName;
155*b1cdbd2cSJim Jagielski }
156*b1cdbd2cSJim Jagielski
157*b1cdbd2cSJim Jagielski uno::Sequence< rtl::OUString >
getServiceNames()158*b1cdbd2cSJim Jagielski ScVbaVPageBreak::getServiceNames()
159*b1cdbd2cSJim Jagielski {
160*b1cdbd2cSJim Jagielski static uno::Sequence< rtl::OUString > aServiceNames;
161*b1cdbd2cSJim Jagielski if ( aServiceNames.getLength() == 0 )
162*b1cdbd2cSJim Jagielski {
163*b1cdbd2cSJim Jagielski aServiceNames.realloc( 1 );
164*b1cdbd2cSJim Jagielski aServiceNames[ 0 ] = rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "ooo.vba.excel.VPageBreak" ) );
165*b1cdbd2cSJim Jagielski }
166*b1cdbd2cSJim Jagielski return aServiceNames;
167*b1cdbd2cSJim Jagielski }
168*b1cdbd2cSJim Jagielski
169