(1)
declare
i_percent constant number:=1.5;
begin
update emp set comm=sal*i_percent where deptno=10;
end;
/
(2)
create or replace procedure update_emp
(v_dept in number,v_percent in number default 1.5) is
begin
update emp set comm=sal*v_percent where deptno=v_dept;
end
execute update_emp(10,2);
(3)
declare
v_dept number;
begin
select a.deptno into v_dept from emp a where job='PRESIDENT';
update_emp(v_dept);
end;
(4)
FUNCTION F_COUNT (salary in number) RETURN number IS
pnumber number;
BEGIN
select count(*) into pnumber from emp where sal>salary;
return pnumber;
END;