merge the formfield patch from ooo-build
[ooovba.git] / testautomation / framework / required / includes / standard_toolbar_6.inc
blob0329ba8f1bbfae90cee8254d3ab18626a677a883
1 'encoding UTF-8  Do not remove or change this line!
2 '**************************************************************************
3 '* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 '* 
5 '* Copyright 2008 by Sun Microsystems, Inc.
6 '*
7 '* OpenOffice.org - a multi-platform office productivity suite
8 '*
9 '* $RCSfile: standard_toolbar_6.inc,v $
11 '* $Revision: 1.1 $
13 '* last change: $Author: jsi $ $Date: 2008-06-16 12:19:03 $
15 '* This file is part of OpenOffice.org.
17 '* OpenOffice.org is free software: you can redistribute it and/or modify
18 '* it under the terms of the GNU Lesser General Public License version 3
19 '* only, as published by the Free Software Foundation.
21 '* OpenOffice.org is distributed in the hope that it will be useful,
22 '* but WITHOUT ANY WARRANTY; without even the implied warranty of
23 '* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
24 '* GNU Lesser General Public License version 3 for more details
25 '* (a copy is included in the LICENSE file that accompanied this code).
27 '* You should have received a copy of the GNU Lesser General Public License
28 '* version 3 along with OpenOffice.org.  If not, see
29 '* <http://www.openoffice.org/license.html>
30 '* for a copy of the LGPLv3 License.
32 '/************************************************************************
34 '* owner : joerg.skottke@sun.com
36 '* short description : global update test (Standardbar)
38 '\***************************************************************************
40 testcase tStandardBar_6
42     '///<h1>Update test: &quot;New-Button&quot; on Standard Bar for all applications</h1>
43     '///<ul>
45     '///+<li>Disable the Impress Autopilot</li>
46     hUseImpressAutopilot( false )
47     
48     gApplication = "WRITER"
49     
50     '///+<li>Check the 'New'-menu-button in Standardbar in each application</li>
51     printlog "Check the 'New'-menu-button in Standardbar in each application"
52     printlog "- click on menu-button -> open a new document as same document-type"
53     
54     '///+<li>Open a new writer doc</li>
55     printlog "   - Writer"
56     gApplication = "WRITER"
57     hCreateDocument()
58     '///+click on 'new'
60     kontext "standardbar"
61     Neu.Click()
62     
63     '///+<li>Check if the new document is a writer-doc</li>
64     kontext "documentwriter"
65     DocumentWriter.TypeKeys( "Hallo" )
66     
67     '///+<li>Close both new docs</li>
68     hDestroyDocument()
69     hDestroyDocument()
70     
71     '///+<li>Open a new calc doc</li>
72     printlog "   - Calc"
73     gApplication = "CALC"
74     hCreateDocument()
75     
76     '///+<li>Click on 'new'</li>
77     kontext "standardbar"
78     Neu.Click()
79     
80     '///+<li>Check if the new document is a calc-doc</li>
81     kontext "documentcalc"
82     DocumentCalc.TypeKeys( "Hallo" )
83     
84     '///+<li>Close both new docs</li>
85     hDestroyDocument()
86     hDestroyDocument()
87     
88     '///+<li>Open a new draw doc</li>
89     printlog "   - Draw"
90     gApplication = "DRAW"
91     hCreateDocument()
93     kontext "standardbar"
94     '///+<li>Click on 'new'</li>
95     Neu.Click()
96     
97     '///+<li>Check if the new document is a draw-doc</li>
98     gMouseClick ( 50, 50 )
99     
100     '///+<li>Close both new docs</li>
101     hDestroyDocument()
102     hDestroyDocument()
103     
104     '///+<li>Open a new impress doc</li>
105     printlog "   - Impress"
106     gApplication = "IMPRESS"
107     hCreateDocument()
109     kontext "standardbar"
110     '///+<li>Click on 'new'</li>
111     Neu.Click()
112     
113     '///+<li>Check if the new document is a impress-doc</li>
114     gMouseClick ( 50, 50 )
115     
116     '///+<li>Close both new docs</li>
117     hDestroyDocument()
118     hDestroyDocument()
119     
120     '///+<li>Open a new HTML doc</li>
121     printlog "   - HTML-document"
122     gApplication = "HTML"
123     hCreateDocument()
124     '///+click on 'new'
126     kontext "standardbar"
127     Neu.Click()
128     '///+<li>Check if the new document is a HTML-doc</li>
130     kontext "documentwriter"
131     DocumentWriter.TypeKeys( "Hallo" )
132     
133     '///+<li>Close both new docs</li>
134     hDestroyDocument()
135     hDestroyDocument()
136     
137     '///+<li>Open a new master document</li>
138     printlog "   - Master-document"
139     gApplication = "MASTERDOCUMENT"
140     hCreateDocument()
141     '///+<li>Click on &quot;new&quot;</li>
143     kontext "standardbar"
144     Neu.Click()
145     '///+<li>Check if the new document is a master doc</li>
147     kontext "documentwriter"
148     DocumentWriter.TypeKeys( "Hallo" )
149     
150     '///+<li>Close the navigator</li>
151     '///+<li>Close the document</li>
152     hCloseNavigator()
153     hDestroyDocument()
154     
155     '///+<li>Close the navigator</li>
156     '///+<li>Close the second document</li>
157     hCloseNavigator()
158     hDestroyDocument()
159     
160     '///+<li>Open a new math document</li>
161     printlog "   - Math"
162     gApplication = "MATH"
163     hCreateDocument()
164     '///+<li>Click on 'new'</li>
166     kontext "standardbar"
167     Neu.Click()
168     
169     '///+<li>Check if the new document is a math document</li>
170     SchreibenInMathdok "a over b"
171     
172     '///+<li>Close both new documents</li>
173     hDestroyDocument()
174     hDestroyDocument()
175     '///</ul>
176     
177 endcase