实验三 PLSQL编程基础.docVIP

实验三 PL/SQL编程基础 开发语言及实现平台或实环境 Oracle 11g 实验目的 (1) 掌握 PL/SQL 块结构、PL/SQL 的基本语法、PL/SQL 的控制结构。 (2) 掌握 PL/SQL 块中使用复合数据类型。 (3) 掌握 PL/SQL 异常处理技术。 实验要求 (1) 记录执行命令和操作过程中遇到的问题及解决方法，注意从原理上解释原因。 (2) 记录利用 SQL*Plus或 iSQL*Plus编写、执行 PL/SQL 程序的命令。 实验内容 运行1.2.3中的程序，查看运行结果，体会pl/sql语句的语法结构和运行结果。完成4.5.6.及7.8中任选一个中的代码的编写。 1 利用 LOOP 循环方式计算 1+3+5+7+9。代码如下： SET SERVEROUTPUT ON DECLARE i NUMBER; sum1 NUMBER; BEGIN i:=1; sum1:=0; LOOP IF mod(i,2)!=0 THEN sum1:=sum1+i; END IF; i:=i+1; IF(i9) THEN EXIT; END IF; END LOOP; DBMS_OUTPUT.PUT_LINE(sum1); END; 2.利用记录类型将emp表的某条信息显示出来。代码如下： SET SERVEROUTPUT ON DECLARE E_name emp.ename%type; E_no emp.empno%type; E_sal emp.sal%type; E_deptno emp.deptno%type; E_hiredate emp.hiredate%type; BEGIN select empno,ename,hiredate,sal,deptno INTO E_no,E_name,E_ hiredate,E_sal , E_deptno FROM emp WHERE empno=7788; DBMS_OUTPUT.PUT_LINE(E_no||E_name || E_hiredate || E_sal || E_deptno); end; / 请利用%rowTYPE重做本例，注意三者的差别。 3.检索工资大于700的员工工资并输出，同时对可能发生的异常进行处理。 declare v_sal emp.sal%type; begin select sal into v_sal from emp where sal=700; exception when no_data_found then dbms_output.put_line(no data!); when too_many_rows then dbms_output.put_line(too many row); when others then null; end; / 4.编写PL/SQL程序块，完成如下功能： 检查SCOTT用户下emp表中某个员工的工资是否在规定范围内。不同职位的工资范围为：clerk为1500~2500，salesman为800~5000，manger为3000~4500，analyst为2500~3500，对president的工资不做限定。 5.用循环语句来实现将1到50，50个数输入到某个表中。 6.系统的自定义异常 查询某个部门的平均工资，如果此工资没有在2000~3000之间，触发自定义异常，请编写PL/SQL来处理此异常。并输出“此部门的平均工资不在2k到3k之间”。 如果你能给此自定义异常分配一个异常号，及异常名（昵称），那自然是极好的。如果不能，那样没关系。 7.以emp表编写PL/SQL程序块，使程序符合如下要求： （1）用替换变量p_salary提供要查找的工资值。 （2）如果与给定工资相符的雇员有多个，捕获该例外并向message表中插入一个值为“more than one employee with a salary of salary.”的记录。 （3）如果没有与给定工资相符的雇员，捕获该例外并向message表中插入一条值为“no employee with a salary of sal