library.sql

来自「图书馆管理系统设计用delphi开发的系统」· SQL 代码 · 共 156 行

create database library
on primary(name=library_data,
filename='D:\结果\data\library.mdf')
create table customer(
姓名 char(8) primary key,
密码 Char(8) not null,
)   
--drop table customer
--drop table books
create table books(
书号 Char(10) primary key,
书名 Char(50) not null,
作者 Char(10) not null,
出版社 Char(50),
书价 int,
类别 Char(10) not null,
备注 Char(50)
)
create table borrow(
书号 Char(10)primary key,
学生证号 Char(8),
借出时间 Datetime,
)
--select * from books
--select  * from borrow
drop table borrow
create table student(
姓名 Char(8) not null,
学生证号 Char(8) primary key,
性别 Char(2),
系别 Char(10),
专业 Char(20),
已借数目 int 
)
select * from student
select * from borrow
select * from books
select * from customer
select * from borrow_view

insert into borrow values('a02','35102128','2007-02-21')
insert into borrow values('c10','35102129','2007-02-21')





insert into  student values('程勇','35102128','男','计算机','计算机科学与技术',1)
insert into  student values('佳佳','35102161','男','计算机','计算机科学与技术',0)
insert into  student values('刘小军','35102133','男','机电系','机电',0)
insert into  student values('小清','35102129','女','外语系','外语',1)
insert into  student values('晓妞','35102130','女','文史系','文史类',0)
insert into  student values('小明','35102131','男','土木系','土木工程',0)
insert into  student values('张三','35102132','男','经管系','经济管理',0)

insert into customer values('cy','123456')
insert into customer values('fg','123456')
insert into customer values('sa','')


//insert into books values('a02','DELPHI数据库设计','林华聪','冶金工业出版社',45.00,'计算机类','计算机专业专用')
insert into books values('a03','SQL Server实用简明教程','闪四清','清华大学出版社',35.00,'计算机类','计算机专业专用')
insert into books values('a04','多媒体技术教程','胡晓峰','人民邮电出版社',29.00,'计算机类','计算机专业专用')
insert into books values('b05','寒冷的科学','余嘉 译','中国电力出版社',10.90,'英语类','英语专业专用')
insert into books values('b06','外交学概论','鲁毅','世界知识出版社',25.00,'文史类','外交学专业专用')
insert into books values('b07','中国当代外交史','谢益显','中国青年出版社',29.00,'文史类','外交学专业专用')
insert into books values('c08','国际关系精要','[美] 卡伦','上海世纪出版集团',30.00,'文史类','外交学专业专用')
insert into books values('c09','Delphi 7.0程序设计','田原','清华大学出版社',28.00,'机电类','计算机专业专用')
//insert into books values('c10','外语听力','小明','清华大学出版社',28.00,'英语类','计算机专业专用')
insert into books values('c11','经济','王明','清华大学出版社',28.00,'经济类','经济管理专用')

create view borrow_view
as
select student.学生证号,书号,借出时间,已借数目
from student,borrow
where student.学生证号=borrow.学生证号
select * from borrow_view






create procedure 借书存储过程
@书号 Char(10),@学生证号 Char(8),@借阅时间 datetime
as
insert into borrow
values(@书号,@学生证号,@借阅时间)
update student
set 已借数目=已借数目+1
where 学生证号=@学生证号
delete from books
where 书号=@书号

exec 借书存储过程 a04,35102128,'2007-02-21'


create procedure 还书存储过程
@书号 Char(10),@书名 char(50),@书价 int,@作者 char(10),@类别 char(10),
@出版社 char(50),@备注 char(50),@学生证号 char(8)
as
delete from borrow
where 书号=@书号
update student
set 已借数目=已借数目-1
where 学生证号=@学生证号
insert into books
values(@书号,@书名,@书价,@作者,@类别,@出版社,@备注)


exec 还书存储过程 a03,SQLServer实用简明教程,35,闪四清,计算机类,清华大学出版社,计算机专业专用,35102128



create procedure 新书入库
@书名 char(50),@书号 char(10),@书价 int,@作者 char(10),@类别 char(10) ,@出版社 char(50),@备注 char(50)
as 
insert into books
values(@书名,@书号,@书价,@作者,@类别,@出版社,@备注)

exec 新书入库 大学英语,a111,50,小王,外语,东方,外语专用          



create procedure 删图书存储过程
@书号 Char(10),@书名 char(50)
as 
delete from books
where 书号=@书号 and 书名=@书名

exec 删图书存储过程 b05,寒冷的科学




create procedure  插入读者存储过程
@姓名 char(8),@学生证号 char(8),@性别 Char(2),@系别 char(10),@专业 Char(20),@已借数目 int
as
insert into student
values(@姓名,@学生证号,@性别,@系别,@专业,@已借数目)

exec 插入读者存储过程 菜鸟,35102136,男,外语系,外语专业,0



create procedure  删除读者存储过程
@姓名 char(10),@学生证号 char(10)
as 
delete from student
where 学生证号=@学生证号 and 姓名=@姓名
exec 删除读者存储过程 菜鸟,35102136