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 
24*b1cdbd2cSJim Jagielski import com.sun.star.uno.*;
25*b1cdbd2cSJim Jagielski import com.sun.star.lang.XMultiServiceFactory;
26*b1cdbd2cSJim Jagielski import com.sun.star.lang.XComponent;
27*b1cdbd2cSJim Jagielski import com.sun.star.table.XCellRange;
28*b1cdbd2cSJim Jagielski import com.sun.star.table.CellAddress;
29*b1cdbd2cSJim Jagielski import com.sun.star.table.CellRangeAddress;
30*b1cdbd2cSJim Jagielski import com.sun.star.container.XIndexAccess;
31*b1cdbd2cSJim Jagielski import com.sun.star.sheet.XSpreadsheetDocument;
32*b1cdbd2cSJim Jagielski import com.sun.star.beans.NamedValue;
33*b1cdbd2cSJim Jagielski 
34*b1cdbd2cSJim Jagielski /**
35*b1cdbd2cSJim Jagielski  *
36*b1cdbd2cSJim Jagielski  * @author  fs93730
37*b1cdbd2cSJim Jagielski  */
38*b1cdbd2cSJim Jagielski public class SpreadsheetDocument extends DocumentHelper
39*b1cdbd2cSJim Jagielski {
40*b1cdbd2cSJim Jagielski     /** Creates a new blank spreadsheet document */
SpreadsheetDocument( XComponentContext xCtx )41*b1cdbd2cSJim Jagielski     public SpreadsheetDocument( XComponentContext xCtx ) throws com.sun.star.uno.Exception
42*b1cdbd2cSJim Jagielski     {
43*b1cdbd2cSJim Jagielski         super( xCtx, implCreateBlankDocument( xCtx, "private:factory/scalc" ) );
44*b1cdbd2cSJim Jagielski     }
45*b1cdbd2cSJim Jagielski 
SpreadsheetDocument( XComponentContext xCtx, XComponent document )46*b1cdbd2cSJim Jagielski     public SpreadsheetDocument( XComponentContext xCtx, XComponent document ) throws com.sun.star.uno.Exception
47*b1cdbd2cSJim Jagielski     {
48*b1cdbd2cSJim Jagielski         super( xCtx, document );
49*b1cdbd2cSJim Jagielski     }
50*b1cdbd2cSJim Jagielski 
getSheet( int index )51*b1cdbd2cSJim Jagielski     public XCellRange getSheet( int index ) throws com.sun.star.uno.Exception
52*b1cdbd2cSJim Jagielski     {
53*b1cdbd2cSJim Jagielski         XSpreadsheetDocument spreadsheetDoc = (XSpreadsheetDocument)UnoRuntime.queryInterface( XSpreadsheetDocument.class,
54*b1cdbd2cSJim Jagielski             m_documentComponent
55*b1cdbd2cSJim Jagielski         );
56*b1cdbd2cSJim Jagielski         XIndexAccess sheets = (XIndexAccess)UnoRuntime.queryInterface( XIndexAccess.class,
57*b1cdbd2cSJim Jagielski             spreadsheetDoc.getSheets()
58*b1cdbd2cSJim Jagielski         );
59*b1cdbd2cSJim Jagielski         return (XCellRange)UnoRuntime.queryInterface( XCellRange.class,
60*b1cdbd2cSJim Jagielski             sheets.getByIndex( index )
61*b1cdbd2cSJim Jagielski         );
62*b1cdbd2cSJim Jagielski     }
63*b1cdbd2cSJim Jagielski 
64*b1cdbd2cSJim Jagielski     /** creates a value binding for a given cell
65*b1cdbd2cSJim Jagielski     */
createCellBinding( short sheet, short column, short row )66*b1cdbd2cSJim Jagielski     public com.sun.star.form.binding.XValueBinding createCellBinding( short sheet, short column, short row )
67*b1cdbd2cSJim Jagielski     {
68*b1cdbd2cSJim Jagielski         return createCellBinding( sheet, column, row, false );
69*b1cdbd2cSJim Jagielski     }
70*b1cdbd2cSJim Jagielski 
71*b1cdbd2cSJim Jagielski     /** creates a value binding which can be used to exchange a list box selection <em>index</em> with a cell
72*b1cdbd2cSJim Jagielski     */
createListIndexBinding( short sheet, short column, short row )73*b1cdbd2cSJim Jagielski     public com.sun.star.form.binding.XValueBinding createListIndexBinding( short sheet, short column, short row )
74*b1cdbd2cSJim Jagielski     {
75*b1cdbd2cSJim Jagielski         return createCellBinding( sheet, column, row, true );
76*b1cdbd2cSJim Jagielski     }
77*b1cdbd2cSJim Jagielski 
78*b1cdbd2cSJim Jagielski     /** creates a value binding for a given cell, with or without support for integer value exchange
79*b1cdbd2cSJim Jagielski     */
createCellBinding( short sheet, short column, short row, boolean supportIntegerValues )80*b1cdbd2cSJim Jagielski     private com.sun.star.form.binding.XValueBinding createCellBinding( short sheet, short column, short row, boolean supportIntegerValues )
81*b1cdbd2cSJim Jagielski     {
82*b1cdbd2cSJim Jagielski         com.sun.star.form.binding.XValueBinding cellBinding = null;
83*b1cdbd2cSJim Jagielski         try
84*b1cdbd2cSJim Jagielski         {
85*b1cdbd2cSJim Jagielski             CellAddress address = new CellAddress( sheet, column, row );
86*b1cdbd2cSJim Jagielski             Object[] initParam = new Object[] { new NamedValue( "BoundCell", address ) };
87*b1cdbd2cSJim Jagielski             cellBinding = (com.sun.star.form.binding.XValueBinding)UnoRuntime.queryInterface(
88*b1cdbd2cSJim Jagielski                 com.sun.star.form.binding.XValueBinding.class,
89*b1cdbd2cSJim Jagielski                 createInstanceWithArguments(
90*b1cdbd2cSJim Jagielski                     supportIntegerValues ? "com.sun.star.table.ListPositionCellBinding"
91*b1cdbd2cSJim Jagielski                                          : "com.sun.star.table.CellValueBinding",
92*b1cdbd2cSJim Jagielski                     initParam
93*b1cdbd2cSJim Jagielski                 )
94*b1cdbd2cSJim Jagielski             );
95*b1cdbd2cSJim Jagielski         }
96*b1cdbd2cSJim Jagielski         catch( com.sun.star.uno.Exception e )
97*b1cdbd2cSJim Jagielski         {
98*b1cdbd2cSJim Jagielski             System.err.println( e );
99*b1cdbd2cSJim Jagielski             e.printStackTrace( System.err );
100*b1cdbd2cSJim Jagielski         }
101*b1cdbd2cSJim Jagielski         return cellBinding;
102*b1cdbd2cSJim Jagielski     }
103*b1cdbd2cSJim Jagielski 
104*b1cdbd2cSJim Jagielski     /** creates a source of list entries associated with a (one-column) cell range
105*b1cdbd2cSJim Jagielski     */
createListEntrySource( short sheet, short column, short topRow, short bottomRow )106*b1cdbd2cSJim Jagielski     public com.sun.star.form.binding.XListEntrySource createListEntrySource( short sheet, short column,
107*b1cdbd2cSJim Jagielski         short topRow, short bottomRow )
108*b1cdbd2cSJim Jagielski     {
109*b1cdbd2cSJim Jagielski         com.sun.star.form.binding.XListEntrySource entrySource = null;
110*b1cdbd2cSJim Jagielski         try
111*b1cdbd2cSJim Jagielski         {
112*b1cdbd2cSJim Jagielski             CellRangeAddress rangeAddress = new CellRangeAddress( sheet, column,
113*b1cdbd2cSJim Jagielski                 topRow, column, bottomRow );
114*b1cdbd2cSJim Jagielski             Object[] initParam = new Object[] { new NamedValue( "CellRange", rangeAddress ) };
115*b1cdbd2cSJim Jagielski             entrySource = (com.sun.star.form.binding.XListEntrySource)UnoRuntime.queryInterface(
116*b1cdbd2cSJim Jagielski                 com.sun.star.form.binding.XListEntrySource.class,
117*b1cdbd2cSJim Jagielski                 createInstanceWithArguments(
118*b1cdbd2cSJim Jagielski                     "com.sun.star.table.CellRangeListSource", initParam ) );
119*b1cdbd2cSJim Jagielski         }
120*b1cdbd2cSJim Jagielski         catch( com.sun.star.uno.Exception e )
121*b1cdbd2cSJim Jagielski         {
122*b1cdbd2cSJim Jagielski             System.err.println( e );
123*b1cdbd2cSJim Jagielski             e.printStackTrace( System.err );
124*b1cdbd2cSJim Jagielski         }
125*b1cdbd2cSJim Jagielski         return entrySource;
126*b1cdbd2cSJim Jagielski     }
127*b1cdbd2cSJim Jagielski }
128