1 files changed, 150 insertions, 0 deletions
diff --git a/qadevOOo/tests/java/mod/_sc/ScAreaLinksObj.java b/qadevOOo/tests/java/mod/_sc/ScAreaLinksObj.java
new file mode 100644
index 000000000000..edb102225e2b
--- /dev/null
+++ b/qadevOOo/tests/java/mod/_sc/ScAreaLinksObj.java
@@ -0,0 +1,150 @@
+/*************************************************************************
+ *
+ * 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.lang.XComponent;
+import com.sun.star.lang.XMultiServiceFactory;
+import com.sun.star.sheet.XAreaLinks;
+import com.sun.star.sheet.XSpreadsheetDocument;
+import com.sun.star.table.CellAddress;
+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.CellAreaLinks</code>.
+* This is a collection aff all links present
+* in a Spreadsheet document.
+* Object implements the following interfaces :
+* <ul>
+*  <li> <code>com::sun::star::container::XIndexAccess</code></li>
+*  <li> <code>com::sun::star::container::XElementAccess</code></li>
+*  <li> <code>com::sun::star::sheet::XAreaLinks</code></li>
+* </ul>
+* This object test <b> is NOT </b> designed to be run in several
+* threads concurently.
+* @see com.sun.star.container.XIndexAccess
+* @see com.sun.star.container.XElementAccess
+* @see com.sun.star.sheet.XAreaLinks
+* @see ifc.container._XIndexAccess
+* @see ifc.container._XElementAccess
+* @see ifc.sheet._XAreaLinks
+* @see com.sun.star.sheet.CellAreaLinks
+*/
+public class ScAreaLinksObj 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 Area Links using the 'AreaLinks'
+    * property of the Spreadsheet document. Adds a new link to this
+    * collection, which has a source in the same document. The
+    * link collection is passed as a tested object.
+    */
+    public synchronized TestEnvironment createTestEnvironment
+            (TestParameters Param, PrintWriter log){
+
+      XInterface oObj = null;
+      TestEnvironment tEnv = null ;
+
+      try {
+
+        // creation of testobject here
+        XPropertySet props = (XPropertySet)UnoRuntime.queryInterface
+            (XPropertySet.class, xSheetDoc);
+        oObj = (XInterface) AnyConverter.toObject(
+                new Type(XInterface.class),props.getPropertyValue("AreaLinks")) ;
+        XAreaLinks links = null ;
+
+        // adding one link into collection (for best testing)
+        links = (XAreaLinks) UnoRuntime.queryInterface(XAreaLinks.class, oObj) ;
+        CellAddress addr = new CellAddress ((short) 1,2,3) ;
+        String aSourceArea = util.utils.getFullTestURL("calcshapes.sxc");
+        links.insertAtPosition (addr, aSourceArea, "a2:b5", "", "") ;
+
+        // creating test environment
+        tEnv = new TestEnvironment(oObj);
+
+      } catch (com.sun.star.beans.UnknownPropertyException e) {
+        log.println ("Exception occured while creating test Object.") ;
+        e.printStackTrace(log) ;
+        throw new StatusException("Couldn't create test object", e);
+      } catch (com.sun.star.lang.WrappedTargetException e) {
+        log.println ("Exception occured while creating test Object.") ;
+        e.printStackTrace(log) ;
+        throw new StatusException("Couldn't create test object", e);
+      } catch (com.sun.star.lang.IllegalArgumentException e) {
+        log.println ("Exception occured while creating test Object.") ;
+        e.printStackTrace(log) ;
+        throw new StatusException("Couldn't create test object", e);
+      }
+
+       return tEnv ;
+    }
+
+}    // finish class ScAreaLinksObj
+