触发器.txt

来自「关于oracle和sql的书籍和ppt教程,非常好,本人珍藏品」· 文本 代码 · 共 78 行

create or replace trigger tri_pic_reg
after insert on dktest.dk_per_detail
for each row
declare
  ls_ftp_home varchar2(100);
begin
  select ftp_home into ls_ftp_home from dk_sys_parm;

  insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
         values(
               :NEW.grzh,:NEW.name,:NEW.id,'01','01',ls_ftp_home
         );
  insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
         values(
               :NEW.grzh,:NEW.name,:NEW.id,'01','02',ls_ftp_home
         );
  insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
         values(
               :NEW.grzh,:NEW.name,:NEW.id,'01','03',ls_ftp_home
         );
  insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
         values(
               :NEW.grzh,:NEW.name,:NEW.id,'01','04',ls_ftp_home
         );
  insert into dk_pic_reg(grzh,name,status,lb,ftp_home)
         values(
               :NEW.grzh,:NEW.name,:NEW.id,'01','05',ls_ftp_home
         );
  insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
         values(
               :NEW.grzh,:NEW.name,:NEW.id,'01','06',ls_ftp_home
         );
  insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
         values(
               :NEW.grzh,:NEW.name,:NEW.id,'01','07',ls_ftp_home
         );
end;
/
 

create or replace trigger tri_pic_reg
after insert on dktest.dk_per_detail
for each row
declare
   ls_ftp_home varchar2(100);
begin
   select ftp_home into ls_ftp_home from dk_sys_parm;
   insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
          values(
                :new.grzh,:new.name,:new.id,'01','01',ls_ftp_home
          );
   insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
          values(
                :new.grzh,:new.name,:new.id,'01','02',ls_ftp_home
          );
   insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
          values(
                :new.grzh,:new.name,:new.id,'01','03',ls_ftp_home
          );
   insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
          values(
                :new.grzh,:new.name,:new.id,'01','04',ls_ftp_home
          );
   insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
          values(
                :new.grzh,:new.name,:new.id,'01','05',ls_ftp_home
          );
   insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
          values(
                :new.grzh,:new.name,:new.id,'01','06',ls_ftp_home
          );
   insert into dk_pic_reg(grzh,name,id,status,lb,ftp_home)
          values(
                :new.grzh,:new.name,:new.id,'01','07',ls_ftp_home
          );
end;

/