create or replace package pack_ss1 as
n number;
function fun_s(r varchar2) return number;
end;


create or replace package body pack_ss1 as
function fun_s1(rn varchar2) return number is r employees%rowtype;
begin
loop
select * into r
from employees e
where e.departmentid=rn;
n:=n+r.salary;
exit when n=n; --能不能退出LOOP，salary为空 n=n 不可以么？
end loop;
return n;
end;


select d.departmentname,pack_ss1.fun_s(d.departmentid)--我希望把累加的salary输出。
from department d;

这个思路可以么？如果不行，请指点迷津啊。。。

[ 本帖最后由 luqihao00 于 2011-9-24 15:32 编辑 ]