diff --git a/PRS/PRS_TRI.SRC b/PRS/PRS_TRI.SRC index 9ed1e2b9..c5cbf0ad 100644 --- a/PRS/PRS_TRI.SRC +++ b/PRS/PRS_TRI.SRC @@ -250,9 +250,41 @@ BEGIN WHEN OTHERS THEN NULL; END; - UPDATE mld_melding - SET mld_melding_behandelaar_key = NULL, mld_melding_behandelaar2_key = NULL - WHERE mld_melding_behandelaar_key = :old.prs_perslid_key OR mld_melding_behandelaar2_key = :old.prs_perslid_key; + FOR c1 + IN (SELECT mld_melding_key + FROM mld_melding + WHERE mld_melding_behandelaar_key = + :old.prs_perslid_key + AND mld_melding_status NOT IN (5, 6)) + LOOP + -- fac.trackaction ('MLDABH', + -- c1.mld_melding_key, + -- NULL, + -- NULL, + -- NULL); + + UPDATE mld_melding + SET mld_melding_behandelaar_key = NULL + WHERE mld_melding_key = c1.mld_melding_key; + END LOOP; + + FOR c1 + IN (SELECT mld_melding_key + FROM mld_melding + WHERE mld_melding_behandelaar2_key = + :old.prs_perslid_key + AND mld_melding_status NOT IN (5, 6)) + LOOP + -- fac.trackaction ('MLDABH', + -- c1.mld_melding_key, + -- NULL, + -- NULL, + -- NULL); + + UPDATE mld_melding + SET mld_melding_behandelaar2_key = NULL + WHERE mld_melding_key = c1.mld_melding_key; + END LOOP; -- Wis alle authenticatiemogelijkheden :new.prs_perslid_oslogin := '';