use master
go
if exists(select * from sysDatabases where name = 'BankDB')
drop database BankDB
go
create database BankDB
go
use BankDB
go
--建用户信息表
if exists(select * from sysObjects where name = 'Xxl_UserInfo')
drop table Xxl_UserInfo
go
create table Xxl_UserInfo
(
Xxl_User_Id int not null primary key identity ,
Xxl_User_Name ) not null ,
Xxl_User_Sex bit not null ,
Xxl_User_IDcard ) not null unique ,
Xxl_User_Moblie ) not null check(Xxl_User_Moblie like '1[3579][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]'),
Xxl_User_Address ) not null
)
go
--建用户卡信息表
if exists(select * from sysObjects where name = 'Xxl_CardInfo')
drop table Xxl_CardInfo
go
create table Xxl_CardInfo
(
Xxl_Card_No ) not null primary key check(Xxl_Card_No like '66668888[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]') ,
Xxl_Card_pwd ) ') ,
From_Xxl_User_Id int not null references Xxl_UserInfo(Xxl_User_Id),
Xxl_Card_Date DateTime not null default(getdate()) ,
Xxl_Card_Balance ,) ) ,
Xxl_Card_State ,,)),
Xxl_Card_Text ) not null
)
go
--建交易信息表
if exists(select * from sysObjects where name = 'Xxl_TransInfo')
drop table Xxl_TransInfo
go
create table Xxl_TransInfo
(
Xxl_Trans_FlowNum int not null identity primary key ,
From_Xxl_Card_No ) not null references Xxl_CardInfo(Xxl_Card_No) ,
Xxl_Trans_Type ,)) ,
Xxl_Trans_Quota ,) ) ,
Xxl_Trans_Date DateTime not null default(getdate()) ,
Xxl_Trans_ed_Balance ,) ) ,
Xxl_Trans_Text ) not null
)
go
------添加用户信息
,','湖北武汉')
,','湖北武汉')
,','湖北武汉')
----添加用户卡信息
,,,'使用')
,,,'使用')
,,,'使用')
,,,'使用')
----添加交易信息
,,,'存入300元')
,,,'存入300元')
,,,'存入6000元')
,,,'转账3000元给6666888812454852')
,,,'6666888865896548转入的3000元')
,,,'存入3300元')
,,,'存入3000元')
,,,'取出2500元')
------备份交易信息表
select * into Xxl_TransInfo_BAK from Xxl_TransInfo
--------查询各表数据
--select * from Xxl_UserInfo
--select * from Xxl_CardInfo
--select * from Xxl_TransInfo
--select * from Xxl_TransInfo_BAK
----------------------------------------创建函数----------------------------------------
--加逗号的函数
if exists(select * from sysObjects where name='function_JiaDouhao')
drop function function_JiaDouhao
go
,))
) as
begin
))
))
)
begin
)+@b
)
end
return @a+@b
end
go
------------------------------------------结束------------------------------------------
----------------------------------------创建视图----------------------------------------
--用户信息视图
if exists(select * from sysObjects where name ='vw_UserInfo')
drop view vw_UserInfo
go
create view vw_UserInfo
as
select
Xxl_User_Id 编号,
Xxl_User_Name 姓名,
case Xxl_User_Sex
then '女'
then '男'
end 性别,
Xxl_User_IDcard 身份证,
Xxl_User_Moblie 联系电话,
Xxl_User_Address 籍贯
from Xxl_UserInfo
go
--使用视图
--select * from vw_UserInfo
--卡信息视图
if exists(select * from sysObjects where name='vw_CardInfo')
drop view vw_CardInfo
go
create view vw_CardInfo
as
select
Xxl_Card_No 卡号,
Xxl_User_Name 姓名,
Xxl_Card_Balance 余额,
Xxl_Card_Date 开卡日期,
case Xxl_Card_State
then '正常'
then '冻结'
then '注销'
end 状态,
dbo.function_JiaDouhao(Xxl_Card_Balance) 货币表示
from Xxl_UserInfo UserInfo inner join Xxl_CardInfo CardInfo on UserInfo.Xxl_User_Id = CardInfo.From_Xxl_User_Id
go
--使用视图
--select * from vw_CardInfo
--交易记录视图
if exists(select * from sysObjects where name='vw_TransInfo')
drop view vw_TransInfo
go
create view vw_TransInfo
as
select ----卡号，交易日期，交易类型，交易金额，余额，描述
Xxl_Card_No 卡号,
Xxl_Trans_Date 交易日期,
case Xxl_Trans_Type
then '存入'
then '支取'
end 交易类型,
case Xxl_Trans_Type
),Xxl_Trans_Quota)
),Xxl_Trans_Quota)
end 交易金额,
Xxl_Trans_ed_Balance 余额,
Xxl_Trans_Text 描述
from Xxl_CardInfo CardInfo inner join Xxl_TransInfo TransInfo on CardInfo.Xxl_Card_No = TransInfo.From_Xxl_Card_No
go
--使用视图
--select * from vw_TransInfo
--------------------------------------------结束--------------------------------------------
----------------------------------------创建存储过程----------------------------------------
--1、 查询余额
if exists(select * from sysObjects where name='p_SelectBalance')
drop proc p_SelectBalance
go
create proc p_SelectBalance
)
as
select 货币表示 as 余额 from vw_CardInfo where 卡号 = @CardNo
go
--exec p_SelectBalance '6666888845125214'
--2、 查询某两日期之间交易记录
if exists(select * from sysObjects where name='p_SelectStart_StopDate')
drop proc p_SelectStart_StopDate
go
create proc p_SelectStart_StopDate
),
@StartDate datetime,
@StopDate datetime
as
,@StopDate)
go
--exec p_SelectStart_StopDate '6666888845125214','1990-1-1','2018-9-9'
--3、 修改密码功能
if exists(select * from sysObjects where name='p_Update_Pwd')
drop proc p_Update_Pwd
go
create proc p_Update_Pwd
),
),
)
as
update Xxl_CardInfo set Xxl_Card_pwd=@CardPwdStop where Xxl_Card_No = @CardNo and Xxl_Card_pwd = @CardPwdStart
go
--exec p_Update_Pwd '6666888845125214','666888','548888'
--4、 存款功能（备份）
if exists(select * from sysObjects where name='p_SeveMoney')
drop proc p_SeveMoney
go
create proc p_SeveMoney
),
,),
) output
as
--判断存款金额
begin
set @errMeg = '输入金额有误！'
end
begin tran
,)
select @startBalance=Xxl_Card_Balance from Xxl_CardInfo where Xxl_Card_No = @CardNo
--添加存款记录
,), @Quota) + '元'))
select @err = @@ERROR + @err
--更新余额
update Xxl_CardInfo set Xxl_Card_Balance = (@startBalance + @Quota) where Xxl_Card_No = @CardNo
select @err = @@ERROR + @err
begin
set @errMeg = '操作成功'
commit tran
end
begin
set @errMeg = '未知错误！'
rollback tran
end
go
--5、 取款功能（备份）
if exists(select * from sysObjects where name='p_GetMoney')
drop proc p_GetMoney
go
create proc p_GetMoney
),
,),
) output
as
--判断取款金额
begin
set @errMeg = '输入金额有误！'
end
--查询原有余额
,)
select @startBalance=Xxl_Card_Balance from Xxl_CardInfo where Xxl_Card_No = @CardNo
--判断余额是否足够
if @startBalance > @Quota
begin
set @errMeg = '余额不足！'
end
begin tran
--添加取款记录
,), @Quota) + '元'))
select @err = @@ERROR + @err
--更新余额
update Xxl_CardInfo set Xxl_Card_Balance = (@startBalance - @Quota) where Xxl_Card_No = @CardNo
select @err = @@ERROR + @err
begin
set @errMeg = '操作成功'
commit tran
end
else
begin
set @errMeg = '未知错误！'
rollback tran
end
go
--6、 转帐功能（备份）
if exists(select * from sysObjects where name='p_TeansferMoney')
drop proc p_TeansferMoney
go
create proc p_TeansferMoney
),
),
,),
) output
as
--判断目标账户是否为本身
if @FromCardNo != @ToCardNo
begin
set @errMeg = '目标账户不可以为自己！'
end
--判断目标账户是否存在
if not exists(select * from Xxl_CardInfo where Xxl_Card_No = @ToCardNo)
begin
set @errMeg = '目标账户不存在！'
end
--判断转账金额是否正确
begin
set @errMeg = '输入金额有误！'
end
--查询From原有余额
,)
select @FromStartBalance=Xxl_Card_Balance from Xxl_CardInfo where Xxl_Card_No = @FromCardNo
--判断From余额是否充足
if @FromStartBalance < @Quota
begin
set @errMeg = '余额不足！'
end
begin tran
--查询To原有余额
,)
select @ToStartBalance=Xxl_Card_Balance from Xxl_CardInfo where Xxl_Card_No = @ToCardNo
--更新余额
update Xxl_CardInfo set Xxl_Card_Balance = (@FromStartBalance - @Quota) where Xxl_Card_No = @FromCardNo
select @err = @@ERROR + @err
update Xxl_CardInfo set Xxl_Card_Balance = (@ToStartBalance + @Quota) where Xxl_Card_No = @ToCardNo
select @err = @@ERROR + @err
--添加交易记录
,), @Quota) + '元给'+@ToCardNo)
select @err = @@ERROR + @err
,), @Quota) + '元'))
select @err = @@ERROR + @err
begin
set @errMeg = '操作成功！'
commit tran
end
else
begin
set @errMeg = '未知错误！'
rollback tran
end
go
--exec p_TeansferMoney '6666888812454852','6666888845125214',300.00
--7、 随机产生卡号（卡号格式为：8228 6688 XXXX XXXX） 注：随机产生的卡号已经存在的不能用
if exists(select * from sysObjects where name='P_GenerateBankcard')
drop proc P_GenerateBankcard
go
create proc P_GenerateBankcard
) output
as
begin
), ,),)
if not exists(select * from Xxl_CardInfo where Xxl_Card_No = @Card)
break
end
go
--declare @Card char(16)
--exec P_GenerateBankcard @Card output
--select @Card as 卡号
--8、 开户功能
if exists(select * from sysobjects where name = 'P_AccountOpening')
drop proc P_AccountOpening
go
create proc P_AccountOpening
),
@Sex bit,
),
),
),
) output
as
if exists (select * from Xxl_UserInfo where Xxl_User_IDcard =@IdCard)
begin
set @errMeg = '存在此账户！'
end
begin tran
declare @UserID int
insert Xxl_UserInfo values(@Name,@Sex,@IdCard,@Moblie,@Address)
select @err = @@ERROR + @err
)
exec P_GenerateBankcard @Card output
select @UserID = Xxl_User_Id from Xxl_UserInfo where Xxl_User_IDcard = @IdCard
,,'使用')
select @err = @@ERROR + @err
)
begin
set @errMeg = '开户成功！'
commit tran
end
else
begin
set @errMeg = '未知错误！'
rollback tran
end
go
--9、 解冻功能
if exists(select * from sysobjects where name = 'P_ThawAccount')
drop proc P_ThawAccount
go
create proc P_ThawAccount
)
as
where Xxl_Card_No = @CardNo
go
--10、 根据用户身份证，查询该用户下所有的银行卡信息
if exists(select * from sysobjects where name = 'P_SelectCard')
drop proc P_SelectCard
go
create proc P_SelectCard
)
as
)
select @ID = Xxl_User_Id from Xxl_UserInfo where Xxl_User_IDcard = @IdCard
select * from Xxl_CardInfo where From_Xxl_User_Id = @ID
go
--------------------------------------------结束--------------------------------------------
