--26/jan wouter DS

--de trigger voor de insert

CREATE OR REPLACE TRIGGER acc_log_trigger
BEFORE
INSERT OR UPDATE ON acc_log
FOR EACH ROW
BEGIN

    --bij een insert wordt de waarde die zal ingevoegd worden vervangen worden door sysdate en user
	:new.datum := sysdate;
	:new.gebruikersnaam := user;
	
END acc_log_trigger;

DECLARE
	v_tot_debet number(7,2);
	v_klantid number(4);
BEGIN
	v_klantid := &klantid;
	
	select sum( NVL(debet,0) ) INTO v_tot_debet
	from t_account
	where klantid = v_klantid;
	
	IF SQL%NOTFOUND THEN
	dbms_output.put_line('Verkeerd klantnummer');		
	ELSE
	INSERT INTO acc_log (klantnummer, debetsaldo) VALUES (v_klantid, v_tot_debet);
	END IF;
END;