summaryrefslogtreecommitdiff
path: root/testautomation
diff options
context:
space:
mode:
authorOliver Bolte <obo@openoffice.org>2008-07-25 06:44:12 +0000
committerOliver Bolte <obo@openoffice.org>2008-07-25 06:44:12 +0000
commitcbf67038c37a3239f48a4b0d0dcbc49d053e9a49 (patch)
tree0aedde474f2b24fa288976ef5d1d0bd7e2d3c1a0 /testautomation
parent4545d3ca44636d6f7c9d6546f494efd293455944 (diff)
INTEGRATION: CWS dba30g (1.1.22); FILE MERGED
2008/07/22 12:51:02 msc 1.1.22.1: #i91600# add new testcase
Diffstat (limited to 'testautomation')
-rwxr-xr-xtestautomation/dbaccess/required/includes/ReportBuilder01.inc39
1 files changed, 37 insertions, 2 deletions
diff --git a/testautomation/dbaccess/required/includes/ReportBuilder01.inc b/testautomation/dbaccess/required/includes/ReportBuilder01.inc
index e4c0915e325b..62902a9faf0c 100755
--- a/testautomation/dbaccess/required/includes/ReportBuilder01.inc
+++ b/testautomation/dbaccess/required/includes/ReportBuilder01.inc
@@ -8,9 +8,9 @@
'*
'* $RCSfile: ReportBuilder01.inc,v $
'*
-'* $Revision: 1.3 $
+'* $Revision: 1.4 $
'*
-'* last change: $Author: obo $ $Date: 2008-07-22 12:34:57 $
+'* last change: $Author: obo $ $Date: 2008-07-25 07:44:12 $
'*
'* This file is part of OpenOffice.org.
'*
@@ -47,6 +47,7 @@ sub rpt_Main
call tConditionalFormatingDialog
call tPageNumber
call tDateTime
+ call tFormatPage
call tGroupingSorting
call tReportNavigator
call tReportHeaderFooter
@@ -773,3 +774,37 @@ testcase tEditReport
call fCloseDatabase
endcase
+'-------------------------------------------------------------------------
+testcase tFormatPage
+
+ printlog "open Bibliography database"
+ call fOpenDatabase(gOfficePath + ConvertPath("user/database/biblio.odb"))
+
+ printlog "open the report designer"
+ call fOpenNewReportDesign
+
+ printlog "open format/page dialog via the menu"
+ Kontext "ReportDesign"
+ ReportDesign.UseMenu
+ hMenuSelectNr(5)
+ hMenuSelectNr(3)
+
+ printlog "check if the format page dialog appear"
+ Kontext "TabSeite"
+ if ( not TabSeite.exists(3)) then
+ warnlog "format page dialog doesn't appear"
+ call fCloseReportDesign
+ call fCloseDatabase
+ goto endsub
+ else
+ printlog "format page dialog appear"
+ call DialogTest(TabSeite)
+ TabSeite.Cancel
+ endif
+
+ '/// close the report designer
+ call fCloseReportDesign
+ '/// close the database
+ call fCloseDatabase
+
+endcase