diff options
Diffstat (limited to 'qadevOOo/tests/java/mod/_sc/ScNamedRangesObj.java')
-rw-r--r-- | qadevOOo/tests/java/mod/_sc/ScNamedRangesObj.java | 178 |
1 files changed, 178 insertions, 0 deletions
diff --git a/qadevOOo/tests/java/mod/_sc/ScNamedRangesObj.java b/qadevOOo/tests/java/mod/_sc/ScNamedRangesObj.java new file mode 100644 index 000000000000..b7ed2add02c6 --- /dev/null +++ b/qadevOOo/tests/java/mod/_sc/ScNamedRangesObj.java @@ -0,0 +1,178 @@ +/************************************************************************* + * + * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. + * + * Copyright 2000, 2010 Oracle and/or its affiliates. + * + * OpenOffice.org - a multi-platform office productivity suite + * + * This file is part of OpenOffice.org. + * + * OpenOffice.org is free software: you can redistribute it and/or modify + * it under the terms of the GNU Lesser General Public License version 3 + * only, as published by the Free Software Foundation. + * + * OpenOffice.org is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU Lesser General Public License version 3 for more details + * (a copy is included in the LICENSE file that accompanied this code). + * + * You should have received a copy of the GNU Lesser General Public License + * version 3 along with OpenOffice.org. If not, see + * <http://www.openoffice.org/license.html> + * for a copy of the LGPLv3 License. + * + ************************************************************************/ + +package mod._sc; + +import java.io.PrintWriter; + +import lib.StatusException; +import lib.TestCase; +import lib.TestEnvironment; +import lib.TestParameters; +import util.SOfficeFactory; + +import com.sun.star.beans.XPropertySet; +import com.sun.star.container.XIndexAccess; +import com.sun.star.lang.XComponent; +import com.sun.star.lang.XMultiServiceFactory; +import com.sun.star.sheet.XNamedRanges; +import com.sun.star.sheet.XSpreadsheet; +import com.sun.star.sheet.XSpreadsheetDocument; +import com.sun.star.sheet.XSpreadsheets; +import com.sun.star.table.CellAddress; +import com.sun.star.table.CellRangeAddress; +import com.sun.star.uno.AnyConverter; +import com.sun.star.uno.Type; +import com.sun.star.uno.UnoRuntime; +import com.sun.star.uno.XInterface; + +/** +* Test for object which is represented by service +* <code>com.sun.star.sheet.NamedRanges</code>. <p> +* Object implements the following interfaces : +* <ul> +* <li> <code>com::sun::star::sheet::XNamedRanges</code></li> +* <li> <code>com::sun::star::container::XNameAccess</code></li> +* <li> <code>com::sun::star::container::XElementAccess</code></li> +* </ul> +* @see com.sun.star.sheet.NamedRanges +* @see com.sun.star.sheet.XNamedRanges +* @see com.sun.star.container.XNameAccess +* @see com.sun.star.container.XElementAccess +* @see ifc.sheet._XNamedRanges +* @see ifc.container._XNameAccess +* @see ifc.container._XElementAccess +*/ +public class ScNamedRangesObj extends TestCase { + static XSpreadsheetDocument xSheetDoc = null; + + /** + * Creates Spreadsheet document. + */ + protected void initialize( TestParameters tParam, PrintWriter log ) { + SOfficeFactory SOF = SOfficeFactory.getFactory( (XMultiServiceFactory)tParam.getMSF() ); + + try { + log.println( "creating a Spreadsheet document" ); + xSheetDoc = SOF.createCalcDoc(null); + } catch ( com.sun.star.uno.Exception e ) { + // Some exception occures.FAILED + e.printStackTrace( log ); + throw new StatusException( "Couldn't create document", e ); + } + } + + /** + * Disposes Spreadsheet document. + */ + protected void cleanup( TestParameters tParam, PrintWriter log ) { + log.println( " disposing xSheetDoc " ); + XComponent oComp = (XComponent) + UnoRuntime.queryInterface (XComponent.class, xSheetDoc) ; + util.DesktopTools.closeDoc(oComp); + } + + /** + * Creating a Testenvironment for the interfaces to be tested. + * Retrieves a collection of spreadsheets from a document + * and takes one of them. Obtains the value of the property + * <code>'NamedRanges'</code> that is the collection of named ranges. + * This collection is the instance of the service + * <code>com.sun.star.sheet.NamedRanges</code>. Creates and adds new range to + * the collection. + * Object relations created : + * <ul> + * <li> <code>'SHEET'</code> for + * {@link ifc.sheet._XNamedRanges} (the retrieved spreadsheet) </li> + * </ul> + * @see com.sun.star.sheet.NamedRanges + */ + protected synchronized TestEnvironment createTestEnvironment(TestParameters Param, PrintWriter log) { + + XInterface oObj = null; + + // creation of testobject here + // first we write what we are intend to do to log file + log.println( "Creating a test environment" ); + XSpreadsheet oSheet = null; + + log.println("Getting test object "); + XSpreadsheets oSheets = xSheetDoc.getSheets(); + XIndexAccess oIndexSheets = (XIndexAccess) + UnoRuntime.queryInterface(XIndexAccess.class, oSheets); + try { + oSheet = (XSpreadsheet) AnyConverter.toObject( + new Type(XSpreadsheet.class),oIndexSheets.getByIndex(0)); + } catch (com.sun.star.lang.WrappedTargetException e) { + e.printStackTrace(log); + throw new StatusException( "Couldn't get a spreadsheet", e); + } catch (com.sun.star.lang.IndexOutOfBoundsException e) { + e.printStackTrace(log); + throw new StatusException( "Couldn't get a spreadsheet", e); + } catch (com.sun.star.lang.IllegalArgumentException e) { + e.printStackTrace(log); + throw new StatusException( "Couldn't get a spreadsheet", e); + } + + // Getting named ranges. + XPropertySet docProps = (XPropertySet) + UnoRuntime.queryInterface(XPropertySet.class, xSheetDoc); + Object ranges = null; + try { + ranges = docProps.getPropertyValue("NamedRanges"); + } catch(com.sun.star.lang.WrappedTargetException e){ + e.printStackTrace(log); + throw new StatusException("Couldn't get NamedRanges", e); + } catch(com.sun.star.beans.UnknownPropertyException e){ + e.printStackTrace(log); + throw new StatusException("Couldn't get NamedRanges", e); + } + + XNamedRanges xNamedRanges = (XNamedRanges) + UnoRuntime.queryInterface(XNamedRanges.class, ranges); + + CellRangeAddress DataArea = new CellRangeAddress((short)0, 0, 0, 2, 2); + CellAddress base = new CellAddress(DataArea.Sheet, + DataArea.StartColumn, + DataArea.StartRow); + + xNamedRanges.addNewByName("ANamedRange", "A1:B2", base, 0); + + CellAddress listOutputPosition = new CellAddress((short)0, 1, 1); + xNamedRanges.outputList(listOutputPosition); + + oObj = xNamedRanges; + + TestEnvironment tEnv = new TestEnvironment( oObj ); + + // Other parameters required for interface tests + tEnv.addObjRelation("SHEET", oSheet); + + return tEnv; + } + +} |