高级数据库技术课程——游标练习

最新推荐文章于 2023-02-16 15:55:50 发布
最新推荐文章于 2023-02-16 15:55:50 发布
阅读量1.4k 收藏 4
点赞数
分类专栏： 数据库技术 文章标签： sql database 数据库
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/qq_19716143/article/details/121400150
版权

目录

1.查询SOFTWARE（CS）系的学生的基本信息。对齐打印输出。

-- Created on 2020/11/16
declare 
  cursor c is select * from student where sdept = 'software';
begin
  dbms_output.put_line(rpad('=',60,'='));
  dbms_output.put_line(' ');
  dbms_output.put_line(lpad('SOFTWARE(对应原题的SC）系学生基本信息表',45));
  dbms_output.put_line(rpad('-',60,'-'));
  dbms_output.put_line(rpad(' ',5)||rpad('学号',9)||rpad('姓名',8)||rpad('性别',10)||rpad('年龄',10)||'所在系');
  for i in c loop
    dbms_output.put_line(rpad(' ',5)||rpad(i.sno,10)||rpad(i.sname,10)||rpad(i.ssex,10)||rpad(i.sage,10)||i.sdept);
  end loop;
  dbms_output.put_line(rpad('=',60,'='));
end;
  • 输出样例：
    在这里插入图片描述

2.查询某学生的选课信息，打印课程号，成绩。并在最后一行打印（学生姓名）同学的平均分为：平均分。


-- Created on 2020/11/16
declare 
  cursor c is select cno,grade from sc where sno='18110401';
  sn student.sname%type;
  avgr sc.grade%type;
begin
  select sname into sn from student where sno = '18110401';
  select avg(grade) into avgr from sc where sno='18110401';
  dbms_output.put_line(rpad('=',40,'='));
  dbms_output.put_line(' ');
  dbms_output.put_line(sn||'同学的选课信息如下：');
  dbms_output.put_line(rpad('-',40,'-'));
  dbms_output.put_line(rpad(' ',9)||rpad('课程号',9)||rpad('成绩',8));
  for i in c loop
    dbms_output.put_line(rpad(' ',10)||rpad(i.cno,10)||i.grade);
  end loop;
  dbms_output.put_line(rpad('-',40,'-'));
  dbms_output.put_line(lpad(sn,15)||'同学的平均分为：'||avgr);
  dbms_output.put_line(rpad('=',40,'='));
end;

输出样例：
在这里插入图片描述

3.查询某学生可以选的课程信息（该生没有选，同时课程也没有选满），打印课程号，课程名，学分，最大选课人数，当前选课人数。并在最后一行打印该生目前获得的学分。


-- Created on 2020/11/16 
declare 
  sn student.sname%type:='chen';
  sumg course.ccredit%type;
  cursor c is select course.cno,cname,ccredit,snumber,count(*) nnumber 
       from student,course,sc a
            where student.sno=a.sno and course.cno=a.cno and
                  a.cno not in (select cno from sc where sno in (select sno from student where sname=sn)) and
                      snumber>(select count(*) nnumber from sc b where a.cno=b.cno group by cno)
                             group by course.cno,cname,ccredit,snumber
                                   order by course.cno;
  x c%rowtype;
begin
  --select sname into sn from student where sno = '18110416';
  select sum(ccredit) into sumg from sc,course where sc.cno = course.cno and sno in (select sno from student where sname=sn);
  declare
    t int(1);
  begin
      select 1 into t from student where (sname=sn);
  exception when NO_DATA_FOUND then
      dbms_output.put_line('该学生不存在');
      dbms_output.put_line(rpad('=',35,'='));
      return;
  end;
  open c;
  fetch c into x;
  if c %notfound then
    declare
      xk course.snumber%type;
      maxk course.snumber%type;
     begin
      select count(*) into xk from sc where sno in (select sno from student where sname=sn);
      select count(*) into maxk from course;
         if maxk=xk then
         dbms_output.put_line('没有可选的课程信息！ 该生已选满所有课程。');
         dbms_output.put_line(rpad('=',50,'='));
         else
         dbms_output.put_line('没有可选的课程信息！ 该生的未选课程均已达到最大选课人数。');
         dbms_output.put_line(rpad('=',65,'='));
         end if;
     end;
     return;
  end if;
  close c;
  dbms_output.put_line(rpad('=',65,'='));
  dbms_output.put_line(' ');
  dbms_output.put_line(sn||'同学可以选的课程信息如下：');
  dbms_output.put_line(rpad('-',65,'-'));
  dbms_output.put_line(rpad(' ',8)||rpad('课程号',8)||rpad('课程名',10)||rpad('学分',5)||rpad('最大选课人数',14)||'当前选课人数');
  for i in c loop
    dbms_output.put_line(rpad(' ',9)||rpad(i.cno,9)||rpad(i.cname,11)||rpad(i.ccredit,10)||rpad(i.snumber,16)||i.nnumber);
  end loop;
  dbms_output.put_line(rpad('-',65,'-'));
  dbms_output.put_line(lpad(sn,25)||'同学目前已获得的学分为：'||sumg);
  dbms_output.put_line(rpad('=',65,'='));
end;
  • 输出样例：

  1. 正常查询出某同学的可选课程：
    在这里插入图片描述

  2. 查询不到该学生信息：
    在这里插入图片描述

  3. 由于该生选满了课，而导致没有选课信息
    在这里插入图片描述

  4. 由于未选课程全都选满而无法选课
    在这里插入图片描述

4.使用游标实现：将某一门课程成绩高于课程平均分的学生所选的所有课程的姓名，课程名，成绩格式化输出。


-- Created on 2020/11/17
/*程序说明：
1.针对输出进行了重新设计，增加了课程平均分比较，单科排名（rownum有使用漏洞时，选择了运用rank()函数），挂科提醒，成绩评价等输出内容。
2.将某一个门高于和每门都高于的SQL写在一个程序里，运行时，可注释掉另外一个，有利于程序的可读性；
3.查询每门课程都高于平均分的学生所选所有课程SQL语句运用了in和exist两种方法。
*/

declare 
  --/*
  -- 某一门课大于
  cursor c is select sname,cname,grade
       from sc,student,course
            where student.sno=sc.sno and course.cno=sc.cno and
                  sc.sno in (select sno  from sc a
                      where grade>(select avg(grade) average from sc b where a.cno=b.cno group by cno)); --至少有一门课大于平均成绩
  --*/
  /*
  -- 每门课都大于
  -- in写法
  cursor c is select sname,cname,grade
       from sc,student,course
            where student.sno=sc.sno and course.cno=sc.cno and
                  sc.sno not in (select sno  from sc a
                      where grade<=(select avg(grade) average from sc b where a.cno=b.cno group by cno)) --至少有一门课小于等于平均成绩
  */
  -- 每门课都大于
  -- exsits写法
  /*
  cursor c is select sname,cname,grade
       from sc x,student,course
            where student.sno=x.sno and course.cno=x.cno and
                  not exists (select * from sc a where x.sno=a.sno and grade<=(select avg(grade) average from sc b where a.cno=b.cno group by cno))
                      order by student.sno;
                      */
  sn student.sname%type:='000'; 
  cn course.cname%type;
  k decimal(4,1);--sc.grade%type;
  snu student.sno%type;
  nub int(10);
  zumg course.ccredit%type;--总学分
  sumg course.ccredit%type;--获得学分
  avgr decimal(4,1);
  p_avgr decimal(4,1);
  --pm int(8);
  sd student.sdept%type;
  znub int(10);
  nkc int(10);--所选课程数
  nopass int(10);
  cnt int(10):=0;--高于平均分计数
  cursor f_ail is select cname into nopass from sc,course where sc.cno = course.cno and sno in (select sno from student where sname=sn) and grade<60;
begin
  --dbms_output.put_line('某一门课程成绩高于课程平均分的学生所选的所有课程信息：');
  dbms_output.put_line(' ');
  dbms_output.put_line(lpad('每门课程成绩高于课程平均分的学生所选的所有课程信息表',66));
  for i in c loop
    if i.sname!=sn and sn!='000' then
      dbms_output.put_line(lpad(' ',12)||rpad('-',68,'-'));
      select count(*) into nkc from sc where sno in (select sno from student where sname=sn) group by sno;
      --dbms_output.put_line(lpad('选课门数：',30)||nkc);
      select sum(ccredit) into zumg from sc,course where sc.cno = course.cno and sno in (select sno from student where sname=sn);
      select sum(ccredit) into sumg from sc,course where sc.cno = course.cno and sno in (select sno from student where sname=sn) and grade>=60;
      --dbms_output.put_line(lpad('已获得的学分：',30)||sumg);
      --select avg(grade) into avgr from sc where sno in (select sno from student where sname=sn);
      --dbms_output.put_line(lpad('平均分：',30)||avgr);
      select sum(grade*ccredit)/sum(ccredit) into p_avgr from sc,course where sc.cno=course.cno and sno in (select sno from student where sname=sn);
      --dbms_output.put_line(lpad('加权平均分：',28)||p_avgr);
      select sdept into sd from student where sname=sn;
      select distinct(totalrank) into znub from 
        (select rank() over(order by sum(grade*ccredit)/sum(ccredit) desc) totalrank,sum(grade*ccredit)/sum(ccredit) x_avgr 
          from sc,course where sc.cno=course.cno and sno in (select sno from student where sdept=sd) group by sno)
            where x_avgr=(select sum(grade*ccredit)/sum(ccredit) from sc,course where sc.cno=course.cno and sno in (select sno from student where sname=sn));
      dbms_output.put_line(' ');
      dbms_output.put_line('数据性评价：'||nkc||'门选课，其中'||cnt||'门高于课程平均分,'||(nkc-cnt)||'门低于课程平均分；');
      dbms_output.put_line(rpad(' ',12)||'共获得'||sumg||'学分,加权平均分为'||p_avgr||'分，在所在系('||sd||'系)中排名第'||znub||'名。');
      cnt:=0;
      dbms_output.put_line(' ');
      if sumg=zumg then  
         dbms_output.put_line('总体评价：该生总体成绩优秀，无挂科。请继续保持努力。');
      else 
         select count(*) into nopass from sc,course where sc.cno = course.cno and sno in (select sno from student where sname=sn) and grade<60;
         dbms_output.put_line('总体评价：该生总体成绩良好，有'||nopass||'门挂科。挂科科目为：');
         for j in f_ail loop
           dbms_output.put_line(lpad(j.cname,58));
         end loop;  
         dbms_output.put_line(lpad('请及时参与补考或重修！',75));
      end if;
      dbms_output.put_line(' ');
    end if;
    if i.sname!=sn then
       sn:=i.sname;
       select sno into snu from student where sname=sn;
       dbms_output.put_line(rpad('=',85,'='));
       dbms_output.put_line(' ');
       dbms_output.put_line(rpad('学生姓名:',10)||i.sname);
       dbms_output.put_line(rpad('学号:',6)||snu);
       dbms_output.put_line(rpad('-',20,'-'));
       dbms_output.put_line(' ');
       dbms_output.put_line(lpad(' ',15)||rpad('课程名',11)||rpad('成绩',7)||rpad('课程平均分',12)||rpad('与平均分（±）',15)||'单科排名');
       dbms_output.put_line(lpad(' ',12)||rpad('-',68,'-'));
    --else
    end if;
      cn:=i.cname;
      select avg(grade) into k from sc where cno in (select cno from course where cname=cn) group by cno;
      -- 用rownum发现如果有相同分的情况下不能解决
      --select rownum into nub from (select * from sc where cno=(select cno from course where cname=cn) order by grade desc) xh where xh.grade=i.grade;
      -- 用rank()函数
      select distinct(rank) into nub from 
        (select rank() over(order by grade desc) rank ,grade from (select * from sc where cno=(select cno from course where cname=cn))) 
          where grade=i.grade;
      if (i.grade-k)>0 then
         dbms_output.put_line(lpad(' ',16)||rpad(i.cname,9)||rpad('|',3)||rpad(i.grade,5)||rpad('|',5)||rpad(k,8)||rpad('|',5)||'+'||rpad(i.grade-k,10)||rpad('|',5)||nub);
      else 
         dbms_output.put_line(lpad(' ',16)||rpad(i.cname,9)||rpad('|',3)||rpad(i.grade,5)||rpad('|',5)||rpad(k,8)||rpad('|',5)||'-'||rpad(abs(i.grade-k),10)||rpad('|',5)||nub);
      end if;
      if i.grade-k>0 then
        cnt:=cnt+1;
      end if;
    --end if;
  end loop;
  dbms_output.put_line(lpad(' ',12)||rpad('-',68,'-'));
      select count(*) into nkc from sc where sno in (select sno from student where sname=sn) group by sno;
      --dbms_output.put_line(lpad('选课门数：',30)||nkc);
      select sum(ccredit) into zumg from sc,course where sc.cno = course.cno and sno in (select sno from student where sname=sn);
      select sum(ccredit) into sumg from sc,course where sc.cno = course.cno and sno in (select sno from student where sname=sn) and grade>=60;
      --dbms_output.put_line(lpad('已获得的学分：',30)||sumg);
      --select avg(grade) into avgr from sc where sno in (select sno from student where sname=sn);
      --dbms_output.put_line(lpad('平均分：',30)||avgr);
      select sum(grade*ccredit)/sum(ccredit) into p_avgr from sc,course where sc.cno=course.cno and sno in (select sno from student where sname=sn);
      --dbms_output.put_line(lpad('加权平均分：',28)||p_avgr);
      select sdept into sd from student where sname=sn;
      select distinct(totalrank) into znub from 
        (select rank() over(order by sum(grade*ccredit)/sum(ccredit) desc) totalrank,sum(grade*ccredit)/sum(ccredit) x_avgr 
          from sc,course where sc.cno=course.cno and sno in (select sno from student where sdept=sd) group by sno)
            where x_avgr=(select sum(grade*ccredit)/sum(ccredit) from sc,course where sc.cno=course.cno and sno in (select sno from student where sname=sn));
      dbms_output.put_line(' ');
      dbms_output.put_line('数据性评价：'||nkc||'门选课，其中'||cnt||'门高于课程平均分,'||(nkc-cnt)||'门低于课程平均分；');
      dbms_output.put_line(rpad(' ',12)||'共获得'||sumg||'学分,加权平均分为'||p_avgr||'分，在所在系('||sd||'系)中排名第'||znub||'名。');
      cnt:=0;
      dbms_output.put_line(' ');
      if sumg=zumg then  
         dbms_output.put_line('总体评价：该生总体成绩优秀，无挂科。请继续保持努力。');
      else 
         select count(*) into nopass from sc,course where sc.cno = course.cno and sno in (select sno from student where sname=sn) and grade<60;
         dbms_output.put_line('总体评价：该生总体成绩良好，有'||nopass||'门挂科。挂科科目为：');
         for j in f_ail loop
           dbms_output.put_line(lpad(j.cname,58));
         end loop;  
         dbms_output.put_line(lpad('请及时参与补考或重修！',75));
      end if;
      dbms_output.put_line(' ');
  dbms_output.put_line(' ');
  dbms_output.put_line(rpad('=',95,'='));
end;

输出样例：

  1. 无挂科
    在这里插入图片描述
    2.挂科提醒
    在这里插入图片描述

5.使用游标实现：将每门课程成绩高于课程平均分的学生所选的所有课程的姓名，课程名，成绩格式化输出。

-- Created on 2020/11/16
-- 代码同某一门时相同，只是注释块不同，此处不再赘述

输出样例：
在这里插入图片描述

Cheny1m
关注
  • 0
    点赞
  • 踩
  • 4
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
高级数据库技术Oracle实验五 游标
qq_43853047的博客
11-07 608
第1关：静态游标 --***********1、使用静态游标，遍历所有选择了“数学”的学生，列出学生的学号，姓名，成绩（按学号升序排列）。***************** declare cursor stu is select s.sno,sname,grade from (select sno,sname from student where sdept='CS') s join (select sno,grade from sc
游标练习
weixin_30649859的博客
05-10 2557
1,用游标显示所有部门编号与名称，以及其所拥有的员工人数。 declare cursor cur_dept is select dname,deptno, count(*) v_count from ( select d.deptno,d.dname from dept d inner join emp e on d.deptno=e.deptno where d.deptn...
数据库游标练习
10-24
关于数据库游标的小练习，不算一个什么项目，给与下载的人借鉴一下
Oracle数据库的游标练习
最新发布
qq_54241971的博客
02-16 397
oracle的游标习题
记一个数据库游标的实例
dfj66154的博客
03-27 128
--数据游标在数据库中起到的就是一个书签的作用，它让一个抽象的成员实例化为一个准确的对象。游标虽好，但是可不能多次使用，运行效率会降低！ USE [数据库名] GO Create procedure [dbo].[proc_gitcontent]//存储过程名称 as declare --声明变量（用于插入数据） @content varchar(max)...
数据库游标
编程猴
02-04 364
文章目录游标游标概念管理游标 游标 游标概念 游标是一种能从包括多个元素的集合中每次读取一个元素的机制 （可以把游标看作一个指针，把select查询结果集看作一张二维表格，用游标指向表格的任意一行，允许用户对该行数据进行处理） 游标分类：Transact-SQL游标，API服务器游标，客户游标 游标示意图： 表A 表B 游标指向位置——>第一行 ————> 第一行 ...
《数据库原理与应用》（第三版）第12章 函数和游标 基础 习题参考答案
12-14
1．SQL Server 2012提供的日期和时间函数有哪些？ 答：getdate、dateadd、datediff、datename、day、month、year 2．SQL Server 2012提供的类型转换函数有哪些？其语法格式分别是什么？ 答：cast和convert 3．SQL Server 2012支持的用户自定义函数有几种？每一种函数的函数体是什么？返回值是什么？ 答：标量函数、内联表值函数、多语句表值函数。 标量函数的函数体是可以是一系列SQL语句，返回值是一个标量值； 内联表值函数的函数体的一条查询语句，返回值是查询语句的执行结果（表）； 多语句表值函数的函数体是一系列SQ
快速练习ORACLE游标习题及答案
09-05
关于游标使用问题的练习附答案。游标分隐式和显示游标；动态和ref游标。。。
数据库作业17：SQL练习9 - CURSOR (游标)
weixin_45871977的博客
04-25 1414
阅读以下代码，在SQLserver上执行。 分析结果，并总结游标的使用。
Oracle数据库游标练习题
weixin_42218858的博客
05-07 1535
（1）显示游标练习 –声明三个变量保存雇员的姓名、工资和奖金 --创建游标C1,从emp表中获得所有部门员工的姓名、工资和奖金。 –清除bonus表中原有数据。 –从游标c1中提取数据放入变量中。–通过游标c1的found属性判断是否取到数据，若取到则将数据加入bonus表中 （2）游标循环利用游标for循环实现相同功能。 ...
关于数据库游标的例子
xyyz150的博客
10-16 615
declare @tableName nvarchar(100),@tbID intdeclare cur cursor  for--创建游标select name,id from sysobjects where xtype= U open cur --打开游标print 行数：+convert(nvarchar(4),@@CURSOR_ROWS )print 表名   表ID
【数据库复习_游标】
kingzma的专栏
05-16 581
一，什么是游标(cursor) 个人觉得就是一个cursor,就是一个标识，用来标识数据取到什么地方了。你也可以把它理解成数组中的下标。 二，游标(cursor)的特性 1,只读的，不能更新的。 2,不滚动的 3,不敏感的，不敏感意为服务器可以活不可以复制它的结果表 游标(cursor)必须在声明处理程序之前被声明，并且变量和条件必须在声明游标或处理程序之前被声明。
存储过程游标的练习
︶ㄣ:小坏蛋
01-12 544
USE [ESMS] GO /****** Object: StoredProcedure [dbo].[SPHistoryReacrdTest] Script Date: 01/12/2014 20:09:30 ******/ SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO ALTER procedure [dbo].[SPHistory
SQL Server数据库练习——游标
weixin_47258773的博客
05-25 1045
SQL Server数据库基础知识 游标概述 文章目录SQL Server数据库基础知识游标概述游标是什么？游标如何使用？游标使用示例 游标是什么？ 游标是SQL 的一种数据访问机制。可以将游标简单的看成是查询的结果集的一个指针，可以根据需要在结果集上面来回滚动，浏览需要的数据。 游标如何使用？ 一般地，使用游标都遵循下列的常规步骤： (1) 声明游标。把游标与T-SQL语句的结果集联系起来。 (2) 打开游标。 (3) 使用游标操作数据。 (4) 关闭游标。 (5) 删除/释放游标。 游标使用示例 下
数据库高级学习笔记--游标
qq_52159080的博客
11-25 386
--1.什么是游标 游标：用于临时存储一个查询返回的多行数据（结果集,类似于Java的Jdbc连接返回的ResultSet集合）， 通过遍历游标，可以逐行访问处理该结果集的数据。 --2.游标有什么作用 ①指定结果集中特定行的位置。 ②基于当前的结果集位置检索一行或连续的几行。 ③在结果集的当前位置修改行中的数据。 ④对其他用户所做的数据更改定义不同的敏感性级别。 ⑤可以以编程的方式访问数据库。 --3.要避免使用游标 因为游标的效率较差，如果游标操作的数据超过1万行，那么就应该...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值