頂級乾貨

用來比較兩個資料庫之間 表結構，儲存過程及檢視差異的儲存過程，直接複製對應的儲存過程，無需改動，直接在資料庫中執行（傳遞要比較的資料庫引數）即可

1.兩個資料庫之間儲存過程及檢視差異比較的儲存過程

--測試指令碼
--exec [p_compSPAndView] 'FAMS_PrePROD','FAMS_SIT'  
 
 
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO



CREATE?proc
 [dbo].[p_compSPAndView] 

@db1
 sysname, 
 
--第一個庫


@db2
 sysname --第二個庫


as

exec('


select
 型別=case isnull(a.xtype,b.xtype) when ''V''
 then N''檢視''
 else N''儲存過程''
 end 

,匹配情況=case


when
 a.name is null then N''庫
 ['+@db1+']
 中無''


when
 b.name is null then N''庫
 ['+@db2+']
 中無''


else
 N''結構不同''
 end 

,物件名稱=isnull(a.name,b.name),a.text
 as atext, b.text as btext

from(


select
 a.name,a.xtype,b.colid,b.text 

from
 [
 
'+@db1+']..sysobjects
 a,['+@db1+']..syscomments
 b 

where
 a.id=b.id and a.xtype in(''V'',''P'')
 and a.status>=0 

)a
 full join( 

select
 a.name,a.xtype,b.colid,b.text 

from
 ['+@db2+']..sysobjects
 a,['+@db2+']..syscomments
 b 

where
 a.id=b.id and a.xtype in(''V'',''P'')
 and a.status>=0 

)b
 on a.name=b.name and a.xtype=b.xtype and a.colid=b.colid 

where
 a.name is null 

or
 b.name is null 

or
 isnull(a.text,
 
'''')
 <>isnull(b.text,'''')
')


--group by a.name,b.name,a.xtype,b.xtype 

--order by 型別,匹配情況,物件名稱
GO

效果如下：

2.兩個資料庫之間表結構差異比較的儲存過程

--測試指令碼
--exec p_comparestructure 'Inventory_SR08','Inventory_SR08_bk'

-- =============================================
-- Author:
-- Description:    <比較兩個資料庫的表結構差異並自動生成修改和插入表字段指令碼>
--exec p_comparestructure 'Inventory_SR08','Inventory_SR08_bk'
-- =============================================
Create proc [dbo].[p_comparestructure]
@dbname1 varchar(250),--要比較的資料庫名1
@dbname2 varchar(250)--要比較的資料庫名2
as
set @dbname1='['+@dbname1+']'
set @dbname2='['+@dbname2+']'
 
create table #tb1(表名1 varchar(250),欄位名 varchar(250),序號 int,標識 bit,主鍵 bit,型別 varchar(250),
佔用位元組數 int,長度 int,小數位數 int,允許空 bit,預設值 sql_variant,欄位說明 sql_variant)
 
create table #tb2(表名2 varchar(250),欄位名 varchar(250),序號 int,標識 bit,主鍵 bit,型別 varchar(250),
佔用位元組數 int,長度 int,小數位數 int,允許空 bit,預設值 sql_variant,欄位說明 sql_variant)
 
--得到資料庫1的結構
exec('insert into #tb1 SELECT 
表名=d.name,欄位名=a.name,序號=a.colid,
標識=case when a.status=0x80 then 1 else 0 end,
主鍵=case when exists(SELECT 1 FROM '+@dbname1+'.dbo.sysobjects where xtype=''PK'' and parent_obj=a.id and name in (
SELECT name FROM '+@dbname1+'.dbo.sysindexes WHERE indid in(
SELECT indid FROM '+@dbname1+'.dbo.sysindexkeys WHERE id = a.id AND colid=a.colid
))) then 1 else 0 end,
型別=b.name,佔用位元組數=a.length,長度=a.prec,小數位數=a.scale,允許空=a.isnullable,
預設值=isnull(e.text,''''),欄位說明=isnull(g.[value],'''')
FROM '+@dbname1+'.dbo.syscolumns a
left join '+@dbname1+'.dbo.systypes b on a.xtype=b.xusertype
inner join '+@dbname1+'.dbo.sysobjects d on a.id=d.id  and d.xtype=''U'' and  d.name<>''dtproperties''
left join '+@dbname1+'.dbo.syscomments e on a.cdefault=e.id
left join '+@dbname1+'.sys.extended_properties g on a.id=g.major_id and a.colid=g.minor_id  
order by a.id,a.colorder')
--select * from csdntest.sys.extended_properties
--得到資料庫2的結構
exec('insert into #tb2 SELECT 
表名=d.name,欄位名=a.name,序號=a.colid,
標識=case when a.status=0x80 then 1 else 0 end,
主鍵=case when exists(SELECT 1 FROM '+@dbname2+'.dbo.sysobjects where xtype=''PK'' and parent_obj=a.id and name in (
SELECT name FROM '+@dbname2+'.dbo.sysindexes WHERE indid in(
SELECT indid FROM '+@dbname2+'.dbo.sysindexkeys WHERE id = a.id AND colid=a.colid
))) then 1 else 0 end,
型別=b.name,佔用位元組數=a.length,長度=a.prec,小數位數=a.scale,允許空=a.isnullable,
預設值=isnull(e.text,''''),欄位說明=isnull(g.[value],'''')
FROM '+@dbname2+'.dbo.syscolumns a
left join '+@dbname2+'.dbo.systypes b on a.xtype=b.xusertype
inner join '+@dbname2+'.dbo.sysobjects d on a.id=d.id  and d.xtype=''U'' and  d.name<>''dtproperties''
left join '+@dbname2+'.dbo.syscomments e on a.cdefault=e.id
left join '+@dbname2+'.sys.extended_properties g on a.id=g.major_id and a.colid=g.minor_id  
order by a.id,a.colorder')
--and not exists(select 1 from #tb2 where 表名2=a.表名1)
select 比較結果=case when a.表名1 is null and b.序號=1 then @dbname1+'——缺少表：'+b.表名2
when b.表名2 is null and a.序號=1 then @dbname2+'——缺少表:'+a.表名1
when a.欄位名 is null and exists(select 1 from #tb1 where 表名1=b.表名2) then 
'/*'+@dbname1+'——['+b.表名2+'] 缺少欄位：'+b.欄位名+'*/alter table '+b.表名2+' drop column '+b.欄位名
when b.欄位名 is null and exists(select 1 from #tb2 where 表名2=a.表名1) and a.型別='decimal' then 
'/*'+@dbname2+'——['+a.表名1+'] 缺少欄位：'+a.欄位名+'*/ alter table '+a.表名1+' add '+a.欄位名+' '
+a.型別+'('+ltrim(str(a.長度))+','+ltrim(str(isnull(a.小數位數,'')))+')'+(case when a.允許空=0 then ' not null' else ' null' end)
when b.欄位名 is null and exists(select 1 from #tb2 where 表名2=a.表名1) and a.型別='nvarchar' then 
'/*'+@dbname2+'——['+a.表名1+'] 缺少欄位：'+a.欄位名+'*/ alter table '+a.表名1+' add '+a.欄位名+' '
+a.型別+'('+ltrim(str(a.長度))+')'+(case when a.允許空=0 then ' not null' else ' null' end)
when b.欄位名 is null and exists(select 1 from #tb2 where 表名2=a.表名1) and a.型別 not in('nvarchar','decimal') then 
'/*'+@dbname2+'——['+a.表名1+'] 缺少欄位：'+a.欄位名+'*/ alter table '+a.表名1+' add '+a.欄位名+' '
+a.型別+(case when a.允許空=0 then ' not null' else ' null' end)
when a.標識<>b.標識 then '--標識不同'
when a.主鍵<>b.主鍵 then '--主鍵設定不同'
when a.型別<>b.型別 and a.型別='decimal' then 
'/*欄位型別不同*/ alter table '+a.表名1+' alter column '+a.欄位名+' '+a.型別+'('+ltrim(str(a.長度))+','+ltrim(str(isnull(a.小數位數,'')))+')'+(case when a.允許空=0 then ' not null' else ' null' end)
when a.型別<>b.型別 and a.型別='nvarchar'  then 
'/*欄位型別不同*/ alter table '+a.表名1+' alter column '+a.欄位名+' '+a.型別+'('+ltrim(str(a.長度))+')'+(case when a.允許空=0 then ' not null' else ' null' end)
when a.型別<>b.型別 and a.型別 not in('nvarchar','decimal')  then 
'/*欄位型別不同*/ alter table '+a.表名1+' alter column '+a.欄位名+' '+a.型別+(case when a.允許空=0 then ' not null' else ' null' end)
when a.佔用位元組數<>b.佔用位元組數 then 
'/*佔用位元組數*/ alter table '+a.表名1+' alter column '+a.欄位名+' '+a.型別+'('+ltrim(str(a.長度))+')'+(case when a.允許空=0 then ' not null' else ' null' end)
when a.長度<>b.長度 then 
'/*長度不同*/ alter table '+a.表名1+' alter column '+a.欄位名+' '+a.型別+'('+ltrim(str(a.長度))+')'+(case when a.允許空=0 then ' not null' else ' null' end)
when a.小數位數<>b.小數位數 then 
'--小數位數不同*/ alter table '+a.表名1+' alter column '+a.欄位名+' '+a.型別+'('+ltrim(str(a.長度))+','+ltrim(str(isnull(a.小數位數,'')))+')'+(case when a.允許空=0 then ' not null' else ' null' end)
when a.允許空<>b.允許空 then '--是否允許空不同'
when a.預設值<>b.預設值 then 
'/*預設值不同*/ alter table '+a.表名1+' add default(0) for '+a.欄位名+' with values'
--when isnull(a.欄位說明,'')<>'' and isnull(b.欄位說明,'')='' then 
--'EXEC sys.sp_addextendedproperty @name=N'''+'MS_Description'+''', @value=N'''+a.欄位說明--+''' , @level0type=N'''+'SCHEMA'+''',@level0name=N'''+'dbo'+''', @level1type=N'''+'TABLE'+''',@level1name=N'''+b.表名2+''', @level2type=N'''+'COLUMN'+''',@level2name=N'''+b.欄位名+'''--欄位說明不同'
else '' end,
*
from #tb1 a
full join #tb2 b on a.表名1=b.表名2 and a.欄位名=b.欄位名
where a.表名1 is null or a.欄位名 is null or b.表名2 is null or b.欄位名 is null 
or a.標識<>b.標識 or a.主鍵<>b.主鍵 or a.型別<>b.型別
or a.佔用位元組數<>b.佔用位元組數 or a.長度<>b.長度 or a.小數位數<>b.小數位數
or a.允許空<>b.允許空 or a.預設值<>b.預設值-- or a.欄位說明<>b.欄位說明
order by isnull(a.表名1,b.表名2),isnull(a.序號,b.序號),isnull(a.欄位名,b.欄位名)

 效果如下：取第一個為例，表名1（FAMS_PRD_TRUNNK資料庫下） 的 AMT_AssetRetirement 表有 HandleOption 欄位，而FAMS資料庫下的 AMT_AssetRetirement 表不存在 HandleOption 欄位