diff options
Diffstat (limited to 'testautomation/writer/optional/w_formatpage.bas')
| -rw-r--r-- | testautomation/writer/optional/w_formatpage.bas | 140 |
1 files changed, 0 insertions, 140 deletions
diff --git a/testautomation/writer/optional/w_formatpage.bas b/testautomation/writer/optional/w_formatpage.bas deleted file mode 100644 index 5354809b1696..000000000000 --- a/testautomation/writer/optional/w_formatpage.bas +++ /dev/null @@ -1,140 +0,0 @@ -'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. -' -'/************************************************************************ -'* -'* owner : helge.delfs@oracle.com -'* -'* short description : Test the functionality of Page Formatting / Page Styles -'* -'\******************************************************************* - -global gSeperator as String -global gMeasurementUnit as String - -sub main - Dim StartZeit - - StartZeit = Now() - - use "writer\tools\includes\w_tools.inc" - use "writer\tools\includes\w_tool3.inc" - use "writer\tools\includes\w_tool7.inc" - use "writer\optional\includes\tools\tools1.inc" - use "writer\optional\includes\tools\tools2.inc" - use "writer\optional\includes\formatpage\w_formatpage1.inc" - use "writer\optional\includes\formatpage\w_formatpage2.inc" - use "writer\optional\includes\formatpage\w_formatpage3.inc" - use "writer\optional\includes\formatpage\w_formatpage4.inc" - - printlog Chr(13) + "Loading of Include - Files takes: " + Wielange ( StartZeit ) - printlog Chr(13) + "******* Writer - Level 1 - Test *******" - printlog Chr(13) + " - Test of page function -" - - Call hStatusIn ( "writer", "w_FormatPage.bas" , "Page" ) - - Call wOptionsUndo ( "All" ) ' Sets all writer-options to default - 'Software Configuration: - 'Getting the decimal seperator from global function - gSeperator = GetDecimalSeperator() - 'Setting the measurement unit to centimeters. - gMeasurementUnit = fSetMeasurementToCM() - - Call tFormatPage_1 - Call tFormatPage_2 - Call tFormatPage_3 - Call tFormatPage_4 - Call tFormatPage_5 - Call tFormatPage_6 - Call tFormatPage_7 - Call tFormatPage_8 - Call tFormatPage_9 - Call tFormatPage_10 - Call tFormatPage_11 - Call tFormatPage_12 - Call tFormatPage_13 - Call tFormatPage_14 - Call tFormatPage_15 - Call tFormatPage_16 - Call tFormatPage_17 - Call tFormatPage_18 - Call tFormatPage_19 - Call tFormatPage_20 - Call tFormatPage_21 - Call tFormatPage_22 - Call tFormatPage_23 - Call tFormatPage_24 - Call tFormatPage_25 - Call tFormatPage_26 - Call tFormatPage_27 - Call tFormatPage_28 - Call tFormatPage_29 - Call tFormatPage_30 - Call tFormatPage_31 - Call tFormatPage_32 - Call tFormatPage_33 - Call tFormatPage_34 - Call tFormatPage_35 - Call tFormatPage_36 - Call tFormatPage_37 - Call tFormatPage_38 - Call tFormatPage_39 - Call tFormatPage_40 - Call tFormatPage_41 - Call tFormatPage_42 - Call tFormatPage_43 - Call tFormatPage_44 - Call tFormatPage_45 - Call tFormatPage_46 - Call tFormatPage_47 - Call tFormatPage_48 - Call tFormatPage_49 - Call tFormatPage_50 - Call tFormatPage_51 - Call tFormatPage_52 - Call tFormatPage_53 - Call tFormatPage_54 - Call tFormatPage_55 - Call tFormatPage_56 - Call tFormatPage_57 - Call tFormatPage_58 - Call tFormatPage_59 - Call tFormatPage_60 - - Call hStatusOut - - Printlog Chr(13) + "End of Level 1 Test (Format page):" - Printlog "Duration: "+ WieLange ( StartZeit ) - Printlog "Date: " + Date + " Time: " + Time - -end sub - -sub LoadIncludeFiles - use "global\system\includes\master.inc" - use "global\system\includes\gvariabl.inc" - Call GetUseFiles - gApplication = "WRITER" -end sub - |