oracle实验5.docVIP

实验五 存储过程与触发器 一、实验目的 （1）掌握Oracle数据库编程语言PL/SQL的基础知识。 （2）掌握游标、存储过程和触发器的创建，使用方法。 （3）了解使用高级语言连接数据库的技术、基本方法，了解ODBC、ADO和JDBC的技术。 二、实验内容 在实验一、实验二创建的表中用PL/SQL语言完成以下内容： 创建存储过程，根据调用时提供的学生姓名查询该学生所修课程的课程信息，将课程号和课程名输出到输出窗口，并给出函数调用语句块。 create or replace procedure p1 (v_sname in student.sname%type, v_cno out c.cno%type, v_cname out c.cname%type) is cursor c1 is select c.cno,cname from student,c,sc where student.sno = sc.sno and c.cno = sc.cno and student.sname = v_sname; begin open c1; loop fetch c1 into v_cno,v_cname; exit when c1%notfound; dbms_output.put_line(v_cno||,||v_cname); end loop; close c1; end p1; declare a student.sname%type := 王迪; b varchar2(20); c varchar2(50); begin p1(a,b,c); end; 创建存储过程，统计指定学生修课的平均成绩和选课门数，将统计结果用输出参数传递给主程序，在PL/SQL主程序中调用存储过程，输出过程的返回结果。 create or replace procedure p2 (v_sname in student.sname%type, v_avg out number, v_count out number) is begin select avg(grade),count(sc.sno) into v_avg,v_count from student,sc where student.sno = sc.sno and sname = v_sname; end p2; declare a student.sname%type := 王迪; b number(8,2); c number; begin p2(a,b,c); dbms_output.put_line(b||,||c); end; 创建存储过程，在学生表Student中插入一条完整的元组。 create or replace procedure p3 (v_sno in student.sno%type, v_sname in student.sname%type , v_sex in student.sex%type , v_nation in student.nation%type, v_political in student.political%type, v_birth in student.birth%type, v_college in student.college%type, v_major in student.major%type ) is begin insert into student(sno,sname,sex,nation,political,birth,college,major) values(v_sno,v_sname,v_sex,v_nation,v_political,v_birth,v_college,v_major); commit; end p3; begin p3(123456, test,男,汉族,共青团员, to_date(1993/3/3,yyyy/mm/dd),信息工程学院,计算机科学与技术); end; 创建存储过程，将指定零件的重量增加指定的值。 create or replace procedure p4 (v_pno in p.pno%type, v_weight in p.weight%type) is begin update p set weight = v_weight + weight where pno = v_pno; commit; end p4;