diff options
| author | Mikhail Voytenko <mav@openoffice.org> | 2010-09-27 17:00:09 +0200 |
|---|---|---|
| committer | Mikhail Voytenko <mav@openoffice.org> | 2010-09-27 17:00:09 +0200 |
| commit | 603ae0de4dee6000b053808ff1e8fd6e5fdcaf7b (patch) | |
| tree | 182fa5743af9ac205fcdd9527e4f1f83d206a118 /testautomation/writer/optional | |
| parent | d57ac99460bae6dd3b85e803367fa82073819770 (diff) | |
| parent | 78f4c0b79d80cae6561dd919571d1f9eead2f4bc (diff) | |
fwk149: rebase to DEV300_m88
Diffstat (limited to 'testautomation/writer/optional')
137 files changed, 355 insertions, 332 deletions
diff --git a/testautomation/writer/optional/includes/CJKCTLDependency/CJKCTLDependency1.inc b/testautomation/writer/optional/includes/CJKCTLDependency/CJKCTLDependency1.inc index 6099a5a784b6..90e1c423a51f 100644 --- a/testautomation/writer/optional/includes/CJKCTLDependency/CJKCTLDependency1.inc +++ b/testautomation/writer/optional/includes/CJKCTLDependency/CJKCTLDependency1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test CJK and CTL support dependency '* diff --git a/testautomation/writer/optional/includes/alternative_text/w_alternative_text.inc b/testautomation/writer/optional/includes/alternative_text/w_alternative_text.inc index 8b2abe0c7d0b..74f65eaa1704 100644 --- a/testautomation/writer/optional/includes/alternative_text/w_alternative_text.inc +++ b/testautomation/writer/optional/includes/alternative_text/w_alternative_text.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test Alternative Text for objects in writer '* diff --git a/testautomation/writer/optional/includes/autocorrection/w_autocorrect1.inc b/testautomation/writer/optional/includes/autocorrection/w_autocorrect1.inc index 6d47479a4597..694c3dec0de4 100644 --- a/testautomation/writer/optional/includes/autocorrection/w_autocorrect1.inc +++ b/testautomation/writer/optional/includes/autocorrection/w_autocorrect1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the AutoCorrect/AutoFormat/Options '* @@ -1049,7 +1049,7 @@ testcase tToolsAutocorrectOptions_8 firstLine = "1. FirstLine" testContent = "Test1" - hopeResult = "1.Test1" + hopeResult = "2. Test1" Call wTypeKeys firstLine Call wTypeKeys "<Return>" diff --git a/testautomation/writer/optional/includes/autocorrection/w_autocorrect2.inc b/testautomation/writer/optional/includes/autocorrection/w_autocorrect2.inc index 57e8f5ad073b..b15edc69479a 100644 --- a/testautomation/writer/optional/includes/autocorrection/w_autocorrect2.inc +++ b/testautomation/writer/optional/includes/autocorrection/w_autocorrect2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test AutoCorrect/AutoFormat/Word Completion '* diff --git a/testautomation/writer/optional/includes/autotext/w_autotext.inc b/testautomation/writer/optional/includes/autotext/w_autotext.inc index 2921a66e5d7b..19e2955f27ab 100755..100644 --- a/testautomation/writer/optional/includes/autotext/w_autotext.inc +++ b/testautomation/writer/optional/includes/autotext/w_autotext.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of autotext in writer '* diff --git a/testautomation/writer/optional/includes/calculate/w_calculate.inc b/testautomation/writer/optional/includes/calculate/w_calculate.inc index 3b8df0e6cf2e..ccbc196d46aa 100644 --- a/testautomation/writer/optional/includes/calculate/w_calculate.inc +++ b/testautomation/writer/optional/includes/calculate/w_calculate.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Put description here '* diff --git a/testautomation/writer/optional/includes/chinesetranslate/w_chinesetranslate1.inc b/testautomation/writer/optional/includes/chinesetranslate/w_chinesetranslate1.inc index 58b97f0bfd4a..9c432380228a 100644 --- a/testautomation/writer/optional/includes/chinesetranslate/w_chinesetranslate1.inc +++ b/testautomation/writer/optional/includes/chinesetranslate/w_chinesetranslate1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Chinese Translation test '* diff --git a/testautomation/writer/optional/includes/chinesetranslate/w_chinesetranslate2.inc b/testautomation/writer/optional/includes/chinesetranslate/w_chinesetranslate2.inc index 8a24e3dbd617..85e2ae9aa1f0 100644 --- a/testautomation/writer/optional/includes/chinesetranslate/w_chinesetranslate2.inc +++ b/testautomation/writer/optional/includes/chinesetranslate/w_chinesetranslate2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Chinese Dictionary test '* diff --git a/testautomation/writer/optional/includes/clipboard/clipbrd_func.inc b/testautomation/writer/optional/includes/clipboard/clipbrd_func.inc index 278ecd229eda..de6a4d0b4fef 100755..100644 --- a/testautomation/writer/optional/includes/clipboard/clipbrd_func.inc +++ b/testautomation/writer/optional/includes/clipboard/clipbrd_func.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Functions for HTML-Test '* diff --git a/testautomation/writer/optional/includes/clipboard/w_210_.inc b/testautomation/writer/optional/includes/clipboard/w_210_.inc index 296772b937fc..12926c8a486b 100644 --- a/testautomation/writer/optional/includes/clipboard/w_210_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_210_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_211_.inc b/testautomation/writer/optional/includes/clipboard/w_211_.inc index 2507bdb422e3..b385e745cf16 100644 --- a/testautomation/writer/optional/includes/clipboard/w_211_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_211_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_212_.inc b/testautomation/writer/optional/includes/clipboard/w_212_.inc index 667627689d6e..6c2a6e9c175e 100644 --- a/testautomation/writer/optional/includes/clipboard/w_212_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_212_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_213_.inc b/testautomation/writer/optional/includes/clipboard/w_213_.inc index f0cb56aa6dc3..1cf8e50fa2de 100644 --- a/testautomation/writer/optional/includes/clipboard/w_213_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_213_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_214_.inc b/testautomation/writer/optional/includes/clipboard/w_214_.inc index 1567818d63e1..5f6521b4ae67 100644 --- a/testautomation/writer/optional/includes/clipboard/w_214_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_214_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_215_.inc b/testautomation/writer/optional/includes/clipboard/w_215_.inc index 76aa31a2e108..95883f35ae1b 100644 --- a/testautomation/writer/optional/includes/clipboard/w_215_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_215_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_216_.inc b/testautomation/writer/optional/includes/clipboard/w_216_.inc index b36f8490a90e..3952ece03e4c 100644 --- a/testautomation/writer/optional/includes/clipboard/w_216_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_216_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_217_.inc b/testautomation/writer/optional/includes/clipboard/w_217_.inc index 0e9bc109e6e6..fcb6b450803a 100644 --- a/testautomation/writer/optional/includes/clipboard/w_217_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_217_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_218_.inc b/testautomation/writer/optional/includes/clipboard/w_218_.inc index fe06d5bf9541..6788407f6c05 100644 --- a/testautomation/writer/optional/includes/clipboard/w_218_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_218_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_219_.inc b/testautomation/writer/optional/includes/clipboard/w_219_.inc index 8e547d4bf448..74ca4d7c5f71 100644 --- a/testautomation/writer/optional/includes/clipboard/w_219_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_219_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_220_.inc b/testautomation/writer/optional/includes/clipboard/w_220_.inc index c28b2c541cb8..e938ba027fd1 100644 --- a/testautomation/writer/optional/includes/clipboard/w_220_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_220_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_221_.inc b/testautomation/writer/optional/includes/clipboard/w_221_.inc index b699258c302f..4b5818065244 100644 --- a/testautomation/writer/optional/includes/clipboard/w_221_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_221_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/clipboard/w_222_.inc b/testautomation/writer/optional/includes/clipboard/w_222_.inc index 7850fe13f7bb..1efb0e67fda4 100644 --- a/testautomation/writer/optional/includes/clipboard/w_222_.inc +++ b/testautomation/writer/optional/includes/clipboard/w_222_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Writer) '* diff --git a/testautomation/writer/optional/includes/contextmenu/w_contextmenu1.inc b/testautomation/writer/optional/includes/contextmenu/w_contextmenu1.inc index 69e1b245a89c..c4d79cece29a 100644 --- a/testautomation/writer/optional/includes/contextmenu/w_contextmenu1.inc +++ b/testautomation/writer/optional/includes/contextmenu/w_contextmenu1.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Pick context for context menus '* diff --git a/testautomation/writer/optional/includes/drawing/w_drawing_tools1.inc b/testautomation/writer/optional/includes/drawing/w_drawing_tools1.inc index 1b2579ee0aaf..659bb2a4ddb7 100755..100644 --- a/testautomation/writer/optional/includes/drawing/w_drawing_tools1.inc +++ b/testautomation/writer/optional/includes/drawing/w_drawing_tools1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of the drawing tools '* diff --git a/testautomation/writer/optional/includes/drawing/w_drawing_tools2.inc b/testautomation/writer/optional/includes/drawing/w_drawing_tools2.inc index 0207a177c706..8b6b8e8329e8 100755..100644 --- a/testautomation/writer/optional/includes/drawing/w_drawing_tools2.inc +++ b/testautomation/writer/optional/includes/drawing/w_drawing_tools2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of the drawing tools - group '* diff --git a/testautomation/writer/optional/includes/dropdownLB/w_dropdownLB1.inc b/testautomation/writer/optional/includes/dropdownLB/w_dropdownLB1.inc index ec93d15cdcb2..6c4b39d0263f 100644 --- a/testautomation/writer/optional/includes/dropdownLB/w_dropdownLB1.inc +++ b/testautomation/writer/optional/includes/dropdownLB/w_dropdownLB1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test Drop Down List Box '* diff --git a/testautomation/writer/optional/includes/fields/w_fields1.inc b/testautomation/writer/optional/includes/fields/w_fields1.inc index 0287fd2f1da1..2f727260b6c2 100755..100644 --- a/testautomation/writer/optional/includes/fields/w_fields1.inc +++ b/testautomation/writer/optional/includes/fields/w_fields1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Fields general test '* diff --git a/testautomation/writer/optional/includes/fields/w_fields2.inc b/testautomation/writer/optional/includes/fields/w_fields2.inc index 4023480ff7dd..4f2c5c39388c 100755..100644 --- a/testautomation/writer/optional/includes/fields/w_fields2.inc +++ b/testautomation/writer/optional/includes/fields/w_fields2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Fields general test '* @@ -879,7 +879,7 @@ testcase tDocumentStatistics ' document has to be copied to local file system to avoid opening a read-only file ' because all field data gets lost if documents write-protection is removed via 'sMakeReadOnlyDocumentEditable' FileCopy (sOriginalFile, sTestFile) - if hFileExists ( sTestFile ) = false then + if FileExists ( sTestFile ) = false then Warnlog "Test document couldn't be copied to local file system. Test aborted!" goto endsub end if @@ -942,7 +942,7 @@ testcase tDocumentTemplate ' document has to be copied to local file system to avoid opening a read-only file ' because all field data gets lost if documents write-protection is removed via 'sMakeReadOnlyDocumentEditable' FileCopy (sOriginalFile, sTestFile) - if hFileExists ( sTestFile ) = false then + if FileExists ( sTestFile ) = false then Warnlog "Test document couldn't be copied to local file system. Test aborted!" goto endsub end if diff --git a/testautomation/writer/optional/includes/fields/w_fields3.inc b/testautomation/writer/optional/includes/fields/w_fields3.inc index db40fbc54f22..7b4e7f50722b 100644 --- a/testautomation/writer/optional/includes/fields/w_fields3.inc +++ b/testautomation/writer/optional/includes/fields/w_fields3.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Fields - References Test '* diff --git a/testautomation/writer/optional/includes/fields/w_fields4.inc b/testautomation/writer/optional/includes/fields/w_fields4.inc index f498051225db..d1e16a1a36be 100755..100644 --- a/testautomation/writer/optional/includes/fields/w_fields4.inc +++ b/testautomation/writer/optional/includes/fields/w_fields4.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Doc Information Test '* diff --git a/testautomation/writer/optional/includes/fields/w_fields5.inc b/testautomation/writer/optional/includes/fields/w_fields5.inc index d0ef15f71fb3..334d01906307 100755..100644 --- a/testautomation/writer/optional/includes/fields/w_fields5.inc +++ b/testautomation/writer/optional/includes/fields/w_fields5.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Fields - Variables '* @@ -667,7 +667,7 @@ endcase '----------------------------------------------------------------- testcase tVariablesDDEFieldManual - warnlog "#i112079#testcase must be reworked" + qaerrorlog "#i112079#testcase must be reworked" goto endsub Dim sDDEFile as String @@ -759,7 +759,7 @@ endcase '----------------------------------------------------------------- testcase tVariablesDDEFieldAutomatic - warnlog "#i112079#testcase must be reworked" + qaerrorlog "#i112079#testcase must be reworked" goto endsub qaerrorlog "#i102792# - tVariablesDDEFieldAutomatic outcommented. Fields not updated." diff --git a/testautomation/writer/optional/includes/fields/w_fields6.inc b/testautomation/writer/optional/includes/fields/w_fields6.inc index dce94f12c305..e310b67740af 100644 --- a/testautomation/writer/optional/includes/fields/w_fields6.inc +++ b/testautomation/writer/optional/includes/fields/w_fields6.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Fields - Functions '* diff --git a/testautomation/writer/optional/includes/fields/w_fields7.inc b/testautomation/writer/optional/includes/fields/w_fields7.inc index 70dfedc62085..5893e324366b 100755..100644 --- a/testautomation/writer/optional/includes/fields/w_fields7.inc +++ b/testautomation/writer/optional/includes/fields/w_fields7.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Fields - L10N test '* diff --git a/testautomation/writer/optional/includes/filter/w_filter.inc b/testautomation/writer/optional/includes/filter/w_filter.inc index 6cb6db7e9488..43a47baf0d2a 100644 --- a/testautomation/writer/optional/includes/filter/w_filter.inc +++ b/testautomation/writer/optional/includes/filter/w_filter.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* Owner : helge.delfs@sun.com +'* Owner : helge.delfs@oracle.com '* '* short description : '* diff --git a/testautomation/writer/optional/includes/fontwork/w_fontwork1.inc b/testautomation/writer/optional/includes/fontwork/w_fontwork1.inc index 79d42b49dac3..6fff78a962fe 100644 --- a/testautomation/writer/optional/includes/fontwork/w_fontwork1.inc +++ b/testautomation/writer/optional/includes/fontwork/w_fontwork1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test Format/Fontwork '* diff --git a/testautomation/writer/optional/includes/formatcharacter/w_format_character1.inc b/testautomation/writer/optional/includes/formatcharacter/w_format_character1.inc index 9a454b54b07b..eb2de884a8cc 100644 --- a/testautomation/writer/optional/includes/formatcharacter/w_format_character1.inc +++ b/testautomation/writer/optional/includes/formatcharacter/w_format_character1.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Standard character formatting. Setting Styles. '* diff --git a/testautomation/writer/optional/includes/formatpage/w_formatpage1.inc b/testautomation/writer/optional/includes/formatpage/w_formatpage1.inc index a8867d1f171a..84a5c5281f8b 100644 --- a/testautomation/writer/optional/includes/formatpage/w_formatpage1.inc +++ b/testautomation/writer/optional/includes/formatpage/w_formatpage1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the functionality of Page Formatting / Page Styles - 1 '* @@ -53,18 +53,18 @@ testcase tFormatPage_1 PrintLog "- Open format/page dialog" '/// <b> Open format/page dialog </b> /// - + Call hNewDocument - + '/// 1. via Mouse clicks in Menu: Format-Page try fFormatPageWriter("TabSeite") TabSeite.Cancel catch endcatch - + '/// 2. via shortcuts in menu (manual test is needed) - + '/// 3. via Context menu when Cursor is in the document try hMenuSelectNr(5) @@ -77,7 +77,7 @@ testcase tFormatPage_1 TabSeite.Cancel catch endcatch - + Call hCloseDocument endcase @@ -125,21 +125,21 @@ endcase testcase tFormatPage_3 Dim iTextLength as integer - + PrintLog "- Test Landscape in tabpage Page" '/// Test Landscape in tabpage Page - + Call hNewDocument Call wOptionsUndo( "Grundschriften" ) - + '/// Input a long test string Call wTypeKeys "ABCDEFGHIJKLMNOPQRSTUVWXYZABCDEFGHIJKLMNOPQRSTUVWXYZABCDEFGHIJKLMNOPQRSTUVWXYZABCDEFGHIJKLMNOPQ" Call wTypeKeys "<Mod1 Home>" Call wTypeKeys "<Shift End>" EditCopy iTextLength = Len(GetClipBoardtext) - + '/// Format/Page , tabpage page , check 'Landscape' fFormatPageWriter("TabSeite") Papierformat.Select 2 ' A4 Paper @@ -147,14 +147,14 @@ testcase tFormatPage_3 Quer.Check Wait 500 TabSeite.OK - + '/// Check if Checkbox -- Landscape works fine Call wTypeKeys "<Mod1 Home>" Call wTypeKeys "<Shift End>" EditCopy wait 500 if Len(GetClipboardText) <= iTextLength then Warnlog "Checkbox Landscape doesn't work fine!" - + Call hCloseDocument endcase @@ -166,14 +166,14 @@ testcase tFormatPage_4 Dim iFormat as Integer Dim sWidth as String Dim sHeight as String - + iFormat = 2 'A4 paper - + PrintLog "- Width and Height boxes must change after changing between Portrait and Landscape" '/// Width and Height boxes must change after changing between Portrait and Landscape - + Call hNewDocument - + '/// Format/Page tabpage page , '/// + check 'Portrait' first and get width and height , '/// + then change from Portrait to Landscape @@ -185,13 +185,13 @@ testcase tFormatPage_4 Sleep 1 sWidth = Breite.GetText sHeight = Hoehe.GetText - + Quer.Check Sleep 1 if Breite.GetText <> sHeight then Warnlog "Width isn't changed when changing from Portrait to Landscape !" if Hoehe.GetText <> sWidth then Warnlog "Height isn't changed when changing from Portrait to Landscape !" TabSeite.Cancel - + '/// Format/Page tabpage page , '/// + check 'Landscape' first and get width and height , '/// + then change from Landscape to Portrait @@ -203,13 +203,13 @@ testcase tFormatPage_4 Sleep 1 sWidth = Breite.GetText sHeight = Hoehe.GetText - + Hoch.Check Sleep 1 if Breite.GetText <> sHeight then Warnlog "Width isn't changed when changing from Landscape to Portrait !" if Hoehe.GetText <> sWidth then Warnlog "Height isn't changed when changing from Landscape to Portrait !" TabSeite.Cancel - + Call hCloseDocument endcase @@ -222,28 +222,28 @@ testcase tFormatPage_5 Dim sWidth as String , sHeight as String Dim sLeft as String , sRight as String , sUp as String , sBottom as String ' set page size Dim sLeft1 as String , sRight1 as String , sUp1 as String , sBottom1 as String ' get page size - + iFormat = 2 'A4 paper sWidth = "20" + gSeperator + "00" + gMeasurementUnit sHeight = "25" + gSeperator + "00" + gMeasurementUnit - + sLeft = "15" + gSeperator + "00" + gMeasurementUnit sRight = "15" + gSeperator + "00" + gMeasurementUnit sUp = "15" + gSeperator + "00" + gMeasurementUnit sBottom = "15" + gSeperator + "00" + gMeasurementUnit - + sLeft1 = "15" + gSeperator + "00" + gMeasurementUnit sRight1 = "4" + gSeperator + "50" + gMeasurementUnit sUp1 = "15" + gSeperator + "00" + gMeasurementUnit sBottom1 = "9" + gSeperator + "50" + gMeasurementUnit - + PrintLog "- The sum of 'Left margin' and 'Right margin' must always stay below the Paper width." PrintLog " (Same for top/bottom and height)" '/// The sum of "Left margin" and "Right margin" must always stay below the Paper width. '/// (Same for top/bottom and height) - + Call hNewDocument - + '/// Format/Page , tabpage Page , set width and height , close the dialog fFormatPageWriter("TabSeite") Papierformat.Select iFormat @@ -255,7 +255,7 @@ testcase tFormatPage_5 Hoehe.SetText sHeight Wait 500 TabSeite.OK - + '/// Format/Page , tabpage Page , '/// + Set the sum of "Left margin" and "Right margin" more than Width fFormatPageWriter("TabSeite") @@ -264,13 +264,13 @@ testcase tFormatPage_5 Rechts.SetText sRight Wait 500 TabSeite.OK - + '/// Check if the setting is OK fFormatPageWriter("TabSeite") if Left$(Links.GetText,5) <> Left$(sLeft1,5) then Warnlog "The Margin(left) is wrong!" if Left$(Rechts.GetText,4) <> Left$(sRight1,4) then Warnlog "The Margin(right) is wrong!" TabSeite.Cancel - + '/// Format/Page , tabpage Page , '/// + Set the sum of "Up margin" and "Bottom margin" more than Heigth fFormatPageWriter("TabSeite") @@ -279,13 +279,13 @@ testcase tFormatPage_5 Unten.SetText sBottom Wait 500 TabSeite.OK - + '/// Check if the setting is OK fFormatPageWriter("TabSeite") if Left$(Oben.GetText,5) <> Left$(sUp1,5) then Warnlog "The Margin(Up) is wrong!" if Left$(Unten.GetText,4) <> Left$(sBottom1,4) then Warnlog "The Margin(Bottom) is wrong!" TabSeite.Cancel - + Call hCloseDocument endcase @@ -298,22 +298,22 @@ testcase tFormatPage_6 Dim iFormatLayout as Integer , iReferenceStyle as Integer Dim sWidth as String, sHeight as String Dim sLeft as String , sRight as String , sUp as String , sBottom as String - + iPaperTray = 1 : iPageLayout = 2 iFormatLayout = 2 : iReferenceStyle = 5 - + sWidth = "20" + gSeperator + "00" + gMeasurementUnit sHeight = "25" + gSeperator + "00" + gMeasurementUnit sLeft = "2" + gSeperator + "00" + gMeasurementUnit sRight = "2" + gSeperator + "00" + gMeasurementUnit sUp = "2" + gSeperator + "00" + gMeasurementUnit sBottom = "2" + gSeperator + "00" + gMeasurementUnit - + PrintLog "- Test Pre-defined formats" '/// Test Pre-defined formats - + Call hNewDocument - + '/// Format/Page , tabpage page , do some configuration fFormatPageWriter("TabSeite") Hoch.Check @@ -341,15 +341,15 @@ testcase tFormatPage_6 AbsatzVorlage.Select iReferenceStyle Wait 500 TabSeite.OK - + '/// Save the file , close the file and reload the file Call hFileSaveAsWithFilterKill (gOfficepath + "user\work\tFormatPage_6.odt", "writer8") Call hCloseDocument - + Call hNewDocument - + Call hFileOpen(gOfficepath + "user\work\tFormatPage_6.odt") - + '/// Check if Pre-defined formats are correct fFormatPageWriter("TabSeite") if Hoch.IsChecked <> TRUE then Warnlog "Portrait should be checked!" @@ -365,7 +365,7 @@ testcase tFormatPage_6 if Einschalten.IsChecked <> TRUE then Warnlog "Portrait should be checked!" if AbsatzVorlage.GetSelIndex <> iReferenceStyle then Warnlog "The reference style is wrong!" TabSeite.Cancel - + Call hCloseDocument endcase @@ -378,22 +378,22 @@ testcase tFormatPage_7 Dim iFormatLayout as Integer , iReferenceStyle as Integer Dim sWidth as String , sHeight as String Dim sLeft as String , sRight as String , sUp as String , sBottom as String - + iPaperTray = 1 : iPageLayout = 2 iFormatLayout = 2 : iReferenceStyle = 5 - + sWidth = "20" + gSeperator + "00" + gMeasurementUnit sHeight = "25" + gSeperator + "00" + gMeasurementUnit sLeft = "2" + gSeperator + "00" + gMeasurementUnit sRight = "2" + gSeperator + "00" + gMeasurementUnit sUp = "2" + gSeperator + "00" + gMeasurementUnit sBottom = "2" + gSeperator + "00" + gMeasurementUnit - + PrintLog "- Test user defined formats" '/// Test user defined formats - + Call hNewDocument - + '/// Format/Page , tabpage page , do some configuration fFormatPageWriter("TabSeite") Hoch.Check @@ -421,7 +421,7 @@ testcase tFormatPage_7 AbsatzVorlage.Select iReferenceStyle Wait 500 TabSeite.OK - + '/// Check if user defined formats are correct fFormatPageWriter("TabSeite") if Hoch.IsChecked <> TRUE then Warnlog "Portrait should be checked!" @@ -437,7 +437,7 @@ testcase tFormatPage_7 if Einschalten.IsChecked <> TRUE then Warnlog "Portrait should be checked!" if AbsatzVorlage.GetSelIndex <> iReferenceStyle then Warnlog "The reference style is wrong!" TabSeite.Cancel - + Call hCloseDocument endcase @@ -479,7 +479,7 @@ testcase tFormatPage_8 Warnlog "Listbox 'Text Direction' is visible though asian support is disabled" end if TabSeite.Cancel - + if RecheckCTLSupport = True then Call ActiveDeactivateCTLSupport(TRUE) else @@ -551,16 +551,16 @@ testcase tFormatPage_10 Dim RecheckAsianSupport as string RecheckCTLSupport = gCTLSup RecheckAsianSupport = gAsianSup - + PrintLog "- when Asian support and CTL are all enabled , 3 entries should be in Text Direction listbox" '/// when Asian support and CTL are all enabled , 3 entries should be in Text Direction listbox - + Call hNewDocument - + '/// Set Asian support enabled and Set CTL enabled Call ActiveDeactivateAsianSupport(TRUE) Call ActiveDeactivateCTLSupport(TRUE) - + '/// Check if there are 3 entires in Text Direction listbox fFormatPageWriter("TabSeite") if Textfluss.GetItemCount <> 3 then @@ -578,7 +578,7 @@ testcase tFormatPage_10 else Call ActiveDeactivateAsianSupport(FALSE) end if - + Call hCloseDocument endcase @@ -843,6 +843,8 @@ testcase tFormatPage_15 sFormat = "Som sidformatmall" case 49: sType = "Seite" sFormat = "Wie Seitenvorlage" + case 50: sType = "Stran" + sFormat = "Kot predloga za stran" case 55 : sType = "Estatísticas" sFormat = "Como Estilo de Página" case 81 : sType = "ページ" @@ -856,12 +858,12 @@ testcase tFormatPage_15 case else : QAErrorLog "The test does not support the language " + iSprache Goto endsub end select - + PrintLog "- Insertfields / other / Document / Type/Page -> As page Style must be set." '/// Insertfield / other / Document / Type/Page -> As page Style must be set. - + Call hNewDocument - + '/// InsertFields / other , tabpage document , select page , '/// + check if Page format is right Call fInsertFieldsOther("TabDokumentFeldbefehle") diff --git a/testautomation/writer/optional/includes/formatpage/w_formatpage2.inc b/testautomation/writer/optional/includes/formatpage/w_formatpage2.inc index dc53ca05257b..290b1a395b94 100644 --- a/testautomation/writer/optional/includes/formatpage/w_formatpage2.inc +++ b/testautomation/writer/optional/includes/formatpage/w_formatpage2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the functionality of Page Formatting / Page Styles - 2 '* diff --git a/testautomation/writer/optional/includes/formatpage/w_formatpage3.inc b/testautomation/writer/optional/includes/formatpage/w_formatpage3.inc index e713beda7af7..784f6dad28cc 100644 --- a/testautomation/writer/optional/includes/formatpage/w_formatpage3.inc +++ b/testautomation/writer/optional/includes/formatpage/w_formatpage3.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the functionality of Page Formatting / Page Styles - 3 '* @@ -641,6 +641,7 @@ testcase tFormatPage_37 case 39 : sHeader = "Riga d'intestazione" case 46 : sHeader = "Sidhuvud" case 49 : sHeader = "Kopfzeile" + case 50 : sHeader = "Glava" case 55 : sHeader = "Cabeçalho" case 81 : sHeader = "ヘッダ" case 82 : sHeader = "머리글" @@ -689,6 +690,7 @@ testcase tFormatPage_38 case 39 : sFooter = "Piè di pagina" case 46 : sFooter = "Sidfot" case 49 : sFooter = "Fußzeile" + case 50 : sFooter = "Noga" case 55 : sFooter = "Rodapé" case 81 : sFooter = "フッタ" case 82 : sFooter = "바닥글" @@ -866,23 +868,23 @@ testcase tFormatPage_41 Dim sWidthColumn1 as String Dim sWidthColumn2 as String Dim sWidthColumn3 as String - + sTestFile = Convertpath (gTesttoolpath + "writer\optional\input\formatpage\testColumnInPage2.sxw") sColumn = "3" sWidthColumn1 = "2" + gSeperator + "00" sWidthColumn2 = "4" + gSeperator + "00" - + PrintLog "- create columns with different width " '/// create columns with different width - + Call hNewDocument - + '/// Open test file testColumnInPage2.sxw '/// + (The test file includes 2 pages , some text is '/// + in 1st page and another is in 2nd page) Call hFileOpen(sTestFile) Call sMakeReadOnlyDocumentEditable - + '/// Create 3 with different columns . formatPage , '/// + tabpage columns , set 3 columns Call fFormatPageWriter("TabSpalten") @@ -899,14 +901,14 @@ testcase tFormatPage_41 sWidthColumn3 = Spaltenbreite3.GetText wait 500 TabSpalten.OK - + '/// Check if columns' width is right fFormatPageWriter("TabSpalten") if Left$(Spaltenbreite1.GetText,4) <> sWidthColumn1 then Warnlog "the column1's width isn't set correctly !" if Left$(Spaltenbreite2.GetText,4) <> sWidthColumn2 then Warnlog "the column2's width isn't set correctly !" if Spaltenbreite3.GetText <> sWidthColumn3 then Warnlog "the column3's width isn't set correctly !" TabSpalten.Cancel - + 'detailed check for column1 Kontext EditSearchAndReplace @@ -916,12 +918,12 @@ testcase tFormatPage_41 SearchAll.Click Sleep 1 FindAndReplace.Close - + Call wTypeKeys "<Home>" Call wTypeKeys "<Shift End>" EditCopy if Len(GetClipboardText) > 8 then Warnlog "Something wrong in the column1" - + 'detailed check for column2 Kontext EditSearchAndReplace @@ -931,12 +933,12 @@ testcase tFormatPage_41 SearchAll.Click Sleep 1 FindAndReplace.Close - + Call wTypeKeys "<Home>" Call wTypeKeys "<Shift End>" EditCopy if Len(GetClipboardText) > 14 then Warnlog "Something wrong in the column2" - + printlog " Close active document " Do Until GetDocumentCount = 0 Call hCloseDocument diff --git a/testautomation/writer/optional/includes/formatpage/w_formatpage4.inc b/testautomation/writer/optional/includes/formatpage/w_formatpage4.inc index b4dddd07910c..9b800e3bad4b 100644 --- a/testautomation/writer/optional/includes/formatpage/w_formatpage4.inc +++ b/testautomation/writer/optional/includes/formatpage/w_formatpage4.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the functionality of Page Formatting / Page Styles - 4 '* @@ -58,32 +58,32 @@ testcase tFormatPage_48 printlog "No test with asian lovale, because checkbox 'Asian language support' is disabled by default!" goto endsub end select - + sTestText1 = "This is the test!" sTestText2 = "That isn't a test!" - + PrintLog "- Text flow direction test Right to Left (Vertical) - Paragraph" '/// Text flow direction test Right to Left (Vertical) - Paragraph - + Call hNewDocument - + '/// Set Asian language support enabled Call ActiveDeactivateCTLSupport(FALSE) Call ActiveDeactivateAsianSupport(TRUE) - + '/// Input some test words Call wTypeKeys sTestText1 Call wTypeKeys "<Return>" Call wTypeKeys sTestText2 Sleep 1 - + '/// formatPage , tabpage page, select right to left (vertical) fFormatPageWriter("TabSeite") Textfluss.Select 2 Sleep 1 TabSeite.OK Sleep 2 - + '/// Check if the direction of the test words is changed Call wTypeKeys "<MOD1 Home>" Call wTypeKeys "<Shift Down>", 4 @@ -92,7 +92,7 @@ testcase tFormatPage_48 if GetClipboardText <> "This" then Warnlog "Something wrong in first word - get " &GetClipboardText end if - + Call wTypeKeys "<Home><Left>" Call wTypeKeys "<Shift Down>" , 4 Sleep 1 @@ -100,11 +100,11 @@ testcase tFormatPage_48 if GetClipboardText <> "That" then Warnlog "Something wrong in second word - get " &GetClipboardText end if - + if RecheckAsianSupport = False then Call ActiveDeactivateAsianSupport(FALSE) end if - + Call hCloseDocument endcase @@ -116,32 +116,32 @@ testcase tFormatPage_49 Dim sTestText as String Dim RecheckAsianSupport as boolean RecheckAsianSupport = gAsianSup - + sTestText = "This is the test!" - + PrintLog "- Text flow direction test Right to Left (Vertical) - Section" '/// Text flow direction test Right to Left (Vertical) - Section - + Call hNewDocument - + '/// Set Asian language support enabled Call ActiveDeactivateAsianSupport(TRUE) - + '/// Insert a section fInsertSection("TabBereiche") TabBereiche.OK - + '/// insert something in the section Call wTypeKeys "<Up>" Call wTypeKeys sTestText - + '/// formatPage , tabpage page, select right to left (vertical) fFormatPageWriter("TabSeite") Textfluss.Select 2 Sleep 1 TabSeite.OK Sleep 2 - + '/// Check if the direction of the test words is changed Call wTypeKeys "<Home>" Call wTypeKeys "<Shift Down>" , 4 @@ -151,7 +151,7 @@ testcase tFormatPage_49 if RecheckAsianSupport = False then Call ActiveDeactivateAsianSupport(FALSE) end if - + Call hCloseDocument endcase @@ -165,12 +165,12 @@ testcase tFormatPage_50 PrintLog "- Text flow direction test Right to Left (Vertical) - Footnotes" '/// Text flow direction test Right to Left (Vertical) - Footnotes - + Call hNewDocument - + '/// Set Asian language support enabled Call ActiveDeactivateAsianSupport(TRUE) - + '/// Insert a footnotes InsertFootnote Kontext "FussnoteEinfuegen" @@ -179,17 +179,17 @@ testcase tFormatPage_50 Sleep 1 FussnoteEinfuegen.OK Sleep 1 - + Call wTypeKeys "<PageUp>" Sleep 1 - + '/// formatPage , tabpage page, select right to left (vertical) Call fFormatPageWriter("TabSeite") Textfluss.Select 2 Sleep 1 TabSeite.OK Sleep 2 - + '/// Check if the direction of the footnote is changed Call wTypeKeys "<Down>" try @@ -199,7 +199,7 @@ testcase tFormatPage_50 Warnlog "Should NOT execute edit/footnote when focus is under the footnote" catch endcatch - + Call wTypeKeys "<Up>" try EditFootnote @@ -212,7 +212,7 @@ testcase tFormatPage_50 if RecheckAsianSupport = False then Call ActiveDeactivateAsianSupport(FALSE) end if - + Call hCloseDocument endcase @@ -223,15 +223,15 @@ testcase tFormatPage_51 Dim RecheckAsianSupport as boolean RecheckAsianSupport = gAsianSup - + PrintLog "- Text flow direction test Right to Left (Vertical) - Endnotes" '/// Text flow direction test Right to Left (Vertical) - Endnotes - + Call hNewDocument - + '/// Set Asian language support enabled Call ActiveDeactivateAsianSupport(TRUE) - + '/// Insert a endnotes InsertFootnote Kontext "FussnoteEinfuegen" @@ -240,17 +240,17 @@ testcase tFormatPage_51 Sleep 1 FussnoteEinfuegen.OK Sleep 1 - + Call wTypeKeys "<PageUp>" Sleep 1 - + '/// formatPage , tabpage page, select right to left (vertical) Call fFormatPageWriter("TabSeite") Textfluss.Select 2 Sleep 1 TabSeite.OK Sleep 2 - + '/// Check if the direction of the endnote is changed Call wTypeKeys "<Down>" try @@ -260,7 +260,7 @@ testcase tFormatPage_51 Warnlog "Should NOT execute edit/footnote when focus is under the endnote" catch endcatch - + Call wTypeKeys "<Up>" try EditFootnote @@ -273,7 +273,7 @@ testcase tFormatPage_51 if RecheckAsianSupport = False then Call ActiveDeactivateAsianSupport(FALSE) end if - + Call hCloseDocument endcase @@ -285,20 +285,20 @@ testcase tFormatPage_52 Dim sTest1 as String , sTest2 as String , sTest3 as String Dim RecheckAsianSupport as boolean RecheckAsianSupport = gAsianSup - + sTest1 = "A1" : sTest2 = "B1" : sTest3 = "A2" - + PrintLog "- Text flow direction test Right to Left (Vertical) - Table" '/// Text flow direction test Right to Left (Vertical) - Table - + Call hNewDocument - + '/// Set Asian language support enabled Call ActiveDeactivateAsianSupport(TRUE) - + '/// Insert a table Call hTabelleEinfuegen - + '/// + input some string in the table , like '/// a1 b1 '/// a2 @@ -312,14 +312,14 @@ testcase tFormatPage_52 wait 500 Call wTypeKeys sTest3 Call wTypeKeys "<Up><Home>" 'so far, the focus should be in front of A1 - + '/// formatPage , tabpage page, select right to left (vertical) Call fFormatPageWriter("TabSeite") Textfluss.Select 2 Sleep 1 TabSeite.OK Sleep 2 - + '/// Check if the direction of the table is changed Call wTypeKeys "<Shift Down>" , 2 Sleep 1 @@ -327,7 +327,7 @@ testcase tFormatPage_52 if GetClipboardText <> sTest1 then Warnlog "1st word in table is wrong!" end if - + Call wTypeKeys "<Down>" Call wTypeKeys "<Shift Down>" , 2 Sleep 1 @@ -335,7 +335,7 @@ testcase tFormatPage_52 if GetClipboardText <> sTest2 then Warnlog "2nd word in table is wrong!" end if - + Call wTypeKeys "<Left><Up>" Call wTypeKeys "<Shift Home>" Sleep 1 @@ -347,7 +347,7 @@ testcase tFormatPage_52 if RecheckAsianSupport = False then Call ActiveDeactivateAsianSupport(FALSE) end if - + Call hCloseDocument endcase @@ -355,36 +355,36 @@ endcase '------------------------------------------------------------------------------------------- testcase tFormatPage_53 - + Dim sTest as String Dim sTestFile as String Dim RecheckAsianSupport as boolean RecheckAsianSupport = gAsianSup - + sTest = "Test" sTestFile = Convertpath (gTesttoolpath + "writer\optional\input\formatpage\testColumnVertical.sxw") - + PrintLog "- Text flow direction test Right to Left (Vertical) - Column" '/// Text flow direction test Right to Left (Vertical) - Column - + Call hNewDocument - + '/// Set Asian language support enabled Call ActiveDeactivateAsianSupport(TRUE) - + '/// Open test file testColumnVertical.sxw '/// + There are 8 columns in the page , and a test '/// + word is in 3rd column Call hFileOpen(sTestFile) Call sMakeReadOnlyDocumentEditable - + '/// formatPage , tabpage page, select right to left (vertical) Call fFormatPageWriter("TabSeite") Textfluss.Select 2 Sleep 1 TabSeite.OK Sleep 2 - + '/// Check if the direction of the column is changed Kontext EditSearchAndReplace @@ -395,20 +395,20 @@ testcase tFormatPage_53 Sleep 1 FindAndReplace.Close Sleep 1 - + Call wTypeKeys "<Down>" Sleep 1 - + Call wTypeKeys "<Shift Up>" , 4 EditCopy if GetClipboardText <> sTest then Warnlog "the test word is wrong!" end if - + if RecheckAsianSupport = False then Call ActiveDeactivateAsianSupport(FALSE) end if - + printlog " Close active document " Do Until GetDocumentCount = 0 Call hCloseDocument @@ -626,6 +626,7 @@ testcase tFormatPage_58 case 39 : sDefaultShadowColor = "Grigio" case 46 : sDefaultShadowColor = "Grått" case 49 : sDefaultShadowColor = "Grau" + case 50 : sDefaultShadowColor = "Siva" case 55 : sDefaultShadowColor = "Cinza" case 81 : sDefaultShadowColor = "灰色" case 82 : sDefaultShadowColor = "회색" @@ -749,7 +750,7 @@ testcase tFormatPage_60 Oben.SetText sSpacingToContentsU Unten.SetText sSpacingToContentsB StilFarbe.Select iBorderColor 'set border color - + Position.TypeKeys "<Right>" , 4 Sleep 2 Groesse.SetText sShadowDistance diff --git a/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph1.inc b/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph1.inc index aef22db5a479..4fa007cfc4b0 100644 --- a/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph1.inc +++ b/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the functionality of Paragraph Formatting - 1 '* diff --git a/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph2.inc b/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph2.inc index 9da8c4706316..dccebdcf930e 100644 --- a/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph2.inc +++ b/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the functionality of Paragraph Formatting - 2 '* diff --git a/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph3.inc b/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph3.inc index ca8d8d564690..77af9b0a0301 100644 --- a/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph3.inc +++ b/testautomation/writer/optional/includes/formatparagraph/w_formatparagraph3.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the functionality of Paragraph Formatting - 3 '* diff --git a/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion1.inc b/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion1.inc index 33b20cf3c910..bacd2dd1d8af 100755..100644 --- a/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion1.inc +++ b/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of Hangul/Hanja Conversion - 1 '* diff --git a/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion2.inc b/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion2.inc index 5b9fc83f58de..26437f17f920 100755..100644 --- a/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion2.inc +++ b/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of Hangul/Hanja Conversion - 2 '* diff --git a/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion3.inc b/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion3.inc index 3ade639fd26d..0808ccacb3bb 100755..100644 --- a/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion3.inc +++ b/testautomation/writer/optional/includes/hangulhanjaonversion/hhConversion3.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of Hangul/Hanja Conversion - 3 '* diff --git a/testautomation/writer/optional/includes/hyphenation/w_hyphenation.inc b/testautomation/writer/optional/includes/hyphenation/w_hyphenation.inc index 01c1bc91a7c4..62132356360c 100755..100644 --- a/testautomation/writer/optional/includes/hyphenation/w_hyphenation.inc +++ b/testautomation/writer/optional/includes/hyphenation/w_hyphenation.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : hyphenation functionality test '* diff --git a/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic1.inc b/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic1.inc index 2041abb03124..4b0a23775f33 100644 --- a/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic1.inc +++ b/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of the insert graphic function - 1 '* diff --git a/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic2.inc b/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic2.inc index f1991ab84d45..c6c38ddfe934 100644 --- a/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic2.inc +++ b/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of the insert graphic function - 2 '* diff --git a/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic3.inc b/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic3.inc index 45223c7505a5..1a3624487ffb 100644 --- a/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic3.inc +++ b/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic3.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of the insert graphic function - 3 '* diff --git a/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic4.inc b/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic4.inc index 4903586002b1..561768ee8320 100644 --- a/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic4.inc +++ b/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic4.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of the insert graphic function - 4 '* diff --git a/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic5.inc b/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic5.inc index 3c0918fbe501..23ec4e96ff06 100644 --- a/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic5.inc +++ b/testautomation/writer/optional/includes/insertgraphic/w_insertgraphic5.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of the insert graphic function - 4 '* diff --git a/testautomation/writer/optional/includes/loadsave/w_loadsave.inc b/testautomation/writer/optional/includes/loadsave/w_loadsave.inc index 57d1be96d871..e4871e78f400 100644 --- a/testautomation/writer/optional/includes/loadsave/w_loadsave.inc +++ b/testautomation/writer/optional/includes/loadsave/w_loadsave.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Checks the export to all available Filters from '* @@ -52,6 +52,7 @@ testcase tExportAllReadableFormatsIntoODF Dim SavedCorrectly as Boolean Dim sExportFilter as string Dim sExportFile as string + Dim sExceptionFile as string Dim i as Integer WorkDirectory = ( ConvertPath ( gOfficePath + "user\work\" + gPlatgroup + "\export\")) @@ -77,8 +78,12 @@ testcase tExportAllReadableFormatsIntoODF For i = 1 to listCount(ImportFileList()) printlog "- " & i & ". load: " & ImportFileList(i) sExportFile = ImportFileList(i) + sExceptionFile = DateiExtract ( sExportFile ) + printlog sExceptionFile if GetExtention ( sExportFile ) = "psw" then - QAErrorlog "#i102221#Pocket Word filter puts General I/O Error" + QAErrorlog "#i102221#Pocket Word filter puts General I/O Error" + elseif LCase( sExceptionFile ) = "swdos.txt" then + QAErrorlog "#i114062#General I/O error loading StarWriter DOS file" else Call hFileOpen ( ImportFileList(i) ) printlog "- done" diff --git a/testautomation/writer/optional/includes/navigator/w_navigator.inc b/testautomation/writer/optional/includes/navigator/w_navigator.inc index ede650feb713..ec3b6cfd4627 100755..100644 --- a/testautomation/writer/optional/includes/navigator/w_navigator.inc +++ b/testautomation/writer/optional/includes/navigator/w_navigator.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Navigator test '* diff --git a/testautomation/writer/optional/includes/number/w_205_.inc b/testautomation/writer/optional/includes/number/w_205_.inc index b8b421719111..57a56ab80b8c 100644 --- a/testautomation/writer/optional/includes/number/w_205_.inc +++ b/testautomation/writer/optional/includes/number/w_205_.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Testing Number and Bullets '* diff --git a/testautomation/writer/optional/includes/number/w_205a_.inc b/testautomation/writer/optional/includes/number/w_205a_.inc index daa72c5ca4ac..0e157368d433 100644 --- a/testautomation/writer/optional/includes/number/w_205a_.inc +++ b/testautomation/writer/optional/includes/number/w_205a_.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : '* diff --git a/testautomation/writer/optional/includes/number/w_206_.inc b/testautomation/writer/optional/includes/number/w_206_.inc index c007e674d329..ae7698017216 100755..100644 --- a/testautomation/writer/optional/includes/number/w_206_.inc +++ b/testautomation/writer/optional/includes/number/w_206_.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Testing Number and Bullets '* @@ -358,11 +358,11 @@ testcase tToolsNumbering6 Warnlog "First paragraph not 'This is the first' but: " & sClipBrd(0) end if Case 2 - if sClipBrd(1) <> "1.This is the second" then + if sClipBrd(1) <> "1. This is the second" then Warnlog "First paragraph not '1.This is the second' but: " & sClipBrd(1) end if Case 3 - if sClipBrd(2) <> "2.This is the third" then + if sClipBrd(2) <> "2. This is the third" then Warnlog "First paragraph not '2.This is the third' but: " & sClipBrd(2) end if end select @@ -472,12 +472,12 @@ testcase tToolsNumbering7 end if end if Case 2 - if sClipBrd(1) <> "1.1.My second number" then - Warnlog "#128041#First paragraph not '1.1.My second number' but: " & sClipBrd(1) + if sClipBrd(1) <> "1. 1.My second number" then + Warnlog "#128041#Second paragraph not '1. 1.My second number' but: " & sClipBrd(1) end if Case 3 - if sClipBrd(2) <> "2.2.My third number" then - Warnlog "#128041#First paragraph not '2.2.My third number' but: " & sClipBrd(2) + if sClipBrd(2) <> "2. 2.My third number" then + Warnlog "#128041#Third paragraph not '2. 2.My third number' but: " & sClipBrd(2) end if end select next i @@ -707,16 +707,16 @@ testcase tToolsNumbering11 For i = 1 to 3 Select Case i Case 1 - if sClipBrd(0) <> "11A new first paragraph" then - Warnlog "First Heading not: '11A new first paragraph' but: " & sClipBrd(0) + if sClipBrd(0) <> "1 1A new first paragraph" then + Warnlog "First Heading not: '1 1A new first paragraph' but: " & sClipBrd(0) end if Case 2 - if sClipBrd(1) <> "22" then - Warnlog "First paragraph not '22' but: " & sClipBrd(1) + if sClipBrd(1) <> "2 2" then + Warnlog "First paragraph not '2 2' but: " & sClipBrd(1) end if Case 3 - if sClipBrd(2) <> "33A new third paragraph" then - Warnlog "First paragraph not '33A new third paragraph' but: " & sClipBrd(2) + if sClipBrd(2) <> "3 3A new third paragraph" then + Warnlog "First paragraph not '3 3A new third paragraph' but: " & sClipBrd(2) end if end select next i diff --git a/testautomation/writer/optional/includes/number/w_207_.inc b/testautomation/writer/optional/includes/number/w_207_.inc index 7c2c9511c969..634e7c5773a7 100644 --- a/testautomation/writer/optional/includes/number/w_207_.inc +++ b/testautomation/writer/optional/includes/number/w_207_.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Testing Number and Bullets '* diff --git a/testautomation/writer/optional/includes/option/wh_o_1.inc b/testautomation/writer/optional/includes/option/wh_o_1.inc index 2fe845f97232..cbc35f599a4b 100644 --- a/testautomation/writer/optional/includes/option/wh_o_1.inc +++ b/testautomation/writer/optional/includes/option/wh_o_1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : HTML-Options '* diff --git a/testautomation/writer/optional/includes/option/wh_o_2.inc b/testautomation/writer/optional/includes/option/wh_o_2.inc index acc92379f206..bdee49ed7460 100644 --- a/testautomation/writer/optional/includes/option/wh_o_2.inc +++ b/testautomation/writer/optional/includes/option/wh_o_2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Functional-Tests for Tools - Options - Html - Print & Table '* diff --git a/testautomation/writer/optional/includes/option/wh_o_3.inc b/testautomation/writer/optional/includes/option/wh_o_3.inc index fa0cf41317bf..58b87a72ea08 100644 --- a/testautomation/writer/optional/includes/option/wh_o_3.inc +++ b/testautomation/writer/optional/includes/option/wh_o_3.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Funcitonal-Test for Tools -Options - HTML - Cursor. '* diff --git a/testautomation/writer/optional/includes/option/wr_o_1.inc b/testautomation/writer/optional/includes/option/wr_o_1.inc index c53f132d7d8a..26edd589af84 100644 --- a/testautomation/writer/optional/includes/option/wr_o_1.inc +++ b/testautomation/writer/optional/includes/option/wr_o_1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Functional-Tests for Tools-Options-Writer -View & Grid '* diff --git a/testautomation/writer/optional/includes/option/wr_o_2.inc b/testautomation/writer/optional/includes/option/wr_o_2.inc index cb94f661de26..cdc8dc00de4c 100644 --- a/testautomation/writer/optional/includes/option/wr_o_2.inc +++ b/testautomation/writer/optional/includes/option/wr_o_2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Functional-Tests for Tools-Options-Writer-DefaultFont, Print, Table '* diff --git a/testautomation/writer/optional/includes/option/wr_o_3.inc b/testautomation/writer/optional/includes/option/wr_o_3.inc index cd93474b6093..39fd97994e1a 100644 --- a/testautomation/writer/optional/includes/option/wr_o_3.inc +++ b/testautomation/writer/optional/includes/option/wr_o_3.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer options tests '* diff --git a/testautomation/writer/optional/includes/option/wr_o_4.inc b/testautomation/writer/optional/includes/option/wr_o_4.inc index d5a692fc5a24..83f09e5c7e89 100755..100644 --- a/testautomation/writer/optional/includes/option/wr_o_4.inc +++ b/testautomation/writer/optional/includes/option/wr_o_4.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : '* @@ -872,7 +872,7 @@ testcase tToolsOptionsWriterMailMerge printlog " - fill out Mail Settings" Kontext "TabMailMergeEmail" YourName.Settext "Fredrik Haegg" - EmailAddress.Settext "helge.delfs@sun.com" + EmailAddress.Settext "helge.delfs@oracle.com" SendReplies.Check ReplyAddress.Settext "fredrikh@openoffice.org" ServerName.Settext "MySMTP-Server" @@ -926,7 +926,7 @@ testcase tToolsOptionsWriterMailMerge Kontext "TabMailMergeEmail" if YourName.Gettext <> "Fredrik Haegg" then Warnlog "'Your Name' has been changed after a restart" - if EmailAddress.Gettext <> "helge.delfs@sun.com" then Warnlog "'Email Address' has been changed after a restart" + if EmailAddress.Gettext <> "helge.delfs@oracle.com" then Warnlog "'Email Address' has been changed after a restart" if Not SendReplies.IsChecked then Warnlog "'Send replies' has been changed after a restart" if ReplyAddress.Gettext <> "fredrikh@openoffice.org" then Warnlog "'Reply adresses' has been changed after a restart" if ServerName.Gettext <> "MySMTP-Server" then Warnlog "'Server name' has been changed after a restart" diff --git a/testautomation/writer/optional/includes/option/wr_o_5.inc b/testautomation/writer/optional/includes/option/wr_o_5.inc index 8f475bb4325b..c8676fb164f2 100644 --- a/testautomation/writer/optional/includes/option/wr_o_5.inc +++ b/testautomation/writer/optional/includes/option/wr_o_5.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : This testcase is for thai issues only '* diff --git a/testautomation/writer/optional/includes/option/wr_o_a.inc b/testautomation/writer/optional/includes/option/wr_o_a.inc index b5390f46a92d..ac6084157867 100644 --- a/testautomation/writer/optional/includes/option/wr_o_a.inc +++ b/testautomation/writer/optional/includes/option/wr_o_a.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer options test '* diff --git a/testautomation/writer/optional/includes/redlining/w_redlining1.inc b/testautomation/writer/optional/includes/redlining/w_redlining1.inc index 782d921cc1a1..d6983e200a4c 100644 --- a/testautomation/writer/optional/includes/redlining/w_redlining1.inc +++ b/testautomation/writer/optional/includes/redlining/w_redlining1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of the Redlinig function - 1 '* diff --git a/testautomation/writer/optional/includes/redlining/w_redlining2.inc b/testautomation/writer/optional/includes/redlining/w_redlining2.inc index 6fa735ca75b6..4b442a8b3464 100644 --- a/testautomation/writer/optional/includes/redlining/w_redlining2.inc +++ b/testautomation/writer/optional/includes/redlining/w_redlining2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of the Redlinig function - 2 '* diff --git a/testautomation/writer/optional/includes/regexp/regular.inc b/testautomation/writer/optional/includes/regexp/regular.inc index b091f2e7bf65..3a323bce2a49 100644 --- a/testautomation/writer/optional/includes/regexp/regular.inc +++ b/testautomation/writer/optional/includes/regexp/regular.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Search for regular expressions '* diff --git a/testautomation/writer/optional/includes/regexp/search.inc b/testautomation/writer/optional/includes/regexp/search.inc index e3b2969632e3..8121859870ad 100755..100644 --- a/testautomation/writer/optional/includes/regexp/search.inc +++ b/testautomation/writer/optional/includes/regexp/search.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Search & Replace '* diff --git a/testautomation/writer/optional/includes/regression/issuezilla/w_issuezilla_regression.inc b/testautomation/writer/optional/includes/regression/issuezilla/w_issuezilla_regression.inc index 34ea89160239..5e13f9353891 100644 --- a/testautomation/writer/optional/includes/regression/issuezilla/w_issuezilla_regression.inc +++ b/testautomation/writer/optional/includes/regression/issuezilla/w_issuezilla_regression.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Avoid regression (issuezilla tasks) '* @@ -467,11 +467,11 @@ testcase i103265 end if Case 2: if GetClipboardText <> "1. Test" then - Warnlog "First hyperlink not correctly jumped to. Not '# 1. Test' but " & GetClipboardtext + Warnlog "Second hyperlink not correctly jumped to. Not '# 1. Test' but " & GetClipboardtext end if Case 3: - if GetClipboardText <> "Test " then - Warnlog "First hyperlink not correctly jumped to. Not 'Test' but " & GetClipboardtext + if GetClipboardText <> "1 Test " then + Warnlog "Third hyperlink not correctly jumped to. Not '1 Test' but " & GetClipboardtext end if end select next i diff --git a/testautomation/writer/optional/includes/section/w_section_1.inc b/testautomation/writer/optional/includes/section/w_section_1.inc index df3e9956670b..da7417779401 100644 --- a/testautomation/writer/optional/includes/section/w_section_1.inc +++ b/testautomation/writer/optional/includes/section/w_section_1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Section test(Insert/Section Format/Section) '* diff --git a/testautomation/writer/optional/includes/section/w_section_2.inc b/testautomation/writer/optional/includes/section/w_section_2.inc index b9e6de90ea92..1d79405dfd82 100644 --- a/testautomation/writer/optional/includes/section/w_section_2.inc +++ b/testautomation/writer/optional/includes/section/w_section_2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Hide section / Protect section / Display of dialogues '* diff --git a/testautomation/writer/optional/includes/section/w_section_3.inc b/testautomation/writer/optional/includes/section/w_section_3.inc index dda8ebda7212..6dc00cd5c0f3 100644 --- a/testautomation/writer/optional/includes/section/w_section_3.inc +++ b/testautomation/writer/optional/includes/section/w_section_3.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Hide section /Protect section / Display of dialogues '* diff --git a/testautomation/writer/optional/includes/section/w_section_4.inc b/testautomation/writer/optional/includes/section/w_section_4.inc index 03a59b567f18..2c811268f93b 100755..100644 --- a/testautomation/writer/optional/includes/section/w_section_4.inc +++ b/testautomation/writer/optional/includes/section/w_section_4.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Functional-Test for Section. '* diff --git a/testautomation/writer/optional/includes/section/w_section_tools.inc b/testautomation/writer/optional/includes/section/w_section_tools.inc index d7e1d28e6d5f..2d441cad8450 100644 --- a/testautomation/writer/optional/includes/section/w_section_tools.inc +++ b/testautomation/writer/optional/includes/section/w_section_tools.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : tools/functions for the Section-testing '* diff --git a/testautomation/writer/optional/includes/shortcut/w_shortcuts.inc b/testautomation/writer/optional/includes/shortcut/w_shortcuts.inc index ff3945b0e5a4..0bd84118edc5 100644 --- a/testautomation/writer/optional/includes/shortcut/w_shortcuts.inc +++ b/testautomation/writer/optional/includes/shortcut/w_shortcuts.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Shortcut-test in writer '* diff --git a/testautomation/writer/optional/includes/sorting/w_sorting1.inc b/testautomation/writer/optional/includes/sorting/w_sorting1.inc index e3a65f787ee6..d4cb27449cba 100644 --- a/testautomation/writer/optional/includes/sorting/w_sorting1.inc +++ b/testautomation/writer/optional/includes/sorting/w_sorting1.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Sorting functions in Writer '* diff --git a/testautomation/writer/optional/includes/sorting/w_sorting2.inc b/testautomation/writer/optional/includes/sorting/w_sorting2.inc index d8838d1cf581..d5d3b49ea61f 100644 --- a/testautomation/writer/optional/includes/sorting/w_sorting2.inc +++ b/testautomation/writer/optional/includes/sorting/w_sorting2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Sort functionality test '* diff --git a/testautomation/writer/optional/includes/spellcheck/w_spellcheck.inc b/testautomation/writer/optional/includes/spellcheck/w_spellcheck.inc index 07c0dc4628d0..886f7fa91967 100755..100644 --- a/testautomation/writer/optional/includes/spellcheck/w_spellcheck.inc +++ b/testautomation/writer/optional/includes/spellcheck/w_spellcheck.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Spellcheck-Testing. Functional-Test. '* @@ -43,6 +43,7 @@ sub w_spellcheck Call tToolsThesaurus Call tToolsSpellcheckButtonChange Call tToolsSpellcheckButtonChangeAll + Call tToolsThesaurusSynonyms end sub @@ -56,7 +57,7 @@ testcase tToolsSpellcheckWithShortcut Warnlog "Found no Document for the language you're testing in, Please inform the Test-Developer." exit sub end if - + call hFileOpen (TheFile,false) Call sMakeReadOnlyDocumentEditable @@ -68,12 +69,13 @@ testcase tToolsSpellcheckWithShortcut case 39 : Call wTypeKeys ("Don Cara Mio, capitoliooo?<Home>") case 49 : Call wTypeKeys ("Dies ist ein Rechtschreibtexxxxt<Home>") case 46 : Call wTypeKeys ("Det här är en rättstavningstexxxxt<Home>") + case 50 : Call wTypeKeys ("To je test črkvana<Home>") case 07 : Printlog "- No Spellcheck in Russian!" goto endsub case 48 : Printlog "- No Spellcheck in Polish!" goto endsub case 55 : Printlog "- No Spellcheck in Brazilian!" - goto endsub + goto endsub case 81 : Printlog "- No Spellcheck in Japanese!" goto endsub case 82 : Printlog "- No Spellcheck in Korean!" @@ -91,10 +93,10 @@ testcase tToolsSpellcheckWithShortcut Call wTypeKeys "<HOME>" 'Setting cursor to beginning Call wTypeKeys "<F7>" 'Calling spellchecker with shortcut sleep (1) - + Kontext "Active" if Active.Exists(1) then 'checking if messagebox comes up - if Active.getRT = 304 then 'checking ressource type + if Active.getRT = 304 then 'checking ressource type Active.OK else printlog "No message Box!" @@ -177,6 +179,7 @@ testcase tToolsSpellcheckCorrect case 46 : FFText = "Den här filen innehåller viktig programinformation.<Return>" case 48 : FFText = "Nie wolno w zadnim wypadku przerywa uruchomionego serwisu !<Return>" case 49 : FFText = "Dies ist ein Text ohne Fehler.<Return>" + case 50 : FFText = "To je besedilo brez napake.<Return>" case 55 : FFText = "Ele ouviu passos silenciosos atrás dele. Isso não estava certo.<Return>" case else : QAErrorLog " - The language " + iSprache +" has no defined language text. No Test !" exit Sub @@ -262,6 +265,9 @@ testcase tToolsSpellcheck1Mistake case 49 : sErrorSampleText = "Diees ist ein Fehler." sWordToBeChecked = "Diees" sLanguageName = "Deutsch (Deutschland)" + case 50 : sErrorSampleText = "Tuki je nekaj narobe." + sWordToBeChecked = "Tuki" + sLanguageName = "Slovenščina" case 55 : sErrorSampleText = "Esta poderia ser a respista para suas preces?" sWordToBeChecked = "respista" sLanguageName = "Português (Brasil)" @@ -304,13 +310,13 @@ testcase tToolsSpellcheck1Mistake Call hCloseDocument goto endsub end if - printlog "Current selected dictionary language is: " & DictionaryLanguage.GetSelText + printlog "Current selected dictionary language is: " & DictionaryLanguage.GetSelText ' Dictionary Language is language dependend. Function to be created printlog " - check language" 'if DictionaryLanguage.GetSelText <> gLanguage then Warnlog "Dictionary language " + DictionaryLanguage.GetSelText +" selected" printlog " - replace wrong word with a suggestion" '/// replace wrong word with a suggestion /// - + if trim$(NotInDictionary.GetText) <> trim(sErrorSampleText) then warnlog " " & sErrorSampleText & " has not been detected as mistake. Detected mistake is:" & NotInDictionary.GetText end if @@ -342,7 +348,7 @@ testcase tToolsSpellcheck1Mistake Active.No endcatch end if - + Kontext "Spellcheck" if Spellcheck.Exists then SpellcheckClose.Click @@ -376,7 +382,7 @@ testcase tToolsSpellcheckForward QAErrorLog "The language " + iSprache +" has no defined Errortext. No test!" 'iSystemSprache goto endsub end select - + if gApplication = "MASTERDOCUMENT" then if wInsertDocumentinMasterDoc(InsFile) = False then goto endsub EditPaste @@ -386,7 +392,7 @@ testcase tToolsSpellcheckForward end if '/// point cursor to beginning of document and execute spellcheck /// Call wTypeKeys "<Mod1 Home>" - + select case iSprache case 01 : sDummy = "exprass" : sWordToBeAdded = "pablischer" case 07 : sDummy = "решаaт" : sWordToBeAdded = "кaнкретных" @@ -400,6 +406,7 @@ testcase tToolsSpellcheckForward case 46 : sDummy = "handbroken" : sWordToBeAdded = "viktikt" case 48 : sDummy = "znajdujacej" : sWordToBeAdded = "usuniete" case 49 : sDummy = "reichtt" : sWordToBeAdded = "viierter" + case 50 : sDummy = "Paglejmo" : sWordToBeAdded = "čtrto" case 55 : sDummy = "horat" : sWordToBeAdded = "dpa" end select @@ -536,7 +543,7 @@ testcase tToolsSpellcheckOnlyOneWord Dim InsFile as string Dim ReplacedWith as String Dim i as integer - + '/// Open specified document depending on language to check spellcheck /// '/// document has 1 defined wrong word /// PrintLog "- Tools / Spellchecking / Check only one word" @@ -549,7 +556,7 @@ testcase tToolsSpellcheckOnlyOneWord QAErrorLog "The language " + iSprache +" has no defined Errortext. No test!" goto endsub end select - + if gApplication = "MASTERDOCUMENT" then if wInsertDocumentinMasterDoc(InsFile) = False then goto endsub EditPaste @@ -558,7 +565,7 @@ testcase tToolsSpellcheckOnlyOneWord Call sMakeReadOnlyDocumentEditable end if Call wTypeKeys "<Mod1 Home>" - + select case iSprache case 01 : sWordToBeChecked = "excetionally" ' this word is wrong case 07 : sWordToBeChecked = "Кaнституции" @@ -572,6 +579,7 @@ testcase tToolsSpellcheckOnlyOneWord case 46 : sWordToBeChecked = "avrttades" ' this word is wrong case 48 : sWordToBeChecked = "stosowanei" ' this word is wrong case 49 : sWordToBeChecked = "georaphischen" ' this word is wrong + case 50 : sWordToBeChecked = "ssmo" ' this word is wrong case 55 : sWordToBeChecked = "Veigo" ' this word is wrong end select @@ -612,7 +620,7 @@ testcase tToolsSpellcheckOnlyOneWord ToolsSpellcheckWriter Kontext "Active" if Active.Exists then - if Active.GetRT = 304 then + if Active.GetRT = 304 then Warnlog "Spellcheck doesn't work correctly:" & Active.Gettext try Active.Ok @@ -658,11 +666,11 @@ testcase tToolsSpellcheckOnlyOneWord Warnlog Active.Gettext endcatch end if - end if - + end if + Kontext "Spellcheck" if Spellcheck.Exists then SpellcheckClose.Click - + Call wTypeKeys "<Mod1 Shift Left>" try EditCopy @@ -704,10 +712,10 @@ testcase tToolsSpellcheckOnlyOneWord Spellcheck.Close end if end if - + Kontext "Spellcheck" if Spellcheck.Exists then Spellcheck.Close - + '/// Close document /// Call hCloseDocument endcase @@ -737,8 +745,8 @@ testcase tToolsSpellcheckAutomatic Call sMakeReadOnlyDocumentEditable '/// Enable Auto-Spellcheck in options - Call wEnableAutoSpellcheck ( true ) - + Call wEnableAutoSpellcheck ( true ) + '/// Check Auto-Spellcheck and insert a sentence with 2 mistakes /// printlog " - write text" select case iSprache @@ -765,7 +773,7 @@ testcase tToolsSpellcheckAutomatic case 36 : wTypeKeys "A hétezres koszovói amerikai kontingens jelentos részét is a magyarországi bázison helyezi majd el." iError1 = 1 : iError2 = 4 sError1 = "hétezres" : sError1 = "jelentos" - sDefaultFormat = "Alapértelmezett" + sDefaultFormat = "Alapértelmezett" case 39 : wTypeKeys "La sfumaturar è statsi modificata senza salvare " iError1 = 1 : iError2 = 2 sError1 = "sfumaturar" : sError1 = "statsi" @@ -786,10 +794,14 @@ testcase tToolsSpellcheckAutomatic iError1 = 1 : iError2 = 2 sError1 = "hiaer" : sError1 = "swei" sDefaultFormat = "Standard" + case 50 : wTypeKeys "Tuki sta dve napki" + iError1 = 1 : iError2 = 2 + sError1 = "Tuki" : sError1 = "napki" + sDefaultFormat = "Standard" case 55 : wTypeKeys "Aqui poderá elimitnar componentes já instalados ou instalar novos compotentes numa " iError1 = 2 : iError2 = 7 sError1 = "elimitnar" : sError1 = "compotentes" - sDefaultFormat = "Padrão" + sDefaultFormat = "Padrão" case 81 : Printlog "- No Spellcheck in Japanese!" Call hCloseDocument goto endsub @@ -808,7 +820,7 @@ testcase tToolsSpellcheckAutomatic end select Call wTypeKeys "<Space><Return>" - + printlog " - relieve mistake" Call wTypeKeys "<Up><Home>" Call wTypeKeys "<Mod1 Right>", iError1 @@ -920,7 +932,7 @@ testcase tToolsSpellcheckChangeLanguageAttribute QAErrorLog "The language " + iSprache +" has no defined Errortext. No test!" 'iSystemSprache goto endsub end select - + if gApplication = "MASTERDOCUMENT" then if wInsertDocumentinMasterDoc(InsFile) = False then goto endsub EditPaste @@ -929,7 +941,7 @@ testcase tToolsSpellcheckChangeLanguageAttribute Call sMakeReadOnlyDocumentEditable end if Call wTypeKeys "<Mod1 Home>" - + select case iSprache case 01 : sWordToBeChecked = "excetionally" ' this word is wrong case 03 : sWordToBeChecked = "semstre" ' this word is wrong @@ -943,6 +955,7 @@ testcase tToolsSpellcheckChangeLanguageAttribute case 46 : sWordToBeChecked = "avrttades" ' this word is wrong case 48 : sWordToBeChecked = "stosowanei" ' this word is wrong case 49 : sWordToBeChecked = "georaphischen" ' this word is wrong + case 50 : sWordToBeChecked = "ssmo" ' this word is wrong case 55 : sWordToBeChecked = "Veigo" ' this word is wrong end select @@ -1010,7 +1023,7 @@ testcase tToolsSpellcheckChangeLanguageAttribute Suggestions.Select 1 ReplacedWith = Suggestions.GetSelText printlog "- replace with word: " & ReplacedWith - i = DictionaryLanguage.GetItemCount + 1 + i = DictionaryLanguage.GetItemCount + 1 end if end if next i @@ -1044,7 +1057,7 @@ testcase tToolsSpellcheckChangeLanguageAttribute wait 500 Call wTypeKeys "<Mod1 Home>" printlog "- find replaced word" - + EditSearchAndReplace Kontext "FindAndReplace" try @@ -1072,7 +1085,7 @@ testcase tToolsSpellcheckChangeLanguageAttribute Kontext Active.Setpage TabFont Kontext "TabFont" - try + try if Language.GetSelText <> CurrentLanguage then if Language.GetSelText = PriorLanguage then Warnlog "Language Attributes has not been set to" & CurrentLanguage @@ -1117,7 +1130,7 @@ testcase tToolsSpellcheckButtonChange QAErrorLog "The language " + iSprache +" has no defined Errortext. No test!" 'iSystemSprache goto endsub end select - + if gApplication = "MASTERDOCUMENT" then if wInsertDocumentinMasterDoc(InsFile) = False then goto endsub EditPaste @@ -1184,7 +1197,7 @@ testcase tToolsSpellcheckButtonChangeAll QAErrorLog "The language " + iSprache +" has no defined Errortext. No test!" 'iSystemSprache goto endsub end select - + if gApplication = "MASTERDOCUMENT" then if wInsertDocumentinMasterDoc(InsFile) = False then goto endsub EditPaste @@ -1221,7 +1234,7 @@ testcase tToolsSpellcheckButtonChangeAll end if '/// Close document Call hCloseDocument - + endcase ' ******************************************************************* @@ -1256,6 +1269,7 @@ testcase tToolsThesaurus case 46 : sWordInitial = "Däng" case 48 : sWordInitial = "wypowiedź" case 49 : sWordInitial = "Mann" + case 50 : sWordInitial = "smisel" case 55 : Printlog "- No Thesaurus in Portuguese (Brazil) !" goto endsub case 81 : Printlog "- No Thesaurus in Japanese!" @@ -1281,12 +1295,12 @@ testcase tToolsThesaurus '/// Call Thesaurus without a written word /// ToolsLanguageThesaurus Kontext "Thesaurus" - if CurrentWord.GetSelText <> "" then Warnlog "- Though no word has been selected Current Word textfield is filled !" + if CurrentWord.GetSelText <> "" then Warnlog "- Though no word has been selected Current Word textfield is filled !" if ReplaceWith.GetText <> "" then Warnlog "- Though no word has been selected there is a replacetext in the textfield!" printlog "Set language dependent word in textfield Current Word" CurrentWord.Settext sWordInitial - wait 500 + Sleep 2 if Alternatives.GetItemCount = 0 then Warnlog "No alternatives text" else @@ -1306,11 +1320,11 @@ testcase tToolsThesaurus end if Call hCloseDocument wait 500 - + printlog " Open new preformatted-document where the formatting is set to the language we wish to test." call hFileOpen (TheFile,false) - Call sMakeReadOnlyDocumentEditable - + Call sMakeReadOnlyDocumentEditable + Call wTypeKeys sWordInitial Call wTypeKeys "<Home><Right><Right>" @@ -1319,12 +1333,12 @@ testcase tToolsThesaurus Kontext "Thesaurus" wait 500 if CurrentWord.GetSeltext = sWordInitial then - sWordToBeFound = ReplaceWith.Gettext + sWordToBeFound = ReplaceWith.Gettext if Alternatives.GetItemCount > 0 then printlog "Select last entry in alternatives list" Alternatives.Select Alternatives.GetItemCount Alternatives.TypeKeys "<Space>" - if ReplaceWith.Gettext = sWordToBeFound then + if ReplaceWith.Gettext = sWordToBeFound then Warnlog "Though alternative was selected replace with was not changed" else sWordToBeFound = ReplaceWith.Gettext @@ -1343,21 +1357,22 @@ testcase tToolsThesaurus end if Call wTypeKeys "<Home><Shift End><Delete>" - Call wTypeKeys sWordInitial - + Call wTypeKeys sWordInitial + printlog "- Replace unchecked ( Cursor at words end )" ToolsLanguageThesaurus Kontext "Thesaurus" wait 500 if CurrentWord.GetSeltext = sWordInitial then - sWordToBeFound = ReplaceWith.Gettext - if Alternatives.GetItemCount > 0 then + sWordToBeFound = ReplaceWith.Gettext + if Alternatives.GetItemCount > 0 then printlog "Select last entry in alternatives list" Alternatives.Select Alternatives.GetItemCount - Alternatives.TypeKeys "<Space>" - if ReplaceWith.Gettext = sWordToBeFound then + + if ReplaceWith.Gettext = sWordToBeFound then Warnlog "Though alternative was selected replace with was not changed" else + Alternatives.TypeKeys "<Space>" sWordToBeFound = ReplaceWith.Gettext end if Thesaurus.OK @@ -1372,7 +1387,7 @@ testcase tToolsThesaurus else Warnlog "Current word is not selected word !" end if - + '/// Close thesaurus and writerdocument /// Call hCloseDocument endcase @@ -1390,7 +1405,7 @@ testcase tToolsThesaurusSynonyms printlog " Open document where the formatting is set to the language we wish to test." TheFile = Convertpath (gTesttoolpath + "writer\optional\input\spellcheck\spellcheck_" + iSprache + ".odt") - if hFileExists ( TheFile ) <> TRUE then + if FileExists ( TheFile ) <> TRUE then Warnlog "Found no Document for the language you're testing in, Please inform the Test-Developer." exit sub end if @@ -1410,6 +1425,7 @@ testcase tToolsThesaurusSynonyms case 46 : sWordInitial = "Däng" case 48 : sWordInitial = "wypowiedź" case 49 : sWordInitial = "Mann" + case 50 : sWordInitial = "smisel" case 55 : Printlog "- No Thesaurus in Portuguese (Brazil) !" goto endsub case 81 : Printlog "- No Thesaurus in Japanese!" @@ -1459,6 +1475,3 @@ testcase tToolsThesaurusSynonyms Call hCloseDocument endcase - - - diff --git a/testautomation/writer/optional/includes/spellcheck/w_spellcheck1.inc b/testautomation/writer/optional/includes/spellcheck/w_spellcheck1.inc index 3ae44983fc4b..069b133700bd 100644 --- a/testautomation/writer/optional/includes/spellcheck/w_spellcheck1.inc +++ b/testautomation/writer/optional/includes/spellcheck/w_spellcheck1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Spellcheck-Testing. Functional-Test. '* diff --git a/testautomation/writer/optional/includes/stylist/w_stylist.inc b/testautomation/writer/optional/includes/stylist/w_stylist.inc index b2e582045f27..65f156412f83 100755..100644 --- a/testautomation/writer/optional/includes/stylist/w_stylist.inc +++ b/testautomation/writer/optional/includes/stylist/w_stylist.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test common stylist functions and assigning styles '* diff --git a/testautomation/writer/optional/includes/table/w_204_.inc b/testautomation/writer/optional/includes/table/w_204_.inc index 31a2b0d26199..a5a94662c350 100644 --- a/testautomation/writer/optional/includes/table/w_204_.inc +++ b/testautomation/writer/optional/includes/table/w_204_.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer Table Test '* diff --git a/testautomation/writer/optional/includes/table/w_204a_.inc b/testautomation/writer/optional/includes/table/w_204a_.inc index 5d11c3d2b762..0132f14ebe5d 100644 --- a/testautomation/writer/optional/includes/table/w_204a_.inc +++ b/testautomation/writer/optional/includes/table/w_204a_.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the table functionality in Writer '* diff --git a/testautomation/writer/optional/includes/table/w_204b_.inc b/testautomation/writer/optional/includes/table/w_204b_.inc index 1b5b1282f9cc..56b6e8781b2b 100644 --- a/testautomation/writer/optional/includes/table/w_204b_.inc +++ b/testautomation/writer/optional/includes/table/w_204b_.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer Table test '* diff --git a/testautomation/writer/optional/includes/textframes/w_textframes1.inc b/testautomation/writer/optional/includes/textframes/w_textframes1.inc index d61d2560d010..17eeff80ad95 100755..100644 --- a/testautomation/writer/optional/includes/textframes/w_textframes1.inc +++ b/testautomation/writer/optional/includes/textframes/w_textframes1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of textframe - 1 '* diff --git a/testautomation/writer/optional/includes/textframes/w_textframes2.inc b/testautomation/writer/optional/includes/textframes/w_textframes2.inc index eca6e10c97eb..a316cd19b49c 100644 --- a/testautomation/writer/optional/includes/textframes/w_textframes2.inc +++ b/testautomation/writer/optional/includes/textframes/w_textframes2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of textframe - 2 '* diff --git a/testautomation/writer/optional/includes/textframes/w_textframes3.inc b/testautomation/writer/optional/includes/textframes/w_textframes3.inc index 0abe031290a9..28e6f9b7f404 100644 --- a/testautomation/writer/optional/includes/textframes/w_textframes3.inc +++ b/testautomation/writer/optional/includes/textframes/w_textframes3.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of textframe - 3 '* diff --git a/testautomation/writer/optional/includes/textframes/w_textframes4.inc b/testautomation/writer/optional/includes/textframes/w_textframes4.inc index c326f30eb435..43af4c5bd532 100644 --- a/testautomation/writer/optional/includes/textframes/w_textframes4.inc +++ b/testautomation/writer/optional/includes/textframes/w_textframes4.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of textframe - 4 '* diff --git a/testautomation/writer/optional/includes/textframes/w_textframes5.inc b/testautomation/writer/optional/includes/textframes/w_textframes5.inc index d5a7e9537878..f9a9944b4333 100644 --- a/testautomation/writer/optional/includes/textframes/w_textframes5.inc +++ b/testautomation/writer/optional/includes/textframes/w_textframes5.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of textframe - 5 '* diff --git a/testautomation/writer/optional/includes/tools/tools1.inc b/testautomation/writer/optional/includes/tools/tools1.inc index c187d34b39ac..f5d8362b2a84 100644..100755 --- a/testautomation/writer/optional/includes/tools/tools1.inc +++ b/testautomation/writer/optional/includes/tools/tools1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Tools for writer/Optional - 1 '* diff --git a/testautomation/writer/optional/includes/tools/tools2.inc b/testautomation/writer/optional/includes/tools/tools2.inc index 8ee87a5b037a..899d30b62775 100644..100755 --- a/testautomation/writer/optional/includes/tools/tools2.inc +++ b/testautomation/writer/optional/includes/tools/tools2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Tools for writer/Optional - 2 '* diff --git a/testautomation/writer/optional/includes/undo/w_undo1.inc b/testautomation/writer/optional/includes/undo/w_undo1.inc index 9fe34e5880a7..4134d1a8fa9f 100644..100755 --- a/testautomation/writer/optional/includes/undo/w_undo1.inc +++ b/testautomation/writer/optional/includes/undo/w_undo1.inc @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer Undo/Redo - Test '* diff --git a/testautomation/writer/optional/includes/undo/w_undo_history_1.inc b/testautomation/writer/optional/includes/undo/w_undo_history_1.inc index 72fe352b2319..2446435320f9 100644..100755 --- a/testautomation/writer/optional/includes/undo/w_undo_history_1.inc +++ b/testautomation/writer/optional/includes/undo/w_undo_history_1.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer Undo-History - Test ( Typing, Overwrite, Replace, Delete, Sort, Convert To table) '* diff --git a/testautomation/writer/optional/includes/undo/w_undo_history_2.inc b/testautomation/writer/optional/includes/undo/w_undo_history_2.inc index 5104b29af85b..00ab93506eee 100644..100755 --- a/testautomation/writer/optional/includes/undo/w_undo_history_2.inc +++ b/testautomation/writer/optional/includes/undo/w_undo_history_2.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer Undo-History - Test '* diff --git a/testautomation/writer/optional/includes/undo/w_undo_history_3.inc b/testautomation/writer/optional/includes/undo/w_undo_history_3.inc index 64b69a512a42..ded462ff63c1 100644..100755 --- a/testautomation/writer/optional/includes/undo/w_undo_history_3.inc +++ b/testautomation/writer/optional/includes/undo/w_undo_history_3.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer Undo-History - Test '* diff --git a/testautomation/writer/optional/includes/undo/w_undo_history_4.inc b/testautomation/writer/optional/includes/undo/w_undo_history_4.inc index 4b80936ffbaa..e1370f29e541 100644..100755 --- a/testautomation/writer/optional/includes/undo/w_undo_history_4.inc +++ b/testautomation/writer/optional/includes/undo/w_undo_history_4.inc @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer Undo-History - Test '* diff --git a/testautomation/writer/optional/input/linguistik/050.odt b/testautomation/writer/optional/input/linguistik/050.odt Binary files differnew file mode 100755 index 000000000000..3a90c03e99aa --- /dev/null +++ b/testautomation/writer/optional/input/linguistik/050.odt diff --git a/testautomation/writer/optional/input/spellcheck/Language_Guessing_Sample_Texts.odt b/testautomation/writer/optional/input/spellcheck/Language_Guessing_Sample_Texts.odt Binary files differindex e66f7a3d6c43..ae765bd5f220 100755 --- a/testautomation/writer/optional/input/spellcheck/Language_Guessing_Sample_Texts.odt +++ b/testautomation/writer/optional/input/spellcheck/Language_Guessing_Sample_Texts.odt diff --git a/testautomation/writer/optional/input/spellcheck/spellcheck_50.odt b/testautomation/writer/optional/input/spellcheck/spellcheck_50.odt Binary files differnew file mode 100755 index 000000000000..30f9d7cdc76b --- /dev/null +++ b/testautomation/writer/optional/input/spellcheck/spellcheck_50.odt diff --git a/testautomation/writer/optional/input/spellcheck/st1_2_50.odt b/testautomation/writer/optional/input/spellcheck/st1_2_50.odt Binary files differnew file mode 100755 index 000000000000..7402e851bb65 --- /dev/null +++ b/testautomation/writer/optional/input/spellcheck/st1_2_50.odt diff --git a/testautomation/writer/optional/w_CJKCTLDependency.bas b/testautomation/writer/optional/w_CJKCTLDependency.bas index 0b488aa0ffa9..f19d922cab47 100755 --- a/testautomation/writer/optional/w_CJKCTLDependency.bas +++ b/testautomation/writer/optional/w_CJKCTLDependency.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test CJK and CTL support dependency '* diff --git a/testautomation/writer/optional/w_alternative_text.bas b/testautomation/writer/optional/w_alternative_text.bas index 1fd3ade0df1c..0096aed4ad3c 100755 --- a/testautomation/writer/optional/w_alternative_text.bas +++ b/testautomation/writer/optional/w_alternative_text.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Alternative Texts For Writer Objects '* diff --git a/testautomation/writer/optional/w_autocorrection.bas b/testautomation/writer/optional/w_autocorrection.bas index a8549293f681..8bb2ae109b81 100644 --- a/testautomation/writer/optional/w_autocorrection.bas +++ b/testautomation/writer/optional/w_autocorrection.bas @@ -31,7 +31,7 @@ '* '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Tools / Autocorrection test '* diff --git a/testautomation/writer/optional/w_autotext.bas b/testautomation/writer/optional/w_autotext.bas index 71ebab149aa9..e30eb667cc7f 100755 --- a/testautomation/writer/optional/w_autotext.bas +++ b/testautomation/writer/optional/w_autotext.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of autotext in writer '* diff --git a/testautomation/writer/optional/w_calculate.bas b/testautomation/writer/optional/w_calculate.bas index 71b7a7ef3043..cb38acdb02ca 100755 --- a/testautomation/writer/optional/w_calculate.bas +++ b/testautomation/writer/optional/w_calculate.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Basic calculation functionality check '* diff --git a/testautomation/writer/optional/w_chinesetranslate.bas b/testautomation/writer/optional/w_chinesetranslate.bas index 4e35abbd7a19..07c14cf06f5a 100755 --- a/testautomation/writer/optional/w_chinesetranslate.bas +++ b/testautomation/writer/optional/w_chinesetranslate.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test Chinese Translation '* diff --git a/testautomation/writer/optional/w_clipbrd.bas b/testautomation/writer/optional/w_clipbrd.bas index 22a3f0147cd8..5fa732706afc 100755 --- a/testautomation/writer/optional/w_clipbrd.bas +++ b/testautomation/writer/optional/w_clipbrd.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : CROSS-APPLICATIONS CLIPBOARD TEST (Text only) '* diff --git a/testautomation/writer/optional/w_contextmenu.bas b/testautomation/writer/optional/w_contextmenu.bas index 1e9d47485283..c4646dc7c359 100755 --- a/testautomation/writer/optional/w_contextmenu.bas +++ b/testautomation/writer/optional/w_contextmenu.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of contextmenus in writer '* diff --git a/testautomation/writer/optional/w_drawing_tools.bas b/testautomation/writer/optional/w_drawing_tools.bas index 4c826ca46c40..888e94d4ec4f 100755 --- a/testautomation/writer/optional/w_drawing_tools.bas +++ b/testautomation/writer/optional/w_drawing_tools.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Tools / Autocorrection test '* diff --git a/testautomation/writer/optional/w_dropdownLB.bas b/testautomation/writer/optional/w_dropdownLB.bas index f22b88745463..c3978bd8e0cc 100755 --- a/testautomation/writer/optional/w_dropdownLB.bas +++ b/testautomation/writer/optional/w_dropdownLB.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test Drop Down List Box '* diff --git a/testautomation/writer/optional/w_fields.bas b/testautomation/writer/optional/w_fields.bas index 8c51c5f5ee94..6a9d363dae3c 100755 --- a/testautomation/writer/optional/w_fields.bas +++ b/testautomation/writer/optional/w_fields.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of content and update reliability of the fields '* diff --git a/testautomation/writer/optional/w_filter.bas b/testautomation/writer/optional/w_filter.bas index 446c7d8242c9..f4d223b27301 100755 --- a/testautomation/writer/optional/w_filter.bas +++ b/testautomation/writer/optional/w_filter.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer Filter Availability Test (Import/Export/Group names) '* diff --git a/testautomation/writer/optional/w_fontwork.bas b/testautomation/writer/optional/w_fontwork.bas index 10b2ee98d172..99c2574cc175 100755 --- a/testautomation/writer/optional/w_fontwork.bas +++ b/testautomation/writer/optional/w_fontwork.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Fontwork test '* diff --git a/testautomation/writer/optional/w_formatcharacter.bas b/testautomation/writer/optional/w_formatcharacter.bas index 2a0eae6ee542..31a895fa3f27 100755 --- a/testautomation/writer/optional/w_formatcharacter.bas +++ b/testautomation/writer/optional/w_formatcharacter.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Formatting of characters, setting styles etc. '* diff --git a/testautomation/writer/optional/w_formatpage.bas b/testautomation/writer/optional/w_formatpage.bas index 1910ac7c95e2..5354809b1696 100755 --- a/testautomation/writer/optional/w_formatpage.bas +++ b/testautomation/writer/optional/w_formatpage.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the functionality of Page Formatting / Page Styles '* diff --git a/testautomation/writer/optional/w_formatparagraph.bas b/testautomation/writer/optional/w_formatparagraph.bas index 728feb6c07db..785e177a9d15 100755 --- a/testautomation/writer/optional/w_formatparagraph.bas +++ b/testautomation/writer/optional/w_formatparagraph.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the functionality of Paragraph '* diff --git a/testautomation/writer/optional/w_hhConversion.bas b/testautomation/writer/optional/w_hhConversion.bas index 8f062e8f57e9..594623540f25 100755 --- a/testautomation/writer/optional/w_hhConversion.bas +++ b/testautomation/writer/optional/w_hhConversion.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test Hangul/Hanja Conversion '* diff --git a/testautomation/writer/optional/w_hyphenation.bas b/testautomation/writer/optional/w_hyphenation.bas index 126b904b6aad..666ec36b75fd 100755 --- a/testautomation/writer/optional/w_hyphenation.bas +++ b/testautomation/writer/optional/w_hyphenation.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Tools / Hyphenation test '* diff --git a/testautomation/writer/optional/w_insertgraphic.bas b/testautomation/writer/optional/w_insertgraphic.bas index f6707185b895..381dcd9d3f89 100755 --- a/testautomation/writer/optional/w_insertgraphic.bas +++ b/testautomation/writer/optional/w_insertgraphic.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of Graphic function '* diff --git a/testautomation/writer/optional/w_issuezilla_regression.bas b/testautomation/writer/optional/w_issuezilla_regression.bas index f515ef94359e..c4a92a3ce3ad 100755 --- a/testautomation/writer/optional/w_issuezilla_regression.bas +++ b/testautomation/writer/optional/w_issuezilla_regression.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Avoid regression (Issuezilla tasks) '* diff --git a/testautomation/writer/optional/w_loadsave.bas b/testautomation/writer/optional/w_loadsave.bas index bef58505d3c0..b0fd90f259b9 100755 --- a/testautomation/writer/optional/w_loadsave.bas +++ b/testautomation/writer/optional/w_loadsave.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Checks the file-export/import through API-Filters '* diff --git a/testautomation/writer/optional/w_navigator.bas b/testautomation/writer/optional/w_navigator.bas index 82bbc7d34fcd..97a188ea5ff9 100755 --- a/testautomation/writer/optional/w_navigator.bas +++ b/testautomation/writer/optional/w_navigator.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer-Navigator test '* diff --git a/testautomation/writer/optional/w_numbering.bas b/testautomation/writer/optional/w_numbering.bas index 1711122d74e1..7844baec136f 100755 --- a/testautomation/writer/optional/w_numbering.bas +++ b/testautomation/writer/optional/w_numbering.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer numbering test '* diff --git a/testautomation/writer/optional/w_opt.bas b/testautomation/writer/optional/w_opt.bas index b776c84c0cea..541f19c41194 100755 --- a/testautomation/writer/optional/w_opt.bas +++ b/testautomation/writer/optional/w_opt.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : WRITER-Options Test '* diff --git a/testautomation/writer/optional/w_redlining.bas b/testautomation/writer/optional/w_redlining.bas index 7dddecc9ef36..13babf613ebf 100755 --- a/testautomation/writer/optional/w_redlining.bas +++ b/testautomation/writer/optional/w_redlining.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of the Redlining function '* diff --git a/testautomation/writer/optional/w_search.bas b/testautomation/writer/optional/w_search.bas index 0e8f4ebc7097..b78b332f2c8c 100755 --- a/testautomation/writer/optional/w_search.bas +++ b/testautomation/writer/optional/w_search.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Search & Replace and testing of regular expressions '* diff --git a/testautomation/writer/optional/w_section.bas b/testautomation/writer/optional/w_section.bas index 2643435285c8..e0cabbb27c01 100755 --- a/testautomation/writer/optional/w_section.bas +++ b/testautomation/writer/optional/w_section.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Section test '* diff --git a/testautomation/writer/optional/w_shortcuts.bas b/testautomation/writer/optional/w_shortcuts.bas index 7fa6596d276e..707cf901896a 100755 --- a/testautomation/writer/optional/w_shortcuts.bas +++ b/testautomation/writer/optional/w_shortcuts.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of shortcuts in writer '* diff --git a/testautomation/writer/optional/w_sorting.bas b/testautomation/writer/optional/w_sorting.bas index 5667adce63b9..18fa47675597 100755 --- a/testautomation/writer/optional/w_sorting.bas +++ b/testautomation/writer/optional/w_sorting.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Sorting functions in Writer '* diff --git a/testautomation/writer/optional/w_spellcheck.bas b/testautomation/writer/optional/w_spellcheck.bas index 87288fbb5e8b..13d20ffb860f 100755 --- a/testautomation/writer/optional/w_spellcheck.bas +++ b/testautomation/writer/optional/w_spellcheck.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer-Spellcheck-Test '* diff --git a/testautomation/writer/optional/w_stylist.bas b/testautomation/writer/optional/w_stylist.bas index c8368308766a..f91a4ca9ea22 100755 --- a/testautomation/writer/optional/w_stylist.bas +++ b/testautomation/writer/optional/w_stylist.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test of the writer stylist '* diff --git a/testautomation/writer/optional/w_table.bas b/testautomation/writer/optional/w_table.bas index 3e800cec8d10..e82ad4a25ea5 100755 --- a/testautomation/writer/optional/w_table.bas +++ b/testautomation/writer/optional/w_table.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Writer Table test '* diff --git a/testautomation/writer/optional/w_textframes.bas b/testautomation/writer/optional/w_textframes.bas index 9e9072348b40..80f2f2bfaec3 100755 --- a/testautomation/writer/optional/w_textframes.bas +++ b/testautomation/writer/optional/w_textframes.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Test the functionality of textframes '* diff --git a/testautomation/writer/optional/w_undo.bas b/testautomation/writer/optional/w_undo.bas index a852f44739b9..52c5f73b3045 100755 --- a/testautomation/writer/optional/w_undo.bas +++ b/testautomation/writer/optional/w_undo.bas @@ -25,7 +25,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.com +'* owner : helge.delfs@oracle.com '* '* short description : Testing verbosity and functionality of the undo history '* diff --git a/testautomation/writer/optional/ww_opt.bas b/testautomation/writer/optional/ww_opt.bas index 511759bccbc3..994e2bb45ec3 100755 --- a/testautomation/writer/optional/ww_opt.bas +++ b/testautomation/writer/optional/ww_opt.bas @@ -24,7 +24,7 @@ ' '/************************************************************************ '* -'* owner : helge.delfs@sun.coms +'* owner : helge.delfs@oracle.coms '* '* short description : HTML-Options-Test '* |