Clear Table ,Stored Procedure,Blank Database

USE
--DB Name
dwd
GO
declare
@procName sysname
declare
someCursor cursor FOR
---- type p mean store prodecure
---- type u Database table
SELECT
name FROM sysobjects WHERE type = 'u' AND objectproperty(id, 'IsMSShipped') = 0
open
someCursor
fetch
next FROM someCursor INTO @procName
while
@@FETCH_STATUS = 0
begin
--type p delete store prodecure from database
--exec('drop proc ' + @procName)

--type u delete table from database
--exec('DROP TABLE ' + @procName)

--type u delete all rows from all table from database (blank db)
--exec('delete from ' + @procName)

--type u for start query identity field number one
exec('dbcc checkident '+'('+ @procName +','+' reseed'+','+'0'+')' )
fetch
next FROM someCursor INTO @procName
end
close
someCursor
deallocate
someCursor
go