PL SQL编程 Oracle数据库实验报告

1、PL/SQL 编程【实验目的】PL/SQL 的数据类型和书写规则熟悉控制结构和游标的使用编写和运行函数、过程和触发器【实验内容】编写脚本文件，调试运行脚本文件，并记录结果。SQL*Plus PL/SQL 块，功能用于打印学生信息DECLARE部分完成：(1)中定义的记录类型作为参数stu_recordBEGINEND 部分完成：stu_record变量的各个元素赋值如下： 姓名：李新对该变量的调用打印过程，输出到屏幕bookinfoDML bookinfo表发生了任何bookinfo数据统计表中如果没有则建立bookinfo表，选择建立在scott 用户下，表结构为(booknovarchar

2、2(36) Primarykey,booknamevarchar2(40) not null, authornamevarchar2(10) not null, publishtimedate,bookpricefloat)建立数据统计表 bookinfo 表中插入、bookinfo 表进行统计，结果存储在major_stats表中bookinfomajor_stats表中数据的变化【实验结论】编写脚本文件，调试运行脚本文件，并记录结果。SQL*Plus PL/SQL 块，功能用于打印学生信息DECLARE部分完成：set serveroutput ondeclaretype stu_reco

3、rd_type isrecord (s_no varchar2 (8),s_name varchar2 (10),s_sex varchar2 (2),s_address varchar2 (20),s_studyscore varchar2 (10), s_activescore varchar2(10);，把(1)中定义的记录类型作为参数procedure PrintStuRecord asbegindbms_output.put_line( 学 号 :| stu_record.s_no); dbms_output.put_line( 姓 名 :| stu_record.s_name);

4、dbms_output.put_line( 性 别 :| stu_record.s_sex); dbms_output.put_line( 籍 贯 :| stu_record.s_address); dbms_output.put_line(学习成绩:| stu_record.s_studyscore); dbms_output.put_line(活动成绩:| stu_record.s_activescore); end PrintStuRecord;stu_record stu_recordstu_record_type;BEGINEND 部分完成：stu_record变量的各个元素赋值如下

5、： 姓名：李新beginstu_record.s_no:=2001001; stu_record.s_name:= 李 新 ; stu_record.s_sex:=m; stu_record.s_address:=黑龙江省哈尔滨市; stu_record.s_studyscore:=Excellent; stu_record.s_activescore:=Good; PrintStuRecord;end;/对该变量的调用打印过程，输出到屏幕bookinfoDML bookinfo表发生了任何bookinfo 据统计表中如果没有则建立bookinfo 表，选择建立在scott用户下，表结构为(b

6、ooknovarchar2(36) Primarykey,booknamevarchar2(40) not null, authornamevarchar2(10) not null, publishtimedate,bookpricefloat)create table bookinfo(bookno varchar2(36) Primary key,bookname varchar2(40) not null, authorname varchar2(10) not null, publishtime date,bookprice float);create table major_sta

7、ts (bookpage int , authornumber int);bookinfo 表中插入、bookinfo(2) major_stats表中create or replace trigger UpdateMajorStats after insert or delete or update on bookinfo begindelete from major_stats;insert into major_stats(bookpage,authornumber)Select count(bookno),count(distinct authorname)from bookinfo;

8、 end;/bookinfomajor_stats表中数据的变化插入insert into bookinfo (bookno,bookname,authorname,publishtime,bookprice) values(001,oracle,yt,22-oct-2000,30);insert into bookinfo (bookno,bookname,authorname,publishtime,bookprice) values(002,math,zx,26-may-1994,23);insert into bookinfo (bookno,bookname,authorname,publishtime,bookprice) values(003,english,ly,22-oct-1995,40);insert into bookinfo (bookno,bookname,authorname,publishtime,bookprice) values(004,c+,lt,11-oct-1998,30);insert into bookinfo (bookno,bookname,authorname,publishtime,bookprice) values(005,