UWVA#71401 Nieuwe bez_afspraak.mld_opdr_key kan verwijderen opdracht tegenhouden

svn path=/Database/trunk/; revision=55201

BEZ/BEZ_IND.SRC

@@ -10,6 +10,7 @@ create index bez_i_bez_afspraak_bez4 on bez_afspraak (bez_afspraak_datum);
 CREATE INDEX bez_i_bez_afspraak_bez5 ON bez_afspraak(bez_afspraak_contact_key, bez_afspraak_datum);
 CREATE INDEX bez_i_bez_afspraak_bez6 ON bez_afspraak(bez_afspraak_host_key, bez_afspraak_datum);
 CREATE INDEX bez_i_bez_afspraak_bez7 ON bez_afspraak(alg_locatie_key);
+CREATE INDEX bez_i_bez_afspraak_bez8 ON bez_afspraak(mld_opdr_key);
 
 create index bez_i_bez_bezoeker_afsp on bez_bezoekers (bez_afspraak_key);
 

MLD/MLD_PAC.SRC

@@ -3777,6 +3777,11 @@ IS
           FROM fin_factuur
          WHERE mld_opdr_key = p_opdracht_key;
 
+    CURSOR c_afspraak(p_opdracht_key IN NUMBER) IS
+        SELECT bez_afspraak_key
+          FROM bez_afspraak
+         WHERE mld_opdr_key = p_opdracht_key;
+
     CURSOR c_bijlagen(p_refkey IN NUMBER) IS
         SELECT fac_bijlagen_key
           FROM fac_bijlagen b
@@ -3798,6 +3803,11 @@ BEGIN
         fin.remove(ref_factuur.fin_factuur_key);
     END LOOP;
 
+    FOR ref_afspraak IN c_afspraak(p_mld_opdr_key)
+    LOOP
+        bez.remove(ref_afspraak.bez_afspraak_key);
+    END LOOP;
+
     FOR ref_bijlagen IN c_bijlagen(p_mld_opdr_key)
     LOOP
         flx.deleteflexbijlage (ref_bijlagen.fac_bijlagen_key);

_UP/DB41to42.src

@@ -111,6 +111,8 @@ ALTER TABLE bez_afspraak
 /////////////////////////////////////////////////////////////////////////////////////////// FMHN#66819
 DEF_FAC_SRTNOT('FAQUPD', 0, 'lcl_noti_FAQUPD', 'faq/fac_faq.asp?faq_key=', '0', 'kennisbank', 60);
 
+/////////////////////////////////////////////////////////////////////////////////////////// UWVA#71401
+CREATE INDEX bez_i_bez_afspraak_bez8 ON bez_afspraak(mld_opdr_key);
 
 /////////////////////////////////////////////////////////////////////////////////////////// FCLT#00000
 ///////////////////////////////////////////////////////////////////////////////////////////