函数[in out 参数]
--函数[in out 参数]
create or replace function get_test(m_id in number, str1 out varchar2) --参数不需要类型长度
return varchar2 is str2 varchar2(10); --变量需要类型长度
begin
select t.ename, t.job
into str1, str2
from scott.emp t
where t.empno = m_id;
return str2;
end get_test;
--调用函数[位置表示法]
declare
s1 varchar2(10);
s2 varchar2(10);
s3 number(30) default 7521; --default 默认值
begin
s3:=7566;
s2 := get_test(s3, s1);--参数次序
dbms_output.put_line(s1 || ' ' || s2);
end;
--调用函数 [名称表示法]
declare
s1 varchar2(10);
s2 varchar2(10);
begin
s2 := get_test( str1=>s1,m_id=>7521); --名称的对应关系,次序并不重要
dbms_output.put_line(s1 || ' ' || s2);
end;
存储过程1
--存储过程1
create or replace procedure get_test1(m_id in number, str1 out varchar2) --参数不需要类型长度
is
begin
select t.ename into str1 from scott.emp t where t.empno = m_id;
end get_test1;
--调用
declare
s1 varchar2(100);
begin
get_test1(7521, s1);
dbms_output.put_line(s1);
end;
存储过程2
create or replace procedure get_test2(m_id in number)
is
str1 varchar2(100); --变量在is后面定义
begin
select t.ename into str1 from scott.emp t where t.empno = m_id;
dbms_output.put_line(str1);
end;
--sql窗口执行
begin
get_test2(7521);
end;
--在命令窗口的执行
EXECUTE get_test2(7521);