CREATE OR REPLACE TRIGGER CALLFUNINSERT
AFTER INSERT ON CALLFUN
referencing NEW AS NEW OLD AS OLD
FOR EACH ROW
DECLARE
CURSOR cur_autoinsert_levelpermission IS select LEVELID from OPERLEVEL;
BEGIN
FOR EACH_LEVELROW IN cur_autoinsert_levelpermission LOOP
INSERT INTO levelpermission VALUES(:NEW.CALLFUNID,EACH_LEVELROW.LEVELID,'1');
END LOOP;
END CALLFUNINSERT;