create or replace procedure p_leontest (
--v_did LEONPACK.V6;
msg1 in varchar2(100);
res out number(4);
)
as
begin
res := LEONPACK.fnc_DoUpdate (P01, :msg1);
exception
when others then
rollback;
end;你再试试!
--v_did LEONPACK.V6;
msg1 in varchar2(100);
res out number(4);
)
as
begin
res := LEONPACK.fnc_DoUpdate (P01, :msg1);
exception
when others then
rollback;
end;你再试试!
create function get_num
return number
as
begin
return 1;
end;
/
create procedure pro
as
a number;
begin
a:=get_num;
end;
/
自已测试一下吧