pl/sql案例
Posted 小狮子zzy
tags:
篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了pl/sql案例相关的知识，希望对你有一定的参考价值。
项目生命周期：
瀑布模型
拿到一个项目后，首先：分析需要用到的SQL语句；
其次：分析需要定义的变量初始值是多少，怎么得到最终值；
案例一：
统计每年入职的员工数量以及总数量：
SQL语句：select to_char(hiredate,\'yyyy\') from emp;--to_char(hiredate,\'yyyy\') :hiredate原本的格式是yyyy-mm-dd但是我们只需要年份，则强制转换为char型，并且格式为yyyy，强制转换语法：to_ 目的类型（目标字段，格式）
需要遍历整个表，那么需要用到光标->循环->退出条件：%notfound
变量：phiredate varchar2(20)
计数器：
count80 number ：= 0；
count82 number ：= 0；
count87 number ：= 0；
count89 number ：= 0；
set serveroutput on;
declare
cursor c is select to_char(hiredate,\'yyyy\') from emp;--定义光标
phiredate varchar2(20);
count80 number ：= 0；
count82 number ：= 0；
count87 number ：= 0；
count89 number ：= 0；
begin
open c;--打开光标
loop
fetch c into phiredate ;--取出员工的入职年份
exit when c%notfound;--关闭循环的条件
if phiredate= \'1980\' then count80 number ：= count80+ 1;
elsif phiredate= \'1982\' then count82 number ：= count82+ 1;
elsif phiredate= \'1987\' then count87 number ：= count87+ 1;
else count87 number ：= count87+ 1;
end if;
end loop;
close c;
dbms_output.put_line(\'tatal:\'||count80+count82+count87+count89)
end;
/
案例二
SQL语句：select no,sal from emp;
需要遍历整个表，那么需要用到光标->循环->退出条件：%notfound
变量：pno emp.no%type;
psal emp.sal%type;
涨工资人数：countemp number := 0;
涨后的工资总额：saltotal number;
select sum(sal) into saltotal from emp;
涨后的工资总额 = 涨前的工资总额 + sal*0.1;
set serveroutput on
declare
cursor c is select empno,sal from order by sal;
pno emp.no%type;
psal emp.sal%type;
countemp number := 0;--涨工资的人数
saltatol number;--涨后的工作总额
begin
select sum(sal) into saltatol from emp;--涨工资前的初始值
open c;
loop
exit when saltotal >50000;
fetch c into pno,psal;
exit when c%notfound;
update emp set sal := sal*1.1 where no = pno;--涨工资
countemp := countemp + 1;--人数+1
end loop;
close c;
commit;
dbms_output.out_put(\'人数= \'||countepm||\',涨后的工资总额：\'||saltatol);
end:
/
案例三
实现部门分段（6000分以上，6000》且3000《，3000以下）统计各工资段的职工人数，以及各部门的工资总额（不包括奖金）
首先需要创建存储结果的表msg:create table msg(deptno number;count1 number;count2 number; count3 number;saltotal number);
set serveroutput on
declare
cursor cdept is select deptno from dept;--部门的光标
pdeptno dept.deptno %type;--部门光标对应的变量
cursor cemp(deptno) is select sal from emp where no = deptno;--部门工资的光标
psal emp.sal %type;--部门工资光标对应的变量
count1 number;count2 number;count3 number;--每个阶段员工计数器
begin
open cdept;
loop
fetch cdept into pdeptno;--取出一个部门
exit when cdepy%notfound;
count1 :=0;count2 :=0;count3 :=0;--初始化计数器
select sum(sal) into saltatol from emp where deptno = pdeptno;--计算部门工资总额
open cemp(pdeptno)
loop
fetch cemp into psal;--取出每一个员工的薪资
exit when cemp%noufound;
if psal <3000 then count1 := count1 +1;--判断工资范围
elsif psal>6000 then count3 := count3 +1;
else count2 := count2 +1;
end if;
end loop;
close cemp;
insert into msg value(pdeptno,count1,count2,count3,saltatol);--保存当前部门的结果
end loop;
close cdept;
end:
/
案例四
按照系分段统计（成绩小于60，大于85，中间段）课程为‘大学物理’各个分数段的学生人数，以及各系学生的平均成绩；
、
set serveroutput on
declare
cersor cdept is select dno ,dname from dep;
pdno dep.dno%type;
cursor cgrade(coursename varchar2,depno number) is select grade from sc where cno = (select cno from course where cname = courname) and sno in (select sno from student where dno = depno)--成绩光标
pgrade sc.grade % type;
count1 number;count2 number;count3 number;--每个分数段人数计数器
avggrade number;--平均成绩
pcoursename varchar2 :=\'大学物理\'；
begin
open cdept;
loop
fetch cdept into pdno,pdname;
exit when cdept%notfound;
count1 :=0;count2 :=0;count3 :=0;--初始化计数器
select avg(grade) into avggrade from sc where cno = (select cno from course where cname = courname) and sno in (select sno from student where dno = depno)
open cgrade (pcoursename,pdno);
loop
fetch cgrade into pgrade;
exit when cgrade %notfound;
if psal <60 then count1 := count1 +1;--判断工资范围
elsif psal>85 then count3 := count3 +1;
else count2 := count2 +1;
end if;
end loop;
end loop;
close cgrade;
insert into msg value (pcoursename,count1,count2,count3,avggrade);
end loop;
close cdept;
commit;
dbms_output.put_line(\'统计完成\')；
end:/
以上是关于pl/sql案例的主要内容，如果未能解决你的问题，请参考以下文章