WDKA#68779 -- Inrichten Wedeka

svn path=/Customer/trunk/; revision=58262

WDKA/WDKA.sql

@@ -39,6 +39,8 @@ AS
     FUNCTION getSrtControldatum(p_datum IN DATE, p_cyclus IN NUMBER) RETURN DATE;
     
     FUNCTION getCtrGroep(v_taak in VARCHAR2) RETURN NUMBER;
+    
+   
 END;
 /
 
@@ -420,9 +422,15 @@ AS
     
     
     
+   
+    
 END;
 /
 
+
+
+
+
 CREATE OR REPLACE PROCEDURE WDKA_IMPORT_INSPECTIES(p_import_key IN NUMBER)
 AS
    c_fielddelimitor      VARCHAR2 (1) := ';';
@@ -1713,11 +1721,17 @@ BEGIN
       v_test_datum := fac.safe_to_date (rec.v_laatste_datum_str,'DD-MM-YYYY');
       v_volgende_testdatum := fac.safe_to_date (rec.v_volgende_testdatum_str,'DD-MM-YYYY');
 
-      
-      SELECT ins_deel_key, ins_discipline_key 
-        INTO v_ins_key, v_ins_discipline_key  
-        FROM ins_v_deel_gegevens 
-       WHERE ins_deel_omschrijving=rec.smartwareid;
+      BEGIN
+        SELECT ins_deel_key, ins_discipline_key 
+          INTO v_ins_key, v_ins_discipline_key  
+          FROM ins_v_deel_gegevens 
+         WHERE ins_deel_omschrijving=rec.smartwareid;
+      EXCEPTION WHEN NO_DATA_FOUND THEN
+        fac.imp_writelog (p_import_key,
+                          'W',
+                          'Object met Smartware ID : '||rec.smartwareid ||' is niet bekend in Facilitor.',
+                          'Object niet gevonden!');
+      END;
                    
 
                    
@@ -2068,12 +2082,7 @@ BEGIN
                           'Taak voor object met Smartware ID : '||rec.smartwareid ||' is niet gevonden.',
                           'Smartware data niet verwerkt!');
              END IF;
-  
-      ELSE 
-           fac.imp_writelog (p_import_key,
-                          'W',
-                          'Object met Smartware ID : '||rec.smartwareid ||' is niet bekend in Facilitor.',
-                          'Object niet gevonden!');                          
+                                
       END IF;
   
   END LOOP;