testautomation/framework/optional/includes/help_bookmarks.inc

   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 2000, 2010 Oracle and/or its affiliates.
   6 '
   7 ' OpenOffice.org - a multi-platform office productivity suite
   8 '
   9 ' This file is part of OpenOffice.org.
  10 '
  11 ' OpenOffice.org is free software: you can redistribute it and/or modify
  12 ' it under the terms of the GNU Lesser General Public License version 3
  13 ' only, as published by the Free Software Foundation.
  14 '
  15 ' OpenOffice.org is distributed in the hope that it will be useful,
  16 ' but WITHOUT ANY WARRANTY; without even the implied warranty of
  17 ' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 ' GNU Lesser General Public License version 3 for more details
  19 ' (a copy is included in the LICENSE file that accompanied this code).
  20 '
  21 ' You should have received a copy of the GNU Lesser General Public License
  22 ' version 3 along with OpenOffice.org.  If not, see
  23 ' <http://www.openoffice.org/license.html>
  24 ' for a copy of the LGPLv3 License.
  25 '
  26 '/******************************************************************************
  27 '*
  28 '*  owner : gregor.hartmann@oracle.com
  29 '*
  30 '*  short description : Bookmarks in the help browser
  31 '*
  32 '\******************************************************************************
  33
  34 testcase tHelpBookmarks
  35
  36     printlog( "Bookmarks in Help Browser")
  37     dim brc as boolean
  38     dim cStringFind as string
  39     dim cStringBookmark as string
  40     dim iItemCount as integer
  41     const MYBOOKMARK = "myBookMark"
  42
  43     printlog( "Open Help Browser")
  44     brc = hOpenHelp()
  45     if ( not brc ) then
  46         warnlog( "Help not open, aborting test")
  47         goto endsub
  48     endif
  49
  50     printlog( "Switch to Search Tab (Find)")
  51     brc = hSelectHelpTab( "find")
  52
  53     printlog( "Enter <Java> as search term")
  54     SearchFind.setText( "java")
  55
  56     printlog( "Search whole words and headers only")
  57     FindInHeadingsOnly.check()
  58     FindFullWords.check()
  59     FindButton.click()
  60
  61     printlog( "Select first match and display the item")
  62     Result.select( 1  )
  63     cStringFind = Result.getSelText()
  64     DisplayFind.click()
  65
  66     printlog( "Switch to the bookmarks tab")
  67     hSelectHelpTab( "bookmarks")
  68
  69     printlog( "Click the <Add Bookmark> button")
  70     SetBookmarks.click()
  71
  72     Kontext "AddBookmark"
  73     printlog( "Name the bookmark after checking its default name")
  74     cStringBookmark = BookmarkName.getText()
  75     if ( cStringFind = cStringBookmark ) then
  76         printlog( "Bookmark has correct default name: " & cStringFind )
  77     else
  78         warnlog( "Incorrect default name for new bookmark")
  79     endif
  80
  81     printlog( "Accept default name, close dialog with ok")
  82     AddBookmark.ok()
  83
  84     printlog( "Verify that the bookmark has been added to the list")
  85     hSelectHelpTab( "bookmarks")
  86
  87     Kontext "BookmarksPage"
  88     printlog( "Verify that the bookmark has been added")
  89     iItemCount = Bookmarks.getItemCount()
  90     if ( iItemCount = 1 ) then
  91         printlog( "The correct number of bookmarks is listed (1)")
  92     else
  93         warnlog( "Incorrect number of bookmarks listed")
  94     endif
  95
  96     printlog( "Abort the test if there is no bookmark listed at all")
  97     if ( iItemCount = 0 ) then
  98         warnlog( "Bookmark has not been created, aborting test")
  99         call hCloseHelp()
 100         goto endsub
 101     endif
 102
 103     Kontext "BookmarksPage"
 104     printlog( "Verify that the bookmark name makes it to the bookmarks list")
 105     Bookmarks.select( 1 )
 106     cStringBookmark = Bookmarks.getSelText()
 107     if ( cStringBookmark = cStringFind ) then
 108         printlog( "Name in the bookmarks-list: " & cStringFind )
 109     else
 110         warnlog( "Incorrect name in bookmarks list: " & cStringBookmark )
 111     endif
 112
 113     printlog( "Close the help")
 114     hCloseHelp()
 115
 116     printlog( "Reopen Help")
 117     hOpenHelp()
 118
 119     printlog( "Verify that the bookmark is still present")
 120     hSelectHelpTab( "bookmarks")
 121
 122     printlog( "Open the context menu and rename the bookmark")
 123     Kontext "BookmarksPage"
 124     Bookmarks.select( 1 )
 125     brc = hUseBookmarksContextMenu( "rename")
 126
 127     printlog( "Change the name of the bookmark, accept with ok")
 128     Kontext "AddBookmark"
 129     if ( brc and AddBookmark.exists() ) then
 130         BookmarkName.setText( MYBOOKMARK )
 131         AddBookmark.ok()
 132     else
 133         warnlog( "The AddBookmarks dialog is not open")
 134     endif
 135
 136     printlog( "Verify that the changed name is listed in the listbox")
 137     hSelectHelpTab( "bookmarks")
 138
 139     kontext "BookmarksPage"
 140     Bookmarks.select( 1 )
 141     cStringBookmark = Bookmarks.getSelText()
 142     if ( cStringBookmark = MYBOOKMARK ) then
 143         printlog( "The Bookmark has been renamed: " & cStringBookmark )
 144     else
 145         warnlog( "Incorrect name displayed in bookmarks list")
 146     endif
 147
 148     printlog( "Close the Help, Close the Office")
 149     hCloseHelp()
 150
 151     printlog( "Restart the office, open help, switch to Bookmarks tab")
 152     call ExitRestartTheOffice()
 153     hOpenHelp()
 154     hSelectHelpTab( "bookmarks")
 155
 156     printlog( "Verify that the renamed bookmark still exists")
 157     Kontext "BookmarksPage"
 158     if ( Bookmarks.getItemCount() > 0 ) then
 159         Bookmarks.select( 1 )
 160         cStringBookmark = Bookmarks.getSelText()
 161         if ( cStringBookmark = MYBOOKMARK ) then
 162             printlog( "The bookmark has the correct name")
 163         else
 164             warnlog( "Incorrect name displayed in bookmarks list")
 165         endif
 166
 167         printlog( "Delete the Bookmark (using context menu)")
 168         hUseBookmarksContextMenu( "delete")
 169
 170         printlog( "verify that the bookmark has been deleted (none left)")
 171         kontext "Bookmarks"
 172         if ( bookmarks.getItemCount = 0 ) then
 173             printlog( "Bookmark has been deleted")
 174         else
 175             warnlog( "There are bookmarks left over, please check")
 176         endif
 177     else
 178         warnlog( "Bookmarks are lost on program restart")
 179     endif
 180
 181     printlog( "Close the help")
 182     hClosehelp()
 183
 184     printlog( "Open help, switch to bookmarks tab")
 185     hOpenhelp()
 186     hSelectHelpTab( "bookmarks")
 187
 188     printlog( "Verify that the bookmark has been deleted")
 189     kontext "BookmarksPage"
 190     iItemCount = Bookmarks.getItemCount()
 191     if ( iItemCount = 0 ) then
 192         printlog( "The bookmark has been deleted")
 193     else
 194         warnlog( "Bookmarks have been left over, there should be none")
 195     endif
 196
 197     printlog( "Close help")
 198     hCloseHelp()
 199
 200 endcase
 201