1 create or replace procedure scott.pro_para_inout(p_dname in out scott.dept.dname%TYPE,
2 p_loc out scott.dept.loc%TYPE) is
3 begin
4 dbms_output.put_line(p_dname || ',ING');
5 dbms_output.put_line(p_loc || ',ING' );
6 end pro_para_inout;
DECLARE
v_dept scott.dept%ROWTYPE;
BEGIN
v_dept.dname :='bumon1';
v_dept.loc :='SH';
-- Call the procedure
scott.pro_para_inout(v_dept.dname, v_dept.loc);
dbms_output.put_line(v_dept.dname || ',after');
dbms_output.put_line(v_dept.loc || ',after');
end;
bumon1,ING
,ING
bumon1,after
,after