CWS-TOOLING: integrate CWS cbosdo01

4 files changed, 77 insertions, 77 deletions

diff --git a/testautomation/graphics/optional/includes/global/g_autocorrection.inc b/testautomation/graphics/optional/includes/global/g_autocorrection.inc
index 21cda12dc6f4..bceff84e9f5b 100755
--- a/testautomation/graphics/optional/includes/global/g_autocorrection.inc
+++ b/testautomation/graphics/optional/includes/global/g_autocorrection.inc
@@ -217,15 +217,15 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     Printlog "   - replace quotes" '------------------------------------------------------------------------------------------
     ToolsAutocorrect
     Kontext
-    active.SetPage TabTypografisch
-    Kontext "TabTypografisch"
+    active.SetPage TabLocalizedOptions
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfacheErsetzen.Check
+        SingleQuotesReplace.Check
     else
-        DoppelteErsetzen.Check
-        DoppeltStandard.Click
+        DoubleQuotesReplace.Check
+        DoubleQuotesDefault.Click
     endif
-    TabTypografisch.OK
+    TabLocalizedOptions.OK
     sleep 5
     gMouseClick 50,50
     sleep 5
@@ -252,14 +252,14 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     Printlog "   - dont replace quotes" '------------------------------------------------------------------------------------------
     ToolsAutocorrect
     Kontext
-    Active.SetPage TabTypografisch
-    Kontext "TabTypografisch"
+    Active.SetPage TabLocalizedOptions
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfacheErsetzen.Uncheck
+        SingleQuotesReplace.Uncheck
     else
-        DoppelteErsetzen.Uncheck
+        DoubleQuotesReplace.Uncheck
     endif
-    TabTypografisch.OK
+    TabLocalizedOptions.OK
     sleep 1
     gMouseClick 50,50
     sleep 1
@@ -285,14 +285,14 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     Printlog "   - replace quotes" '------------------------------------------------------------------------------------------
     ToolsAutocorrect
     Kontext
-    active.SetPage TabTypografisch
-    Kontext "TabTypografisch"
+    active.SetPage TabLocalizedOptions
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfacheErsetzen.Check
-        EinfachWortAnfang.Click
+        SingleQuotesReplace.Check
+        SingleQuotesStart.Click
     else
-        DoppelteErsetzen.Check
-        DoppeltWortAnfang.Click
+        DoubleQuotesReplace.Check
+        DoubleQuotesStart.Click
     endif
     Kontext "Sonderzeichen"
     sleep 1
@@ -301,11 +301,11 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     sleep 1
     Sonderzeichen.OK
 
-    Kontext "TabTypografisch"
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfachWortEnde.Click
+        SingleQuotesEnd.Click
     else
-        DoppeltWortEnde.Click
+        DoubleQuotesEnd.Click
     endif
     Kontext "Sonderzeichen"
     sleep 1
@@ -314,8 +314,8 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     sleep 1
     Sonderzeichen.OK
 
-    Kontext "TabTypografisch"
-    TabTypografisch.OK
+    Kontext "TabLocalizedOptions"
+    TabLocalizedOptions.OK
     sleep 5
     gMouseClick 50,50
     sleep 5
@@ -341,17 +341,17 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     Printlog "   - back to standard" '------------------------------------------------------------------------------------------
     ToolsAutocorrect
     Kontext
-    active.SetPage TabTypografisch
-    Kontext "TabTypografisch"
+    active.SetPage TabLocalizedOptions
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfacheErsetzen.Check
-        EinfachStandard.Click
+        SingleQuotesReplace.Check
+        SingleQuotesDefault.Click
     else
-        DoppelteErsetzen.Check
-        DoppeltStandard.Click
+        DoubleQuotesReplace.Check
+        DoubleQuotesDefault.Click
     endif
 
-    TabTypografisch.OK
+    TabLocalizedOptions.OK
     sleep 1
     hTextrahmenErstellen ( Normal$ + "Hello" + Normal$ + " ",20,20,60,30)
     sleep 2
@@ -374,14 +374,14 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
 
     ToolsAutocorrect
     Kontext
-    active.SetPage TabTypografisch
-    Kontext "TabTypografisch"
+    active.SetPage TabLocalizedOptions
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfacheErsetzen.UnCheck
+        SingleQuotesReplace.UnCheck
     else
-        DoppelteErsetzen.UnCheck
+        DoubleQuotesReplace.UnCheck
     endif
-    TabTypografisch.OK
+    TabLocalizedOptions.OK
     sleep 1
 
     hCloseDocument
@@ -390,7 +390,7 @@ endcase
 '-------------------------------------------------------------------------------
 testcase tToolsAutocorrectOption
 
-    const cEntryCount = 9
+    const cEntryCount = 7
     dim i as integer
     dim iEntryCount as integer
     dim sEntries (20, 2) as string
@@ -407,14 +407,14 @@ testcase tToolsAutocorrectOption
     sEntries (4,2) = "*Hello* " '"_Hello_ "
     sEntries (5,1) = "URL Recognition"
     sEntries (5,2) = "It is www.ksta.de "
-    sEntries (6,1) = "Replace 1st... with 1^st..."
-    sEntries (6,2) = "1st "
-    sEntries (7,1) = "Replace 1/2 ... with û ..."
-    sEntries (7,2) = "1/2 "
-    sEntries (8,1) = "Replace dashes"
-    sEntries (8,2) = "Hello - Hrbert "
-    sEntries (9,1) = "Ignore double spaces"
-    sEntries (9,2) = "Hello  this is 2  blanks "
+    'sEntries (6,1) = "Replace 1st... with 1^st..."
+    'sEntries (6,2) = "1st "
+    'sEntries (7,1) = "Replace 1/2 ... with û ..."
+    'sEntries (7,2) = "1/2 "
+    sEntries (6,1) = "Replace dashes"
+    sEntries (6,2) = "Hello - Hrbert "
+    sEntries (7,1) = "Ignore double spaces"
+    sEntries (7,2) = "Hello  this is 2  blanks "
 
     Printlog "- Tools / Autocorrect -options"
     Call hNewDocument()
diff --git a/testautomation/graphics/optional/includes/global/id_006.inc b/testautomation/graphics/optional/includes/global/id_006.inc
index fb774c22acb2..284e0b530c4a 100755
--- a/testautomation/graphics/optional/includes/global/id_006.inc
+++ b/testautomation/graphics/optional/includes/global/id_006.inc
@@ -199,35 +199,35 @@ testcase tiToolsAutoCorrect
     Kontext "TabOptionen"
     Call DialogTest ( TabOptionen )
     Kontext
-    Messagebox.SetPage TabTypografisch
-    Kontext "TabTypografisch"  ' 1a
-    EinfacheErsetzen.Check
-    EinfachWortAnfang.Click
+    Messagebox.SetPage TabLocalizedOptions
+    Kontext "TabLocalizedOptions"  ' 1a
+    SingleQuotesReplace.Check
+    SingleQuotesStart.Click
     Kontext "Sonderzeichen"
     Call DialogTest ( Sonderzeichen, 1 )
     Sonderzeichen.Cancel
-    Kontext "TabTypografisch"  ' 1b
-    EinfachWortEnde.Click
+    Kontext "TabLocalizedOptions"  ' 1b
+    SingleQuotesEnd.Click
     Kontext "Sonderzeichen"
     Call DialogTest ( Sonderzeichen, 2 )
     Sonderzeichen.Cancel
-    Kontext "TabTypografisch"  ' 1s
-    EinfachStandard.Click
+    Kontext "TabLocalizedOptions"  ' 1s
+    SingleQuotesDefault.Click
 
-    Kontext "TabTypografisch"  ' 2a
-    DoppeltWortAnfang.Click
+    Kontext "TabLocalizedOptions"  ' 2a
+    DoubleQuotesStart.Click
     Kontext "Sonderzeichen"
     Call DialogTest ( Sonderzeichen, 3 )
     Sonderzeichen.Cancel
-    Kontext "TabTypografisch"  ' 2b
-    DoppeltWortEnde.Click
+    Kontext "TabLocalizedOptions"  ' 2b
+    DoubleQuotesEnd.Click
     Kontext "Sonderzeichen"
     Call DialogTest ( Sonderzeichen, 4 )
     Sonderzeichen.Cancel
-    Kontext "TabTypografisch"  ' 2s
-    DoppeltStandard.Click
-    EinfacheErsetzen.UnCheck
-    TabTypografisch.cancel
+    Kontext "TabLocalizedOptions"  ' 2s
+    DoubleQuotesDefault.Click
+    SingleQuotesReplace.UnCheck
+    TabLocalizedOptions.cancel
     Call hCloseDocument
 endcase
 
diff --git a/testautomation/graphics/required/includes/global/id_006.inc b/testautomation/graphics/required/includes/global/id_006.inc
index d7a3834f64b7..edbc42b3d09b 100755
--- a/testautomation/graphics/required/includes/global/id_006.inc
+++ b/testautomation/graphics/required/includes/global/id_006.inc
@@ -250,50 +250,50 @@ testcase tiToolsAutoCorrect
                 Call DialogTest ( TabOptionen )
                 Kontext
             '/// select tabpage 'Custom Quotes' ///'
-            Messagebox.SetPage TabTypografisch
-                Kontext "TabTypografisch"  ' 1a
+            Messagebox.SetPage TabLocalizedOptions
+                Kontext "TabLocalizedOptions"  ' 1a
                     '/// in the part of 'single quotes': ///'
                     '///+ check 'replace' ///'
                     '///+ click 'start quote' ///'
-                    EinfacheErsetzen.Check
-                    EinfachWortAnfang.Click
+                    SingleQuotesReplace.Check
+                    SingleQuotesStart.Click
                     Kontext "Sonderzeichen"
                         Call DialogTest ( Sonderzeichen, 1 )
                         '///+  cancel dialog 'start quote' ///'
                         Sonderzeichen.Cancel
-                Kontext "TabTypografisch"  ' 1b
+                Kontext "TabLocalizedOptions"  ' 1b
                     '///+ click 'end quote' ///'
-                    EinfachWortEnde.Click
+                    SingleQuotesEnd.Click
                     Kontext "Sonderzeichen"
                         Call DialogTest ( Sonderzeichen, 2 )
                         '///+  cancel dialog 'end quote' ///'
                         Sonderzeichen.Cancel
-                Kontext "TabTypografisch"  ' 1s
+                Kontext "TabLocalizedOptions"  ' 1s
                     '///+ click button 'default' ///'
-                    EinfachStandard.Click
+                    SingleQuotesDefault.Click
 
-                Kontext "TabTypografisch"  ' 2a
+                Kontext "TabLocalizedOptions"  ' 2a
                     '/// in the part of 'double quotes': ///'
                     '///+ click 'start quote' ///'
-                    DoppeltWortAnfang.Click
+                    DoubleQuotesStart.Click
                     Kontext "Sonderzeichen"
                         Call DialogTest ( Sonderzeichen, 3 )
                         '///+  cancel dialog 'start quote' ///'
                         Sonderzeichen.Cancel
-                Kontext "TabTypografisch"  ' 2b
+                Kontext "TabLocalizedOptions"  ' 2b
                     '///+ click 'end quote' ///'
-                    DoppeltWortEnde.Click
+                    DoubleQuotesEnd.Click
                     Kontext "Sonderzeichen"
                         Call DialogTest ( Sonderzeichen, 4 )
                         '///+  cancel dialog 'end quote' ///'
                         Sonderzeichen.Cancel
-                Kontext "TabTypografisch"  ' 2s
+                Kontext "TabLocalizedOptions"  ' 2s
                     '///+ click button 'default' ///'
-                    DoppeltStandard.Click
+                    DoubleQuotesDefault.Click
                     '///+ UNcheck 'replace' ///'
-                    EinfacheErsetzen.UnCheck
+                    SingleQuotesReplace.UnCheck
                     '/// cancel dialog 'AtorCorrect' ///'
-                    TabTypografisch.cancel
+                    TabLocalizedOptions.cancel
     '/// close application ///'
     Call hCloseDocument
 endcase
diff --git a/testautomation/graphics/tools/id_tools_2.inc b/testautomation/graphics/tools/id_tools_2.inc
index 78a71da95775..15c5665867c4 100755
--- a/testautomation/graphics/tools/id_tools_2.inc
+++ b/testautomation/graphics/tools/id_tools_2.inc
@@ -142,8 +142,8 @@ sub sCheckCheck (i, Pruefung$, bEnabled)
     select case i
 ' Disabled sCheckUnderlined due to start of external program (web-browser) - FHA
         case 5: bEnabled 'sCheckUnderlined (bEnabled)
-        case 6: sCheckSupperscript (bEnabled)
-        case 8: sCheckDash (bEnabled)
+        case 6: sCheckDash (bEnabled)
+        case 8: sCheckSupperscript (bEnabled)
         case else:
             hTypeKeys "<Home><Shift End>"
             EditCopy