[@ЕНЫ]

Биллинговая система РФ (Премиум + кеш шоп)+ фикс: Переписанная процедура на покупку вещи. Дюп кеш вещей больше не работает.
Сначала ставим базу из архива потом фикс.

USE [BILLING] 
GO 
 
/****** Object:  StoredProcedure [dbo].[RF_ChargeBalance] by TriRozhka   Script Date: 02/19/2010 15:25:25 ******/ 
SET ANSI_NULLS ON 
GO 
 
SET QUOTED_IDENTIFIER ON 
GO 
 
ALTER PROCEDURE [dbo].[RF_ChargeBalance] 
    @s_userid    varchar(12) 
,    @s_character varchar(50) 
,    @s_pscode     varchar(20) 
,    @s_quantity int 
,    @s_server     varchar (50) 
,    @s_scode     bigint 
,    @s_price     int 
,    @s_dcrate     int 
,    @p9 int output 
AS 
 
set nocount on 
 
DECLARE 
@totalAmount int,
@cashBalance int 
 
select @cashBalance=Cash from tbl_user where UserID=@s_userid 
set @totalAmount=@s_price*@s_quantity 
if @@error <> 0 or @s_quantity < 1 or @s_quantity >99 or @s_price < 1 
 begin 
  set @p9 = 0 
  return 
 end 
else 
 if @s_dcrate < 100 and (@totalAmount*((100-@s_dcrate)/100)) <= @cashBalance 
  begin 
   set @p9 = 1 
   set @cashBalance=@cashbalance-(@totalAmount*((100-@s_dcrate)/100)) 
   insert into tbl_cashlogrf (userid,character,pscode,quantity,server,scode,price,dcrate,status) 
   values (@s_userid,@s_character,@s_pscode,@s_quantity,@s_server,@s_scode,@s_price,@s_dcrate,@p9) 
   update tbl_user set Cash = @cashBalance where UserID = @s_userid 
   return 
  end 
 else 
  if (@cashbalance + @s_dcrate) >= @totalAmount 
   begin 
    set @p9 = 1 
    set @cashBalance=@cashbalance-@totalAmount+@s_dcrate 
    insert into tbl_cashlogrf (userid,character,pscode,quantity,server,scode,price,dcrate,status) 
    values (@s_userid,@s_character,@s_pscode,@s_quantity,@s_server,@s_scode,@s_price,@s_dcrate,@p9) 
    update tbl_user set Cash = @cashBalance where UserID = @s_userid 
    return 
   end 
  else 
   begin 
    set @p9 = 0 
    return 
   end 
 
GO

Так же реализована система скидок. значение скидки идёт под переменной @s_dcrate.
У меня всё что меньше 100 считается как скидка по % всё что больше 100 считается как скидка в кредитах.
Напоминаю что скидка по монетам не должна превышать 10% от стоимости покупки. В противном случае сервер не даст реализовать покупку.


После создания базы BILLING я удалил таблицу user и воссоздал заново добавив в столбец ID автоинкремент

Скачать!

//NetSoul