Re: creating triggers.

Hadija54 <hadija54_at_aol.com> wrote in article <19981103225715.14790.00003142_at_ng148.aol.com>...
> will someone please explain to me ( a lay person ) how to create a
trigger.
>

create or replace trigger NBU_FILE1_INS

   before insert on NBU_FILE1
   for each row
begin

    :new.uname:=NVL(:new.uname,USER);
    :new.WORKDATE:=NVL(:NEW.WORKDATE,NBU0.STORED_DBEG); end;

create or replace trigger NBU_FILE6_UPD

   before update on NBU_FILE6
   for each row
begin

   IF NBU0.TRIGER_STATE='Y' THEN
    IF NBU0.PROOF_STRFILE6(:NEW.GR_VAL,:NEW.BALANS,:NEW.IDFIL)<>1 THEN      RAISE_APPLICATION_ERROR(-20111,'Нет прав на редактирование данной информации#');
   END IF;
    IF NBU0.PROOF_STRFILE6(:OLD.GR_VAL,:OLD.BALANS,:OLD.IDFIL)<>1 THEN      RAISE_APPLICATION_ERROR(-20111,'Нет прав на редактирование данной информации#');
   END IF;
  END IF;
end;
/ Received on Wed Nov 04 1998 - 03:34:20 CST