new

6 files changed, 363 insertions, 0 deletions

diff --git a/testautomation/dbaccess/optional/dba_ctrl_Clipboard.bas b/testautomation/dbaccess/optional/dba_ctrl_Clipboard.bas
new file mode 100755
index 000000000000..c01f73ae5476
--- /dev/null
+++ b/testautomation/dbaccess/optional/dba_ctrl_Clipboard.bas
@@ -0,0 +1,60 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: dba_ctrl_Clipboard.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: msc $ $Date: 2008-06-20 12:47:34 $
+'*
+'* 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.
+'*
+'/************************************************************************
+'*
+'* owner : marc.neumann@sun.com
+'*
+'* short description : Control Clipboard
+'*
+'\***********************************************************************
+sub main
+    printlog "---------------------------------------------------------------------"
+    printlog "---      D B A C C E S S   C O N T R O L   C L I P B O A R D      ---"
+    printlog "---------------------------------------------------------------------"
+
+    use "dbaccess/optional/includes/ctrl_Clipboard.inc"
+
+    call hStatusIn ("dbaccess" , "dba_ctrl_Clipboard.bas")
+	    
+	call ctrl_Clipboard
+
+	call hStatusOut
+	
+end sub
+
+
+sub LoadIncludeFiles   
+   use "dbaccess/tools/dbinit.inc"   
+   Call sDBInit
+   Call GetUseFiles
+   gApplication   = "WRITER"
+end sub
diff --git a/testautomation/dbaccess/optional/dba_ctrl_General.bas b/testautomation/dbaccess/optional/dba_ctrl_General.bas
new file mode 100755
index 000000000000..492d0556b553
--- /dev/null
+++ b/testautomation/dbaccess/optional/dba_ctrl_General.bas
@@ -0,0 +1,60 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: dba_ctrl_General.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: msc $ $Date: 2008-06-20 12:47:34 $
+'*
+'* 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.
+'*
+'/************************************************************************
+'*
+'* owner : marc.neumann@sun.com
+'*
+'* short description : Controls General
+'*
+'\***********************************************************************
+sub main
+    printlog "---------------------------------------------------------------------"
+    printlog "-----      D B A C C E S S   C O N T R O L   G E N E R A L      -----"
+    printlog "---------------------------------------------------------------------"
+
+    use "dbaccess/optional/includes/ctrl_General.inc"
+    
+    call hStatusIn ("dbaccess" , "dba_ctrl_General.bas" )
+	
+	call ctrl_General
+
+	call hStatusOut
+	
+end sub
+
+
+sub LoadIncludeFiles   
+   use "dbaccess/tools/dbinit.inc"   
+   Call sDBInit
+   Call GetUseFiles
+   gApplication   = "WRITER"
+end sub
diff --git a/testautomation/dbaccess/optional/dba_ctrl_Grid.bas b/testautomation/dbaccess/optional/dba_ctrl_Grid.bas
new file mode 100755
index 000000000000..5291b9c62831
--- /dev/null
+++ b/testautomation/dbaccess/optional/dba_ctrl_Grid.bas
@@ -0,0 +1,61 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: dba_ctrl_Grid.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: msc $ $Date: 2008-06-20 12:47:34 $
+'*
+'* 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.
+'*
+'/************************************************************************
+'*
+'* owner : marc.neumann@sun.com
+'*
+'* short description : Grid Control Test
+'*
+'\***********************************************************************
+
+
+sub main
+    printlog "---------------------------------------------------------------------"
+    printlog "----       D B A C C E S S   G R I D C O N T R O L   T E S T     ----"
+    printlog "---------------------------------------------------------------------"
+
+    use "dbaccess/optional/includes/ctrl_Grid.inc"
+    
+    call hStatusIn ("dbaccess" , "dba_ctrl_Grid.bas" )      
+	  
+	call ctrl_Grid
+    
+    call hStatusOut
+	    
+end sub
+
+sub LoadIncludeFiles   
+   use "dbaccess/tools/dbinit.inc"   
+   Call sDBInit
+   Call GetUseFiles
+   gApplication   = "WRITER"
+end sub
diff --git a/testautomation/dbaccess/optional/dba_ctrl_PropertyBrowser.bas b/testautomation/dbaccess/optional/dba_ctrl_PropertyBrowser.bas
new file mode 100755
index 000000000000..46a769d3133a
--- /dev/null
+++ b/testautomation/dbaccess/optional/dba_ctrl_PropertyBrowser.bas
@@ -0,0 +1,60 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: dba_ctrl_PropertyBrowser.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: msc $ $Date: 2008-06-20 12:47:34 $
+'*
+'* 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.
+'*
+'/************************************************************************
+'*
+'* owner : marc.neumann@sun.com
+'*
+'* short description : Property Browser 
+'*
+'\***********************************************************************
+sub main
+    printlog "---------------------------------------------------------------------"
+    printlog "-----     D B A C C E S S   P R O P E R T Y   B R O W S E R      ----"
+    printlog "---------------------------------------------------------------------"
+
+    use "dbaccess/optional/includes/ctrl_PropertyBrowser.inc"
+    
+    call hStatusIn ("dbaccess" , "dba_ctrl_PropertyBrowser.bas")
+	    
+	call ctrl_PropertyBrowser
+
+	call hStatusOut
+	
+end sub
+
+
+sub LoadIncludeFiles   
+   use "dbaccess/tools/dbinit.inc"   
+   Call sDBInit
+   Call GetUseFiles
+   gApplication   = "WRITER"
+end sub
diff --git a/testautomation/dbaccess/optional/dba_ctrl_Several.bas b/testautomation/dbaccess/optional/dba_ctrl_Several.bas
new file mode 100755
index 000000000000..2d1b3cbdb4e7
--- /dev/null
+++ b/testautomation/dbaccess/optional/dba_ctrl_Several.bas
@@ -0,0 +1,62 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: dba_ctrl_Several.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: msc $ $Date: 2008-06-20 12:47:34 $
+'*
+'* 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.
+'*
+'/************************************************************************
+'*
+'* owner : marc.neumann@sun.com
+'*
+'* short description : Controls Several
+'*
+'\***********************************************************************
+sub main
+    printlog "---------------------------------------------------------------------"
+    printlog "-----  D B A C C E S S   C O N T R O L   S E V E R A L  -----"
+    printlog "---------------------------------------------------------------------"
+
+    use "dbaccess/optional/includes/ctrl_Several1.inc"
+    use "dbaccess/optional/includes/ctrl_Several2.inc"
+    
+    call hStatusIn ("dbaccess" , "dba_ctrl_Several.bas")
+	    
+	call ctrl_Several1
+    call ctrl_Several2
+
+	call hStatusOut
+
+end sub
+
+
+sub LoadIncludeFiles   
+   use "dbaccess/tools/dbinit.inc"   
+   Call sDBInit
+   Call GetUseFiles
+   gApplication   = "WRITER"
+end sub
diff --git a/testautomation/dbaccess/optional/dba_ctrl_Spreadsheet.bas b/testautomation/dbaccess/optional/dba_ctrl_Spreadsheet.bas
new file mode 100755
index 000000000000..79b662c02e2a
--- /dev/null
+++ b/testautomation/dbaccess/optional/dba_ctrl_Spreadsheet.bas
@@ -0,0 +1,60 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: dba_ctrl_Spreadsheet.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: msc $ $Date: 2008-06-20 12:47:34 $
+'*
+'* 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.
+'*
+'/************************************************************************
+'*
+'* owner : marc.neumann@sun.com
+'*
+'* short description : Spreadsheets Controls
+'*
+'\***********************************************************************
+sub main
+    printlog "---------------------------------------------------------------------"
+    printlog "-----           S P R E A D S H E E T   C O N T R O L S         -----"
+    printlog "---------------------------------------------------------------------"
+
+    use "dbaccess/optional/includes/ctrl_Spreadsheet.inc"
+    
+    call hStatusIn ("dbaccess" , "dba_ctrl_Spreadsheet.bas" )
+	    
+	call ctrl_Spreadsheet
+
+	call hStatusOut
+
+end sub
+
+
+sub LoadIncludeFiles   
+   use "dbaccess/tools/dbinit.inc"      	
+   Call sDBInit
+   Call GetUseFiles
+   gApplication   = "WRITER"
+end sub