欢迎来到天天文库
浏览记录
ID:52297542
大小:32.50 KB
页数:2页
时间:2020-03-26
《Oracle数据库系统应用开发实用教程教学全套课件第2版 朱亚兴课件 资源 任务8例7.13.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、大型数据库管理系统[Oracle]应用开发广科院任务8.通过带参数的游标分别统计不同部门员工的薪水。【例7.13】使用带参数的游标,分别统计并显示不同部门员工的薪水。DECLARECURSORc_deptISSELECT*FROMdeptORDERBYdeptno;CURSORc_emp(p_deptVARCHAR2)ISSELECTename,salFROMempWHEREdeptno=p_deptORDERBYename;r_deptDEPT%ROWTYPE;v_enameEMP.ENAME%TYPE;v_salaryEMP.SAL%TYPE;v_tot_
2、salaryEMP.SAL%TYPE;BEGINOPENc_dept;LOOPFETCHc_deptINTOr_dept;EXITWHENc_dept%NOTFOUND;DBMS_OUTPUT.PUT_LINE('Department:'
3、
4、r_dept.deptno
5、
6、'-'
7、
8、r_dept.dname);v_tot_salary:=0;OPENc_emp(r_dept.deptno);LOOPFETCHc_empINTOv_ename,v_salary;EXITWHENc_emp%NOTFOUND;DBMS_OUTPUT.PUT_LINE('Name:'
9、
10、
11、v_ename
12、
13、'salary:'
14、
15、v_salary);v_tot_salary:=v_tot_salary+v_salary;大型数据库管理系统[Oracle]应用开发广科院ENDLOOP;CLOSEc_emp;DBMS_OUTPUT.PUT_LINE('ToltalSalaryfordept:'
16、
17、v_tot_salary);ENDLOOP;CLOSEc_dept;END;
此文档下载收益归作者所有