incubator-ooo-commits mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From ar...@apache.org
Subject svn commit: r1231333 [1/2] - in /incubator/ooo/trunk/main/testautomation/framework: optional/includes/ required/includes/ tools/includes/
Date Fri, 13 Jan 2012 22:02:10 GMT
Author: arist
Date: Fri Jan 13 22:02:09 2012
New Revision: 1231333

URL: http://svn.apache.org/viewvc?rev=1231333&view=rev
Log:
Update headers to Alv2 headers

Modified:
    incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_documents.inc
    incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_ide.inc
    incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_modulenames.inc
    incubator/ooo/trunk/main/testautomation/framework/optional/includes/filedlg_tools.inc
    incubator/ooo/trunk/main/testautomation/framework/optional/includes/ole_tools.inc
    incubator/ooo/trunk/main/testautomation/framework/optional/includes/options_ooo_security.inc
    incubator/ooo/trunk/main/testautomation/framework/optional/includes/security_macrosecurity.inc
    incubator/ooo/trunk/main/testautomation/framework/required/includes/first.inc
    incubator/ooo/trunk/main/testautomation/framework/required/includes/help_browser.inc
    incubator/ooo/trunk/main/testautomation/framework/required/includes/printer_administration.inc
    incubator/ooo/trunk/main/testautomation/framework/required/includes/script_organizers.inc
    incubator/ooo/trunk/main/testautomation/framework/required/includes/tools_customize.inc
    incubator/ooo/trunk/main/testautomation/framework/required/includes/topten.inc
    incubator/ooo/trunk/main/testautomation/framework/required/includes/window_functions.inc
    incubator/ooo/trunk/main/testautomation/framework/required/includes/wizard_mailmerge.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/CJK_tools.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/customize_tools.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/fileoperations.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/formcontrols.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/help_tools.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/options_tools.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/pbrowser_tools.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/private_environment.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/scriptorganizer_tools.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/spadmin_tools.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/template_tools.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/toolbar_tools.inc
    incubator/ooo/trunk/main/testautomation/framework/tools/includes/wizards.inc

Modified: incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_documents.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_documents.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_documents.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_documents.inc Fri Jan 13 22:02:09 2012
@@ -1,155 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'*  owner : gregor.hartmann@oracle.com
-'*
-'*  short description : BASIC organizers and documents
-'*
-'\******************************************************************************
-
-private const IDOCS = 5
-    
-testcase tBasicDocuments
-
-    const CFN = "tBasicDocuments::"
-
-    dim sFileWriter as string
-    dim sFileCalc as string
-    dim iDocumentCount as integer
-    dim cNodeListA( 10 ) as string
-    dim cNodeListB( 10 ) as string
-    dim iSecLevel as integer
-    dim iHitCount as integer
-    
-    ' NOTE: hCreateBasicWorkFiles() creates files of the naming scheme 
-    ' basic.odt, ...odc etc. All these files will show up with just "basic"
-    ' in the Macro Organizer
-    const DOC_NAME = "basic"
-    
-    printlog( "Set macro security level to medium" )
-    iSecLevel = hSetMacroSecurityAPI( GC_MACRO_SECURITY_LEVEL_MEDIUM )
-
-    printlog( "Open one single unchanged Writer document" )
-    hInitSingleDoc()
-    
-    kontext "DocumentWriter"
-    DocumentWriter.typeKeys( "tBasicDocuments - initial document - discard after test" )
-
-    gApplication = "WRITER"
-    printlog( "Create a Writer workfilename (build path and filename)" )
-    hCreateBasicWorkFiles()
-    sFileWriter = hGetBasicWorkFile( "current" )
-
-    gApplication = "CALC"
-    printlog( "Create a Calc workfilename (build path and filename)" )
-    hCreateBasicWorkFiles()
-    sFileCalc = hGetBasicWorkFile( "current" )
-
-    printlog( "Open the writer file" )
-    hFileOpen( sFileWriter )
-    if ( not hAllowMacroExecution() ) then
-        warnlog( "Missing Macro execution dialog. Please check the file/security settings" )
-    endif
-
-    printlog( "Open the Calc file" )
-    hFileOpen( sFileCalc )
-    if ( not hAllowMacroExecution() ) then
-        warnlog( "Missing Macro execution dialog. Please check the file/security settings" )
-    endif
-
-    printlog( "Open the BASIC organizer" )
-    ToolsMacro_uno
-    WaitSlot()
-
-    printlog( "Retreive the names of all nodes from the treelist" )
-    kontext "Makro"
-    hGetVisibleNodeNames( MakroAus , cNodeListA() )
-    
-    printlog( "Verify that both documents are listed - one Writer, one Calc with identical names" )
-    iHitCount = hCountMatchesInList( cNodeListA() , DOC_NAME )
-    if ( iHitCount <> 2 ) then
-        warnlog( "There should be two documents with the name " & DOC_NAME & "listed." )
-    endif
-
-    printlog( "Click Manage..." )
-    hClickButton( verwalten )
-    
-    printlog( "Get the nodes list from the object organizer tabs - first tab" )
-    hSelectBasicObjectOrganizerTab( 1 )
-    ListAllDelete( cNodeListB() )
-    hGetVisibleNodeNames( ModulListe , cNodeListB() )
-    
-    printlog( "Verify that both documents are listed on both relevant tabpages" )
-    iHitCount = hCountMatchesInList( cNodeListA() , DOC_NAME )
-    if ( iHitCount <> 2 ) then
-        warnlog( "There should be two documents with the name " & DOC_NAME & "listed." )
-    endif
-
-    printlog( "Switch to second tab" )
-    hSelectBasicObjectOrganizerTab( 2 )
-    ListAllDelete( cNodeListB() )
-    hGetVisibleNodeNames( ModuleList , cNodeListB() )
-    if ( listcount( cNodeListB() ) <> 5 ) then
-        warnlog( CFN & "#i49239# Incorrect object count in treelist" )
-        hListPrint( cNodeListB() , "List of objects found in treelist" )
-    endif     
-    
-    printlog( "Verify" )
-    iHitCount = hCountMatchesInList( cNodeListB() , DOC_NAME )
-    if ( iHitCount <> 2 ) then
-        warnlog( "There should be two documents with the name " & DOC_NAME & "listed." )
-    endif
-
-    printlog( "Third tab (should not list the document" )
-    hSelectBasicObjectOrganizerTab( 3 )
-    hTestLibraryListBox( cNodeListA() )
-    
-    printlog( CFN & "Closing dialogs..." )
-    hCloseDialog( TabBibliotheken, "cancel" )
-
-    printlog( "Cleanup: Close macro organizer" )
-    Kontext "Makro"
-    hCloseDialog( Makro, "cancel" )
-
-    printlog( "Cleanup: Close all files" )
-    hFileCloseAll()
-
-    printlog( "Cleanup: Remove workfiles" )
-    hDeleteFile( sFileWriter )
-    hDeleteFile( sFileCalc )
-
-    printlog( "Rest macro security level" )
-    hSetMacroSecurityAPI( GC_MACRO_SECURITY_LEVEL_DEFAULT )
-    
-endcase
-
-'*******************************************************************************
+*****
 
 function hTestLibraryListBox( cNodeList() ) as boolean
 

Modified: incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_ide.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_ide.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_ide.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_ide.inc Fri Jan 13 22:02:09 2012
@@ -1,154 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'* owner : gregor.hartmann@oracle.com
-'*
-'* short description : Macro Dialogs opened from Basic-IDE
-'*
-'\******************************************************************************
-
-testcase tBasic_IDE_Toolbar_Module
-
-    printlog( "BASIC toolbars for modules" )
-
-    const DIALOG_DELAY = 2
-    const RC_FAILURE = -1
-
-    dim cTargetFile as string
-        cTargetFile = convertpath( gOfficepath & "user\work\global_test.bas" )
-
-    dim cSourceFile as string
-        cSourceFile = gTesttoolpath & "framework\optional\input\resetregistration.txt"
-        cSourceFile = convertpath( cSourceFile )
-
-    printlog "open a new writer-doc"
-    gApplication = "WRITER"
-    hCreateDocument()
-
-    if ( hInitBasicIDE( "tBasic_IDE_Toolbar_Module" ) ) then
-
-        kontext "macrobar"
-        printlog "- compile"
-        hClickButton( Compile )
-
-        printlog "- Run Basic"
-        hClickButton( BasicRun )
-
-        printlog "- Step Procedure"
-        hClickButton( ProcedureStep )
-
-        printlog "- Stop Basic"
-        hClickButton( BasicStop )
-
-        printlog "- Single Step"
-        hClickButton( SingleStep )
-
-        printlog "- Step Back"
-        hClickButton( StepBack )
-
-        printlog "- Breakpoint => activate"
-        hClickButton( Breakpoint )
-
-
-        printlog "- Breakpoint => deactivate"
-        hClickButton( Breakpoint )
-
-        printlog "- Add Watch => deactivate"
-        hClickButton( AddWatch )
-
-        printlog "- Find Paranthese"
-
-        kontext "macrobar"
-        hClickButton( FindParanthese )
-
-        try
-            Controls.TearOff()
-            warnlog "Controls are active in a module window => bug!"
-        catch
-            printlog( "Controls are not active->OK" )
-        endcatch
-        if ( WaitSlot <> WSFinished ) then
-            warnlog( "Slot not finished within 1 second" )
-        endif
-
-        kontext "MacroBar"
-        printlog( "- Insert Source Text (" & cSourceFile & ")" )
-        if ( hClickButton( InsertSourceText ) <> RC_FAILURE ) then
-
-            kontext "oeffnendlg"
-            if ( OeffnenDlg.exists( DIALOG_DELAY ) ) then
-                Dateiname.SetText( cSourceFile )
-                Oeffnen.click()
-                WaitSlot( 5000 )
-            else
-                warnlog( "File Open dialog did not open" )
-            endif
-
-            ' possible 'could not read from file' error-message -> this is a bug
-            kontext "Active"
-            if ( Active.exists( DIALOG_DELAY ) ) then
-                warnlog( "Unexpected active: " & active.gettext() )
-                active.ok()
-            endif
-        else
-            warnlog( "<File Open> dialog is not open, <Insert Source Text> button failed" )
-        endif
-
-        kontext "macrobar"
-        printlog "- Save Source Text "
-        if ( hClickButton( SaveSourceText ) <> RC_FAILURE ) then
-
-            kontext "speicherndlg"
-            if ( SpeichernDlg.exists( DIALOG_DELAY ) ) then
-                Dateiname.SetText( cTargetFile )
-                Speichern.click()
-            else
-                warnlog( "File Save dialog is missing" )
-            endif
-
-            kontext "active"
-            if ( Active.Exists( DIALOG_DELAY ) ) then
-                printlog( "Closing Messagebox with <Yes>")
-                Active.Yes()
-            endif
-        else
-            warnlog( "<File Save> dialog did not open, slot <SaveSourceText> did not work" )
-        endif
-
-        hFileCloseAll()
-    else
-        warnlog( "Unable to init BASIC IDE" )
-    endif
-
-endcase
-
-'*******************************************************************************
+*****
 
 testcase tBasic_IDE_Toolbar_Dialogs
 

Modified: incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_modulenames.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_modulenames.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_modulenames.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/optional/includes/basic_modulenames.inc Fri Jan 13 22:02:09 2012
@@ -1,88 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'*  owner : gregor.hartmann@oracle.com
-'*
-'*  short description : Test modulenames on the tabbar
-'*
-'\******************************************************************************
-
-testcase tBasicIdeModuleNames
-
-    printlog( "Modulenames in BASIC IDE" )
-
-    const CMODULE_VALID1 = "tValidName"
-    const CMODULE_VALID2 = "tValidToo"
-    const TEST_MACRO = "TTMacro1"
-
-    const RC_SUCCESS = 0
-    const RC_FAILURE = 1
-    const ERR_NO_LINES_INSERTED = 0
-
-    dim iCurrentName as integer
-    dim cTabName as string
-
-    gApplication = "WRITER"
-    hCreateDocument()
-
-    hInitBasicIde( CMODULE_VALID1 )
-    if ( hInsertMacroFromFile( TEST_MACRO ) > ERR_NO_LINES_INSERTED ) then
-   
-        cTabName = hGetTabNameFromOrganizer()
-
-        Randomize
-        iCurrentName = Int( 24 * RND ) + 1 ' Range from 1 to 24
-
-        printlog( "Trying with invalid modulename" )
-        cTabName = hCreateInvalidModuleName( iCurrentName )
-        hRenameTab( cTabName )
-        if ( hHandleInvalidNameWarning( cTabname ) ) then
-            printlog( "Warning for invalid modulename displayed" )
-        else
-            warnlog( "Warning for invalid modulename is missing" )
-        endif
-
-        printlog( "Trying with valid modulename" )
-        hRenameTab( CMODULE_VALID2 )
-        if ( hHandleInvalidNameWarning( CMODULE_VALID2 ) ) then
-            warnlog( "Failed to set valid modulename" )
-        endif
-
-    else
-        warnlog( "Failed to insert macro" )
-    endif
-    
-    hFileCloseAll()
-
-endcase
-
-'*******************************************************************************
+*****
 
 testcase tInvalidModuleNames
 

Modified: incubator/ooo/trunk/main/testautomation/framework/optional/includes/filedlg_tools.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/optional/includes/filedlg_tools.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/optional/includes/filedlg_tools.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/optional/includes/filedlg_tools.inc Fri Jan 13 22:02:09 2012
@@ -1,111 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'* owner : gregor.hartmann@oracle.com
-'*
-'* short description : check the internal file dialog ( 1. part )
-'*
-'\***************************************************************************
-
-sub CheckDirectoryName( dirname as string )
-    
-    ' Try to create a folder twice and make sure a warning comes up that the
-    ' folder already exists
-    
-    dim i as integer
-    dim FULLPATH as string
-    FULLPATH = gOfficePath + "user\work\" + dirname + "\"
-    
-    printlog( " - Create the folder and verify it's existence" )
-    
-    try
-        
-        for i=1 to 2
-            
-            printlog( " - creating folder for the " + i + ". time" )
-            
-            Kontext "OeffnenDlg"
-            printlog( " - press 'new folder' button" )
-            NeuerOrdner.Click()
-            
-            Kontext "NeuerOrdner"
-            if ( NeuerOrdner.exists( 2 ) ) then
-                printlog( " - name the folder" )
-                OrdnerName.SetText( dirname )
-                printlog( " - press OK")
-                NeuerOrdner.OK()
-            else
-                warnlog( "New Folder dialog not displayed" )
-            endif
-            
-            ' Take care of the File Exists Dialog
-            printlog( " - check for 'File Exists'-Dialog" )
-            Kontext "Active"
-            If Active.Exists() then
-                Active.OK()
-                
-                'if the file exists during first run of the test: just go on
-                if i =  1 then
-                    warnlog( "File exists. Did you clean the output-dir?" )
-                end if
-                
-                'if the active exists, we will return to the 'new folder' dialog
-                'it must be closed as well
-                Kontext "NeuerOrdner"
-                NeuerOrdner.Cancel()
-            else
-                'this should only be displayed on second run
-                if i = 2 then
-                    warnlog( "No message that the folder '" + dirname + "' exists!" )
-                end if
-            end if
-            
-        next i
-        
-        printlog( " - verify the existence of the new directory" )
-        if App.Dir ( ConvertPath ( FULLPATH ), 16 ) = "" then
-            Warnlog( "The directory'" + dirname + "' wasn't created!" )
-        else
-            printlog( " - delete it")
-            App.RmDir ( ConvertPath ( FULLPATH ) )
-        end if
-        
-        
-    catch
-        
-        warnlog( "Could not create the directory. Bugid: #108256# or #106510# ?" )
-        
-    endcatch
-    
-end sub
-
-'*******************************************************************************
+*****
 
 sub CreateInvalidDirectory( dirname as string )
     

Modified: incubator/ooo/trunk/main/testautomation/framework/optional/includes/ole_tools.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/optional/includes/ole_tools.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/optional/includes/ole_tools.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/optional/includes/ole_tools.inc Fri Jan 13 22:02:09 2012
@@ -1,47 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'* owner : thorsten.bosbach@oracle.com
-'*
-'* short description : global-level-1-test -> insert all OLE-Objects out of OLE-dialog into all doc-types
-'*
-'\******************************************************************************
-
-sub hReopenDoc
-    'Only for bughandling if closing an OLE object fails
-    Warnlog "Cannot release Chart Object -> #107005#?"
-    hCloseDocument()
-    'if Active.Exists ( 1 ) then Active.TypeKeys "<RIGHT><ENTER>"
-    hNewDocument()
-end sub
-
-'*******************************************************************************
+*****
 
 sub hOleSelektieren ( xStart%, yStart%, xEnde%, yEnde% )
     WL_TB_ZF_Auswahl

Modified: incubator/ooo/trunk/main/testautomation/framework/optional/includes/options_ooo_security.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/optional/includes/options_ooo_security.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/optional/includes/options_ooo_security.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/optional/includes/options_ooo_security.inc Fri Jan 13 22:02:09 2012
@@ -1,70 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'* owner : thorsten.bosbach@oracle.com
-'*
-'* short description : Tools->Options: OpenOffice.org Security
-'*
-'\******************************************************************************
-
-testcase tOOoSecurity
-    dim _file as string
-    
-    if ( getDocumentCount() < 1 ) then call hNewDocument()
-    _file = gTesttoolPath & "framework\optional\input\options\ooo_security_defaults.ref"
-    checkSecurityPage( _file )
-
-    if ( getDocumentCount() < 1 ) then call hNewDocument()
-    _file = gTesttoolPath & "framework\optional\input\options\ooo_security_changed.ref"
-    changeSecurityPage( _file )
-    
-    if ( getDocumentCount() < 1 ) then call hNewDocument()
-    checkSecurityPage( _file )
-    
-    if ( getDocumentCount() < 1 ) then call hNewDocument()
-    _file = gTesttoolPath & "framework\optional\input\options\ooo_security_defaults.ref"
-    changeSecurityPage( _file )
-    
-    if ( getDocumentCount() < 1 ) then call hNewDocument()
-    checkSecurityPage( _file )
-    
-    kontext "ExtrasOptionenDlg"
-    if ( ExtrasOptionenDlg.exists() ) then
-        ExtrasOptionenDlg.ok()
-    else
-        warnlog( "options dialog not available" 
-    endif
-    if ( getDocumentCount() > 0 ) then call hCloseDocument()
-
-endcase
-
-'*******************************************************************************
+*****
 
 sub checkSecurityPage( _file as string )
     _file = convertpath( _file )

Modified: incubator/ooo/trunk/main/testautomation/framework/optional/includes/security_macrosecurity.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/optional/includes/security_macrosecurity.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/optional/includes/security_macrosecurity.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/optional/includes/security_macrosecurity.inc Fri Jan 13 22:02:09 2012
@@ -1,54 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'*  owner : gregor.hartmann@oracle.com
-'*
-'*  short description : Macros with all security-levels
-'*
-'\******************************************************************************
-
-sub tMacroSecurityLevelsControlModule
-
-    dim iApplication as integer
-
-    for iApplication = 1 to 6
-
-        printlog( "" )
-        printlog( hNumericDocType( iApplication ) )
-        call tMacroSecurityLevels( "current" )
-        call tMacroSecurityLevels( "645" )
-
-    next iApplication
-
-end sub
-
-'*******************************************************************************
+*****
 
 testcase tMacroSecurityLevels( cFileFormat )
 

Modified: incubator/ooo/trunk/main/testautomation/framework/required/includes/first.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/required/includes/first.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/required/includes/first.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/required/includes/first.inc Fri Jan 13 22:02:09 2012
@@ -1,182 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'* owner : gregor.hartmann@oracle.com
-'*
-'* short description : First test of basic functionality
-'*
-'\******************************************************************************
-
-testcase tAllNew
-
-    printlog( "Open all available document types" )
-    
-    Dim lsList (20) as string
-    
-    if ( gUseSysDlg ) then
-        warnlog("Only check, if the documents will be opened; no " & _
-        "check for the defaultfilter (system file-dialog)!")
-    end if
-    
-    printlog ""
-    try
-        gApplication = "WRITER"
-        printlog "  - " & gApplication
-        
-        hNewDocument()
-        
-        Kontext "DocumentWriter"
-        DocumentWriter.TypeKeys "This is a Writer-document!"
-        if gUseSysDlg = FALSE then
-            if fDocumentCheck (gWriterFilter) = FALSE then
-                warnlog("The filter name (saving) is not correct! " & _
-                "Please check if a Writer document will be opened!")
-            end if
-        end if
-        hCloseDocument()
-    catch
-        Exceptlog
-        ResetApplication
-    endcatch
-    
-    try
-        gApplication = "CALC"
-        printlog "  - " & gApplication
-        
-        hNewDocument
-        Kontext "DocumentCalc"
-        DocumentCalc.TypeKeys "This is a Calc-document!"
-        
-        if gUseSysDlg = FALSE then
-            if fDocumentCheck (gCalcFilter) = FALSE then
-                warnlog("The filter name (saving) is not correct! " & _
-                "Please check if a Calc document will be opened!")
-            end if
-        end if
-        hCloseDocument
-    catch
-        Exceptlog
-        ResetApplication
-    endcatch
-    
-    try
-        gApplication = "IMPRESS"
-        printlog "  - " & gApplication
-        
-        hNewDocument()
-        sleep(3)
-        InsertDuplicateSlide
-        sleep(2)
-        if gUseSysDlg = FALSE then
-            if fDocumentCheck (gImpressFilter) = FALSE then
-                warnlog("The filter name (saving) is not correct! " & _
-                "Please check if an Impress document will be opened!")
-            end if
-        end if
-        hCloseDocument()
-    catch
-        Exceptlog
-        ResetApplication
-    endcatch
-    
-    try
-        gApplication = "DRAW"
-        printlog "  - " & gApplication
-        hNewDocument()
-        InsertSlide
-        if gUseSysDlg = FALSE then
-            if fDocumentCheck (gDrawFilter) = FALSE then
-                warnlog("The filter name (saving) is not correct! Please check if a Draw document will be opened!")
-            end if
-        end if
-        hCloseDocument()
-    catch
-        Exceptlog
-        ResetApplication
-    endcatch
-    try
-        gApplication = "HTML"
-        printlog "  - " & gApplication
-        hNewDocument()
-        Kontext "DocumentWriter"
-        DocumentWriter.TypeKeys "This is a HTML-Document!"
-        if gUseSysDlg = FALSE then
-            if (fDocumentCheck (gHTMLFilter) = FALSE) then
-                warnlog("The filter name (saving) is not correct! Please check if a HTML document will be opened! -> #i30867")
-            end if
-        end if
-        hCloseDocument()
-    catch
-        Exceptlog
-        ResetApplication
-    endcatch
-    
-    try
-        gApplication = "MATH"
-        printlog "  - " & gApplication
-        hNewDocument()
-        Call SchreibenInMathDok("a over b")
-        if gUseSysDlg = FALSE then
-            if fDocumentCheck (gMathFilter) = FALSE then
-                warnlog("The filter name (saving) is not correct! Please check if a Math document will be opened!")
-            end if
-        end if
-        hCloseDocument
-    catch
-        Exceptlog
-        ResetApplication
-    endcatch
-    
-    
-    try
-        gApplication = "MASTERDOCUMENT"
-        printlog "  - " & gApplication
-        hNewDocument()
-        Kontext "DocumentWriter"
-        DocumentWriter.TypeKeys "This is a master document!"
-        if gUseSysDlg = FALSE then
-            if fDocumentCheck (gMasterDocFilter) = FALSE then
-                warnlog("The filter name (saving) is not correct! Please check if a Master document will be opened!")
-            end if
-        end if
-        Kontext "Navigator"
-        if Navigator.Exists(5) then
-            Navigator.Close
-        end if
-        hCloseDocument()
-    catch
-        Exceptlog
-        ResetApplication
-    endcatch
-endcase
-
-'*******************************************************************************
+*****
 
 testcase tJava
 

Modified: incubator/ooo/trunk/main/testautomation/framework/required/includes/help_browser.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/required/includes/help_browser.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/required/includes/help_browser.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/required/includes/help_browser.inc Fri Jan 13 22:02:09 2012
@@ -1,79 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
-******
-'*
-'* owner : gregor.hartmann@oracle.com
-'*
-'* short description : global update/resource test
-'*
-'\******************************************************************************
-
-testcase tHelp_DialogTest
-
-    printlog( "Resource test for the Help Browser" )
-
-    dim brc as boolean
 
-    brc = hOpenHelp()
-    if ( not brc ) then
-        warnlog( "Help not open, aborting test" )
-        kontext "Active"
-        if ( Active.exists( 2 ) ) then
-        	printlog( "Msgbox: " & Active.getText() )
-        	Active.ok()
-        endif
-        goto endsub
-    endif
-
-    hSelectHelpTab( "content" )
-    hSelectHelpTab( "index" )
-    hSelectHelpTab( "find" )
-    hSelectHelpTab( "bookmarks" )
-    
-
-    brc = hSelectHelpTab( "content" )
-    call DialogTest( ContentPage )
-
-    brc = hSelectHelpTab( "index" )
-    call DialogTest( IndexPage )
-
-    brc = hSelectHelpTab( "find" )
-    call DialogTest( FindPage )
-
-    brc = hSelectHelpTab( "bookmarks" )
-    call DialogTest( BookmarksPage )
-
-    Kontext "StarOfficeHelp"
-    hCloseHelp()
-
-endcase
-
-'*******************************************************************************
+*****
 
 testcase tHelp_ToolBar
 

Modified: incubator/ooo/trunk/main/testautomation/framework/required/includes/printer_administration.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/required/includes/printer_administration.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/required/includes/printer_administration.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/required/includes/printer_administration.inc Fri Jan 13 22:02:09 2012
@@ -1,129 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'* owner : gregor.hartmann@oracle.com
-'*
-'* short description : updatetest for the printer configuration
-'*
-'\******************************************************************************
-
-testcase t_updt_spadmin
-
-    printlog( "Resource test for SPAdmin (Printer administration tool) for Unix(like) OS" )
-
-    if ( gtSysName = "eComStation" ) then
-        printlog( "No SpAdmin for eComStation" )
-        goto endsub
-    endif
-    
-    if ( lcase(gPlatform) = "osx") then
-        printlog( "No SPAdmin on MacOS X" )
-        goto endsub
-    endif
-    
-    if ( gPlatGroup = "w95" ) then
-        printlog( "No SPAdmin on Windows" )
-        goto endsub
-    endif
-
-    const CPRINTER = "tt-testprinter"
-    dim irc as integer
-    dim brc as boolean
-   
-    hShutdownOffice()
-   
-    brc = hOpenSpAdmin()
-    if ( brc ) then
-    
-        brc = hWaitForSpAdmin()
-        if ( not brc ) then
-            warnlog( "SpAdmin is not open, the test cannot continue" )
-            goto endsub
-        endif        
-   
-        irc = hDelPrinter( CPRINTER )
-        select case irc
-        case 0 : printlog( "Maybe printer was left over by prior run?" )
-        case 3 : printlog( "OK, printer does not exist" )
-        end select
-      
-        brc = hWaitForSpAdmin()
-        if ( not brc ) then
-            warnlog( "SpAdmin is not open, the test cannot continue" )
-            goto endsub
-        endif
-        
-        call TestNewPrinter( CPRINTER )
-      
-        ' wait for the spadmin to open, on failure we end the test
-        brc = hWaitForSpAdmin()
-        if ( not brc ) then
-            warnlog( "SpAdmin is not open, the test cannot continue" )
-            goto endsub
-        endif
-        
-        call TestProperties( CPRINTER )        
-      
-        ' wait for the spadmin to open, on failure we end the test
-        brc = hWaitForSpAdmin()
-        if ( not brc ) then
-            warnlog( "SpAdmin is not open, the test cannot continue" )
-            goto endsub
-        endif
-        
-        call TestRename( CPRINTER )
-        
-        ' wait for the spadmin to open, on failure we end the test
-        brc = hWaitForSpAdmin()
-        if ( not brc ) then
-            warnlog( "SpAdmin is not open, the test cannot continue" )
-            goto endsub
-        endif
-        
-        ' wait for the spadmin to open, on failure we end the test
-        brc = hWaitForSpAdmin()
-        if ( not brc ) then
-            warnlog( "SpAdmin is not open, the test cannot continue" )
-            goto endsub
-        endif        
-         
-        
-        irc = hDelPrinter( CPRINTER )
-        if ( irc <> 0 ) then
-            warnlog( "We created a Fax printer but it could not be deleted" )
-        endif
-        
-    endif
-   
-endcase
-
-'*******************************************************************************
+*****
 
 sub TestNewPrinter( cPrinter as string )
 

Modified: incubator/ooo/trunk/main/testautomation/framework/required/includes/script_organizers.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/required/includes/script_organizers.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/required/includes/script_organizers.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/required/includes/script_organizers.inc Fri Jan 13 22:02:09 2012
@@ -1,166 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
-******
-'*
-'*  owner : gregor.hartmann@oracle.com
-'*
-'*  short description : Verify names of macros and scripts
-'*
-'\******************************************************************************
-
-testcase tUpdtScripts
-
-    printlog( "Resource test for macros and scripts / related dialogs" )
-
-    if ( gIsoLang <> "en-US" ) then
-        printlog( "No testing for languages other than en_US" )
-        goto endsub
-    endif
-
-    const SCRIPTING_DIALOGS = 5
-    
-    const DLG_JAVASCRIPT = "JavaScript"
-    const DLG_BEANSHELL  = "BeanShell"
-    const DLG_PYTHON     = "Python"
-    const DLG_BASIC_ORG  = "BasicOrganizer"
-    const DLG_RUN_MACRO  = "RunMacro"
-
-    ' This is the build specific part of the filename including substrings for
-    ' the productname and language. 
-    dim sProductString as string : sProductString = gProductName & "_" & gISOLang & "_"
-
-    ' define platforms that have different scriptcount
-    if ( lcase( gPlatGroup ) = "w95" ) then sProductString = sProductString & "win_"
-    if ( lcase( gPlatform  ) = "osx" ) then sProductString = sProductString & "osx_"
-
-    ' replace all blanks
-    sProductString = hStringReplaceChar( sProductString, " ", "-" )
- 
-    ' This is where reference file is located, the filename is yet incomplete
-    dim sInputPath as string
-        sInputPath = gTesttoolPath & "framework/required/input/scripts/" & sProductString
-        
-    ' This is where we store the reference file if differences are found.
-    dim sOutputPath as string
-        sOutputPath = gOfficePath & "user/work/" & sProductString
-      
-    ' These contain the input and output paths (fully qualified)
-    dim sFileIn as string
-    dim sFileOut as string
-
-    ' Array that contains the scriptnames for all organizers
-    dim cScriptNamesList( 1000 ) as string
-
-    dim sDialog as string
-    dim iCurrentDialog as integer
-
-    dim iDiffCount as integer
-    dim max_diffcount as integer
-
-    hInitSingleDoc()
-
-    for iCurrentDialog = 1 to SCRIPTING_DIALOGS
-
-        ListAllDelete( cScriptNamesList() )
-
-        ' Build complete filename and identify dialog for logging and case selection
-        select case ( iCurrentDialog )
-        case 1 : sDialog = DLG_JAVASCRIPT
-        case 2 : sDialog = DLG_BEANSHELL
-        case 3 : sDialog = DLG_PYTHON
-        case 4 : sDialog = DLG_BASIC_ORG
-        case 5 : sDialog = DLG_RUN_MACRO
-        end select
-
-        printlog( "" )
-        sFileIn  = convertpath( sInputPath  & sDialog & ".txt" )
-        sFileOut = convertpath( sOutputPath & sDialog & ".txt" )
-
-        printlog( "Open <" & sDialog & "> and access the treelist object" )
-
-        ' Note: hGetAllNodeNames() is a *global* function defined in t_treelist_tools.inc
-        ' DLG_BASIC_ORG and DLG_RUN_MACRO have - in addition to the treelist -
-        ' a separate script list. To get those scripts a little more effort is
-        ' required which is done in the *local* function hGetScriptNames()
-
-        select case ( sDialog )
-        case DLG_JAVASCRIPT: ToolsMacrosOrganizeMacrosJavaScript
-            kontext "ScriptOrganizer"
-            hGetAllNodeNames( ScriptTreeList, cScriptNamesList() )
-            max_diffcount = 0
-        case DLG_BEANSHELL: ToolsMacrosOrganizeMacrosBeanShell
-            kontext "ScriptOrganizer"
-            hGetAllNodeNames( ScriptTreeList, cScriptNamesList() )
-            max_diffcount = 0
-        case DLG_PYTHON: ToolsMacrosOrganizeMacrosPython
-            kontext "ScriptOrganizer"
-            hGetAllNodeNames( ScriptTreeList, cScriptNamesList() )
-            max_diffcount = 0
-        case DLG_BASIC_ORG: ToolsMacro_uno
-            Kontext "Makro"
-            hGetScriptNames( MakroAus, MakroListe, cScriptNamesList() )
-            max_diffcount = 6
-        case DLG_RUN_MACRO: ToolsMacrosRunMacro
-            kontext "ScriptSelector"
-            hGetScriptNames( LibraryTreeList, ScriptList, cScriptNamesList() )
-            max_diffcount = 6
-        end select
-        
-        printlog( "Compare to reference list, create new one if differences were found" )
-        iDiffCount = abs( hManageComparisionList( sFileIn, sFileOut, cScriptNamesList() ) )
-
-        ' Usually we should have 0 differences in the list. However, as we do not have
-        ' a unique way of installing the office (Root-Installation, archives and
-        ' others) we need a little tolerance here. If a number of bundled extensions
-        ' are installed, we have more scripts.
-        if ( iDiffCount > max_diffcount ) then warnlog( "The number of scripts has changed, please review." )
-
-        printlog( "Close <" & sDialog & ">" )
-        select case ( sDialog ) 
-        case DLG_JAVASCRIPT :
-            ScriptOrganizer.cancel()
-        case DLG_BEANSHELL  :
-            ScriptOrganizer.cancel()
-        case DLG_PYTHON     :
-            ScriptOrganizer.cancel()
-        case DLG_BASIC_ORG  :
-            Makro.close()
-        case DLG_RUN_MACRO  :
-            ScriptSelector.cancel()
-        end select
-
-    next iCurrentDialog
-    
-    hCloseDocument()
-
-endcase
 
-'*******************************************************************************
+*****
 
 sub hGetScriptNames( oTreeList as object, oScriptList as object, cItemList() as string )
 

Modified: incubator/ooo/trunk/main/testautomation/framework/required/includes/tools_customize.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/required/includes/tools_customize.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/required/includes/tools_customize.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/required/includes/tools_customize.inc Fri Jan 13 22:02:09 2012
@@ -1,60 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
-******
-'*
-'*  owner : gregor.hartmann@oracle.com
-'*
-'*  short description : Update Test for the Tools Customize Dialog
-'*
-'\******************************************************************************
-
-testcase tUpdtCustomize( cApp as string )
-
-    printlog( "Tools/Customize dialog" )
-
-    if ( hCreateDocument() ) then    
-        if ( hToolsCustomizeOpen() ) then
-            hUpdtToolsCustomizeKeyboard()
-            hUpdtToolsCustomizeMenu()
-            hUpdtToolsCustomizeToolbars()
-            hUpdtToolsCustomizeEvents()
-            hCloseDialog( TabCustomizeEvents, "cancel" )
-        else
-            warnlog( "Tools/Customize dialog did not open" )
-        endif
-        hDestroyDocument
-    else
-        warnlog( "Failed to create initial document" )
-    endif
-    
-endcase
 
-'*******************************************************************************
+*****
 
 function hUpdtToolsCustomizeMenu()
 

Modified: incubator/ooo/trunk/main/testautomation/framework/required/includes/topten.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/required/includes/topten.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/required/includes/topten.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/required/includes/topten.inc Fri Jan 13 22:02:09 2012
@@ -1,67 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'* owner : gregor.hartmann@oracle.com
-'*
-'* short description : Smoke test (load/save/clipboard)
-'*
-'\***********************************************************************
-
-sub topten
-
-    ' we need the binary filters (.sxw etc.) for this test but beginning with
-    ' OOo 3.3 these are optional
-    if ( hCheckForBinfilters() ) then
-        gApplication = "WRITER"
-        call Top_ten_test
-
-        gApplication = "CALC"
-        call Top_ten_test
-
-        gApplication = "IMPRESS"
-        call Top_ten_test
-
-        gApplication = "DRAW"
-        call Top_ten_test
-
-        gApplication = "MATH"
-        call Top_ten_test
-
-        gApplication = "HTML"
-        call Top_ten_test
-
-        gApplication = "MASTERDOCUMENT"
-        call Top_ten_test
-    endif
-end sub
-
-'*******************************************************************************
+*****
 
 testcase Top_ten_test
 

Modified: incubator/ooo/trunk/main/testautomation/framework/required/includes/window_functions.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/required/includes/window_functions.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/required/includes/window_functions.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/required/includes/window_functions.inc Fri Jan 13 22:02:09 2012
@@ -1,146 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'*  owner : gregor.hartmann@oracle.com
-'*
-'*  short description : Window/Titlebar functionality
-'*
-'\******************************************************************************
-
-testcase tWindowFunctions
-
-    printlog( "Update test for window functions" )
-
-    printlog( "Create initial document" )
-    gApplication = "WRITER"
-    hInitSingleDoc()
-    hInitWriteDocIdentifier( "F_updt_windowfuncs.bas" )
-
-    printlog( "New document" )
-    hNewDocument()
-    if ( getDocumentCount <> 2 ) then
-        warnlog( "Two open documents were expected, found " & getDocumentCount )
-    endif
-
-    kontext "DocumentWriter"
-    printlog( "Close document" )
-    DocumentWriter.close()
-
-    if ( getDocumentCount <> 1 ) then
-        warnlog( "One open document was expected, found " & getDocumentCount )
-    endif
-
-    printlog( "New document" )
-    hNewDocument()
-    if ( getDocumentCount <> 2) then
-        warnlog( "Two open documents were expected, found " & getDocumentCount )
-    endif
-
-    printlog( "Enter some text into the second writer document" )
-    kontext "DocumentWriter"
-    DocumentWriter.TypeKeys( "test" )
-    DocumentWriter.close()
-
-    kontext "active"
-    if ( Active.exists() ) then
-        printlog( "Close messagebox with Cancel (leaves the document open)" )
-        Active.Cancel()
-    else
-        warnlog( "No warning that data will be lost on close of this document" )
-    endif
-
-    kontext "DocumentWriter"
-    if ( getDocumentCount = 2 ) then
-        printlog( "Two documents open. Good." )
-    else
-        warnlog( "Incorrect document count. Expected two, found " & getDocumentCount )
-    endif
-
-    kontext "DocumentWriter"
-    printlog( "Close the document" )
-    FileClose()
-
-    kontext "Active"
-    if ( Active.exists() ) then
-        printlog( "Do not save the document" )
-        Active.No()
-    else
-        warnlog( "Warning: No data loss warning" )
-    endif
-
-    kontext "DocumentWriter"
-    if ( getDocumentCount = 1 ) then
-        printlog( "One document open. Good." )
-    else
-        warnlog( "Incorrect document count. Expected one, found " & getDocumentCount )
-    endif
-
-    Kontext "DocumentWriter"
-    printlog( "Minimize window" )
-    DocumentWriter.Minimize()
-    Wait( 2000 )
-
-    kontext "DocumentWriter"
-    if ( DocumentWriter.IsMin() ) then
-        printlog( "Window is minimized" )
-    else
-        warnlog( "Window not minimized" )
-    endif
-
-    kontext "DocumentWriter"
-    printlog( "Restore window" )
-    DocumentWriter.Restore()
-    Wait( 2000 )
-
-    if ( DocumentWriter.IsRestore() ) then
-        printlog( "Window is Restored" )
-    else
-        warnlog( " * Window not Restored" )
-    endif
-
-    kontext "DocumentWriter"
-    printlog( "Maximize window" )
-    DocumentWriter.Maximize()
-    Wait( 2000 )
-
-    kontext "DocumentWriter"
-    if ( DocumentWriter.IsMax() ) then
-        printlog( "Window is maximized" )
-    else
-        warnlog( " * Window not maximized" )
-    endif
-
-    hDestroyDocument()
-
-endcase
-
-'*******************************************************************************
+*****
 
 sub sAllWindowTitle
 

Modified: incubator/ooo/trunk/main/testautomation/framework/required/includes/wizard_mailmerge.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/required/includes/wizard_mailmerge.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/required/includes/wizard_mailmerge.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/required/includes/wizard_mailmerge.inc Fri Jan 13 22:02:09 2012
@@ -1,205 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'*  owner : gregor.hartmann@oracle.com
-'*
-'*  short description : Update test for the mailmerge wizard
-'*
-'\******************************************************************************
-
-private CSV_DATABASE as string
-
-testcase tUpdtWizardMailMerge
-
-    printlog( "Resource test for the mailmerge wizard" )
-
-    dim brc as boolean
-    dim irc as integer
-    
-    qaerrorlog( "#i54524# - MM-Wizard modifies datasource -> CVS merge conflict" )
-    
-    CSV_DATABASE = hGetWorkPath() & "myDatabase"
-    hDeleteFile( CSV_DATABASE )
-    hRemoveDatabaseConnections()
-
-    
-    hInitSingleDoc()
-    
-    printlog( "Open the Mailmerge-Wizard" )
-    ToolsMailMergeWizard
-    
-    Kontext "MailMergeWizard"
-    brc = hUpdtMMWpage1()
-    if ( not brc ) then
-        warnlog( "MailMergeWizard is not visible, aborting test" )
-        goto endsub
-    endif
-    
-    Kontext "MailMergeWizard"
-    hClickButton( NextButton )
-    hUpdtMMWPage2()
-    
-    Kontext "MailMergeWizard"
-    hClickButton( NextButton )
-    hUpdtMMWpage3()
-    
-    Kontext "MailMergeWizard"
-    hClickButton( NextButton )
-    hUpdtMMWPage4()
-    
-    Kontext "MailMergeWizard"
-    hClickButton( NextButton )
-    hUpdtMMWPage5()
-
-    Kontext "MailMergeWizard"
-    hClickButton( NextButton )
-    hUpdtMMWPage6()
-    
-    Kontext "MailMergeWizard"
-    hClickButton( NextButton )
-    hUpdtMMWPage7()
-    
-    Kontext "MailMergeWizard"
-    hClickNextButton()
-    hUpdtMMWPage8()
-    
-    printlog( "close the wizard" )
-    Kontext "MailMergeWizard"
-    hCloseDialog( MailMergeWizard, "cancel" )
-
-    hRemoveDatabaseConnections()
-    hCloseDocument()
-    hCloseDocument()
-    
-
-endcase
-
-'**********************************************************************
-
-function hUpdtMMWpage1() as boolean
-
-    
-
-    const CFN = "hUpdtMMWpage1::"
-    
-    Kontext "TabMailMergeSourceDocument"
-    if ( not TabMailMergeSourceDocument.exists() ) then
-        warnlog( CFN & "Page 1 could not be accessed" )
-        hUpdtMMWPage1() = false
-        exit function
-    endif
-
-    Kontext "TabMailMergeSourceDocument"
-    if ( BrowseDocument.exists( 1 ) ) then
-        if ( BrowseDocument.isEnabled ) then
-            BrowseDocument.click()
-            
-            Kontext "OeffnenDlg"
-            if ( OeffnenDlg.exists( 1 ) ) then
-                printlog( CFN & "BrowseDocument::File Open Dialog" )
-                call dialogtest( OeffnenDlg )
-                OeffnenDlg.cancel()
-            else
-                warnlog( CFN & "BrowseDocument::FileOpen not open" )
-            endif
-        else
-            warnlog( CFN & "BrowseDocument::Button is disabled" )
-       endif
-    else
-        warnlog( CFN & "BrowseDocument::Button does not exist" )
-    endif
-    
-    Kontext "TabMailMergeSourceDocument"
-    if ( BrowseTemplate.exists( 2 ) ) then
-        if ( BrowseTemplate.isEnabled ) then
-            BrowseTemplate.click()
-            
-            Kontext "Neu"
-            if ( Neu.exists( 1 ) ) then
-                printlog( CFN & "BrowseTemplate::New Dialog" )
-                call dialogtest( Neu )
-                Neu.cancel()
-            else
-                warnlog( CFN & "BrowseTemplate::FileOpen not open" )
-            endif
-        else
-            warnlog( CFN & "BrowseTemplate::Button is disabled" )
-        endif
-    else
-        warnlog( CFN & "BrowseTemplate::Button does not exist" )
-    endif
-        
-    kontext "TabMailMergeSourceDocument"
-    if ( CreateANewDocument.exists( 2 ) ) then
-        if ( CreateANewDocument.isEnabled ) then
-            printlog( CFN & "Check Create new Document" )
-            CreateANewDocument.check()
-        else
-            warnlog( CFN & "CheckBbox is disabled" )
-        endif
-    else
-        warnlog( CFN & "CheckBox does not exist" )
-    endif
-
-    hUpdtMMWPage1() = true
-
-end function
-
-'**********************************************************************
-
-function hUpdtMMWpage2()
-
-
-    const CFN = "hUpdtMMWpage2::"
-
-    Kontext "TabMailMergeDocumentType"
-    if ( not TabMailMergeDocumentType.exists( 2 ) ) then
-        warnlog( CFN & "Page 2 could not be accessed" )
-        exit function
-    endif
-    
-    call dialogtest( TabMailMergeDocumentType )
-    
-    printlog( CFN & "Select to create a letter" )
-    if ( Letter.exists() ) then
-        if ( Letter.isEnabled() ) then
-            Letter.check()
-        else
-            warnlog( CFN & "Cannot check Letter-Checkbox" )
-        endif
-    else
-        warnlog( CFN & "Letter Checkbox does not exist" )
-    endif
-    
-end function   
-
-'*******************************************************************************
+*****
 
 function hUpdtMMWpage3()
 

Modified: incubator/ooo/trunk/main/testautomation/framework/tools/includes/CJK_tools.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/tools/includes/CJK_tools.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/tools/includes/CJK_tools.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/tools/includes/CJK_tools.inc Fri Jan 13 22:02:09 2012
@@ -1,65 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
 
-'*
-'* owner : hercule.li@oracle.com
-'*
-'* short description : Tools for CJK feature test in Writer
-'*
-'\***********************************************************************
-
-function CheckAsianLanguageSupport( sSupport as String )  as String
-
-    ToolsOptions
-    Call hToolsOptions("LANGUAGESETTINGS","LANGUAGES")
-
-    if ( aktivieren.exists() ) then
-        if ( aktivieren.isEnabled() ) then
-            if ( lcase( sSupport ) = "on" ) then
-                printlog( "Enabling Asian Language Support" )
-                Aktivieren.Check
-            else
-                printlog( "Disabling Asian Language Support" )
-                Aktivieren.uncheck()
-            endif
-        else
-            warnlog( "Activate Asian Language Support checkbox is disabled" )
-        endif
-    else
-        warnlog( "Activate Asian Language Support checkbox is missing" )
-    endif
-    
-    Kontext "ExtrasOptionenDlg"
-    ExtrasOptionenDlg.OK()
-    
-end function
-
-'******************************************************************************'
+****'
 
 function fStartupNavigator(navigatorItem as String , subItemNum as Integer)
     Dim j as Integer

Modified: incubator/ooo/trunk/main/testautomation/framework/tools/includes/customize_tools.inc
URL: http://svn.apache.org/viewvc/incubator/ooo/trunk/main/testautomation/framework/tools/includes/customize_tools.inc?rev=1231333&r1=1231332&r2=1231333&view=diff
==============================================================================
--- incubator/ooo/trunk/main/testautomation/framework/tools/includes/customize_tools.inc (original)
+++ incubator/ooo/trunk/main/testautomation/framework/tools/includes/customize_tools.inc Fri Jan 13 22:02:09 2012
@@ -1,47 +1,26 @@
 'encoding UTF-8  Do not remove or change this line!
 '*************************************************************************
 '
-' 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.
+'  Licensed to the Apache Software Foundation (ASF) under one
+'  or more contributor license agreements.  See the NOTICE file
+'  distributed with this work for additional information
+'  regarding copyright ownership.  The ASF licenses this file
+'  to you under the Apache License, Version 2.0 (the
+'  "License"); you may not use this file except in compliance
+'  with the License.  You may obtain a copy of the License at
+'  
+'    http://www.apache.org/licenses/LICENSE-2.0
+'  
+'  Unless required by applicable law or agreed to in writing,
+'  software distributed under the License is distributed on an
+'  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+'  KIND, either express or implied.  See the License for the
+'  specific language governing permissions and limitations
+'  under the License.
 '
 '*************************************************************************
-******
-'*
-'*  owner : gregor.hartmann@oracle.com
-'*
-'*  short description : Tools to ease the use of the ToolsCustomize-Dialog
-'*
-'\******************************************************************************
-
-function hToolsCustomizeOpen() as boolean
-
-    printlog( "Open Tools/Customize dialog" )
-    ToolsCustomize
-    hToolsCustomizeOpen() = hToolsCustomizeSelectTab( "Events" )
-    
-end function
 
-'*******************************************************************************
+*****
 
 function hToolsCustomizeSelectTab( cTab as string ) as boolean
 



Mime
View raw message