diff --git a/KW1C/KW1C.sql b/KW1C/KW1C.sql index 0c19338e4..fcc741b25 100644 --- a/KW1C/KW1C.sql +++ b/KW1C/KW1C.sql @@ -1755,12 +1755,16 @@ BEGIN rec.vloertype_key, rec.begindatum, rec.einddatum); - + + IF ( rec.einddatum IS NOT NULL) + THEN fac.trackaction ('ALGRUP', rec.alg_ruimte_key, 3, - SYSDATE, + rec.einddatum, 'Vloerafwerking ' || rec.vloertypenaam || ' opgenomen in het archief'); + END IF; + EXCEPTION WHEN OTHERS THEN @@ -1796,12 +1800,16 @@ BEGIN rec.begindatum, rec.einddatum); - fac.trackaction ( + IF ( rec.einddatum IS NOT NULL) + THEN + fac.trackaction ( 'ALGRUP', rec.alg_ruimte_key, 3, - SYSDATE, + rec.einddatum, 'Ruimtegebruiker ' || rec.prs_afdeling_naam || ' opgenomen in het archief'); + END IF; + EXCEPTION WHEN OTHERS THEN @@ -1840,13 +1848,15 @@ BEGIN rec.begindatum, rec.einddatum); - fac.trackaction ( - 'ALGRUP', - rec.alg_ruimte_key, - 3, - SYSDATE, - 'Categorie ' || rec.categorie_omschrijving || ' opgenomen in het archief'); - + IF ( rec.einddatum IS NOT NULL) + THEN + fac.trackaction ( + 'ALGRUP', + rec.alg_ruimte_key, + 3, + rec.einddatum, + 'Categorie ' || rec.categorie_omschrijving || ' opgenomen in het archief'); + END IF; INSERT INTO alg_onrgoedkenmerk (alg_onrgoed_key, alg_onrgoed_niveau, @@ -1861,12 +1871,16 @@ BEGIN rec.begindatum, rec.einddatum); - fac.trackaction ( + IF ( rec.einddatum IS NOT NULL) + THEN + fac.trackaction ( 'ALGRUP', rec.alg_ruimte_key, 3, - SYSDATE, + rec.einddatum, 'Ruimtetype ' || rec.ruimtetype_omschrijving || ' opgenomen in het archief'); + END IF; + EXCEPTION WHEN OTHERS THEN