SQL Server TSQL script to clone a database's tables and data

the following script will create two dissimilar databases for demonstration purposes, insert different data into them, identify the schema differences, drop the tables that are different out of the destination database, create and execute scripts to create all missing tables, truncate the tables in the destination database, then insert all data from all tables in the source into the tables in the destination. to do a find replace: _test1 is the source, _test2 is the destination you do not need the last 6 select statements or anything above the comment "-- find any schema differences between tables and drop"

 USE master  
 go  
 CREATE DATABASE [_Test1]  
 go  
 CREATE DATABASE [_Test2]  
 go  
 USE [_Test1]  
 go   
 CREATE TABLE tbl1  
 (  
    col1 INT NULL,  
    col2 VARCHAR(1) NULL,  
    col3 bit NULL,  
    col4 float NULL,  
    col5 NUMERIC(18,5) NULL   
 )  
 GO  
 CREATE TABLE tbl2  
 (  
    col1 INT NULL,  
    col2 INT NULL,  
    col3 INT NULL,  
    col4 INT NULL,  
    col5 INT NULL   
 )  
 GO  
 CREATE TABLE tbl3  
 (  
    col1 INT NULL,  
    col2 INT NULL,  
    col3 INT NULL,  
    col4 INT NULL,  
    col5 INT NULL   
 )  
 GO   
   
 INSERT dbo.tbl1 (col1,col2,col3,col4,col5) VALUES (1,2,3,4,5)  
 INSERT dbo.tbl2 (col1,col2,col3,col4,col5) VALUES (1,2,3,4,5)  
 INSERT dbo.tbl3 (col1,col2,col3,col4,col5) VALUES (1,2,3,4,5)  
 go  
 USE [_Test2]  
 go   
 CREATE TABLE tbl1  
 (  
    col1 INT NULL,  
    col2 VARCHAR(1) NULL,  
    col3 bit NULL,  
    col4 float NULL,  
    col5 NUMERIC(18,5) NULL   
 )  
 GO  
 CREATE TABLE tbl2  
 (  
    col1 INT NULL,  
    col2 INT NULL,  
    col3 INT NULL,  
    col4 INT NULL  
 )  
 GO  
 ----CREATE TABLE tbl3  
 ----(  
 ----   col1 INT NULL,  
 ----   col2 INT NULL,  
 ----   col3 INT NULL,  
 ----   col4 INT NULL,  
 ----   col5 INT NULL   
 ----)  
 ----GO   
   
 INSERT dbo.tbl1 (col1,col2,col3,col4,col5) VALUES (1,2,3,4,6)  
 INSERT dbo.tbl1 (col1,col2,col3,col4,col5) VALUES (1,2,3,4,7)  
 go  
   
 -- tables are different  
 SELECT * FROM [_test1].dbo.tbl1  
 SELECT * FROM [_test2].dbo.tbl1  
   
 SELECT * FROM [_test1].dbo.tbl2  
 SELECT * FROM [_test2].dbo.tbl2  
   
 SELECT * FROM [_test1].dbo.tbl3  
 --SELECT * FROM [_test2].dbo.tbl3 -- this one produces an error. the table does not exist  
 go  
 USE [_Test1]  
 go  
   
   
 -- find any schema differences between tables and drop  
   
 DECLARE @sqltxt NVARCHAR(4000)  
   
 SELECT @sqltxt = STUFF((  
 SELECT DISTINCT ';DROP TABLE [_Test2].[' + t2.TABLE_SCHEMA + '].[' + t2.TABLE_NAME + ']'  
 FROM [_Test1].information_schema.COLUMNS c1  
 LEFT JOIN [_Test2].information_schema.tables t2 ON c1.TABLE_SCHEMA = t2.TABLE_SCHEMA AND c1.TABLE_NAME = t2.TABLE_NAME  
 FULL OUTER JOIN [_Test2].information_schema.COLUMNS c2 ON   
       c1.TABLE_SCHEMA = c2.TABLE_SCHEMA  
    AND c1.TABLE_NAME = c2.TABLE_NAME  
    AND c1.COLUMN_NAME = c2.COLUMN_NAME  
 WHERE   
 (   ISNULL(c1.COLUMN_NAME,'') != ISNULL(c2.COLUMN_NAME,'') or   
    ISNULL(c1.IS_NULLABLE,'') != ISNULL(c2.IS_NULLABLE,'') or  
    ISNULL(c1.DATA_TYPE,'') != ISNULL(c2.DATA_TYPE,'') or  
    ISNULL(c1.NUMERIC_PRECISION,99) != ISNULL(c2.NUMERIC_PRECISION,99) or   
    ISNULL(c1.NUMERIC_SCALE,-1) != ISNULL(c2.NUMERIC_SCALE,-1) or  
    ISNULL(c1.CHARACTER_MAXIMUM_LENGTH,-1) != ISNULL(c2.CHARACTER_MAXIMUM_LENGTH,-1) or  
    ISNULL(c1.COLUMN_DEFAULT,'') != ISNULL(c2.COLUMN_DEFAULT,'') )  
 AND t2.TABLE_NAME IS NOT NULL  
 FOR XML PATH('')), 1, 1, '')  
   
   
 EXECUTE [_Test2].dbo.sp_executesql @sqltxt  
 go  
   
   
 -- generate script to create any missing tables  
 DECLARE @sqltxt NVARCHAR(4000)  
   
 SELECT @sqltxt = STUFF((  
 select ';create table [_Test2].[' + so.TABLE_SCHEMA + '].[' + so.TABLE_NAME + '] (' + o.list + ')' + CASE WHEN tc.Constraint_Name IS NULL THEN '' ELSE 'ALTER TABLE ' + so.TABLE_NAME + ' ADD CONSTRAINT ' + tc.Constraint_Name + ' PRIMARY KEY ' + ' (' + LEFT(j.List, Len(j.List)-1) + ')' END  
 from  INFORMATION_SCHEMA.tables so  
 JOIN (  
 SELECT t1.TABLE_SCHEMA, t1.TABLE_NAME  
 FROM [_Test1].information_schema.tables t1  
 LEFT JOIN [_Test2].information_schema.tables t2 ON t1.TABLE_SCHEMA = t2.TABLE_SCHEMA AND t1.TABLE_NAME = t2.TABLE_NAME  
 WHERE t2.TABLE_NAME IS NULL  
 ) list ON so.TABLE_SCHEMA = list.TABLE_SCHEMA AND so.TABLE_NAME = list.TABLE_NAME  
 cross apply  
   (SELECT   
     '['+column_name+'] ' +   
     data_type + case data_type  
         when 'sql_variant' then ''  
         when 'text' then ''  
         when 'decimal' then '(' + cast(numeric_precision_radix as varchar) + ', ' + cast(numeric_scale as varchar) + ')'  
         when 'numeric' then '(' + cast(numeric_precision as varchar) + ', ' + cast(numeric_scale as varchar) + ')'  
         else coalesce('('+case when character_maximum_length = -1 then 'MAX' else cast(character_maximum_length as varchar) end +')','') end + ' ' +  
     case when exists (   
     select id from syscolumns  
     where object_name(id)=so.TABLE_NAME  
     and name=column_name  
     and columnproperty(id,name,'IsIdentity') = 1   
     ) then  
     'IDENTITY(' +   
     cast(ident_seed(so.TABLE_NAME) as varchar) + ',' +   
     cast(ident_incr(so.TABLE_NAME) as varchar) + ')'  
     else ''  
     end + ' ' +  
      (case when IS_NULLABLE = 'No' then 'NOT ' else '' end ) + 'NULL ' +   
      case when information_schema.columns.COLUMN_DEFAULT IS NOT NULL THEN 'DEFAULT '+ information_schema.columns.COLUMN_DEFAULT ELSE '' END + ', '   
   
    from information_schema.columns where table_name = so.TABLE_NAME  
    order by ordinal_position  
   FOR XML PATH('')) o (list)  
 left join  
   information_schema.table_constraints tc  
 on tc.Table_name        = so.TABLE_NAME  
 AND tc.Constraint_Type = 'PRIMARY KEY'  
 cross apply  
   (select '[' + Column_Name + '], '  
    FROM    information_schema.key_column_usage kcu  
    WHERE   kcu.Constraint_Name   = tc.Constraint_Name  
    ORDER BY  
     ORDINAL_POSITION  
    FOR XML PATH('')) j (list)  
 FOR XML PATH('')), 1, 1, '')  
   
   
 EXECUTE [_Test2].dbo.sp_executesql @sqltxt  
   
 go  
   
   
 -- truncate and refill from an identical table in another database  
 DECLARE cur CURSOR FOR  
   SELECT table_name, table_schema  
   FROM [_Test1].INFORMATION_SCHEMA.tables tab   
   WHERE table_type = 'BASE TABLE'  
   
 OPEN cur  
   
 DECLARE @tablename VARCHAR(255) ,@tableschema VARCHAR(255)  
   
 FETCH NEXT FROM cur INTO @tablename, @tableschema  
 WHILE ( @@FETCH_STATUS <> -1 )   
 BEGIN   
   IF ( @@FETCH_STATUS <> -2 )   
   DECLARE @sqltxt NVARCHAR(255)  
   SET @sqltxt = N'TRUNCATE TABLE [_Test2].[' + @tableschema + '].[' + @tablename + ']; INSERT INTO [_Test2].[' + @tableschema + '].[' + @tablename + '] SELECT * FROM [_Test1].[' + @tableschema + '].[' + @tablename + ']'  
   
   EXEC dbo.sp_executesql @sqltxt  
     
 FETCH NEXT FROM cur INTO @tablename, @tableschema  
   
 END  
   
 CLOSE cur  
   
 DEALLOCATE cur  
   
 go  
   
 --tables ARE identical  
 SELECT * FROM [_test1].dbo.tbl1  
 SELECT * FROM [_test2].dbo.tbl1  
   
 SELECT * FROM [_test1].dbo.tbl2  
 SELECT * FROM [_test2].dbo.tbl2  
   
 SELECT * FROM [_test1].dbo.tbl3  
 SELECT * FROM [_test2].dbo.tbl3