FSN#28732 Flexkenmerken bij inspecties

svn path=/Database/trunk/; revision=20764
This commit is contained in:
Erik Groener
2014-02-24 12:00:37 +00:00
parent 234b82b5f4
commit a7d1aebc44
4 changed files with 17 additions and 32 deletions

View File

@@ -688,11 +688,11 @@ END IF;
END;
/
CREATE_TRIGGER(ins_t_ins_kmdeelsrtcontr_b_iu)
BEFORE INSERT OR UPDATE ON ins_kenmerkdeelsrtcontrole
BEFORE INSERT OR UPDATE ON ins_kmdeelsrtcontr
FOR EACH ROW
BEGIN
/* Controleer eerst of de ingevulde waarde goed is. */
IF :new.ins_kmdeelsrtcontr_waarde <> :ins_kmdeelsrtcontr_waarde
IF :new.ins_kmdeelsrtcontr_waarde <> :old.ins_kmdeelsrtcontr_waarde
OR :old.ins_kmdeelsrtcontr_waarde IS NULL
OR :new.ins_kmdeelsrtcontr_waarde IS NULL
THEN
@@ -706,7 +706,7 @@ DECLARE
KenmerkVerplicht ins_kenmerk.ins_kenmerk_verplicht%TYPE;
NumberWaarde NUMBER(25,5);
FormatMask VARCHAR2(60);
KenmerkControleWaarde ins_kenmerkdeelsrtcontrole.ins_kmdeelsrtcontr_waarde%TYPE;
KenmerkControleWaarde ins_kmdeelsrtcontr.ins_kmdeelsrtcontr_waarde%TYPE;
BEGIN
KenmerkControleWaarde := :new.ins_kmdeelsrtcontr_waarde;
@@ -791,7 +791,7 @@ BEGIN
:new.ins_kmdeelsrtcontr_waarde := KenmerkControleWaarde;
END IF;
END;
UPDATE_PRIMARY_KEY(ins_kenmerkdeelsrtcontrole_key, ins_s_kenmerkdeelsrtcontr_key);
UPDATE_PRIMARY_KEY(ins_kmdeelsrtcontr_key, ins_s_ins_kmdeelsrtcontr_key);
END IF;
END;