SQL Server 比较两个数据库的视图和存储过程结构差异

IF EXISTS ( SELECT  *
            FROM    dbo.sysobjects
            WHERE   id = OBJECT_ID(N'[dbo].[p_compdb]')
                    AND OBJECTPROPERTY(id, N'IsProcedure') = 1 )
    DROP PROCEDURE [dbo].[p_comparestructure] 
GO 

/*--调用示例 比较两个数据库的 视图 存储过程 结构差异
exec p_compdb 'DBName1','DBName2' 
--*/
ALTER PROC p_compdb
    @db1 SYSNAME , --第一个库 
    @db2 SYSNAME --第二个库 
AS
    EXEC(' 
    select 类型=case isnull(a.xtype,b.xtype) when ''V'' then ''视图'' else ''存储过程'' end 
    ,匹配情况=case 
    when a.name is null then ''库 ['+@db1+'] 中无'' 
    when b.name is null then ''库 ['+@db2+'] 中无'' 
    else ''结构不同'' 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 类型,匹配情况,对象名称')