15일차 # 1-10

        create or replace procedure up_emp_sawon (

   p_empno   in  emp.empno%type

 , p_emp_rec out emp%rowtype

)

is

begin

 select * into p_emp_rec 

 from emp

 where empno = p_empno;

end;

/

  

  ----------

  > 활용 1 <

  ----------

declare

 emp_rec emp%rowtype;

begin

 up_emp_sawon(7788, emp_rec);

 p(emp_rec.ename);

 p(emp_rec.sal);

end;

/

  ----------

  > 활용 2 <

  ----------

declare

 emp_rec emp%rowtype;

begin

 for r in (select empno from emp) loop

   up_emp_sawon(r.empno, emp_rec);

   p(emp_rec.ename||' '||emp_rec.job||' '||emp_rec.sal);

 end loop;

end;

/