x-MU.net форум

declare @deldate datetime
set @deldate = '2008-04-05' - выстави дату

DECLARE tnames CURSOR
FOR select memb___id from memb_stat where connecttm < @deldate  or disconnecttm < @deldate
open tnames
DECLARE @tablename sysname
FETCH NEXT FROM tnames INTO @tablename
WHILE @@FETCH_STATUS = 0
BEGIN
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[AccountCharacter]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) delete accountcharacter where id = @tablename
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[character]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) delete character where accountid = @tablename
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[memb_info]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) delete memb_info where memb___id = @tablename
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[vi_curr_info]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) delete vi_curr_info where memb___id = @tablename
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[warehouse]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) delete warehouse where accountid = @tablename
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[extwarehouse]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) delete extwarehouse where accountid = @tablename
print 'delete account: ' + @tablename
FETCH NEXT FROM tnames INTO @tablename
END
close tnames
DEALLOCATE tnames

delete character where accountid not in (select memb___id from memb_info)
GO
delete accountcharacter where id not in (select memb___id from memb_info)
GO
delete warehouse where accountid not in (select memb___id from memb_info)
GO
delete extwarehouse where accountid not in (select memb___id from memb_info)
GO