为员工长工资。从最低工资调起每人长10％，但工资总额不能超过5万元,

/*
为员工长工资。从最低工资调起每人长10％，但工资总额不能超过5万元,
请计算长工资的人数和长工资后的工资总额，并输出输出长工资人数及工资总额。

可能的SQL:
员工: select empno,sal from emp order by sal;
长工资后的工资总额:1. 对sal进行累加: 新的工资总额=旧的工资 + sal*0.1;
2. sum(sal): 查询数据库
练习： 工资不能超过5w
*/

declare
--员工
cursor cemp is select empno,sal from emp order by sal;
pempno emp.empno%type;
psal emp.sal%type;

--长工资的人数
countEmp number := 0;
--工资总额
salTotal number;
begin

--涨前工资总额
select sum(sal) into salTotal from emp;

open cemp;
loop
--工资总额>5w
exit when salTotal > 50000;
--取一个员工
fetch cemp into pempno,psal;
exit when cemp%notfound;

--涨工资
update emp set sal=sal*1.1 where empno=pempno;
--人数
countEmp := countEmp +1;
--工资总额
salTotal := salTotal + psal * 0.1;
end loop;
close cemp;

commit;

--输出
dbms_output.put_line('长工资的人数:'|| countEmp);
dbms_output.put_line('工资总额:'|| salTotal);

end;