summaryrefslogtreecommitdiff
path: root/testautomation/dbaccess/required/includes/Query.inc
diff options
context:
space:
mode:
Diffstat (limited to 'testautomation/dbaccess/required/includes/Query.inc')
-rwxr-xr-x[-rw-r--r--]testautomation/dbaccess/required/includes/Query.inc7
1 files changed, 5 insertions, 2 deletions
diff --git a/testautomation/dbaccess/required/includes/Query.inc b/testautomation/dbaccess/required/includes/Query.inc
index d981fd79656e..f6fa45acbdd7 100644..100755
--- a/testautomation/dbaccess/required/includes/Query.inc
+++ b/testautomation/dbaccess/required/includes/Query.inc
@@ -156,7 +156,7 @@ testcase tSwitchDesign
sTableName = TableName.GetSelText
printlog "- Add 'biblio' table to query design"
if sTableName <> "biblio" then
- warnlog "It should be the 'biblio'-database table but it is the '" & SelEntry & "' database table?!"
+ warnlog "It should be the 'biblio'-database table but it is the '" & sTableName & "' database table?!"
goto endsub
else
AddTable.Click
@@ -909,7 +909,10 @@ endcase
'-------------------------------------------------------------------------
function getMenuItemCount as Integer
'use this function becasue this doesn't count the pick list
- Dim i, j, Ende, nID as Integer
+ Dim i as Integer
+ Dim j as Integer
+ Dim Ende as Integer
+ Dim nID as Integer
Sleep 2
j=0
for i=1 to MenuGetItemCount