Oracle_PL_SQL经典练习题
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
Oracle 作业题
一.创建一个简单的PL/SQL程序块
使用不同的程序块组件工作
使用编程结构编写PL/SQL程序块
处理PL/SQL程序块中的错误
1.编写一个程序块,从emp表中显示名为“SMITH”的雇员的薪水和职位。
declare
v_emp emp%rowtype;
begin
select * into v_emp from emp where ename='SMITH';
dbms_output.put_line('员工的工作是：'||v_emp.job||' ；他的薪水是：
'||v_emp.sal);
end;
2.编写一个程序块，接受用户输入一个部门号，从dept表中显示该部门的名称与所在位置。方法一：（传统方法）
declare
v_loc deptcp.dname%type;
v_dname deptcp.dname%type;
v_deptno deptcp.deptno%type;
begin
v_deptno :=&部门编号;
select loc,dname into v_loc,v_dname from deptcp where deptno=v_deptno; dbms_output.put_line('员工所在地是：'||v_loc||'；部门名称是：'||v_dname); exception
when no_data_found
then dbms_output.put_line('您输入的部门编号不存在，请从新输入，谢谢');
end;
方法二：（使用%rowtype）
declare
v_dept dept%rowtype;
begin
select * into v_dept from dept where deptno=&部门号;
dbms_output.put_line(v_dept.dname||'--'||v_dept.loc);
end;
3.编写一个程序块，利用%type属性，接受一个雇员号，从emp表中显示该雇员的整体薪水(即，薪水加佣金)。（*期末考试试题*）
declare
v_sal emp.sal%type;
begin
select sal+comm into v_sal from emp where empno=&雇员号;
dbms_output.put_line(v_sal);
end;
4.编写一个程序块，利用%rowtype属性，接受一个雇员号，从emp表中显示该雇员的整体薪水(即，薪水加佣金)。
方式一：（错误程序）（让学生思考错在哪里？）
declare
v_emp empcp%rowtype;
begin
select*into v_emp from empcp where empno = &雇员编号;
dbms_output.put_line('整体薪水是：'||v_emp.sal+v_m);
end;
declare
v_emp emp%rowtype;
begin
select * into v_emp from emp where empno=&雇员号;
dbms_output.put_line(v_emp.sal+v_m);
end;
5.某公司要根据雇员的职位来加薪，公司决定按下列加薪结构处理：
Designation Raise
-----------------------
Clerk 500
Salesman 1000
Analyst 1500
Otherwise 2000
编写一个程序块,接受一个雇员名，从emp表中实现上述加薪处理。（*期末考试试题*）
declare
v_emp emp%rowtype;
begin
select * into v_emp from emp where ename='&name';
if v_emp.job='CLERK'then
update emp set sal=sal+500 where empno=v_emp.empno;
elsif v_emp.job='SALESMAN'then
update emp set sal=sal+1000 where empno=v_emp.empno;
elsif v_emp.job='ANALYST'then
update emp set sal=sal+1500 where empno=v_emp.empno;
else
update emp set sal=sal+2000 where empno=v_emp.empno;
end if;
commit;
end;
6.编写一个程序块，将emp表中雇员名全部显示出来。
declare
cursor v_cursor is select * from emp;
begin
for v_emp in v_cursor
loop
dbms_output.put_line(v_emp.ename);
end loop;
end;
7.编写一个程序块，将emp表中前5人的名字显示出来。
declare
cursor v_cursor is select * from emp;
v_count number :=1;
begin
for v_emp in v_cursor
loop
dbms_output.put_line(v_emp.ename);
v_count := v_count+1;
exit when v_count>5;
end loop;
end;
8.编写一个程序块，接受一个雇员名，从emp表中显示该雇员的工作岗位与薪水，若输入的雇员名不存在，显示“该雇员不存在”信息。（*期末考试试题*）
declare
v_emp emp%rowtype;
my_exception Exception;
begin
select * into v_emp from emp where ename='&name';
raise my_exception;