UPDATE_COUPON_EVENT Prosedürü ;


CREATE procedure [dbo].[UPDATE_COUPON_EVENT] 

@strAccountID char(21),

@strCharId char(21),

@null char(21),

@Type smallint,

@Control int

AS

IF @Type = 1

BEGIN

	UPDATE TB_USER SET CashPoint = CashPoint + @Control where strAccountID = @strAccountID

END

ELSE

BEGIN

	EXEC GIVE_Premium 30,@Control,@strAccountID

END

GO



GIVE_Premium Prosedürü ;



CREATE PROCEDURE [dbo].[GIVE_Premium]

@day int OUTPUT,

@control int,

@id varchar(21)



AS



if @control in (1,2,3)



if @control = 1

begin

exec ADD_PREM_USER @id,@control,@day

END



if @control = 2

begin

exec ADD_PREM_USER @id,@control,@day

END



if @control = 3

begin

exec ADD_PREM_USER @id,@control,@day

END







GO



ADD_PREM_USER Prosedürü ;



CREATE PROCEDURE [dbo].[ADD_PREM_USER]

@AccountID varchar(27),   [MENTION=617]nty[/MENTION]pe smallint,

@nDays smallint

AS

declare @ID varchar(27)

SELECT @ID = count(strAccountID)  FROM PREMIUM_SERVICE where strAccountID = @AccountID

IF @ID = 0

BEGIN

INSERT INTO PREMIUM_SERVICE VALUES (@AccountID   [MENTION=617]nty[/MENTION]pe,@nDays,GETDATE());

RETURN

END

BEGIN

DELETE FROM PREMIUM_SERVICE where strAccountID = @AccountID

INSERT INTO PREMIUM_SERVICE VALUES (@AccountID   [MENTION=617]nty[/MENTION]pe,@nDays,GETDATE());

RETURN

END







GO



Evtlere geçelim



Cash evtleri ;



100 kc.   E LOG_COUPON_ITEM 1 100

350 kc.   E LOG_COUPON_ITEM 1 350

700 kc.   E LOG_COUPON_ITEM 1 700

1000 kc.  E LOG_COUPON_ITEM 1 1000



Premium evtleri;



Gold Premium    E LOG_COUPON_ITEM 2 3

Silver Premium  E LOG_COUPON_ITEM 2 2

Bronze Premium  E LOG_COUPON_ITEM 2 1



Evt örneği;



### Gold Premium ###

EVENT 99890

E RUN_EVENT 313145

E RUN_EVENT 313146

END



EVENT 313145

A HOWMUCH_ITEM 700052000 0 0

E SAY -1 -1 98893 -1 -1 -1 -1 -1 -1 -1 -1 -1

E RETURN

END



EVENT 313146

A HOWMUCH_ITEM 700052000 0 1

E ROB_ITEM 700052000 1

E LOG_COUPON_ITEM 2 3 

E GIVE_ITEM 800013000 1