delete all lines from all tables of a database - sql-server

Question

Somebody must have already written a script to delete all lines from all tables of a database.
Using DELETE command is not an option since it can takes ages on large tables.
Of course there are many examples on stackoverflow and elsewhere, but they don't work with tables using foreign keys.
Basically, the script should do this :
Store all foreign keys definition in a temporary table
delete all foreign keys
truncate all tables
restore foreign keys
I think i have it :
IF OBJECT_ID('tempdb..#ForeignKeys') IS NOT NULL
DROP TABLE #ForeignKeys;
WITH ForeignKeys AS (
SELECT
QUOTENAME(SCHEMA_NAME(t.schema_id)) + '.' + QUOTENAME(t.name) AS ParentTable
, QUOTENAME(SCHEMA_NAME(rt.schema_id)) + '.' + QUOTENAME(rt.name) AS ReferenceTable
, QUOTENAME(f.name) AS ConstraintName
, STUFF(Parent.Cols, 1, 1, '') AS ParentColumns
, STUFF(Reference.Cols, 1, 1, '') AS ReferenceColumns
, REPLACE(f.update_referential_action_desc, '_', ' ') AS UpdateAction
, REPLACE(f.delete_referential_action_desc, '_', ' ') AS DeleteAction
FROM
sys.tables AS t
LEFT JOIN sys.foreign_keys AS f
ON f.parent_object_id = t.object_id
AND f.type = 'F'
LEFT JOIN sys.tables AS rt
ON f.referenced_object_id = rt.object_id
CROSS APPLY
(
SELECT
',' + QUOTENAME(COL_NAME(fc.parent_object_id, fc.parent_column_id))AS [text()]
FROM
sys.foreign_key_columns AS fc
WHERE
fc.constraint_object_id = f.object_id
ORDER BY
fc.constraint_column_id
FOR XML PATH('')
) Parent(Cols)
CROSS APPLY
(
SELECT
',' + QUOTENAME(COL_NAME(fc.referenced_object_id, fc.referenced_column_id)) AS [text()]
FROM
sys.foreign_key_columns AS fc
WHERE
fc.constraint_object_id = f.object_id
ORDER BY
fc.constraint_column_id
FOR XML PATH('')
) Reference(Cols)
)
SELECT
ParentTable AS TableName
, 'ALTER TABLE ' + ParentTable + ' DROP CONSTRAINT ' + ConstraintName AS DropCmd
, 'TRUNCATE TABLE ' + ParentTable AS TruncateCmd
, 'ALTER TABLE ' + ParentTable + ' ADD CONSTRAINT ' + ConstraintName + ' FOREIGN KEY('
+ ParentColumns + ') REFERENCES ' + ReferenceTable + ' (' + ReferenceColumns
+ ') ON UPDATE ' + UpdateAction
+ ' ON DELETE ' + DeleteAction COLLATE SQL_Latin1_General_CP1_CI_AS AS CreateCmd
INTO
#ForeignKeys
FROM
ForeignKeys
ORDER BY
1;
-- SELECT * FROM #ForeignKeys
DECLARE #TableName SYSNAME
DECLARE #Sql NVARCHAR(MAX)
-- Drop all constraints
DECLARE FkCursor CURSOR FOR
SELECT
TableName
, DropCmd
FROM
#ForeignKeys
WHERE
DropCmd IS NOT NULL
OPEN FkCursor
FETCH NEXT FROM FkCursor INTO #TableName, #Sql
WHILE ##FETCH_STATUS = 0
BEGIN
PRINT #TableName + ' : ' + #sql
EXEC sp_executesql #Sql
FETCH NEXT FROM FkCursor INTO #TableName, #Sql
END
CLOSE FkCursor
DEALLOCATE FkCursor
-- Truncate all tables
DECLARE FkCursor CURSOR FOR
SELECT
TableName
, TruncateCmd
FROM
#ForeignKeys
OPEN FkCursor
FETCH NEXT FROM FkCursor INTO #TableName, #Sql
WHILE ##FETCH_STATUS = 0
BEGIN
PRINT #TableName + ' : ' + #sql
EXEC sp_executesql #Sql
FETCH NEXT FROM FkCursor INTO #TableName, #Sql
END
CLOSE FkCursor
DEALLOCATE FkCursor
-- Create all foreign keys
DECLARE FkCursor CURSOR FOR
SELECT
TableName
, CreateCmd
FROM
#ForeignKeys
WHERE
CreateCmd IS NOT NULL
OPEN FkCursor
FETCH NEXT FROM FkCursor INTO #TableName, #Sql
WHILE ##FETCH_STATUS = 0
BEGIN
PRINT #TableName + ' : ' + #sql
EXEC sp_executesql #Sql
FETCH NEXT FROM FkCursor INTO #TableName, #Sql
END
CLOSE FkCursor
DEALLOCATE FkCursor
DROP TABLE #ForeignKeys;

Answer 1

DECLARE #drop nvarchar(max) = N'',
#truncate nvarchar(max) = N'',
#create nvarchar(max) = N'';
;WITH x AS
(
SELECT id = f.[object_id],
cname = QUOTENAME(f.name),
ctable = QUOTENAME(OBJECT_SCHEMA_NAME(f.parent_object_id))
+ N'.' + QUOTENAME(OBJECT_NAME(f.parent_object_id)),
ccol = QUOTENAME(COL_NAME(fc.parent_object_id,fc.parent_column_id)),
rtable = QUOTENAME(OBJECT_SCHEMA_NAME(f.referenced_object_id))
+ N'.' + QUOTENAME(OBJECT_NAME(f.referenced_object_id)),
rcol = QUOTENAME(COL_NAME(fc.referenced_object_id,fc.referenced_column_id)),
ou = f.update_referential_action_desc COLLATE SQL_Latin1_General_CP1_CI_AS,
od = f.delete_referential_action_desc COLLATE SQL_Latin1_General_CP1_CI_AS
FROM sys.foreign_keys AS f
INNER JOIN sys.foreign_key_columns AS fc
ON f.[object_id] = fc.constraint_object_id
-- where clause to leave out certain tables here
),
y AS
(
SELECT
d = CHAR(13) + CHAR(10) + N'ALTER TABLE ' + ctable + N' DROP CONSTRAINT ' + cname + ';',
c = CHAR(13) + CHAR(10) + N'ALTER TABLE ' + ctable + N' ADD CONSTRAINT ' + cname
+ ' FOREIGN KEY (' + STUFF((SELECT N',' + ccol FROM x AS x2
WHERE x2.id = x.id FOR XML PATH(''),
TYPE).value(N'./text()[1]', N'nvarchar(max)'), 1, 1, N'')
+ N') REFERENCES ' + rtable + N'(' + STUFF((SELECT N',' + rcol FROM x AS x3
WHERE x3.id = x.id FOR XML PATH(''),
TYPE).value(N'./text()[1]', N'nvarchar(max)'), 1, 1, '') + N')'
+ CASE WHEN od <> N'NO_ACTION' THEN
' ON DELETE ' + REPLACE(od, N'SET_', N'SET ') ELSE N'' END
+ CASE WHEN ou <> N'NO_ACTION' THEN
' ON UPDATE ' + REPLACE(ou, N'SET_', N'SET ') ELSE N'' END
FROM x
)
SELECT
#drop = #drop + d,
#create = #create + c
FROM y GROUP BY d,c;
SELECT #truncate = #truncate + CHAR(13) + CHAR(10) + N'TRUNCATE TABLE '
+ QUOTENAME(SCHEMA_NAME(schema_id)) + N'.' + QUOTENAME(name) + N';'
FROM sys.tables
-- where clause to leave out certain tables here
;
-- use results to text. Note that for 200 tables you won't be able to
-- manually inspect the entire script in Management Studio because it
-- will only show a certain number of characters depending on settings.
SELECT #drop;
SELECT #truncate;
SELECT #create;
-- when you are happy, uncomment these:
--EXEC sys.sp_executesql #drop;
--EXEC sys.sp_executesql #truncate;
--EXEC sys.sp_executesql #create;

Answer 2

Right click on the object(in the object explorer) and click Script as--> drop to. Use the same method and Script as--> Create to. This should give you the scripts for Dropping as well as creating all the objects in your database. Run them in the sequence you like.
Or if you have a lot of tables and objects, you can right click on the database--> go to tasks and click on Generate Scripts.