create or replace procedure 隐式游标 as
flag CHAR := 'U' ;
begin
if SQL%found then
update table3 set TANAME='问问' where taid=1;
commit;
flag :='I';
insert into table3(taid,taname,bqid) values(4,'人事部',2);
commit; www.2cto.com
end if;
if flag ='U' then
dbms_output.put_line('表已更新');
ELSE
dbms_output.put_line('记录已插入');
end if;
end 隐式游标;
作者 勇往直前102002