影碟出租管理系统建库脚本.sql

create database CDRental

--drop database cdrental

go

use CDRental

 

go

create table CDAdmin

(

   adminId int  primary key,--管理员编号,设置为从逐1 递增

/*

打开企业管理器，定位到CDAdmin表->右键->设计表->定位到adminid列->标识-->是-->标识种子（初始值）-->标识递增量-->OK

*/

   adminName varchar(10),      --管理员名称

   adminPwd varchar(25),       --密码

   adminPower char(2) default(1),         --权限

   adminTime datetime default(getdate()),         --创建时间

)

go

insert into cdadmin(adminname,adminpwd,adminpower)

values('老板',123,1)

go

insert into cdadmin(adminname,adminpwd,adminpower)

values('老板',123,1)

go

select * from cdadmin

 

go

create table CDInfor

(

  CDId char(8) primary key ,

  CDName varchar(20) not null,

  CDCountry varchar(30),  --影碟出品国家

  CDType varchar(16),     --影碟类型，喜剧动作 嫌疑 恐怖 连续剧

  Flag char(1) default(1),           --出租状态，可借，已借出

);

--drop table cdinfor

go

create table CustomerInfor

(

  CustomerId char(12) primary key,  --会员账号

  CustomerPwd varchar(30) not null, --会员密码

  CustomerName varchar(20),

  CustomerAdd varchar(50),        --会员住址

  CustomerPhone char(11),

);

go

--drop table customerinfor

create table RentInfor

(

  CustomerId char(12),

  CDId char(8),

  LendTime datetime default(getdate()),--借出时间，默认为系统的日期时间函数getdate()的值

  BorrowTime datetime,            --归还时间

  Rental money,                   --租金

  ActualBorrowTime datetime,      --实际归还时间

  ActualRental money,             --实际租金

  Flag char(1) default(0),                   --归还状态，已归还，0 未归还

  primary key(CustomerId, CDId),

  foreign key(CustomerId) references CustomerInfor(CustomerId),

  foreign key(CDId) references CDInfor(CDId),

);

--drop table rentinfor

go

insert into RentInfor(CustomerId,CDId,BorrowTime,Rental,ActualBorrowTime,ActualRental,Flag)

values ('201004101234','12345678','2010/05/10',10,null,null,0)

go

insert into RentInfor(CustomerId,CDId,BorrowTime,Rental,ActualBorrowTime,ActualRental)

values ('201004101234','12345681','2010/04/20',6,null,null)

go

insert into RentInfor(CustomerId,CDId,BorrowTime,Rental,ActualBorrowTime,ActualRental,Flag)

values ('201004111234','12345679','2010/04/23',5,null,null,0)

go

insert into RentInfor(CustomerId,CDId,BorrowTime,Rental,ActualBorrowTime,ActualRental,Flag)

values ('201004111233','12345680','03/17/2009',9,null,null,0)

go

insert into RentInfor(CustomerId,CDId,BorrowTime,Rental,ActualBorrowTime,ActualRental,Flag)

values ('201004121234','12345682','03/17/2009 18:09:37',11,null,null,0)

go

select * from rentinfor

 

 /*

drop database cdrental

insert into RentInfor(ActualBorrowTime)

        values(getdate()) where cdid = '1234678' 自动获取系统日期 

insert into RentInfor(ActualBorrowTime)

        values(getdate())select * from rentinfor where CDId ='12345678'

update RentInfor set ActualBorrowTime =( getdate()) where CDId ='12345678'

 */

/***************************************************************************************************

 

 题号A07

 影碟出租管理

 

总体需求编写一个影碟出租管理程序

 

影碟信息的组成部分为：碟片名称、国家、类型、借阅标记等

 

出租信息的组成部分为：会员名、碟片名称、借阅日期、归还日期、租金等

 

功能需求

1) 新片上架：添加碟片信息

2) 碟片查询：按片名查询某片是否可借阅，结果有三种（可借阅、已借出、无此片）。

3) 碟片借阅：输入会员名、碟片名称、借阅日期，修改碟片的租借标记（每个会员一次可借阅多片）

4）碟片归还：输入会员名、碟片名称、归还日期，修改碟片的租借标记，

计算每片租金（每三天的租金为元，不满三天的按三天计算）。因为每个会员一次可借阅多片，

所以也可能一次归还多片。在该操作结束前，应输出该会员此次归还所需支付的总租金。

5）用子函数实现各个子功能

 

用户界面输入:

程序正常运行后，屏幕上显示一个文字菜单（根据序号选定相应的操作项目），

当用户选定操作项目所对应的序号时，根据应用程序的提示信息，从键盘上输入相应的数据。

 

输出:

 1) 应用程序正常运行后，要在屏幕上显示一个文字菜单

 2) 要求用户输入数据时，要给出清晰、明确的提示信息，包括输入的数据内容、格式及结束方式等

    提示与参考

 1)为各项操作功能设计一个菜单，应用程序运行后，先显示这个菜单，然后用户通过菜单项选择希望进行的操作项目。

 2) 影碟信息可定义为一个结构体；关键在于考虑出租信息的表示，这将决定实现借阅和归还操作的算法。采用文件保存数据。

 

********************************************************************************************************/

 

go

insert into cdinfor(cdid,cdname,cdcountry,cdtype)

values ('12345678','城市猎人','中国香港','喜剧')

go

insert into cdinfor

values ('12345679','猛龙过江','中国香港','动作',1)

go

insert into cdinfor

values ('12345680','咒怨','日本','恐怖',1)

go

insert into cdinfor

values ('12345681','泰坦尼克号','美国','爱情',1)

go

insert into cdinfor

values ('12345682','贫民窟的百万富翁','印度','喜剧',1)

go

select * from cdinfor

go

insert into CustomerInfor

values ('201004101234','123','张三','中山街一号','15280617430')

go

insert into CustomerInfor

values ('201004101233','1234','李四','南京路号','13156811821')

go

insert into CustomerInfor

values ('201004111234','12345','王五','南后街号','13345678912')

go

insert into CustomerInfor

values ('201004111233','123456','赵六','中心街号','18856974512')

go　　　

insert into CustomerInfor

values ('201004121234','1234567','范跑跑','大堂路号','18769853786')

go

select * from CustomerInfor order by customerpwd

go