triggertje

create or replace trigger brg_vbmg_prt_trigger
 before delete or insert or update
 on vbmg_producten
 for each row
declare
 l_oper varchar2 ( 3 );
 l_error_stack varchar2 ( 4000 );
 l_passed boolean := true;
begin
 if inserting
 	then
 		l_oper := 'INS';
 elsif updating
 	then
 		l_oper := 'UPD';
 elsif deleting
 	then
 		l_oper := 'DEL';
 end if;'
 if l_oper in ( 'INS', 'UPD' )
 	then
	 -- de prijs mag niet negatief zijn
 		l_passed := :new.prijs >= 0;
 	if not l_passed
 		then
 			l_error_stack := l_error_stack || 'De prijs van het product
			mag niet negatief zijn.';
	end if;
 end if;
 end;