SQL Server 中存储过程的练习

时间:2023-03-09 09:37:32
SQL Server 中存储过程的练习

建库建表建约束
插入数据

--建库建表建约束和插入测试数据

use bankDB
go

--1.完成存款,取款业务
--存款

create proc usp_takeMoney
@takeType nvarchar(2),@Money money,@cardID char(19),@pass char(6)=null,@remark text =null
as
print '交易正在进行,请稍后......'
if((select COUNT(1) from cardInfo where cardID=@cardID)=0)
begin
raiserror('卡号不存在!',16,1)
end
else
--开始事务处理
begin
--存款
if(@takeType='存入')
begin
declare @errorSum int
set @errorSum=0
begin tran
insert into tradeInfo values(GETDATE(),'存入',@cardID,@Money,@remark)
set @errorSum+=@@ERROR
update cardInfo set balance+=@Money where cardID=@cardID
set @errorSum+=@@ERROR
if(@errorSum<>0)
begin
rollback tran
raiserror('交易失败,未知错误!',16,1)
end
else
begin
commit tran
print '交易成功!交易金额:'+convert(nvarchar,@Money)
end
end
--取款
else
begin
if(@pass=(select pass from cardInfo where cardID=@cardID))
begin
if((select balance from cardInfo where cardID=@cardID)>@Money)
begin
declare @errorSum2 int
set @errorSum2=0
begin tran
insert into tradeInfo values(GETDATE(),'支取',@cardID,@Money,@remark)
set @errorSum2+=@@ERROR
update cardInfo set balance-=@Money where cardID=@cardID
set @errorSum2+=@@ERROR
if(@errorSum2<>0)
begin
rollback tran
raiserror('交易失败!未知错误!',16,1)
end
else
begin
commit tran
print '交易成功!交易金额:'+convert(nvarchar,@Money)
end
end
else
begin
raiserror('交易失败!余额不足!',16,1)
end
end
else
begin
raiserror('密码不正确!请检查重输',16,1)
end
end
end
go

--检查调用存储过程

exec usp_takeMoney '取出',600,'1010 3576 1234 5678',888888
exec usp_takeMoney '存入',500,'1010 3576 1234 5678',default,'定期存入'
go

--****************************************************************************************************************************************************
--2.产生随机卡号

create proc usp_randCardID
@randCardID char(19) output
as
declare @r numeric(15,8),@tempR varchar(10)
select @r=rand(datepart(mm,getdate())*100000+datepart(ss,getdate())*1000+datepart(ms,getdate()))
set @tempR=convert(char(10),@r)
set @randCardID='1010 3576 '+SUBSTRING(@tempR,3,4)+' '+SUBSTRING(@tempR,7,4)
go

-调用随机卡号存储过程

declare @A varchar(19)
exec usp_randCardID @A output
print @A
go

--****************************************************************************************************************************************************
--3.完成开户业务

create proc usp_openAccount
@name char(8),@identityID char(18),@telPhone char(20),@Money money,@savingName varchar(20),@address varchar(50)=null
as
--判定是否存在输入的存款类型
declare @savingID int,@cardID char(19),@openDate datetime,@openMoney money
if exists(select COUNT(1) from Deposit where savingName=@savingName)
begin
--将存款类型标号赋值给变量
select @savingID=(select savingID from Deposit where savingName=@savingName)
--调用随机卡号存储过程,获取随机卡号
exec usp_randCardID @cardID output
declare @errorSum int,@identity int
set @errorSum=0
--启动事务
begin tran
--向客户表添加数据
insert into userInfo values(@name,@identityID,@telPhone,@address)
set @identity=@@IDENTITY
set @errorSum+=@@ERROR
--并获取当前日期,传出开户金额参数
set @openDate=GETDATE()
set @openMoney=@Money
--向银行卡信息表添加数据
insert into cardInfo values(@cardID,'RMB',@savingID,@openDate,@openMoney,@Money,'',0,@identity)
set @errorSum+=@@ERROR
if(@errorSum<>0)
begin
rollback tran
raiserror('添加客户失败!未知错误!',16,1)
end
else
begin
commit tran
print '尊敬的客户,开户成功!系统为您产生的随机卡号为:'+@cardID+'卡户日期:'+convert(varchar,@openDate)+'开户金额:'+convert(nvarchar,@openMoney)
end
end
else
begin
raiserror('存款类型不存在!',16,1)
end
go

--调用存储过程

exec usp_openAccount '王老五','','2222-63598978',1000,'活期','河南新乡'
exec usp_openAccount '赵小二','','0760-44446666',1,'定期一年'
go

--****************************************************************************************************************************************************
--4.分页显示查询交易数据

create proc usp_pagingDisplay
@page int,@count int
as
select tradeDate, tradeType, cardID, tradeMoney, remark from (
select *,ROW_NUMBER() over(order by tradeDate) as myid
from tradeInfo
)as new
where myid between (@page-1)*@count+1 and @page*@count
go

--调用存储过程

exec usp_pagingDisplay 4,2
go

--****************************************************************************************************************************************************
--5.打印客户对账单

create proc usp_CheckSheet
@cardID char(19),@beginTime datetime=null,@endTime datetime=null
as
declare @minDate datetime,@maxDate datetime
select @minDate=MIN(tradedate) from tradeInfo where cardID=@cardID
select @maxDate=MAX(tradedate) from tradeInfo where cardID=@cardID
select * from tradeInfo where cardID=@cardID
and tradeDate between(
case
when @beginTime IS NULL then @minDate
when @beginTime is not null then @beginTime
end
)and(
case
when @endTime IS NULL then @maxDate
when @endTime is not null then @endTime
end
)
go

--调用存储过程

exec usp_CheckSheet '1010 3576 1234 5678','2016-08-14 09:59:31.793','2016-08-16 10:00:13.913'
go

--****************************************************************************************************************************************************
--6.统计未发生交易的账户

create proc usp_getWithoutTrade
@beginTime datetime =null,@endTime datetime=null
as
--指定时间没发生交易的客户记录
select * from userInfo
where customerID in (
select customerID from cardInfo
where cardID not in(
select cardID from tradeInfo
where tradeDate between(
case
when @beginTime IS NULL then convert(datetime,datename(yy,getdate())+'.'+datename(mm,getdate())+'.'+'')
when @beginTime is not null then @beginTime
end
)and(
case
when @endTime IS NULL then GETDATE()
when @endTime is not null then @endTime
end
)
)
)
declare @peopNum int ,@moneySum money
select @peopNum=COUNT(1) from userInfo
where customerID in (
select customerID from cardInfo
where cardID not in(
select cardID from tradeInfo
where tradeDate between(
case
when @beginTime IS NULL then convert(datetime,datename(yy,getdate())+'.'+datename(mm,getdate())+'.'+'')
when @beginTime is not null then @beginTime
end
)and(
case
when @endTime IS NULL then GETDATE()
when @endTime is not null then @endTime
end
)
)
)
select @moneySum=SUM(balance) from cardInfo
where cardID not in(
select cardID from tradeInfo
where tradeDate between(
case
when @beginTime IS NULL then convert(datetime,datename(yy,getdate())+'.'+datename(mm,getdate())+'.'+'')
when @beginTime is not null then @beginTime
end
)and(
case
when @endTime IS NULL then GETDATE()
when @endTime is not null then @endTime
end
)
)
print '统计未发生交易的客户'
print '--------------------------------------------'
print '客户人数:'+convert(char,@peopNum)+' 客户总余额:'+convert(varchar,@moneySum)
go

--调用存储记录

exec usp_getWithoutTrade '2016-08-16 09:58:36.720','2016-08-16 09:59:40.940'
go

--****************************************************************************************************************************************************
--统计银行卡交易量和交易额

create proc usp_getTradeInfo
@address nvarchar(50),@beginTime datetime=null,@endTime datetime=null
as
declare @insertCount int,@insertSum money,@outCount int,@outSum money
--存入客户人数
select @insertCount=COUNT(1) from tradeInfo
where tradeType='存入'
and cardID in(
select cardID from cardInfo
where customerID in(
select customerID from userInfo
where address like '%'+@address+'%'
)
)and tradeDate between(
case
when @beginTime IS NULL then convert(datetime,datename(yy,getdate())+'.'+''+'.'+'')
when @beginTime is not null then @beginTime
end
)and(
case
when @endTime IS NULL then GETDATE()
when @endTime is not null then @endTime
end
)
--存入金额总量
select @insertSum=SUM(tradeMoney) from tradeInfo
where tradeType='存入'
and cardID in(
select cardID from cardInfo
where customerID in(
select customerID from userInfo
where address like '%'+@address+'%'
)
)and tradeDate between(
case
when @beginTime IS NULL then convert(datetime,datename(yy,getdate())+'.'+''+'.'+'')
when @beginTime is not null then @beginTime
end
)and(
case
when @endTime IS NULL then GETDATE()
when @endTime is not null then @endTime
end
)
--存入客户人数
select @outCount=count(1) from tradeInfo
where tradeType='支取'
and cardID in(
select cardID from cardInfo
where customerID in(
select customerID from userInfo
where address like '%'+@address+'%'
)
)and tradeDate between(
case
when @beginTime IS NULL then convert(datetime,datename(yy,getdate())+'.'+''+'.'+'')
when @beginTime is not null then @beginTime
end
)and(
case
when @endTime IS NULL then GETDATE()
when @endTime is not null then @endTime
end
)
--存入金额总量
select @outSum=SUM(tradeMoney) from tradeInfo
where tradeType='支取'
and cardID in(
select cardID from cardInfo
where customerID in(
select customerID from userInfo
where address like '%'+@address+'%'
)
)and tradeDate between(
case
when @beginTime IS NULL then convert(datetime,datename(yy,getdate())+'.'+''+'.'+'')
when @beginTime is not null then @beginTime
end
)and(
case
when @endTime IS NULL then GETDATE()
when @endTime is not null then @endTime
end
)
print '存入笔数:'+convert(varchar,@insertCount)+' '+'存入金额:'+convert(varchar,@insertSum)
print '支取笔数:'+convert(varchar,@outCount)+' '+'支取金额:'+convert(varchar,@outSum)
go

--调用存储过程

exec usp_getTradeInfo '北京'
go

--****************************************************************************************************************************************************
--利用事务实现较复杂的数据更新

create proc usp_tradefer
@outCardID char(19),@pass char(6),@insertCardId char(19),@tradeMoney money,@remark text=null
as
if(@pass<>(select pass from cardInfo where cardID=@outCardID))
begin
raiserror('密码错误!',16,1)
return
end
print '开始转账,请稍候......'
print '交易正在进行,请稍候......'
declare @errorSum int,@dateTime datetime
set @errorSum=0
set @dateTime=GETDATE()
begin tran
update cardInfo set balance-=@tradeMoney where cardID=@outCardID
set @errorSum+=@@ERROR
insert into tradeInfo values (@dateTime,'支取',@outCardID,@tradeMoney,@remark)
set @errorSum+=@@ERROR
update cardInfo set balance+=@tradeMoney where cardID=@insertCardId
set @errorSum+=@@ERROR
insert into tradeInfo values (@dateTime,'存入',@insertCardId,@tradeMoney,@remark)
set @errorSum+=@@ERROR
if(@errorSum<>0)
begin
rollback tran
raiserror('转账失败!未知错误',16,1)
end
else
begin
commit tran
declare @balance money
select @balance=balance from cardInfo where cardId=@outCardId
print '交易成功!交易金额:'+convert(varchar,@tradeMoney)
print '转出卡号:'+@outCardId+' '+'余额:'+convert(varchar,@balance)
print '转入卡号:'+@insertCardId
select * from tradeInfo where cardID=@outCardID and tradeDate=@dateTime
select * from tradeInfo where cardID=@insertCardId and tradeDate=@dateTime
end

--调用存储方法

exec usp_tradefer '1010 3576 1212 1004','','1010 3576 1212 1130',500
select * from cardInfo