--创建存储过程( in 输入 out 输出)
create or replace procedure say_hi(to_whom in varchar2 default '张三', who out varchar2)
as
who_name varchar(20);
begin
who_name := '李四';
who := who_name;
dbms_output.put_line('Say Hi to '||to_whom);
end;
create or replace procedure invoke_say_hi
as
who varchar2(20);
whom varchar2(20);
begin
whom := '小明';
say_hi(whom, who);--Say Hi to 小明
say_hi(who => who);--Say Hi to 张三
dbms_output.put_line(who||'say hi to '||whom);--李四say hi to 小明
end;
--调用存储过程
begin
-- Call the procedure
invoke_say_hi;
end;