实验报告6 PLSQL.pdfVIP

《数据库系统概论》实验报告六 题目：实验六 PL/SQL 姓名 Vivian 日期 2006-1-1 实验内容及完成情况： 实验环境介绍： 硬件：CPU ：P3 800 硬盘：30G 内存：512M 系统：Windows 2000 Advanced Server 在实验六之前，在安装过程中自动建立的“学生课程数据库”中共有三张关系表 Student、 Course 和 SC，登陆的用户名为 SYSTEM，密码为 MANAGER 。接下来的实验就是对学生 课程数据库，编写存储过程。 （一） 统计离散数学的成绩分布情况，即按照各分数段统计人数。 1. 创建存储过程 1）创建需要的表结构。 因为存储过程在执行后在客户端并没有返回值，因此需要建立一个表存放执行后的结 果，并返回到客户端显示。 根据实验要求，我们要统计选修了离散数学的学生的成绩分布，因此我们建立表 Rank ， 其中第一列 division 显示成绩分段划分，第二列 number 显示的是成绩在该分数段的学生人 数。 CREATE TABLE Rank( division CHAR(20), number INT); 2 ）编写存储过程。 CREATE OR REPLACE PROCEDURE statistic_mark(name CHAR(50)) //存储过程带有一个字符型参数值，便于统计不同科目的分数分布情况 AS DECLARE less60 INT := 0; //分为五个分数段，并置初始值为 0 b60a70 INT := 0; b70a80 INT := 0; b80a90 INT := 0; more90 INT := 0; curcno CHAR(4); //设字符型变量 curcno 存放输入的课程名称参数 BEGIN SELECT cno INTO curcno //根据课程名称在 Course 表中查询查询该课程号 FROM Course WHERE cname = name; IF NOT FOUND THEN //如果不存在用户输入的课程名称，返回错误信息 RAISE EXCEPTION 输入错误，没有该课程; END IF; SELECT count(*) INTO less60 //查询分数低于 60 分的学生人数 FROM sc WHERE cno = curcno AND grade 60; SELECT count(*) INTO b60a70 //查询分数在 60 到 70 之间的学生人数 FROM sc WHERE cno = curcno AND grade = 60 AND grade 70; SELECT count(*) INTO b70a80 //查询分数在 70 到 80 之间的学生人数 FROM sc WHERE cno = curcno AND grade = 70 AND grade 80; SELECT count(*) INTO b80a90 //查询分数在 80 到 90 之间的学生人数 FROM sc WHERE cno = curcno AND grade = 80 AND grade 90; SELECT count(*) INTO more90 //查询分数高于 90 的学生人数 FROM sc WHERE cno = curcno AND grade = 90; // 向表Rank 中插入五条记录，显示成绩分布情况 INSERT INTO Rank VALUES([0,60),less60); INSERT INTO Rank VALUES([60,70),b60a70); INSERT INTO Rank VALUES([70,80),b70a80); INSERT INTO Rank VALU