sql> create or replace function d_e(tabname in char,d_old in char,d_new in char)
2 return char
3 as
4 num char(10) := tabname;
5 begin
6 if num='dept' then
7 update dept set deptno = d_new where deptno = d_old;
8 update emp set deptno = d_new where deptno=d_old;
9 elsif num='emp' then
10 update emp set deptno = d_new where deptno = d_old;
11 end if;
12 return num;
13 end;
14 /
function created
sql>
sql> declare
2 num char(30);
3 begin
4 num:=d_e('dept','0002','0007');
5 dbms_output.put_line(num);
6 end;
7 /
dept
pl/sql procedure successfully completed
sql>