PROCEDURE P_aaa( O_I_flg OUT INT --标志 )AS BEGINO_I_flg:=1; EXCEPTION WHEN OTHERS THEN ROLLBACK; O_I_flg:=0; END P_aaa;
create or replace procedure import_testReturnValue out varchar) is begin insert into auto a (a.name) select t.username from userinfo t; ReturnValue := 'true'; --返回值 commit; exception when others then ReturnValue := 'false'; rollback; end import_test;
objid,objname,runtime,runflag,errmsg...
O_I_flg OUT INT --标志
)AS
BEGINO_I_flg:=1; EXCEPTION
WHEN OTHERS THEN
ROLLBACK;
O_I_flg:=0;
END P_aaa;
create or replace procedure import_testReturnValue out varchar)
is
begin
insert into auto a (a.name) select t.username from userinfo t;
ReturnValue := 'true'; --返回值
commit;
exception
when others then
ReturnValue := 'false';
rollback;
end import_test;