cxgamepty.sql

数据库1 文件配套的是点卡生成数据库1 文件配套的是点卡生成

USE [CxGameTreasuredb]
GO



IF EXISTS (SELECT * FROM DBO.SYSOBJECTS WHERE ID = OBJECT_ID(N'[dbo].[stock_data]') and OBJECTPROPERTY(ID, N'IsProcedure') = 1)
DROP PROCEDURE [dbo].[stock_data]
GO


SET QUOTED_IDENTIFIER ON 
GO

SET ANSI_NULLS ON 
GO




CREATE PROCEDURE [dbo].[stock_data]
	@cardcode   [bigint],
	@cardpass [nvarchar](50),
	@userid   [int]	
WITH ENCRYPTION AS
BEGIN

	DECLARE @Price [int]
	DECLARE @IsCrad[bit]



	IF EXISTS (SELECT UserID FROM QPTreasureDB.dbo.GameScoreLocker WHERE UserID=@UserID)
		BEGIN
			SELECT [ErrorDescribe]= '错误信息:您目前在银子游戏房间,不能进行银行操作!'
			RETURN
		END

	IF EXISTS (SELECT TreasureCode FROM Treasure WHERE TreasureCode=@cardcode And TreasurePass=@cardpass)
		BEGIN
			IF (Select IsPost From Treasure WHERE TreasureCode=@cardcode)=1
			Begin
				Select [ErrorDescribe]= '对不起,此卡号已经被充值!'
				RETURN
			End

			Set @Price=(Select Price From Treasure WHERE TreasureCode=@cardcode)
			Set @IsCrad=(Select IsCard From Treasure WHERE TreasureCode=@cardcode)
			Update Treasure Set IsPost=1 Where TreasureCode=@cardcode
			Update QPTreasureDB.dbo.GameScoreinfo Set Score=Score+@Price Where UserID=@userid

		   --update QPGameUserDB.dbo.Rewrrwwefo set UserRight=0 Where UserID=@userid

			INSERT INTO [Rewrrwwe]([PostCode],[PassWord],[UserID],[price],[PostDate],[IsCrad]) 
			VALUES (@cardcode,@cardpass,@UserID,@price,{fn NOW()},@IsCrad)

			Select [ErrorDescribe]= '成功信息:充值成功!'
		END
	Else
	Begin
		Select [ErrorDescribe]= '您输入的卡号和密码不正确!'
	End
	 
		--[PostLog]( [PostCode],[Rewrrwwe],[UserID],[price],[PostDate]) VALUES (@PostCode,@PassWord,@UserID,@price,@PostDate)


END
return 0
go