Ct_ISBN Number(10);
Ct_MaxReader Number(10); Ct_Store Number(10); Ct_HaveRead Ct_BookID
Number(10); Number(10);
Error_Numer Number(10); no_result BEGIN
Error_Numer:= 0; out_str:='';
SELECT count(*) into Ct_Reader FROM XS WHERE 借书证号=in_ReaderID; IF Ct_Reader < 1 THEN BEGIN
out_str:= '该读者不存在'; Error_Numer:= 1; END; END IF;
SELECT count(*) into Ct_ISBN FROM BOOK WHERE ISBN=in_ISBN; IF Ct_ISBN < 1 THEN BEGIN
out_str:= '该图书不存在'; Error_Numer:= 1; END; END IF;
SELECT 借书量 into Ct_MaxReader FROM XS WHERE 借书证号=in_ReaderID; IF Ct_MaxReader>5 THEN BEGIN
out_str:= '读者借书量不能大于5'; Error_Numer:= 1; END; END IF;
Exception;
SELECT 库存量 into Ct_Store FROM BOOK WHERE ISBN=in_ISBN; IF Ct_Store =0 THEN BEGIN
out_str:= '图书库存量为0'; Error_Numer:= 1; END; END IF;
SELECT count(*) into Ct_HaveRead FROM JY WHERE 借书证号=in_ReaderID and ISBN = in_ISBN; IF Ct_HaveRead > 0 THen BEGIN
out_str:= '读者已经借过该书'; Error_Numer:= 1; END; END IF;
SELECT count(*) into Ct_BookID FROM JY WHERE 索书号=in_BookID; IF Ct_BookID > 0 THEN BEGIN
out_str:= '索书号已存在'; Error_Numer:= 1; END; END IF;
IF Error_Numer = 0 THEN
INSERT INTO JY VALUES(in_ReaderID, in_ISBN, in_BookID, sysdate); UPDATE XS SET 借书量=借书量+1 WHERE 借书证号=in_ReaderID ; UPDATE BOOK SET 库存量=库存量-1 WHERE ISBN=in_ISBN; out_str:= '借书成功'; IF SQL%NOTFOUND THEN
RAISE no_result; END IF; COMMIT;
dbms_output.put_line(out_str); ELSE
dbms_output.put_line(out_str); END IF; EXCEPTION
WHEN no_result THEN
DBMS_OUTPUT.PUT_LINE('执行过程中遇到错误!'); DBMS_OUTPUT.PUT_LINE(out_str); ROLLBACK; WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM); END; ? 功能测试
创建完存储过程Book_Borrow后可以使用PL/SQL语句验证图书借阅是否能够实现：
SELECT 借书证号, 借书量 FROM XS WHERE 借书证号= ''; /*查询读者的原借书量*/
SELECT ISBN, 库存量 FROM BOOK WHERE ISBN='7-115-10162-0' ; /*查询图书的原库存量*/
DECLARE out_str char(30); begin
Book_Borrow('', '7-115-10162-0', '',out_str); end;
/*执行存储过程，实现图书借阅*/ SELECT 借书证号, 借书量 FROM XS WHERE 借书证号= ''; /*查询号读者的现有借书量*/
SELECT ISBN, 库存量 FROM BOOK WHERE ISBN='7-115-10162-0' ; /*查询图书的现有库存量*/
数据库系统的安全性管理
实验四 实验目的：掌握账户的建立，数据库用户权限的分配与回收
实验要求：使用Oracle 11g实现账户的建立，数据库用户权限的分配与回收 实验条件：计算机，Oracle 11g 实验内容：
1、为阿里巴巴酒店数据库创建以下用户：
用户名：张敏，王林，李新，王立，王铭，张天 密码：自行设定
2、作为DBA的你，现在要负责给不同的数据库用户授予不同的权限，各用户可以执行的操作如下：
（1） 张敏和王林有权查询酒店客户的个人信息。 （2） 李新负责更新酒店客户的个人信息。
（3） 王立有权查询各种类型的客房号及所属的类型和定价。 （4） 王铭负责更新各类型客房的定价。
（5） 张天不仅可以查询航空公司的名称和电话信息，他还有权查询机票信
息。
（6） 李新有权更新雇员的信息。 试用GRANT语句实现上述要求。
3、由于工作调动，需要收回张天和李新的权限，试用REVOKE语句实现。