-- ¹èƲ±×¶ó¿îµå Ŭ·Î½ºº£Å¸ À¯Àú¸¦ À§ÇÑ Å×À̺í

CREATE TABLE TblBattleLoginUser
(
	strClientID	VARCHAR(20)	PRIMARY KEY
)


GO

-- ij¸¯ÅÍ ¼±ÅÃâ °¡±â Àü¿¡ °ú±Ý ¿©ºÎ¸¦ üũÇÑ´Ù.
-- ij¸¯ÅÍ ¼±ÅÃâ¿¡¼­ ´Ù½Ã ½ÇÇàÇÑ´Ù.
ALTER  PROC USPCheckBilling_Login @strClientID VARCHAR(20),@UID INT, @Check Int,@ClientIP VARCHAR(15),@ServerID TINYINT
AS
	SET NOCOUNT ON 

	--DECLARE @RegLogInTime 
	DECLARE @strBillingType CHAR(1) --D,T
	DECLARE @strBillingType2 CHAR(2)

	DECLARE @PlayTime INT --³²Àº½Ã°£(ºÐ),³²ÀºÀÏÀÚ
	DECLARE @CanUseTime INT
	DECLARE @FLAG INT

	SET @strBillingType = 'N'
	SET @PlayTime = 0
	SET @CanUseTime = 0
	SET @FLAG = -1 
	
	DECLARE @IPType CHAR(1) --D,T
	DECLARE @intCRMIndex1 INT
	DECLARE @intCRMIndex2 INT
	SET @intCRMIndex1 =0
	SET @intCRMIndex2 =0

	DECLARE @BillingDate CHAR(1)
	DECLARE @BillingTime CHAR(1)
	SET @BillingDate = 'D'
	SET @BillingTime = 'T'

	-- ÇǽùæÁß Á¤·®Á¦¿Í Á¤¾×Á¦¸¦ °°ÀÌ »ç¿ëÇÏ´Â °æ¿ì ÇØ´ç °ú±ÝÀÇ ÇǽùæÀ妽º¸¦ ¾ò¾î¿Í¾ßÇÑ´Ù.
	DECLARE @OutCRMIndex INT 
	DECLARE @tinyServerID INT
	SET @tinyServerID = -1

	DECLARE @FreeTime INT

	EXEC USPInsertPerson @strClientID,@UID

	-- ÇöÀç ·Î±×ÀÎ µÈ »ç¿ëÀÚ ÀÎÁö ¾Æ´ÑÁö üũÇÑ´Ù.
	SELECT @tinyServerID = tinyServerID FROM TblCurrentUser_Temp WHERE strClientid = @strClientID

	IF @tinyServerID > -1
	BEGIN
		SET @FLAG = 1 --Áߺ¹µÈ À¯ÀúÀÓ.
		SET @intCRMIndex1 = @tinyServerID
		SET @strBillingType2 = @strBillingType

		SELECT @FLAG as FLAG,@strBillingType2 as BillingType,@PlayTime as PlayTime,@intCRMIndex1 as ServerID
		RETURN
	END	 
	
	-- ÇöÀç ·Î±×ÀÎ µÈ »ç¿ëÀÚ ÀÎÁö ¾Æ´ÑÁö üũÇÑ´Ù.
	SELECT @tinyServerID = tinyServerID FROM TblCurrentUser WHERE strClientid = @strClientID

	IF @tinyServerID > -1
	BEGIN
		SET @FLAG = 1 --Áߺ¹µÈ À¯ÀúÀÓ.
		SET @intCRMIndex1 = @tinyServerID
		SET @strBillingType2 = @strBillingType

		SELECT @FLAG as FLAG,@strBillingType2 as BillingType,@PlayTime as PlayTime,@intCRMIndex1 as ServerID
		RETURN
	END

	-- ¹«·á°èÁ¤ ¿©ºÎ üũ -- ³ªÁß¿¡ ¼öÁ¤ÇؾßÇÔ.
	IF (@Check = 1) --¹«·á°èÁ¤
	BEGIN
		SET @FLAG = 0
		-- ÀÓ½ÃÅ×À̺í TblCurrentUser_Temp¿¡ ÀÔ·ÂÇÑ´Ù.
		INSERT INTO TblCurrentUser_Temp (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
		VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)
		
		SET @strBillingType2 = @strBillingType

		SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
				@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex
		RETURN
	END

	-- ¹èƲ±×¶ó¿îµå Ŭ·ÎÁî º£Å¸¿¡ µû¸¥ ÀÎÁõÃß°¡ (2004-04-19)
	-- @SERVERID°¡ 7¹øÀÎ °æ¿ì´Â ¹èƲ±×¶ó¿îµå¿¡ Á¢¼ÓÇÔÀ» °¡Á¤ÇÑ´Ù.
	IF (@ServerID = 7 )
	BEGIN
		IF EXISTS (SELECT * FROM TblBattleLoginUser WHERE strClientID = @strClientID)
		BEGIN
			
			SET @FLAG = 0
			-- ÀÓ½ÃÅ×À̺í TblCurrentUser_Temp¿¡ ÀÔ·ÂÇÑ´Ù.
			INSERT INTO TblCurrentUser_Temp (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
			VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)
			
			-- 'N' ŸÀÔÀ¸·Î ¸®ÅÏÇÑ´Ù.
			SET @strBillingType2 = 'B'

			SET @FreeTime = DATEDIFF(DAY,GETDATE(),'2030-01-01 00:00:00')
	
			SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
					@FreeTime as PlayTime,@intCRMIndex1 as CRMIndex
			RETURN
		END
	END	
	
	-- ¹«·á°èÁ¤ÀÎÁö ¾Æ´ÑÁö üũÇÑ´Ù
	SELECT @FreeTime = DATEDIFF(DAY,GETDATE(),RegLoginTime)
	FROM TBLPERSONINFO
	WHERE UID = @UID

	-- ½ÇÁ¦ ¹«·á °èÁ¤ÀÓÀ» ³ªÅ¸³¿.

	IF (@FreeTime >= 0)
	BEGIN
	
		SET @FLAG = 0
		-- ÀÓ½ÃÅ×À̺í TblCurrentUser_Temp¿¡ ÀÔ·ÂÇÑ´Ù.
		INSERT INTO TblCurrentUser_Temp (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
		VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)
		
		SET @strBillingType2 = @strBillingType

		SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
				@FreeTime as PlayTime,@intCRMIndex1 as CRMIndex
		RETURN
	END
	

	/*************************************************
	* @FLAG = 0,@strBillingType ='D',@PlayTime = ³²ÀºÀÏÀÚ 	--°³ÀÎÁ¤¾×Á¦ ¼º°ø
	* @FLAG = 0,@strBillingType ='T',@PlayTime = ³²Àº½Ã°£ 	--°³ÀÎÁ¤·®Á¦ ¼º°ø
	* @FLAG = 1,@strBillingType ='N',@PlayTime = 0 		--°ú±Ýµî·ÏÀÌ µÇ¾îÀÖÁö ¾ÊÀ½
	* @FLAG = 2,@strBillingType ='D',@PlayTime = 0 		--°³ÀÎÁ¤¾×Á¦ °ú±ÝÀÌ Á¾·áµÈ °æ¿ì
	* @FLAG = 3,@strBillingType ='T',@PlayTime = 0 		--°³ÀÎÁ¤·®Á¦ °ú±ÝÀÌ Á¾·áµÈ °æ¿ì
	**************************************************/
	EXEC @FLAG = USPCheckBilling_Person @strClientID,@strBillingType OUTPUT,@PlayTime OUTPUT

	-- °³Àΰú±ÝÀÌ ¼º°øÀûÀΰæ¿ì
	IF (@FLAG = 0)
	BEGIN
		-- Á¤¾×Á¦ °³ÀÎ À¯ÀúÀΰæ¿ì
		IF (@strBillingType =@BillingDate)
		BEGIN	
			-- ÀÓ½ÃÅ×À̺í TblCurrentUser_Temp¿¡ ÀÔ·ÂÇÑ´Ù.
			INSERT INTO TblCurrentUser_Temp (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
			VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)

			SET @strBillingType2 = @strBillingType

			SELECT @FLAG as FLAG,@strBillingType2 as BillingType,@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex
			RETURN
		END
		
		-- Á¤·®Á¦ °³ÀÎ À¯ÀúÀΰæ¿ì
		ELSE IF (@strBillingType =@BillingTime)
		BEGIN
			SET @FLAG = -1

			--AGAIN CHECK ClientIP
			/*********************************************
			* @FLAG = 0,@intCRMIndex1 = ¼ýÀÚ,@intCRMIndex2 = ¼ýÀÚ	-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ Á¤¾×°ú Á¤·® ¸ðµÎ¸¦ »ç¿ëÇÔ
			* @FLAG = 0,@intCRMIndex1 = ¼ýÀÚ,@intCRMIndex2 = 0	-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ Á¤¾× ¶Ç´Â Á¤·®Áß Çϳª ÀÓ
			* @FLAG = 1,@intCRMIndex1 = 0,@intCRMIndex2 = 0		-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ ¾Æ´Ô
			*********************************************/
			EXEC @FLAG = USPCheckBilling_ClientIP @ClientIP,@intCRMIndex1 OUTPUT,@intCRMIndex2 OUTPUT

			-- PC¹æÀÌ ¾Æ´Ñ°æ¿ì
			IF @FLAG <> 0
			BEGIN
				-- °³ÀÎÁ¤·®Á¦·Î ¸®ÅÏÇÑ´Ù.
				SET @FLAG = 0
				SET @intCRMIndex1 = 0

				-- ÀÓ½ÃÅ×À̺í TblCurrentUser_Temp¿¡ ÀÔ·ÂÇÑ´Ù.
				INSERT INTO TblCurrentUser_Temp (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
				VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)

				SET @strBillingType2 = @strBillingType

				SELECT @FLAG as FLAG,@strBillingType2 as BillingType,@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex
				
				RETURN
			END

			-- PC¹æ ¾ÆÀÌÇÇÀΰæ¿ì
			ELSE IF @FLAG = 0
			BEGIN
			
				-- ÇØ´ç ¾ÆÀÌÇÇÀÇ °ú±Ý ¹æ½Ä °¡Á®¿À±â
				IF (@intCRMIndex1 <> 0 AND  @intCRMIndex2 = 0) -- ÇϳªÀÇ °ú±Ý ¹æ½Ä¸¸ µû¸¥´Ù.
				BEGIN
					SELECT @IPType = strBillingType 
					FROM TblPCRoomBillingInfo
					WHERE intCRMIndex = @intCRMIndex1
				END
				ELSE IF (@intCRMIndex1 <> 0 AND  @intCRMIndex2 <> 0) -- µÎ°³ÀÇ °ú±Ý ¹æ½ÄÀ» µû¸¥´Ù.
				BEGIN
					SET @IPType = 'C'
				END
						
				-- PC¹æ °ú±ÝÁ¾·ù¸¦ üũÇÑ´Ù.
				-- T:Á¤·®Á¦,D:Á¤¾×Á¦
				EXEC @FLAG = USPCheckBilling_GameRoom @intCRMIndex1,@intCRMIndex2,@IPType,@OutCRMIndex OUTPUT,@strBillingType OUTPUT,@canUseTime OUTPUT

				IF @FLAG <> 0 --ERROR
				BEGIN
					-- PC¹æ °ú±ÝÀÌ Á¾·áµÈ °æ¿ìÀ̹ǷΠ´Ù½Ã °³ÀÎÁ¤·®Á¦·Î °ú±ÝÀ» Àû¿ë½ÃŲ´Ù.

					SET @intCRMIndex1 = 0
					SET @FLAG = 0
					SET @strBillingType = @BillingTime

					-- ÀÓ½ÃÅ×À̺í TblCurrentUser_Temp¿¡ ÀÔ·ÂÇÑ´Ù.
					INSERT INTO TblCurrentUser_Temp (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
					VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)

					SET @strBillingType2 = @strBillingType

					SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
						@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex
					
					RETURN		
				END
				ELSE
				BEGIN
					IF @strBillingType = 'D' -- Á¤¾×Á¦
					BEGIN
						-- ¾ÆÀÌÇÇ Çϳª¸¦ »ç¿ëÇؼ­ Ä«¿îÆ®¸¦ 1 ´õÇϱâ ÇÑ´Ù.
						EXEC USPCheckBilling_UpIPCount @OutCRMIndex

						-- ÀÓ½ÃÅ×À̺í TblCurrentUser_Temp¿¡ ÀÔ·ÂÇÑ´Ù.
						INSERT INTO TblCurrentUser_Temp (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
						VALUES (@strClientID,@UID,@OutCRMIndex,@ClientIP,@strBillingType,@ServerID)

						SET @strBillingType2 = @strBillingType

						SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
							@canUseTime as PlayTime,@OutCRMIndex as CRMIndex

						RETURN
					END
					ELSE IF  @strBillingType = 'T' -- Á¤¾×Á¦
					BEGIN

						-- ÀÓ½ÃÅ×À̺í TblCurrentUser_Temp¿¡ ÀÔ·ÂÇÑ´Ù.
						INSERT INTO TblCurrentUser_Temp (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
						VALUES (@strClientID,@UID,@OutCRMIndex,@ClientIP,@strBillingType,@ServerID)

						SET @strBillingType2 = @strBillingType

						SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
							@canUseTime as PlayTime,@OutCRMIndex as CRMIndex

						RETURN
					END
				END			
			END
				
		END
	END
	-- °³Àΰú±ÝÀÌ ½ÇÆÐµÈ °æ¿ì ´Ù½Ã °ú±Ýµî·ÏµÈ ÇǽùæÀÎÁö ¾Æ´ÑÁö üũÇÑ´Ù.
	ELSE
	BEGIN
		
		--AGAIN CHECK ClientIP
		/*********************************************
		* @FLAG = 0,@intCRMIndex1 = ¼ýÀÚ,@intCRMIndex2 = ¼ýÀÚ	-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ Á¤¾×°ú Á¤·® ¸ðµÎ¸¦ »ç¿ëÇÔ
		* @FLAG = 0,@intCRMIndex1 = ¼ýÀÚ,@intCRMIndex2 = 0	-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ Á¤¾× ¶Ç´Â Á¤·®Áß Çϳª ÀÓ
		* @FLAG = 1,@intCRMIndex1 = 0,@intCRMIndex2 = 0		-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ ¾Æ´Ô
		*********************************************/
		EXEC @FLAG = USPCheckBilling_ClientIP @ClientIP,@intCRMIndex1 OUTPUT,@intCRMIndex2 OUTPUT

		-- PC¹æÀÌ ¾Æ´Ñ°æ¿ì
		IF @FLAG <> 0
		BEGIN

			/*********Àӽà Àû¿ë ºÎºÐ ***********
			SET @FLAG = 0
			SET @intCRMIndex1 = 0
			SET @strBillingType = 'N'
			--Á¢¼ÓÅ×ÀÌºí¿¡ ÀÔ·ÂÇÑ´Ù.

			INSERT INTO TblCurrentUser_temp(strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
			VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)
			SET @strBillingType2 = @strBillingType

			SELECT @FLAG as FLAG,@strBillingType2 as BillingType,@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex
			RETURN
			********Àӽà Àû¿ë ºÎºÐ ³¡ ************/

			-- ¿¡·¯¸®ÅÏÇÑ´Ù
			
			SET @FLAG = 2
			
			SET @strBillingType2 = @strBillingType

			SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
				@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex

			RETURN
			
		END
		ELSE IF @FLAG = 0
		BEGIN

			-- ÇØ´ç ¾ÆÀÌÇÇÀÇ °ú±Ý ¹æ½Ä °¡Á®¿À±â
			IF (@intCRMIndex1 <> 0 AND  @intCRMIndex2 = 0) -- ÇϳªÀÇ °ú±Ý ¹æ½Ä¸¸ µû¸¥´Ù.
			BEGIN
				SELECT @IPType = strBillingType 
				FROM TblPCRoomBillingInfo
				WHERE intCRMIndex = @intCRMIndex1
			END
			ELSE IF (@intCRMIndex1 <> 0 AND  @intCRMIndex2 <> 0) -- µÎ°³ÀÇ °ú±Ý ¹æ½ÄÀ» µû¸¥´Ù.
			BEGIN
				SET @IPType = 'C'
			END
			
			-- PC¹æ °ú±ÝÁ¾·ù¸¦ üũÇÑ´Ù.
			-- T:Á¤·®Á¦,D:Á¤¾×Á¦
			EXEC @FLAG = USPCheckBilling_GameRoom @intCRMIndex1,@intCRMIndex2,@IPType,@OutCRMIndex OUTPUT,@strBillingType OUTPUT,@canUseTime OUTPUT

			IF @FLAG <> 0 --ERROR
			BEGIN

				SET @FLAG = 2
				SET @strBillingType = 'N'
				-- PC¹æ °ú±ÝÀÌ Á¾·áµÈ ¿¡·¯¸¦ ¸®ÅÏÇÑ´Ù.
							
				SET @strBillingType2 = @strBillingType
	
				SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
					@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex

				RETURN		
			END
			ELSE -- SUCCESS
			BEGIN
				IF @strBillingType = 'D' -- Á¤¾×Á¦
				BEGIN

					-- ¾ÆÀÌÇÇ Çϳª¸¦ »ç¿ëÇؼ­ Ä«¿îÆ®¸¦ 1 ´õÇϱâ ÇÑ´Ù.
					EXEC USPCheckBilling_UpIPCount @OutCRMIndex

					-- ÀÓ½ÃÅ×À̺í TblCurrentUser_Temp¿¡ ÀÔ·ÂÇÑ´Ù.
					INSERT INTO TblCurrentUser_Temp (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
					VALUES (@strClientID,@UID,@OutCRMIndex,@ClientIP,@strBillingType,@ServerID)

					SET @strBillingType2 = @strBillingType

					SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
						@canUseTime as PlayTime,@OutCRMIndex as CRMIndex
					RETURN
				END
				ELSE IF  @strBillingType = 'T' -- Á¤¾×Á¦
				BEGIN

					-- ÀÓ½ÃÅ×À̺í TblCurrentUser_Temp¿¡ ÀÔ·ÂÇÑ´Ù.
					INSERT INTO TblCurrentUser_Temp (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
					VALUES (@strClientID,@UID,@OutCRMIndex,@ClientIP,@strBillingType,@ServerID)

					SET @strBillingType2 = @strBillingType

					SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
						@canUseTime as PlayTime,@OutCRMIndex as CRMIndex
					
					RETURN
				END
			END			
		END

	END

GO

-- ij¸¯ÅÍ ¼±ÅÃâ °¡±â Àü¿¡ °ú±Ý ¿©ºÎ¸¦ üũÇÑ´Ù.
-- ij¸¯ÅÍ ¼±ÅÃâ¿¡¼­ ´Ù½Ã ½ÇÇàÇÑ´Ù.
-- Ãß°¡»çÇ× : ºí·°µÈ ij¸¯ÅÍÀÎÁö ¾Æ´ÑÁö¸¦ °¡·Á¾ßÇÑ´Ù.
ALTER  PROC USPCheckBilling_CharIDLogin @strClientID VARCHAR(20),@UID INT,@check TINYINT,@ClientIP VARCHAR(15),@ServerID TINYINT
AS
	SET NOCOUNT ON 

	DECLARE @strBillingType CHAR(1) --D,T
	DECLARE @strBillingType2 CHAR(2) -- RETURN VALUES

	DECLARE @PlayTime INT --³²Àº½Ã°£(ºÐ),³²ÀºÀÏÀÚ
	DECLARE @CanUseTime INT
	DECLARE @FLAG INT

	SET @strBillingType = 'N'
	SET @PlayTime = 0
	SET @CanUseTime = 0
	SET @FLAG = -1 
	
	DECLARE @IPType CHAR(1) --D,T
	DECLARE @intCRMIndex1 INT
	DECLARE @intCRMIndex2 INT
	SET @intCRMIndex1 =0
	SET @intCRMIndex2 =0

	DECLARE @BillingDate CHAR(1)
	DECLARE @BillingTime CHAR(1)
	SET @BillingDate = 'D'
	SET @BillingTime = 'T'

	-- ÇǽùæÁß Á¤·®Á¦¿Í Á¤¾×Á¦¸¦ °°ÀÌ »ç¿ëÇÏ´Â °æ¿ì ÇØ´ç °ú±ÝÀÇ ÇǽùæÀ妽º¸¦ ¾ò¾î¿Í¾ßÇÑ´Ù.
	DECLARE @OutCRMIndex INT 
	DECLARE @tinyServerID INT
	SET @tinyServerID = -1

	DECLARE @FreeTime INT
	
	-- ÇöÀç ·Î±×ÀÎ µÈ »ç¿ëÀÚ ÀÎÁö ¾Æ´ÑÁö üũÇÑ´Ù.
	SELECT @tinyServerID = tinyServerID FROM TblCurrentUser WHERE strClientid = @strClientID
	IF @tinyServerID > -1
	BEGIN
		SET @FLAG = 1 --Áߺ¹µÈ À¯ÀúÀÓ.
		SET @intCRMIndex1 = @tinyServerID
		SET @strBillingType2 = @strBillingType

		SELECT @FLAG as FLAG,@strBillingType2 as BillingType,@PlayTime as PlayTime,@intCRMIndex1 as ServerID
		RETURN
	END

	-- ¹«·á°èÁ¤ ¿©ºÎ üũ
	IF (@Check = 1) --¹«·á°èÁ¤
	BEGIN
			SET @FLAG = 0
			--Á¢¼ÓÅ×ÀÌºí¿¡ ÀÔ·ÂÇÑ´Ù.
			INSERT INTO TblCurrentUser(strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
			VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)

			SET @strBillingType2 = @strBillingType
			
			SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
					@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex
			RETURN
	END


	-- ¹èƲ±×¶ó¿îµå Ŭ·ÎÁî º£Å¸¿¡ µû¸¥ ÀÎÁõÃß°¡ (2004-04-19)
	-- @SERVERID°¡ 7¹øÀÎ °æ¿ì´Â ¹èƲ±×¶ó¿îµå¿¡ Á¢¼ÓÇÔÀ» °¡Á¤ÇÑ´Ù.
	IF (@ServerID = 7 )
	BEGIN
		IF EXISTS (SELECT * FROM TblBattleLoginUser WHERE strClientID = @strClientID)
		BEGIN
			
			SET @FLAG = 0
			-- ÀÓ½ÃÅ×À̺í TblCurrentUser_Temp¿¡ ÀÔ·ÂÇÑ´Ù.

			INSERT INTO TblCurrentUser (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
			VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)
			
			-- 'N' ŸÀÔÀ¸·Î ¸®ÅÏÇÑ´Ù.
			SET @strBillingType2 = 'B'

			SET @FreeTime = DATEDIFF(DAY,GETDATE(),'2030-01-01 00:00:00')
	
			SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
					@FreeTime as PlayTime,@intCRMIndex1 as CRMIndex
			RETURN
		END
	END	

	-- ¹«·á°èÁ¤ÀÎÁö ¾Æ´ÑÁö üũÇÑ´Ù
	SELECT @FreeTime = DATEDIFF(DAY,GETDATE(),RegLoginTime)
	FROM TBLPERSONINFO
	WHERE UID = @UID

	-- ½ÇÁ¦ ¹«·á °èÁ¤ÀÓÀ» ³ªÅ¸³¿.
	IF (@FreeTime >= 0)
	BEGIN
	
		SET @FLAG = 0
		-- ÀÓ½ÃÅ×À̺í TblCurrentUser¿¡ ÀÔ·ÂÇÑ´Ù.
		INSERT INTO TblCurrentUser (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
		VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)
		
		SET @strBillingType2 = @strBillingType

		SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
				@FreeTime as PlayTime,@intCRMIndex1 as CRMIndex
		RETURN

	END


	/*************************************************
	* @FLAG = 0,@strBillingType ='D',@PlayTime = ³²ÀºÀÏÀÚ 	--°³ÀÎÁ¤¾×Á¦ ¼º°ø
	* @FLAG = 0,@strBillingType ='T',@PlayTime = ³²Àº½Ã°£ 	--°³ÀÎÁ¤·®Á¦ ¼º°ø
	* @FLAG = 1,@strBillingType ='N',@PlayTime = 0 		--°ú±Ýµî·ÏÀÌ µÇ¾îÀÖÁö ¾ÊÀ½
	* @FLAG = 2,@strBillingType ='D',@PlayTime = 0 		--°³ÀÎÁ¤¾×Á¦ °ú±ÝÀÌ Á¾·áµÈ °æ¿ì
	* @FLAG = 3,@strBillingType ='T',@PlayTime = 0 		--°³ÀÎÁ¤·®Á¦ °ú±ÝÀÌ Á¾·áµÈ °æ¿ì
	**************************************************/
	EXEC @FLAG = USPCheckBilling_Person @strClientID,@strBillingType OUTPUT,@PlayTime OUTPUT

	-- °³Àΰú±ÝÀÌ ¼º°øÀûÀΰæ¿ì
	IF (@FLAG = 0)
	BEGIN
		-- Á¤¾×Á¦ °³ÀÎ À¯ÀúÀΰæ¿ì
		IF (@strBillingType =@BillingDate)
		BEGIN	
			--Á¢¼ÓÅ×ÀÌºí¿¡ ÀÔ·ÂÇÑ´Ù.
			INSERT INTO TblCurrentUser(strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
			VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)

			SET @strBillingType2 = @strBillingType
			
			SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
				@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex
			RETURN
		END
		
		-- Á¤·®Á¦ °³ÀÎ À¯ÀúÀΰæ¿ì
		ELSE IF (@strBillingType =@BillingTime)
		BEGIN
			SET @FLAG = -1

			--AGAIN CHECK ClientIP
			/*********************************************
			* @FLAG = 0,@intCRMIndex1 = ¼ýÀÚ,@intCRMIndex2 = ¼ýÀÚ	-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ Á¤¾×°ú Á¤·® ¸ðµÎ¸¦ »ç¿ëÇÔ
			* @FLAG = 0,@intCRMIndex1 = ¼ýÀÚ,@intCRMIndex2 = 0	-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ Á¤¾× ¶Ç´Â Á¤·®Áß Çϳª ÀÓ
			* @FLAG = 1,@intCRMIndex1 = 0,@intCRMIndex2 = 0		-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ ¾Æ´Ô
			*********************************************/
			EXEC @FLAG = USPCheckBilling_ClientIP @ClientIP,@intCRMIndex1 OUTPUT,@intCRMIndex2 OUTPUT

			-- PC¹æÀÌ ¾Æ´Ñ°æ¿ì
			IF @FLAG <> 0
			BEGIN
				-- °³ÀÎÁ¤·®Á¦·Î ¸®ÅÏÇÑ´Ù.
				SET @FLAG = 0
				SET @intCRMIndex1 = 0

				--Á¢¼ÓÅ×ÀÌºí¿¡ ÀÔ·ÂÇÑ´Ù.
				INSERT INTO TblCurrentUser (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
				VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)

				SET @strBillingType2 = @strBillingType

				SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
					@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex
				
				RETURN
			END

			-- PC¹æ ¾ÆÀÌÇÇÀΰæ¿ì
			ELSE IF @FLAG = 0
			BEGIN
			
				-- ÇØ´ç ¾ÆÀÌÇÇÀÇ °ú±Ý ¹æ½Ä °¡Á®¿À±â
				IF (@intCRMIndex1 <> 0 AND  @intCRMIndex2 = 0) -- ÇϳªÀÇ °ú±Ý ¹æ½Ä¸¸ µû¸¥´Ù.
				BEGIN
					SELECT @IPType = strBillingType 
					FROM TblPCRoomBillingInfo
					WHERE intCRMIndex = @intCRMIndex1
				END
				ELSE IF (@intCRMIndex1 <> 0 AND  @intCRMIndex2 <> 0) -- µÎ°³ÀÇ °ú±Ý ¹æ½ÄÀ» µû¸¥´Ù.
				BEGIN
					SET @IPType = 'C'
				END
						
				-- PC¹æ °ú±ÝÁ¾·ù¸¦ üũÇÑ´Ù.
				-- T:Á¤·®Á¦,D:Á¤¾×Á¦
				EXEC @FLAG = USPCheckBilling_GameRoom @intCRMIndex1,@intCRMIndex2,@IPType,@OutCRMIndex OUTPUT,@strBillingType OUTPUT,@canUseTime OUTPUT

				IF @FLAG <> 0 --ERROR
				BEGIN
					-- PC¹æ °ú±ÝÀÌ Á¾·áµÈ °æ¿ìÀ̹ǷΠ´Ù½Ã °³ÀÎÁ¤·®Á¦·Î °ú±ÝÀ» Àû¿ë½ÃŲ´Ù.

					SET @intCRMIndex1 = 0
					SET @FLAG = 0
					SET @strBillingType = @BillingTime

					--Á¢¼ÓÅ×ÀÌºí¿¡ ÀÔ·ÂÇÑ´Ù.
					INSERT INTO TblCurrentUser (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
					VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)
		
					SET @strBillingType2 = @strBillingType

					SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
						@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex
					
					RETURN		
				END
				ELSE
				BEGIN
					IF @strBillingType = 'D' -- Á¤¾×Á¦
					BEGIN
						-- ¾ÆÀÌÇÇ Çϳª¸¦ »ç¿ëÇؼ­ Ä«¿îÆ®¸¦ 1 ´õÇϱâ ÇÑ´Ù.
						EXEC USPCheckBilling_UpIPCount @OutCRMIndex

						--Á¢¼ÓÅ×ÀÌºí¿¡ ÀÔ·ÂÇÑ´Ù.
						INSERT INTO TblCurrentUser (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
						VALUES (@strClientID,@UID,@OutCRMIndex,@ClientIP,@strBillingType,@ServerID)

						SET @strBillingType2 = @strBillingType

						SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
							@PlayTime as PlayTime,@OutCRMIndex as CRMIndex
						
						RETURN
					END
					ELSE IF  @strBillingType = 'T' -- Á¤¾×Á¦
					BEGIN

						--Á¢¼ÓÅ×ÀÌºí¿¡ ÀÔ·ÂÇÑ´Ù.
						INSERT INTO TblCurrentUser (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
						VALUES (@strClientID,@UID,@OutCRMIndex,@ClientIP,@strBillingType,@ServerID)

						SET @strBillingType2 = @strBillingType
					
						SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
							@PlayTime as PlayTime,@OutCRMIndex as CRMIndex

						RETURN
					END
				END			
			END
				
		END
	END
	-- °³Àΰú±ÝÀÌ ½ÇÆÐµÈ °æ¿ì ´Ù½Ã °ú±Ýµî·ÏµÈ ÇǽùæÀÎÁö ¾Æ´ÑÁö üũÇÑ´Ù.
	ELSE
	BEGIN
		
		--AGAIN CHECK ClientIP
		/*********************************************
		* @FLAG = 0,@intCRMIndex1 = ¼ýÀÚ,@intCRMIndex2 = ¼ýÀÚ	-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ Á¤¾×°ú Á¤·® ¸ðµÎ¸¦ »ç¿ëÇÔ
		* @FLAG = 0,@intCRMIndex1 = ¼ýÀÚ,@intCRMIndex2 = 0	-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ Á¤¾× ¶Ç´Â Á¤·®Áß Çϳª ÀÓ
		* @FLAG = 1,@intCRMIndex1 = 0,@intCRMIndex2 = 0		-- ÇÇ½Ã¹æ ¾ÆÀÌÇÇ°¡ ¾Æ´Ô
		*********************************************/
		EXEC @FLAG = USPCheckBilling_ClientIP @ClientIP,@intCRMIndex1 OUTPUT,@intCRMIndex2 OUTPUT

		-- PC¹æÀÌ ¾Æ´Ñ°æ¿ì
		IF @FLAG <> 0
		BEGIN

			-- Àӽà Àû¿ë ºÎºÐ
			/*
			SET @FLAG = 0
			SET @intCRMIndex1 = 0
			SET @strBillingType = 'N'
			--Á¢¼ÓÅ×ÀÌºí¿¡ ÀÔ·ÂÇÑ´Ù.
			INSERT INTO TblCurrentUser(strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
			VALUES (@strClientID,@UID,@intCRMIndex1,@ClientIP,@strBillingType,@ServerID)
		
			SET @strBillingType2 = @strBillingType
			
			SELECT @FLAG as FLAG,@strBillingType2 as BillingType,@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex
		
			RETURN
			*/

			-- ¿¡·¯¸®ÅÏÇÑ´Ù.

			SET @FLAG = 2
			
			SET @strBillingType2 = @strBillingType

			SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
				@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex

			RETURN

		END
		ELSE IF @FLAG = 0
		BEGIN

			-- ÇØ´ç ¾ÆÀÌÇÇÀÇ °ú±Ý ¹æ½Ä °¡Á®¿À±â
			IF (@intCRMIndex1 <> 0 AND  @intCRMIndex2 = 0) -- ÇϳªÀÇ °ú±Ý ¹æ½Ä¸¸ µû¸¥´Ù.
			BEGIN
				SELECT @IPType = strBillingType 
				FROM TblPCRoomBillingInfo
				WHERE intCRMIndex = @intCRMIndex1
			END
			ELSE IF (@intCRMIndex1 <> 0 AND  @intCRMIndex2 <> 0) -- µÎ°³ÀÇ °ú±Ý ¹æ½ÄÀ» µû¸¥´Ù.
			BEGIN
				SET @IPType = 'C'
			END
			
			-- PC¹æ °ú±ÝÁ¾·ù¸¦ üũÇÑ´Ù.
			-- T:Á¤·®Á¦,D:Á¤¾×Á¦
			EXEC @FLAG = USPCheckBilling_GameRoom @intCRMIndex1,@intCRMIndex2,@IPType,@OutCRMIndex OUTPUT,@strBillingType OUTPUT,@canUseTime OUTPUT

			IF @FLAG <> 0 --ERROR
			BEGIN

				SET @strBillingType = 'N'
				-- PC¹æ °ú±ÝÀÌ Á¾·áµÈ ¿¡·¯¸¦ ¸®ÅÏÇÑ´Ù.

				SET @strBillingType2 = @strBillingType

				SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
					@PlayTime as PlayTime,@intCRMIndex1 as CRMIndex

				RETURN		
			END
			ELSE -- SUCCESS
			BEGIN
				IF @strBillingType = 'D' -- Á¤¾×Á¦
				BEGIN

					-- ¾ÆÀÌÇÇ Çϳª¸¦ »ç¿ëÇؼ­ Ä«¿îÆ®¸¦ 1 ´õÇϱâ ÇÑ´Ù.
					EXEC USPCheckBilling_UpIPCount @OutCRMIndex

					--Á¢¼ÓÅ×ÀÌºí¿¡ ÀÔ·ÂÇÑ´Ù.
					INSERT INTO TblCurrentUser (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
					VALUES (@strClientID,@UID,@OutCRMIndex,@ClientIP,@strBillingType,@ServerID)

					SET @strBillingType2 = @strBillingType

					SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
						@PlayTime as PlayTime,@OutCRMIndex as CRMIndex
					RETURN
				END
				ELSE IF  @strBillingType = 'T' -- Á¤¾×Á¦
				BEGIN

					--Á¢¼ÓÅ×ÀÌºí¿¡ ÀÔ·ÂÇÑ´Ù.
					INSERT INTO TblCurrentUser (strClientid,UID,intCRMIndex,strip,strBillingType,tinyServerID)
					VALUES (@strClientID,@UID,@OutCRMIndex,@ClientIP,@strBillingType,@ServerID)

					SET @strBillingType2 = @strBillingType

					SELECT @FLAG as FLAG,@strBillingType2 as BillingType,
						@PlayTime as PlayTime,@OutCRMIndex as CRMIndex
	
					RETURN
				END
			END			
		END
	END