一、涉及内容

  游标的创建与应用

二、具体操作

(一)填空题

  1.PL/SQL 程序块主要包含3个部分:声明部分、(执行部分 )、异常处理部分。

  2.自定义异常必须使用(RAISE )语句引发。

(二)选择题

  1.下列哪一个不是BOOLEAN变量可能的取值?(D )

    A.TRUE  B.FALSE  C.NULL D.BLANK

  2.请查看以下IF语句:

Declare
sal number:=500;
comm number;
Begin
If sal <100 then
Comm :=0;
Elsif sal <600 then
Comm: =sal*0.1;
Else sal <1000 then
Comm: =sal*0.15;
Else
Comm: =sal*0.2;
End if;
End;

  在执行了以上语句之后,变量comm 的结果应是:(B )

  A.0  B.50  C.75 D.100

  3.在以下哪些语句中可以包含WHERE CURRENT OF 子句?(CE)

    A.OPEN   B.FETCH C.DELETE D.SELECT E.UPDATE   F.CURSOR

  4.在异常和oracle错误之间建立关联时,应该在哪个部分完成?(A)

    A.定义部分   B.执行部分  C.异常处理部分

  5.只能存在一个值的变量是哪种变量?(B )

    A.游标   B.标量变量  C.游标变量 D.记录变量

(三)编程题

  1.编写程序计算并输出1~100的和。

  方案一:

  语句:

Declare
v_sum integer:=0;
begin
for i in 1..100 loop
v_sum := v_sum+i;
end loop;
dbms_output.put_line(‘1~100的和为:’|| v_sum);
end;
/

  截图:

  方案二:

  语句:

Declare
v_sum integer;
begin
v_sum := 100*101/2;
dbms_output.put_line(‘1~100的和为:’|| v_sum);
end;
/

  截图:

  2.分别使用显式游标和隐式游标逐行输出scott.emp表中的员工姓名和工资。

  (一)使用显式游标

  语句:

DECLARE
CURSOR emp_cursor01 IS SELECT ename,sal FROM scott.emp;
emp_record emp_cursor01%ROWTYPE;
BEGIN
OPEN emp_cursor01 ;
LOOP
FETCH emp_cursor01 INTO emp_record;
EXIT WHEN emp_cursor01%NOTFOUND;
dbms_output.put_line('ename:'||emp_record.ename||',sal:'||emp_record.sal);
END LOOP;
dbms_output.put_line('row count:'||emp_cursor01%rowcount);
CLOSE emp_cursor01;
END;

   截图:

  (二)使用隐式游标

  语句:

BEGIN
FOR emp_record IN (SELECT ename,sal FROM scott.emp)
LOOP
dbms_output.put_line('ename:'||emp_record.ename||',sal:'||emp_record.sal);
END LOOP;
END;

  截图:

(补充练习)

1、 创建一个表top_dogs,包含两列:name varchar2(25) 和 salary NUMBER(11,2),用来存放员工姓名和工资。

语句:

create table top_dogs
(name varchar2(25),
salary NUMBER(11,2));

截图:

2、创建一个PL/SQL块,查询出工资水平前n名的员工。具体要求如下:

(1)通过替代变量读取n的值。

(2)通过循环从emp表中获取工资在前n名的员工的姓名和工资

(3)将得到的员工姓名和工资写入top_dogs表。

(4)如果有多名员工的工资相同,则每人都占n名中的一个名额。

(5)测试特殊情况,例如n=0或者n大于员工总数。

(6)每次向top_dogs 表中写入数据前,先清空该表中的数据。

方案一:

语句:

DECLARE
CURSOR emp_cursor(n number) IS SELECT ename,sal FROM scott.emp
ORDER BY sal DESC;
v_n integer := &n;
BEGIN
delete from top_dogs;
FOR rec IN emp_cursor(v_n) LOOP
IF emp_cursor%ROWCOUNT <=v_n THEN
insert into top_dogs values(rec.ename,rec.sal);
dbms_output.put_line('ename: '||rec.ename||' sal:'||rec.sal);
ELSIF v_n<=0 or v_n>emp_cursor%ROWCOUNT then
dbms_output.put_line('error!');
ELSE EXIT; --退出循环
END IF;
END LOOP;
END;
/

截图:

n=3以及n=4:

测试n=0以及n=100的情况:

    

方案二:

语句:

DECLARE
CURSOR emp_cursor IS SELECT ename,sal FROM scott.emp
ORDER BY sal DESC;
v_n integer := &n;
BEGIN
delete from top_dogs;
FOR rec IN emp_cursor
LOOP
Exit when emp_cursor%notfound;
Exit when emp_cursor%ROWCOUNT>v_n;
insert into top_dogs values(rec.ename,rec.sal);
-- dbms_output.put_line('ename: '||rec.ename||' sal:'||rec.sal);
END LOOP;
END;
/

截图:

输入n:2

输入n:3

Select * from top_dogs

输入n:0

Select * from top_dogs

输入n:100

Select * from top_dogs

3、在上题的基础上,如果员工工资相同(并列第几名),需要将前n名的员工全部输出。

语句:

DECLARE
CURSOR emp_cursor IS SELECT ename,sal FROM scott.emp
ORDER BY sal DESC;
v_n integer := &n;
v_sal scott.emp.sal%type;
BEGIN
delete from top_dogs;
FOR rec IN emp_cursor
LOOP
Exit when emp_cursor%notfound;
Exit when emp_cursor%ROWCOUNT>v_n and v_sal<>rec.sal;
V_sal:= rec.sal;
insert into top_dogs values(rec.ename,rec.sal);
-- dbms_output.put_line('ename: '||rec.ename||' sal:'||rec.sal);
END LOOP;
END;

输入n 的值:2

Select * from top_dogs

有三条记录

截图:

4、使用游标查询dept表的部门编号和名称,将其部门编号传递给另一个用于查询emp表的游标(查询emp表的员工姓名,工作,雇佣日期,工资)。

语句:

Declare
Cursor dept_cur is select deptno,dname from scott.dept;
Cursor emp_cur (c_deptno scott.emp.deptno%type) is select ename,job,hiredate,sal from scott.emp where deptno=c_deptno;
Emp_rec emp_cur%rowtype;
Begin
For dept_rec in dept_cur
Loop
Open emp_cur(dept_rec.deptno);
Loop
Fetch emp_cur into Emp_rec;
Exit when emp_cur%notfound;
Dbms_output.put_line('ename:'|| Emp_rec.ename||' job:'|| Emp_rec.job||' hiredate:'|| Emp_rec.hiredate||' sal:'|| Emp_rec.sal);
End loop;
Close emp_cur;
End loop;
End;
/

截图:

5、为emp表增加一个列stars,类型为VARCHAR2(100)。使用游标更新stars列:创建一个PL/SQL块,根据员工的工资计算他能获得的星号“*”数量,每100美元奖励一个星号,按四舍五入处理。并根据员工所获得的星号数量n,形成由n个星号组成的字符串,写入emp表的stars列。

(1)为emp表增加一个列stars,类型为VARCHAR2(100)。

(2)使用游标更新stars列:

语句:

Declare
v_stars scott.emp.stars%type;
v_num number:=0;
Cursor c1 is select empno,sal,stars from scott.emp;
Begin
For emp_rec in c1
Loop
v_stars:='';
exit when c1%notfound;
v_num:=round(emp_rec.sal/100);
for i in 1..v_num
loop
v_stars:= v_stars||'*';
end loop;
update scott.emp set stars= v_stars where empno=emp_rec.empno;
end loop;
end;

截图:

Oracle数据库—— 游标的创建和应用的更多相关文章

  1. 《Oracle Database 12c DBA指南》第二章 - 安装Oracle和创建数据库(2.1 安装Oracle数据库软件和创建数据库概览)

    当前关于12c的中文资料比较少,本人将关于DBA的一部分官方文档翻译为中文,很多地方为了帮助中国网友看懂文章,没有按照原文句式翻译,翻译不足之处难免,望多多指正. 2.1 安装Oracle数据库软件和 ...

  2. Spotlight监控Oracle数据库的链接创建

    最近在做性能测试时,由于要挂载空间数据,开发人员直接将所有业务表都挂到了Oracle数据库中.最近做了几次测试发现响应时间和吞吐量都不是很理想,进行一番分析后怀疑可能在Oracle中出现问题,因此再网 ...

  3. Oracle数据库体系结构及创建表结构

    Oracle服务器主要由实例.数据库.程序全局区和前台进程组成,其中实例就是用来提供管理数据库的功能:数据库由数据库文件组成,用来存储系统数据:实例可以进一步划分为系统全局区(SGA)和后台进程(PM ...

  4. Oracle数据库——触发器的创建与应用

    一.涉及内容 1.理解触发器的概念.作用和类型. 2.练习触发器的创建和使用. 二.具体操作 (实验) 1.利用触发器对在scott.emp表上执行的DML操作进行安全性检查,只有scott用户登录数 ...

  5. 设置ORACLE数据库游标大小

    先用超级管理员(sys)登陆服务器: sqlplus "sys/***@orcl as sysdba" 连接到:Oracle 查看ORACLE最大游标数: SQL> show ...

  6. Oracle数据库游标的类型

    游标是SQL的一个内存工作区,由系统或用户以变量的形式定义.游标的作用就是用于临时存储从数据库中提取的数据块.Oracle数据库的Cursor类型包含三种: 静态游标:分为显式(explicit)游标 ...

  7. oracle 数据库中(创建、解锁、授权、删除)用户

    上文我们已经建立了名为orcl66的数据库. 想要在数据库中创建.修改用户需要我们以管理员权限登录到数据库中. 首先我们通过sqlplus命令登录连接数据库. 输入sqlplus命令--用户名: sy ...

  8. 基于oracle数据库存储过程的创建及调用

    1.PLSQL编程 1.1概念和目的 PL/SQL(Procedure Language/SQL) PLSQL是Oracle对sql语言的过程化扩展 指在SQL命令语言中增加了过程处理语句(如分支.循 ...

  9. Oracle数据库游标,序列,存储过程,存储函数,触发器

    游标的概念:     游标是SQL的一个内存工作区,由系统或用户以变量的形式定义.游标的作用就是用于临时存储从数据库中提取的数据块.在某些情况下,需要把数据从存放在磁盘的表中调到计算机内存中进行处理, ...

随机推荐

  1. 0816 1459 json & pickle ,目录导入,目录规范

    ---恢复内容开始--- 1.json & pickle 磁盘上只能存储字符串或二进制数据,直接存字典.列表.元组等是存不了的,所以需要把各种数据转换成字符串格式,然后再存到硬盘. 直接将一个 ...

  2. MagSpoof:能预测并窃取你下一张信用卡号码的廉价设备

    想象一下,你丢失了信用卡,并从银行申请了一张新的信用卡.但是,如果在你收到这张新卡之前,一些网络罪犯就已经在使用你的新信用卡,此时你作何感想?是的,这完全是可以实现的,至少使用这个仅仅10美元的设备M ...

  3. 数据库添加数据I

    /*insert.php*/ <html> <head> <meta http-equiv="Content-Type" content=" ...

  4. IIS发布错误

    发布程序时遇到的错误:

  5. HTTP、Scoket网络协议浅解

    协议:协议是指计算机通信网络中两台计算机之间进行通信所必须共同遵守的规定或规则. HTTP协议:超文本传输协议,它允许将超文本标记语言(HTML)文档从web服务器传送到客户端的浏览器.HTTP是一个 ...

  6. R编程感悟

    虽然大学阶段曾经学过C++, matlab等编程,但是真的几乎完全还给了老师- 所以,我一直将R 作为自己真正学习的第一门语言.我从2012年初在来美国的第二个rotation中开始接触到了R.当时不 ...

  7. How to adjust OOM score for a process?

    转载自http://www.dbasquare.com/kb/how-to-adjust-oom-score-for-a-process/ How to adjust OOM score for a ...

  8. UI学习笔记---第十六天XML JSON解析

    一.解析的基本概念 从事先规定好的格式中提取数据 解析的前提:提前约定好格式.数据提供方按照格式提供数据,数据方按照格式获取数据 常见解析方式XML解析JSON解析 二.XML:可扩展标记语言 XML ...

  9. twisted 初体验

    前言: 最近帮朋友review其模块服务代码, 使用的是python的twisted网络框架. 鉴于之前并没有使用过, 于是决定好好研究一番. 个人接触最早的高性能网络编程框架是Mina, 所谓先入为 ...

  10. ResponsiveSlides.js最轻量级的幻灯片插件

    摘要:ResponsiveSlides.js是一个展示同一容器内图片的轻量级响应式jQuery幻灯片插件它支持包括IE6在内的几乎所有的浏览器,在IE6中还支持最大宽度属性,但在其它浏览器中并不原生支 ...