瀑布模型统计每年入职的员工人数/*SQL语句 select to_char(hiredate,yyyy) from emp; -游标-循环-退出条件:notfound 变量1.初始值 2.如何得到 每年入职的员工人数 count80 number 0 count81 number 0 count82 number 0 count87 number 0 */ DECLARE --定义游标 CURSOR cemp IS SELECT to_char(hiredate,yyyy) FROM emp; phiredate VARCHAR2(4); --每年入职的员工人数 count80 NUMBER : 0; count81 NUMBER : 0; count82 NUMBER : 0; count87 NUMBER : 0; BEGIN --打开游标 OPEN cemp; LOOP FETCH cemp INTO phiredate; EXIT WHEN cemp%NOTFOUND; --判断入职年份 IF phiredate 1980 THEN count80:count80 1; ELSIF phiredate 1981 THEN count81:count81 1; ELSIF phiredate 1982 THEN count82:count82 1; ELSE count87:count87 1; END IF; END LOOP; --关闭游标 CLOSE cemp; dbms_output.put_line(Total:||(count80count81count82count87)); dbms_output.put_line(1980:||count80); dbms_output.put_line(1981:||count81); dbms_output.put_line(1982:||count82); dbms_output.put_line(1987:||count87); END; Total:14 1980:1 1981:10 1982:1 1987:2员工涨工资问题/*从最低工资涨起每人涨10%但工资总额不能超过10万元 请计算涨工资的人数和涨工资后的工资总额 并输出涨工资人数及工资总额。 SQL语句 select empno,sal from emp order by sal; -游标-循环-退出条件:1.工资总额大于10W2.%notfound 变量1.初始值 2.如何得到 涨工资的人数 countEmp number 0 涨后的工资总额 salTotal number 1.select sum(sal) into salTotal from emp; 2.涨后的工资总额涨前的工资总额 sal * 0.1 */ 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 EXIT WHEN cemp%NOTFOUND; FETCH cemp INTO pempno,psal; EXIT WHEN salTotal psal*0.1 100000; --涨工资 UPDATE emp SET salsal*1.1 WHERE empnopempno; --人数1 countEmp : countEmp 1; --涨后的工资总额涨前的工资总额sal*0.1 salTotal : salTotal psal*0.1; END LOOP; --关闭游标 CLOSE cemp; COMMIT; dbms_output.put_line(人数:||countEmp|| 涨后的工资总额:||salTotal); END;涉及两张表的员工涨工资问题create table msg 2 (deptno number, 3 count1 number, 4 count2 number, 5 count3 number, 6 saltotal number); /*实现按部门分段6000以上、60003000 、3000元以下统计各工资段的职工人数、以及各部门的工资总额 工资总额中不包括奖金。 SQL语句 1.有哪些部门 select deptno from dept; -游标-循环-退出条件:notfound 2.部门中员工的薪水 select sal from emp where deptno?-带一个参数的游标-循环-退出条件:notfound 变量1.初始值 2.如何得到 每个段的员工人数 count1 number : 0 count2 number : 0; count3 number : 0; 每个部门的工资总额 salTotal number 1.select sum(sal) into salTotal from emp where deptno???; 2.累加 */ DECLARE --定义游标 CURSOR cdept IS SELECT deptno FROM dept; pdeptno dept.deptno%TYPE; --部门中员工的薪水 CURSOR cemp(dno NUMBER) IS SELECT sal FROM emp WHERE deptnodno; psal emp.sal%TYPE; --每个段的员工人数 count1 NUMBER; count2 NUMBER; count3 NUMBER; salTotal NUMBER; BEGIN --打开部门的游标 OPEN cdept; LOOP --取出一个部门 FETCH cdept INTO pdeptno; EXIT WHEN cdept%NOTFOUND; --初始化 count1:0; count2:0; count3:0; --得到部门的工资总额 SELECT SUM(sal) INTO salTotal FROM emp WHERE deptnopdeptno; --取出部门中员工的薪水 OPEN cemp(pdeptno); LOOP --取一个员工的薪水 FETCH cemp INTO psal; EXIT WHEN cemp%NOTFOUND; --判断薪水的范围 IF psal 3000 THEN count1:count11; ELSIF psal3000 AND psal6000 THEN count2:count21; ELSE count3:count31; END IF; END LOOP; --关闭游标 CLOSE cemp; --保存当前部门的结果 INSERT INTO msg VALUES(pdeptno,count1,count2,count3,NVL(salTotal,0)); END LOOP; --关闭部门的游标 CLOSE cdept; COMMIT; dbms_output.put_line(统计完成); END;
plsql程序案例
瀑布模型统计每年入职的员工人数/*SQL语句 select to_char(hiredate,yyyy) from emp; -游标-循环-退出条件:notfound 变量1.初始值 2.如何得到 每年入职的员工人数 count80 number 0 count81 number 0 count82 number 0 count87 number 0 */ DECLARE --定义游标 CURSOR cemp IS SELECT to_char(hiredate,yyyy) FROM emp; phiredate VARCHAR2(4); --每年入职的员工人数 count80 NUMBER : 0; count81 NUMBER : 0; count82 NUMBER : 0; count87 NUMBER : 0; BEGIN --打开游标 OPEN cemp; LOOP FETCH cemp INTO phiredate; EXIT WHEN cemp%NOTFOUND; --判断入职年份 IF phiredate 1980 THEN count80:count80 1; ELSIF phiredate 1981 THEN count81:count81 1; ELSIF phiredate 1982 THEN count82:count82 1; ELSE count87:count87 1; END IF; END LOOP; --关闭游标 CLOSE cemp; dbms_output.put_line(Total:||(count80count81count82count87)); dbms_output.put_line(1980:||count80); dbms_output.put_line(1981:||count81); dbms_output.put_line(1982:||count82); dbms_output.put_line(1987:||count87); END; Total:14 1980:1 1981:10 1982:1 1987:2员工涨工资问题/*从最低工资涨起每人涨10%但工资总额不能超过10万元 请计算涨工资的人数和涨工资后的工资总额 并输出涨工资人数及工资总额。 SQL语句 select empno,sal from emp order by sal; -游标-循环-退出条件:1.工资总额大于10W2.%notfound 变量1.初始值 2.如何得到 涨工资的人数 countEmp number 0 涨后的工资总额 salTotal number 1.select sum(sal) into salTotal from emp; 2.涨后的工资总额涨前的工资总额 sal * 0.1 */ 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 EXIT WHEN cemp%NOTFOUND; FETCH cemp INTO pempno,psal; EXIT WHEN salTotal psal*0.1 100000; --涨工资 UPDATE emp SET salsal*1.1 WHERE empnopempno; --人数1 countEmp : countEmp 1; --涨后的工资总额涨前的工资总额sal*0.1 salTotal : salTotal psal*0.1; END LOOP; --关闭游标 CLOSE cemp; COMMIT; dbms_output.put_line(人数:||countEmp|| 涨后的工资总额:||salTotal); END;涉及两张表的员工涨工资问题create table msg 2 (deptno number, 3 count1 number, 4 count2 number, 5 count3 number, 6 saltotal number); /*实现按部门分段6000以上、60003000 、3000元以下统计各工资段的职工人数、以及各部门的工资总额 工资总额中不包括奖金。 SQL语句 1.有哪些部门 select deptno from dept; -游标-循环-退出条件:notfound 2.部门中员工的薪水 select sal from emp where deptno?-带一个参数的游标-循环-退出条件:notfound 变量1.初始值 2.如何得到 每个段的员工人数 count1 number : 0 count2 number : 0; count3 number : 0; 每个部门的工资总额 salTotal number 1.select sum(sal) into salTotal from emp where deptno???; 2.累加 */ DECLARE --定义游标 CURSOR cdept IS SELECT deptno FROM dept; pdeptno dept.deptno%TYPE; --部门中员工的薪水 CURSOR cemp(dno NUMBER) IS SELECT sal FROM emp WHERE deptnodno; psal emp.sal%TYPE; --每个段的员工人数 count1 NUMBER; count2 NUMBER; count3 NUMBER; salTotal NUMBER; BEGIN --打开部门的游标 OPEN cdept; LOOP --取出一个部门 FETCH cdept INTO pdeptno; EXIT WHEN cdept%NOTFOUND; --初始化 count1:0; count2:0; count3:0; --得到部门的工资总额 SELECT SUM(sal) INTO salTotal FROM emp WHERE deptnopdeptno; --取出部门中员工的薪水 OPEN cemp(pdeptno); LOOP --取一个员工的薪水 FETCH cemp INTO psal; EXIT WHEN cemp%NOTFOUND; --判断薪水的范围 IF psal 3000 THEN count1:count11; ELSIF psal3000 AND psal6000 THEN count2:count21; ELSE count3:count31; END IF; END LOOP; --关闭游标 CLOSE cemp; --保存当前部门的结果 INSERT INTO msg VALUES(pdeptno,count1,count2,count3,NVL(salTotal,0)); END LOOP; --关闭部门的游标 CLOSE cdept; COMMIT; dbms_output.put_line(统计完成); END;
