diff options
author | Oliver Craemer [oc] <oliver.craemer@oracle.com> | 2011-01-24 09:32:27 +0100 |
---|---|---|
committer | Oliver Craemer [oc] <oliver.craemer@oracle.com> | 2011-01-24 09:32:27 +0100 |
commit | f923dcf75e74cae00b33d3ca06ef6beef21324c2 (patch) | |
tree | de7f122621f73151ad6628715a56f8c7c6e0806a /testautomation | |
parent | 4f06c864a34a8b2d0dd80824412c3030511685aa (diff) |
#i115845# adapt autotest for chart data axis
Diffstat (limited to 'testautomation')
-rw-r--r-- | testautomation/chart2/required/ch2_updt_calc.bas | 1 | ||||
-rw-r--r-- | testautomation/chart2/required/includes/ch2_format.inc | 37 |
2 files changed, 38 insertions, 0 deletions
diff --git a/testautomation/chart2/required/ch2_updt_calc.bas b/testautomation/chart2/required/ch2_updt_calc.bas index 02cc2c883269..342c89dfed11 100644 --- a/testautomation/chart2/required/ch2_updt_calc.bas +++ b/testautomation/chart2/required/ch2_updt_calc.bas @@ -112,6 +112,7 @@ sub main Call tFormatAxisSecondaryXAxis Call tFormatAxisSecondaryYAxis Call tFormatAxisAllAxes + Call tFormatDateAxis Call tFormatXAxisMainGrid Call tFormatYAxisMainGrid Call tFormatZAxisMainGrid diff --git a/testautomation/chart2/required/includes/ch2_format.inc b/testautomation/chart2/required/includes/ch2_format.inc index 42048cbbb7de..27575ca4324f 100644 --- a/testautomation/chart2/required/includes/ch2_format.inc +++ b/testautomation/chart2/required/includes/ch2_format.inc @@ -47,6 +47,7 @@ ' #1 tFormatAxisSecondaryXAxis ' #1 tFormatAxisSecondaryYAxis ' #1 tFormatAxisAllAxes +' #1 tFormatDateAxis '* '\************************************************************************ @@ -1404,4 +1405,40 @@ testcase tFormatAxisAllAxes endcase +' +'------------------------------------------------------------- +' +testcase tFormatDateAxis + printlog "Load simple chart document" + if fLoadVerySimpleChartAndSaveLocal() > 0 then + warnlog "Loading test document seems to have failed -> Check this out!" + goto endsub + endif + printlog " Select chart using navigator" + call fSelectFirstOLE + printlog "Edit / Object / Edit" + EditObjectEdit + sleep(1) + printlog "Invoke Format::Axis::X Axis" + FormatAxisXAxis + printlog "Goto tab page Scale" + Kontext + Active.SetPage TabChartAxisScale + Kontext "TabChartAxisScale" + printlog " Switch axis type to Date" + AxisType.Select (3) + printlog " Verify that the date controls are available" + if MinorIntervalUnit.exists then + call DialogTest ( TabChartAxisScale,2 ) + else + warnlog "Datecontrols are not available" + end if + printlog " Close dialog" + TabChartAxisScale.Cancel + printlog "Close document" + Kontext "DocumentCalc" + DocumentCalc.TypeKeys "<Escape>" + Call hCloseDocument + +endcase |