vitomation01: #i109696 - Moved function IsItSaved() to c_import_general.inc as this is the only test still using this function

2 files changed, 25 insertions, 24 deletions

diff --git a/testautomation/global/tools/includes/required/t_files.inc b/testautomation/global/tools/includes/required/t_files.inc
index c425b7ffe752..14e1f99a8105 100755
--- a/testautomation/global/tools/includes/required/t_files.inc
+++ b/testautomation/global/tools/includes/required/t_files.inc
@@ -149,31 +149,7 @@ function hGrafikVerknuepftEinfuegen  ( Grafik$ ) as Boolean
         'GrafikEinfuegenDlg not open
     endif
 end function
-'
-'-------------------------------------------------------------------------------
-'
-function IsItLoaded as boolean
-    '/// IsItLoaded
-    '/// Wait until document is loaded
-    Dim iLoop as integer
 
-    IsItLoaded = FALSE
-    sleep(3)
-    for iLoop =1 to 20
-        try
-            'Calling slot 'IsDocLoading'
-            IsItLoaded = IsDocLoading
-        catch
-            IsItLoaded = FALSE
-        endcatch
-
-        if IsItLoaded = TRUE then
-            exit for
-        end if
-        sleep(1)
-    next iLoop
-    sleep(2)
-end function
 '
 '-------------------------------------------------------------------------------
 '
diff --git a/testautomation/spreadsheet/optional/includes/import_general/c_import_general.inc b/testautomation/spreadsheet/optional/includes/import_general/c_import_general.inc
index e10ae90d4d18..115e8db17be7 100755
--- a/testautomation/spreadsheet/optional/includes/import_general/c_import_general.inc
+++ b/testautomation/spreadsheet/optional/includes/import_general/c_import_general.inc
@@ -61,6 +61,31 @@ end sub
 '
 '-------------------------------------------------------------------------------
 '
+function IsItLoaded as boolean
+    '/// IsItLoaded
+    '/// Wait until document is loaded
+    Dim iLoop as integer
+
+    IsItLoaded = FALSE
+    sleep(3)
+    for iLoop =1 to 20
+        try
+            'Calling slot 'IsDocLoading'
+            IsItLoaded = IsDocLoading
+        catch
+            IsItLoaded = FALSE
+        endcatch
+
+        if IsItLoaded = TRUE then
+            exit for
+        end if
+        sleep(1)
+    next iLoop
+    sleep(2)
+end function
+'
+'-------------------------------------------------------------------------------
+'
 testcase tLoadSpreadsheetDocument (SourceFile)
     Dim sOnlyFileName as string
     Dim sOnlyFileExtension as string