CREATE PROCEDURE IPBonus_VWEB
As
Begin	-- Begin Proc

DECLARE 
	@IPBonusPoint int,	-- Bien IPBonusPoint duoc cong khi Online tai IP Bonus
	@IPBonus varchar(50)	-- Bien IP Bonus
	
SET @IPBonusPoint = 5	-- Gia tri PCPoints duoc cong khi Online tai IP Bonus

DECLARE IPList CURSOR FOR SELECT ip FROM IPBonus
OPEN IPList
FETCH NEXT FROM IPList INTO @IPBonus
WHILE @@FETCH_STATUS = 0
BEGIN
	UPDATE MEMB_INFO SET IPBonusPoint=IPBonusPoint+@IPBonusPoint FROM MEMB_INFO JOIN MEMB_STAT ON (MEMB_STAT.IP=@IPBonus OR (MEMB_INFO.ip=@IPBonus AND MEMB_STAT.IP='192.168.1.200') ) AND ConnectStat=1 AND MEMB_STAT.memb___id collate DATABASE_DEFAULT =MEMB_INFO.memb___id collate DATABASE_DEFAULT
	FETCH NEXT FROM IPList INTO @IPBonus
END
CLOSE IPList
DEALLOCATE IPList

END	-- End Proc
GO