[v15] Kleines Problem

SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE         PROC [dbo].[CHARACTER_DELETE_STR]
AS
DECLARE @serverindex char(2)


DECLARE Delete_Server CURSOR FOR 
SELECT serverindex FROM CHARACTER_TBL GROUP BY serverindex ORDER BY serverindex


OPEN Delete_Server


FETCH NEXT FROM Delete_Server 
INTO @serverindex


WHILE @@FETCH_STATUS = 0
BEGIN


---		DECLARE @DeleteDelayDay int
---		set @DeleteDelayDay = '-7'
---		SELECT * FROM CHARACTER_TBL WHERE isblock='D' AND End_Time <= convert(char(8), DATEADD(d,@DeleteDelayDay,getdate()),112)


					DELETE CHARACTER_TBL WHERE isblock='D' AND  End_Time <= convert(char(8),DATEADD(d,-7,getdate()),112) and serverindex = @serverindex
					
					DECLARE @name varchar(256)
					DECLARE Delete_Cursor CURSOR FOR 
					SELECT	B.name
						FROM	syscolumns A,sysobjects B
						WHERE	A.id = B.id
					   AND B.name NOT IN('CHARACTER_TBL','MESSENGER_TBL')
					   AND A.name = 'm_idPlayer' and A.name = 'serverindex'
					   AND B.type='U'
					ORDER BY B.name
					
					OPEN Delete_Cursor
					
					FETCH NEXT FROM Delete_Cursor 
					INTO @name
					
					WHILE @@FETCH_STATUS = 0
					BEGIN
						PRINT @name + '삭제'
						EXEC('DELETE ' + @name + ' WHERE m_idPlayer NOT IN (SELECT m_idPlayer FROM CHARACTER_TBL where serverindex = ''' + @serverindex + ''') and serverindex = ''' + @serverindex + '''')
					   FETCH NEXT FROM Delete_Cursor 
					   INTO @name
					END
					
					DELETE TAG_TBL  WHERE f_idPlayer NOT IN (SELECT m_idPlayer FROM CHARACTER_TBL where serverindex = @serverindex) and serverindex = @serverindex
					
					PRINT '메신저 친구 삭제'
					-- 추가 2009-09-16 메신저 삭제 부분 추가 (EXEC MESSENGER_STR 'D2','',@serverindex 부분 주석 처리)
					delete tblMessenger
					where idPlayer not in (select m_idPlayer from CHARACTER_TBL where serverindex = @serverindex)


					delete tblMessenger
					where idFriend not in (select m_idPlayer from CHARACTER_TBL where serverindex = @serverindex)


--					EXEC MESSENGER_STR 'D2','',@serverindex


					
					PRINT 'Delete Skill'
					DELETE 	tblSkillPoint 
					WHERE 	PlayerID NOT IN (SELECT m_idPlayer FROM CHARACTER_TBL WHERE serverindex=@serverindex) 
					AND 	serverindex=@serverindex




					CLOSE Delete_Cursor
					DEALLOCATE Delete_Cursor


FETCH NEXT FROM Delete_Server 
INTO @serverindex


END
CLOSE Delete_Server
DEALLOCATE Delete_Server


RETURN
GO