1 files changed, 27 insertions, 26 deletions

diff --git a/testautomation/graphics/required/includes/global/id_008.inc b/testautomation/graphics/required/includes/global/id_008.inc
index 8848c7337dac..f88174929c1f 100644
--- a/testautomation/graphics/required/includes/global/id_008.inc
+++ b/testautomation/graphics/required/includes/global/id_008.inc
@@ -41,43 +41,44 @@ end sub
 '-------------------------------------------------------------------------------
 testcase tiWindowNewWindow
 
-    '/// open application ///'
+    printlog "open application"
     Call  hNewDocument
-    '/// create rectangle ///'
+    printlog "create rectangle"
     Call hRechteckErstellen ( 10, 10, 20, 40 )
-    '/// Window->New Window ///'
+    printlog "Window->New Window"
     WindowNewWindow
     WaitSlot (2000)
-    '/// close application ///'
+    printlog "close application"
     Call hCloseDocument
-endcase
+endcase 'tiWindowNewWindow
+
+'-------------------------------------------------------------------------------
 
 testcase tidWindow123
     goto endsub '' testing TBO: 29.03.2002
     dim iMenues as integer
-    '/// open application ///'
+    printlog "open application"
     Call  hNewDocument
-    '/// create rectangle ///'
+    printlog "create rectangle"
     Call hRechteckErstellen ( 10, 10, 20, 40 )
 
     Kontext "DocumentImpress"
-        DocumentImpress.UseMenu
-        iMenues = MenuGetItemCount
-        warnlog "---- Number of Main menus: " & iMenues
-        MenuSelect(Menugetitemid(8))
-        sleep 1
-        iMenues = MenuGetItemCount
-        printlog "---- Number of Main menus: " & iMenues
-        '     MenuSelect(Menugetitemid(14))
-        sleep 1
-        i=1
-        printlog "count: " + i + "; of submenu: " + MenuGetItemCount + "; SID: " + MenuGetItemId (i) + "; Text: " + MenuGetItemText (Menugetitemid(i)) + "; Command: " + MenuGetItemCommand(Menugetitemid(i)) + "; Seperator?: " + MenuIsSeperator(i) + "; Enabled: " + MenuIsItemEnabled(Menugetitemid(i)) + "; Checked: " + MenuIsItemChecked(Menugetitemid(i)) + ";"
-        i=2
-        printlog "count: " + i + "; of submenu: " + MenuGetItemCount + "; SID: " + MenuGetItemId (i) + "; Text: " + MenuGetItemText (Menugetitemid(i)) + "; Command: " + MenuGetItemCommand(Menugetitemid(i)) + "; Seperator?: " + MenuIsSeperator(i) + "; Enabled: " + MenuIsItemEnabled(Menugetitemid(i)) + "; Checked: " + MenuIsItemChecked(Menugetitemid(i)) + ";"
-        warnlog "Dynamic entries not accessible ? :-((((("
-        '   i=3
-        '   printlog "count: " + i + "; of submenue: " + MenuGetItemCount + "; SID: " + MenuGetItemId (i) + "; Text: " + MenuGetItemText (Menugetitemid(i)) + "; Command: " + MenuGetItemCommand(Menugetitemid(i)) + "; Seperator?: " + MenuIsSeperator(i) + "; Enabled: " + MenuIsItemEnabled(Menugetitemid(i)) + "; Checked: " + MenuIsItemChecked(Menugetitemid(i)) + ";"
-    '/// close application ///'
+    DocumentImpress.UseMenu
+    iMenues = MenuGetItemCount
+    warnlog "---- Number of Main menus: " & iMenues
+    MenuSelect(Menugetitemid(8))
+    sleep 1
+    iMenues = MenuGetItemCount
+    printlog "---- Number of Main menus: " & iMenues
+    '     MenuSelect(Menugetitemid(14))
+    sleep 1
+    i=1
+    printlog "count: " + i + "; of submenu: " + MenuGetItemCount + "; SID: " + MenuGetItemId (i) + "; Text: " + MenuGetItemText (Menugetitemid(i)) + "; Command: " + MenuGetItemCommand(Menugetitemid(i)) + "; Seperator?: " + MenuIsSeperator(i) + "; Enabled: " + MenuIsItemEnabled(Menugetitemid(i)) + "; Checked: " + MenuIsItemChecked(Menugetitemid(i)) + ";"
+    i=2
+    printlog "count: " + i + "; of submenu: " + MenuGetItemCount + "; SID: " + MenuGetItemId (i) + "; Text: " + MenuGetItemText (Menugetitemid(i)) + "; Command: " + MenuGetItemCommand(Menugetitemid(i)) + "; Seperator?: " + MenuIsSeperator(i) + "; Enabled: " + MenuIsItemEnabled(Menugetitemid(i)) + "; Checked: " + MenuIsItemChecked(Menugetitemid(i)) + ";"
+    warnlog "Dynamic entries not accessible ? :-((((("
+    '   i=3
+    '   printlog "count: " + i + "; of submenue: " + MenuGetItemCount + "; SID: " + MenuGetItemId (i) + "; Text: " + MenuGetItemText (Menugetitemid(i)) + "; Command: " + MenuGetItemCommand(Menugetitemid(i)) + "; Seperator?: " + MenuIsSeperator(i) + "; Enabled: " + MenuIsItemEnabled(Menugetitemid(i)) + "; Checked: " + MenuIsItemChecked(Menugetitemid(i)) + ";"
+    printlog "close application"
     Call hCloseDocument
-endcase
-
+endcase 'tidWindow123
\ No newline at end of file