bugfix if instrument control toolbox is not available

kernel/StandardRoutines/ccx.m

@@ -3,8 +3,8 @@
 % standard working directory setting used in open/write file GUIs.
 
 % <ITA-Toolbox>
-% This file is part of the ITA-Toolbox. Some rights reserved. 
-% You can find the license for this m-file in the license.txt file in the ITA-Toolbox folder. 
+% This file is part of the ITA-Toolbox. Some rights reserved.
+% You can find the license for this m-file in the license.txt file in the ITA-Toolbox folder.
 % </ITA-Toolbox>
 
 % Author: Pascal Dietrich - pdi@akustik.rwth-aachen.de - 2007
@@ -12,30 +12,32 @@
 try %#ok<TRYNC>
     dbquit all
 end
-warning off %#ok<WNOFF>
+warning off
 clear classes %RSC - needed to clean class references in case of changes
 clear global %RSC - needed to clean up global variables from preferences or mpb_filter and free memory
-clear java %RSC - reduces trouble with figures 
+clear java %RSC - reduces trouble with figures
 
 if usejava('jvm') %Only if jvm available (non_cluster)
-s_obj = instrfind();
-if ~isempty(s_obj)
-   for idx = 1:length(s_obj)
-        if strcmpi(s_obj(idx),'closed')
-            
-        elseif strcmpi(s_obj(idx),'open')
-            fclose(s_obj(idx));
+    if exist('instrfind','file')
+        s_obj = instrfind();
+        if ~isempty(s_obj)
+            for idx = 1:length(s_obj)
+                if strcmpi(s_obj(idx),'closed')
+                    
+                elseif strcmpi(s_obj(idx),'open')
+                    fclose(s_obj(idx));
+                end
+                disp(['   deleting: ' s_obj(idx).Name '...']);
+                delete(s_obj(idx));
+            end
         end
-        disp(['   deleting: ' s_obj(idx).Name '...']);
-        delete(s_obj(idx));
-   end
-end
+    end
 end
 
 if exist('playrec','file')
-   if playrec('isInitialised') 
-      playrec('reset'); 
-   end
+    if playrec('isInitialised')
+        playrec('reset');
+    end
 end
 
 fclose all;
@@ -52,6 +54,6 @@ if usejava('jvm') % bugfix mpo
 end
 
 clc
-warning on %#ok<WNON>
-warning off MATLAB:log:logOfZero 
+warning on
+warning off MATLAB:log:logOfZero
 warning off MATLAB:pfileOlderThanMfile