17,089
社区成员
发帖
与我相关
我的任务
分享
Create Or Replace Trigger TIUA_表A
After Insert Or Update On 表A Of No ,Value ,Status For Each Row
Declare
I Integer := 0;
Begin
If Inserting Then
I := 0;
Loop
Exit When I >= Nvl(:New.No,0);
--//循环向表B中插入数据
End Loop;
End If;
If Updating Then
Update 表B
Set Value = :New.Value,
Status = :New.Status
Where ……
End If;
End TIUA_表A ;
create or replace trigger insert_a
before insert on a
for each row
declare
v_no a.no%type;
I a.no%type;
v_sql varchar2(8000);
begin
v_no := :new.no;
I := 0;
Loop
Exit When I >= Nvl(:New.No,0);
v_sql := 'insert into B(value,status) values (:new.val'||to_char(I)||',:new.stat'||to_char(I)||')';
execute immediate v_sql;
End Loop;
end insert_a;